Import ffcall_2.2.orig.tar.gz
authorSébastien Villemot <sebastien@debian.org>
Wed, 28 Aug 2019 19:39:51 +0000 (20:39 +0100)
committerSébastien Villemot <sebastien@debian.org>
Wed, 28 Aug 2019 19:39:51 +0000 (20:39 +0100)
[dgit import orig ffcall_2.2.orig.tar.gz]

478 files changed:
COPYING [new file with mode: 0644]
ChangeLog [new file with mode: 0644]
DEPENDENCIES [new file with mode: 0644]
INSTALL.os2 [new file with mode: 0644]
INSTALL.windows [new file with mode: 0644]
Makefile.devel [new file with mode: 0644]
Makefile.in [new file with mode: 0644]
Makefile.maint [new file with mode: 0644]
NEWS [new file with mode: 0644]
PLATFORMS [new file with mode: 0644]
README [new file with mode: 0644]
VERSION [new file with mode: 0644]
aclocal.m4 [new file with mode: 0644]
avcall/COPYING [new file with mode: 0644]
avcall/DOC [new file with mode: 0644]
avcall/Makefile.devel [new file with mode: 0644]
avcall/Makefile.in [new file with mode: 0644]
avcall/Makefile.maint [new file with mode: 0644]
avcall/PLATFORMS [new file with mode: 0644]
avcall/README [new file with mode: 0644]
avcall/avcall-alist.h [new file with mode: 0644]
avcall/avcall-alpha-linux.s [new file with mode: 0644]
avcall/avcall-alpha-macro.S [new file with mode: 0644]
avcall/avcall-alpha.c [new file with mode: 0644]
avcall/avcall-arm-macro.S [new file with mode: 0644]
avcall/avcall-arm.c [new file with mode: 0644]
avcall/avcall-arm64-macro.S [new file with mode: 0644]
avcall/avcall-arm64.c [new file with mode: 0644]
avcall/avcall-armhf-macro.S [new file with mode: 0644]
avcall/avcall-armhf.c [new file with mode: 0644]
avcall/avcall-compat.c [new file with mode: 0644]
avcall/avcall-hppa-linux.s [new file with mode: 0644]
avcall/avcall-hppa-macro.S [new file with mode: 0644]
avcall/avcall-hppa.c [new file with mode: 0644]
avcall/avcall-hppa64-linux.s [new file with mode: 0644]
avcall/avcall-hppa64-macro.S [new file with mode: 0644]
avcall/avcall-hppa64.c [new file with mode: 0644]
avcall/avcall-i386-linux.s [new file with mode: 0644]
avcall/avcall-i386-macro.S [new file with mode: 0644]
avcall/avcall-i386-msvc.c [new file with mode: 0644]
avcall/avcall-i386.c [new file with mode: 0644]
avcall/avcall-ia64-linux.s [new file with mode: 0644]
avcall/avcall-ia64-macro.S [new file with mode: 0644]
avcall/avcall-ia64.c [new file with mode: 0644]
avcall/avcall-internal.h [new file with mode: 0644]
avcall/avcall-libapi.c [new file with mode: 0644]
avcall/avcall-m68k-linux.s [new file with mode: 0644]
avcall/avcall-m68k-sun.s [new file with mode: 0644]
avcall/avcall-m68k.c [new file with mode: 0644]
avcall/avcall-m68k.mit.S [new file with mode: 0644]
avcall/avcall-m68k.motorola.S [new file with mode: 0644]
avcall/avcall-mips.c [new file with mode: 0644]
avcall/avcall-mips64.c [new file with mode: 0644]
avcall/avcall-mips64eb-linux.s [new file with mode: 0644]
avcall/avcall-mips64eb-macro.S [new file with mode: 0644]
avcall/avcall-mips64el-linux.s [new file with mode: 0644]
avcall/avcall-mips64el-macro.S [new file with mode: 0644]
avcall/avcall-mipseb-linux.s [new file with mode: 0644]
avcall/avcall-mipseb-macro.S [new file with mode: 0644]
avcall/avcall-mipsel-linux.s [new file with mode: 0644]
avcall/avcall-mipsel-macro.S [new file with mode: 0644]
avcall/avcall-mipsn32.c [new file with mode: 0644]
avcall/avcall-mipsn32eb-linux.s [new file with mode: 0644]
avcall/avcall-mipsn32eb-macro.S [new file with mode: 0644]
avcall/avcall-mipsn32el-linux.s [new file with mode: 0644]
avcall/avcall-mipsn32el-macro.S [new file with mode: 0644]
avcall/avcall-powerpc-aix.s [new file with mode: 0644]
avcall/avcall-powerpc-linux-macro.S [new file with mode: 0644]
avcall/avcall-powerpc-linux.s [new file with mode: 0644]
avcall/avcall-powerpc-macos.s [new file with mode: 0644]
avcall/avcall-powerpc-sysv4-macro.S [new file with mode: 0644]
avcall/avcall-powerpc.c [new file with mode: 0644]
avcall/avcall-powerpc64-aix.s [new file with mode: 0644]
avcall/avcall-powerpc64-elfv2-linux.S [new file with mode: 0644]
avcall/avcall-powerpc64-linux.S [new file with mode: 0644]
avcall/avcall-powerpc64.c [new file with mode: 0644]
avcall/avcall-riscv32-ilp32d-linux.s [new file with mode: 0644]
avcall/avcall-riscv32-ilp32d-macro.S [new file with mode: 0644]
avcall/avcall-riscv32.c [new file with mode: 0644]
avcall/avcall-riscv64-lp64d-linux.s [new file with mode: 0644]
avcall/avcall-riscv64-lp64d-macro.S [new file with mode: 0644]
avcall/avcall-riscv64.c [new file with mode: 0644]
avcall/avcall-s390-linux.s [new file with mode: 0644]
avcall/avcall-s390-macro.S [new file with mode: 0644]
avcall/avcall-s390.c [new file with mode: 0644]
avcall/avcall-s390x-linux.s [new file with mode: 0644]
avcall/avcall-s390x-macro.S [new file with mode: 0644]
avcall/avcall-s390x.c [new file with mode: 0644]
avcall/avcall-sparc-linux.s [new file with mode: 0644]
avcall/avcall-sparc-macro.S [new file with mode: 0644]
avcall/avcall-sparc.c [new file with mode: 0644]
avcall/avcall-sparc64-linux.s [new file with mode: 0644]
avcall/avcall-sparc64-macro.S [new file with mode: 0644]
avcall/avcall-sparc64.c [new file with mode: 0644]
avcall/avcall-structcpy.c [new file with mode: 0644]
avcall/avcall-x86_64-linux.s [new file with mode: 0644]
avcall/avcall-x86_64-macro.S [new file with mode: 0644]
avcall/avcall-x86_64-windows-macro.S [new file with mode: 0644]
avcall/avcall-x86_64-windows.c [new file with mode: 0644]
avcall/avcall-x86_64-windows.s [new file with mode: 0644]
avcall/avcall-x86_64-x32-linux.s [new file with mode: 0644]
avcall/avcall-x86_64.c [new file with mode: 0644]
avcall/avcall.3 [new file with mode: 0644]
avcall/avcall.h [new file with mode: 0644]
avcall/avcall.html [new file with mode: 0644]
avcall/avcall.man [new file with mode: 0644]
avcall/minitests-c++.cc [new file with mode: 0644]
avcall/minitests.c [new file with mode: 0644]
avcall/tests.c [new file with mode: 0644]
build-aux/ar-lib [new file with mode: 0755]
build-aux/compile [new file with mode: 0755]
build-aux/config.guess [new file with mode: 0755]
build-aux/config.rpath [new file with mode: 0755]
build-aux/config.sub [new file with mode: 0755]
build-aux/depcomp [new file with mode: 0755]
build-aux/install-sh [new file with mode: 0755]
build-aux/ltmain.sh [new file with mode: 0644]
build-aux/missing [new file with mode: 0755]
callback/COPYING [new file with mode: 0644]
callback/MIGRATION [new file with mode: 0644]
callback/Makefile.in [new file with mode: 0644]
callback/Makefile.maint [new file with mode: 0644]
callback/PLATFORMS [new file with mode: 0644]
callback/README [new file with mode: 0644]
callback/callback-compat.c [new file with mode: 0644]
callback/callback-libapi.c [new file with mode: 0644]
callback/callback.3 [new file with mode: 0644]
callback/callback.h [new file with mode: 0644]
callback/callback.html [new file with mode: 0644]
callback/callback.man [new file with mode: 0644]
callback/elf-hack.txt [new file with mode: 0644]
callback/minitests-c++.cc [new file with mode: 0644]
callback/minitests.c [new file with mode: 0644]
callback/test1.c [new file with mode: 0644]
callback/tests.c [new file with mode: 0644]
callback/trampoline_r/COPYING [new file with mode: 0644]
callback/trampoline_r/Makefile.devel [new file with mode: 0644]
callback/trampoline_r/Makefile.in [new file with mode: 0644]
callback/trampoline_r/Makefile.maint [new file with mode: 0644]
callback/trampoline_r/PORTING [new file with mode: 0644]
callback/trampoline_r/README [new file with mode: 0644]
callback/trampoline_r/cache-alpha-linux.s [new file with mode: 0644]
callback/trampoline_r/cache-alpha-macro.S [new file with mode: 0644]
callback/trampoline_r/cache-alpha.c [new file with mode: 0644]
callback/trampoline_r/cache-hppa-linux.s [new file with mode: 0644]
callback/trampoline_r/cache-hppa-macro.S [new file with mode: 0644]
callback/trampoline_r/cache-hppa.c [new file with mode: 0644]
callback/trampoline_r/cache-hppa64-linux.s [new file with mode: 0644]
callback/trampoline_r/cache-hppa64-macro.S [new file with mode: 0644]
callback/trampoline_r/cache-powerpc-linux-macro.S [new file with mode: 0644]
callback/trampoline_r/cache-powerpc-linux.s [new file with mode: 0644]
callback/trampoline_r/cache-powerpc-macos.s [new file with mode: 0644]
callback/trampoline_r/cache-powerpc.c [new file with mode: 0644]
callback/trampoline_r/cache-powerpc64-elfv2-linux.s [new file with mode: 0644]
callback/trampoline_r/cache-powerpc64-elfv2-macro.S [new file with mode: 0644]
callback/trampoline_r/cache-powerpc64.c [new file with mode: 0644]
callback/trampoline_r/cache-sparc-linux.s [new file with mode: 0644]
callback/trampoline_r/cache-sparc-macro.S [new file with mode: 0644]
callback/trampoline_r/cache-sparc.c [new file with mode: 0644]
callback/trampoline_r/cache-sparc64-linux.s [new file with mode: 0644]
callback/trampoline_r/cache-sparc64-macro.S [new file with mode: 0644]
callback/trampoline_r/cache.c [new file with mode: 0644]
callback/trampoline_r/test1.c [new file with mode: 0644]
callback/trampoline_r/test2.c [new file with mode: 0644]
callback/trampoline_r/tramp-hppa-macro.S [new file with mode: 0644]
callback/trampoline_r/tramp-hppa64-macro.S [new file with mode: 0644]
callback/trampoline_r/tramp-ia64-macro.S [new file with mode: 0644]
callback/trampoline_r/tramp-powerpc-aix.S [new file with mode: 0644]
callback/trampoline_r/tramp-powerpc64-aix.S [new file with mode: 0644]
callback/trampoline_r/trampoline.c [new file with mode: 0644]
callback/trampoline_r/trampoline_r.3 [new file with mode: 0644]
callback/trampoline_r/trampoline_r.h [new file with mode: 0644]
callback/trampoline_r/trampoline_r.html [new file with mode: 0644]
callback/trampoline_r/trampoline_r.man [new file with mode: 0644]
callback/vacall_r/COPYING [new file with mode: 0644]
callback/vacall_r/Makefile.devel [new file with mode: 0644]
callback/vacall_r/Makefile.in [new file with mode: 0644]
callback/vacall_r/Makefile.maint [new file with mode: 0644]
callback/vacall_r/README [new file with mode: 0644]
callback/vacall_r/get_receiver.c [new file with mode: 0644]
callback/vacall_r/vacall-alpha-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-alpha-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-arm-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-arm64-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-armhf-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-hppa-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-hppa-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-hppa64-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-hppa64-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-i386-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-i386-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-i386-msvc.c [new file with mode: 0644]
callback/vacall_r/vacall-ia64-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-ia64-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-libapi.c [new file with mode: 0644]
callback/vacall_r/vacall-m68k-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-m68k-sun.s [new file with mode: 0644]
callback/vacall_r/vacall-m68k.mit.S [new file with mode: 0644]
callback/vacall_r/vacall-m68k.motorola.S [new file with mode: 0644]
callback/vacall_r/vacall-mips64eb-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-mips64eb-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-mips64el-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-mips64el-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-mipseb-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-mipseb-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-mipsel-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-mipsel-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-mipsn32eb-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-mipsn32eb-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-mipsn32el-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-mipsn32el-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-powerpc-aix.s [new file with mode: 0644]
callback/vacall_r/vacall-powerpc-linux-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-powerpc-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-powerpc-macos.s [new file with mode: 0644]
callback/vacall_r/vacall-powerpc-sysv4-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-powerpc64-aix.s [new file with mode: 0644]
callback/vacall_r/vacall-powerpc64-elfv2-linux.S [new file with mode: 0644]
callback/vacall_r/vacall-powerpc64-linux.S [new file with mode: 0644]
callback/vacall_r/vacall-riscv32-ilp32d-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-riscv32-ilp32d-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-riscv64-lp64d-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-riscv64-lp64d-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-s390-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-s390-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-s390x-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-s390x-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-sparc-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-sparc-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-sparc64-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-sparc64-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-structcpy.c [new file with mode: 0644]
callback/vacall_r/vacall-x86_64-linux.s [new file with mode: 0644]
callback/vacall_r/vacall-x86_64-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-x86_64-windows-macro.S [new file with mode: 0644]
callback/vacall_r/vacall-x86_64-windows.s [new file with mode: 0644]
callback/vacall_r/vacall-x86_64-x32-linux.s [new file with mode: 0644]
callback/vacall_r/vacall_r.h [new file with mode: 0644]
common/asm-alpha.sh [new file with mode: 0755]
common/asm-arm.h [new file with mode: 0644]
common/asm-arm.sh [new file with mode: 0755]
common/asm-hppa.h [new file with mode: 0644]
common/asm-hppa.sh [new file with mode: 0755]
common/asm-hppa64.h [new file with mode: 0644]
common/asm-hppa64.sh [new file with mode: 0755]
common/asm-i386.h [new file with mode: 0644]
common/asm-i386.sh [new file with mode: 0755]
common/asm-m68k.h [new file with mode: 0644]
common/asm-m68k.sh [new file with mode: 0755]
common/asm-mips.h [new file with mode: 0644]
common/asm-mips.sh [new file with mode: 0755]
common/asm-powerpc.sh [new file with mode: 0755]
common/asm-riscv.sh [new file with mode: 0755]
common/asm-s390.sh [new file with mode: 0755]
common/asm-sparc.h [new file with mode: 0644]
common/asm-sparc.sh [new file with mode: 0755]
common/asm-x86_64.h [new file with mode: 0644]
common/asm-x86_64.sh [new file with mode: 0755]
common/noexecstack-arm.h [new file with mode: 0644]
common/noexecstack.h [new file with mode: 0644]
common/structcpy.c [new file with mode: 0644]
common/uniq-u.c [new file with mode: 0644]
config.h.in [new file with mode: 0644]
configure [new file with mode: 0755]
configure.ac [new file with mode: 0644]
dummy/ffcall-version.h [new file with mode: 0644]
ffcall-abi.h [new file with mode: 0644]
ffcall-stdint.h [new file with mode: 0644]
ffcall-version.c [new file with mode: 0644]
ffcall-version.in.h [new file with mode: 0644]
gnulib-lib/Makefile.am [new file with mode: 0644]
gnulib-lib/Makefile.in [new file with mode: 0644]
gnulib-lib/_Noreturn.h [new file with mode: 0644]
gnulib-lib/glthread/lock.c [new file with mode: 0644]
gnulib-lib/glthread/lock.h [new file with mode: 0644]
gnulib-lib/glthread/threadlib.c [new file with mode: 0644]
gnulib-lib/limits.in.h [new file with mode: 0644]
gnulib-lib/stdint.in.h [new file with mode: 0644]
gnulib-lib/stdnoreturn.in.h [new file with mode: 0644]
gnulib-lib/sys_types.in.h [new file with mode: 0644]
gnulib-lib/windows-initguard.h [new file with mode: 0644]
gnulib-lib/windows-mutex.c [new file with mode: 0644]
gnulib-lib/windows-mutex.h [new file with mode: 0644]
gnulib-lib/windows-once.c [new file with mode: 0644]
gnulib-lib/windows-once.h [new file with mode: 0644]
gnulib-lib/windows-recmutex.c [new file with mode: 0644]
gnulib-lib/windows-recmutex.h [new file with mode: 0644]
gnulib-lib/windows-rwlock.c [new file with mode: 0644]
gnulib-lib/windows-rwlock.h [new file with mode: 0644]
gnulib-m4/00gnulib.m4 [new file with mode: 0644]
gnulib-m4/absolute-header.m4 [new file with mode: 0644]
gnulib-m4/ansi-c++.m4 [new file with mode: 0644]
gnulib-m4/asm-underscore.m4 [new file with mode: 0644]
gnulib-m4/extensions.m4 [new file with mode: 0644]
gnulib-m4/gnulib-cache.m4 [new file with mode: 0644]
gnulib-m4/gnulib-common.m4 [new file with mode: 0644]
gnulib-m4/gnulib-comp.m4 [new file with mode: 0644]
gnulib-m4/gnulib-tool.m4 [new file with mode: 0644]
gnulib-m4/host-cpu-c-abi.m4 [new file with mode: 0644]
gnulib-m4/include_next.m4 [new file with mode: 0644]
gnulib-m4/lib-ld.m4 [new file with mode: 0644]
gnulib-m4/lib-link.m4 [new file with mode: 0644]
gnulib-m4/lib-prefix.m4 [new file with mode: 0644]
gnulib-m4/limits-h.m4 [new file with mode: 0644]
gnulib-m4/lock.m4 [new file with mode: 0644]
gnulib-m4/longlong.m4 [new file with mode: 0644]
gnulib-m4/multiarch.m4 [new file with mode: 0644]
gnulib-m4/nocrash.m4 [new file with mode: 0644]
gnulib-m4/off_t.m4 [new file with mode: 0644]
gnulib-m4/onceonly.m4 [new file with mode: 0644]
gnulib-m4/pthread_rwlock_rdlock.m4 [new file with mode: 0644]
gnulib-m4/ssize_t.m4 [new file with mode: 0644]
gnulib-m4/stdint.m4 [new file with mode: 0644]
gnulib-m4/stdnoreturn.m4 [new file with mode: 0644]
gnulib-m4/sys_types_h.m4 [new file with mode: 0644]
gnulib-m4/threadlib.m4 [new file with mode: 0644]
gnulib-m4/wint_t.m4 [new file with mode: 0644]
m4/as-underscore.m4 [new file with mode: 0644]
m4/cc-gcc.m4 [new file with mode: 0644]
m4/codeexec.m4 [new file with mode: 0644]
m4/endianness.m4 [new file with mode: 0644]
m4/general.m4 [new file with mode: 0644]
m4/getpagesize.m4 [new file with mode: 0644]
m4/ireg.m4 [new file with mode: 0644]
m4/libtool.m4 [new file with mode: 0644]
m4/ln.m4 [new file with mode: 0644]
m4/ltoptions.m4 [new file with mode: 0644]
m4/ltsugar.m4 [new file with mode: 0644]
m4/ltversion.m4 [new file with mode: 0644]
m4/lt~obsolete.m4 [new file with mode: 0644]
m4/mach-vm.m4 [new file with mode: 0644]
m4/mmap.m4 [new file with mode: 0644]
m4/mprotect.m4 [new file with mode: 0644]
m4/proto.m4 [new file with mode: 0644]
m4/shm.m4 [new file with mode: 0644]
m4/smallstruct.m4 [new file with mode: 0644]
testcases.c [new file with mode: 0644]
trampoline/COPYING [new file with mode: 0644]
trampoline/Makefile.devel [new file with mode: 0644]
trampoline/Makefile.in [new file with mode: 0644]
trampoline/Makefile.maint [new file with mode: 0644]
trampoline/PLATFORMS [new file with mode: 0644]
trampoline/PORTING [new file with mode: 0644]
trampoline/README [new file with mode: 0644]
trampoline/cache-alpha-linux.s [new file with mode: 0644]
trampoline/cache-alpha-macro.S [new file with mode: 0644]
trampoline/cache-alpha.c [new file with mode: 0644]
trampoline/cache-hppa-linux.s [new file with mode: 0644]
trampoline/cache-hppa-macro.S [new file with mode: 0644]
trampoline/cache-hppa.c [new file with mode: 0644]
trampoline/cache-hppa64-linux.s [new file with mode: 0644]
trampoline/cache-hppa64-macro.S [new file with mode: 0644]
trampoline/cache-powerpc-linux-macro.S [new file with mode: 0644]
trampoline/cache-powerpc-linux.s [new file with mode: 0644]
trampoline/cache-powerpc-macos.s [new file with mode: 0644]
trampoline/cache-powerpc.c [new file with mode: 0644]
trampoline/cache-powerpc64-elfv2-linux.s [new file with mode: 0644]
trampoline/cache-powerpc64-elfv2-macro.S [new file with mode: 0644]
trampoline/cache-powerpc64.c [new file with mode: 0644]
trampoline/cache-sparc-linux.s [new file with mode: 0644]
trampoline/cache-sparc-macro.S [new file with mode: 0644]
trampoline/cache-sparc.c [new file with mode: 0644]
trampoline/cache-sparc64-linux.s [new file with mode: 0644]
trampoline/cache-sparc64-macro.S [new file with mode: 0644]
trampoline/cache.c [new file with mode: 0644]
trampoline/test1.c [new file with mode: 0644]
trampoline/test2-c++.cc [new file with mode: 0644]
trampoline/test2.c [new file with mode: 0644]
trampoline/tramp-hppa-macro.S [new file with mode: 0644]
trampoline/tramp-hppa64-macro.S [new file with mode: 0644]
trampoline/tramp-ia64-macro.S [new file with mode: 0644]
trampoline/tramp-powerpc-aix.S [new file with mode: 0644]
trampoline/tramp-powerpc64-aix.S [new file with mode: 0644]
trampoline/trampoline.3 [new file with mode: 0644]
trampoline/trampoline.c [new file with mode: 0644]
trampoline/trampoline.h [new file with mode: 0644]
trampoline/trampoline.html [new file with mode: 0644]
trampoline/trampoline.man [new file with mode: 0644]
vacall/COPYING [new file with mode: 0644]
vacall/Makefile.devel [new file with mode: 0644]
vacall/Makefile.in [new file with mode: 0644]
vacall/Makefile.maint [new file with mode: 0644]
vacall/PLATFORMS [new file with mode: 0644]
vacall/README [new file with mode: 0644]
vacall/minitests-c++.cc [new file with mode: 0644]
vacall/minitests.c [new file with mode: 0644]
vacall/tests.c [new file with mode: 0644]
vacall/vacall-alpha-linux.s [new file with mode: 0644]
vacall/vacall-alpha-macro.S [new file with mode: 0644]
vacall/vacall-alpha.c [new file with mode: 0644]
vacall/vacall-arm-linux-pic.s [new file with mode: 0644]
vacall/vacall-arm-linux.s [new file with mode: 0644]
vacall/vacall-arm-macro.S [new file with mode: 0644]
vacall/vacall-arm.c [new file with mode: 0644]
vacall/vacall-arm64-macro.S [new file with mode: 0644]
vacall/vacall-arm64.c [new file with mode: 0644]
vacall/vacall-armhf-linux-pic.s [new file with mode: 0644]
vacall/vacall-armhf-linux.s [new file with mode: 0644]
vacall/vacall-armhf-macro.S [new file with mode: 0644]
vacall/vacall-armhf.c [new file with mode: 0644]
vacall/vacall-hppa-linux.s [new file with mode: 0644]
vacall/vacall-hppa-macro.S [new file with mode: 0644]
vacall/vacall-hppa.c [new file with mode: 0644]
vacall/vacall-hppa64-linux.s [new file with mode: 0644]
vacall/vacall-hppa64-macro.S [new file with mode: 0644]
vacall/vacall-hppa64.c [new file with mode: 0644]
vacall/vacall-i386-linux-pic.s [new file with mode: 0644]
vacall/vacall-i386-linux.s [new file with mode: 0644]
vacall/vacall-i386-macro.S [new file with mode: 0644]
vacall/vacall-i386-msvc.c [new file with mode: 0644]
vacall/vacall-i386.c [new file with mode: 0644]
vacall/vacall-ia64-linux.s [new file with mode: 0644]
vacall/vacall-ia64-macro.S [new file with mode: 0644]
vacall/vacall-ia64.c [new file with mode: 0644]
vacall/vacall-internal.h [new file with mode: 0644]
vacall/vacall-libapi.c [new file with mode: 0644]
vacall/vacall-m68k-linux.s [new file with mode: 0644]
vacall/vacall-m68k-sun.s [new file with mode: 0644]
vacall/vacall-m68k.c [new file with mode: 0644]
vacall/vacall-m68k.mit.S [new file with mode: 0644]
vacall/vacall-m68k.motorola.S [new file with mode: 0644]
vacall/vacall-mips.c [new file with mode: 0644]
vacall/vacall-mips64.c [new file with mode: 0644]
vacall/vacall-mips64eb-linux.s [new file with mode: 0644]
vacall/vacall-mips64eb-macro.S [new file with mode: 0644]
vacall/vacall-mips64el-linux.s [new file with mode: 0644]
vacall/vacall-mips64el-macro.S [new file with mode: 0644]
vacall/vacall-mipseb-linux.s [new file with mode: 0644]
vacall/vacall-mipseb-macro.S [new file with mode: 0644]
vacall/vacall-mipsel-linux.s [new file with mode: 0644]
vacall/vacall-mipsel-macro.S [new file with mode: 0644]
vacall/vacall-mipsn32.c [new file with mode: 0644]
vacall/vacall-mipsn32eb-linux.s [new file with mode: 0644]
vacall/vacall-mipsn32eb-macro.S [new file with mode: 0644]
vacall/vacall-mipsn32el-linux.s [new file with mode: 0644]
vacall/vacall-mipsn32el-macro.S [new file with mode: 0644]
vacall/vacall-powerpc-aix.s [new file with mode: 0644]
vacall/vacall-powerpc-linux-macro.S [new file with mode: 0644]
vacall/vacall-powerpc-linux.s [new file with mode: 0644]
vacall/vacall-powerpc-macos.s [new file with mode: 0644]
vacall/vacall-powerpc-sysv4-macro.S [new file with mode: 0644]
vacall/vacall-powerpc.c [new file with mode: 0644]
vacall/vacall-powerpc64-aix.s [new file with mode: 0644]
vacall/vacall-powerpc64-elfv2-linux.S [new file with mode: 0644]
vacall/vacall-powerpc64-linux.S [new file with mode: 0644]
vacall/vacall-powerpc64.c [new file with mode: 0644]
vacall/vacall-riscv32-ilp32d-linux.s [new file with mode: 0644]
vacall/vacall-riscv32-ilp32d-macro.S [new file with mode: 0644]
vacall/vacall-riscv32.c [new file with mode: 0644]
vacall/vacall-riscv64-lp64d-linux.s [new file with mode: 0644]
vacall/vacall-riscv64-lp64d-macro.S [new file with mode: 0644]
vacall/vacall-riscv64.c [new file with mode: 0644]
vacall/vacall-s390-linux.s [new file with mode: 0644]
vacall/vacall-s390-macro.S [new file with mode: 0644]
vacall/vacall-s390.c [new file with mode: 0644]
vacall/vacall-s390x-linux.s [new file with mode: 0644]
vacall/vacall-s390x-macro.S [new file with mode: 0644]
vacall/vacall-s390x.c [new file with mode: 0644]
vacall/vacall-sparc-linux-pic.s [new file with mode: 0644]
vacall/vacall-sparc-linux.s [new file with mode: 0644]
vacall/vacall-sparc-macro.S [new file with mode: 0644]
vacall/vacall-sparc.c [new file with mode: 0644]
vacall/vacall-sparc64-linux-pic.s [new file with mode: 0644]
vacall/vacall-sparc64-linux.s [new file with mode: 0644]
vacall/vacall-sparc64-macro.S [new file with mode: 0644]
vacall/vacall-sparc64.c [new file with mode: 0644]
vacall/vacall-structcpy.c [new file with mode: 0644]
vacall/vacall-x86_64-linux.s [new file with mode: 0644]
vacall/vacall-x86_64-macro.S [new file with mode: 0644]
vacall/vacall-x86_64-windows-macro.S [new file with mode: 0644]
vacall/vacall-x86_64-windows.c [new file with mode: 0644]
vacall/vacall-x86_64-windows.s [new file with mode: 0644]
vacall/vacall-x86_64-x32-linux.s [new file with mode: 0644]
vacall/vacall-x86_64.c [new file with mode: 0644]
vacall/vacall.3 [new file with mode: 0644]
vacall/vacall.h [new file with mode: 0644]
vacall/vacall.html [new file with mode: 0644]
vacall/vacall.man [new file with mode: 0644]

diff --git a/COPYING b/COPYING
new file mode 100644 (file)
index 0000000..a3d1815
--- /dev/null
+++ b/COPYING
@@ -0,0 +1,340 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+                          51 Franklin Street, Fifth Floor,
+                          Boston, MA 02110-1301, USA.
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The licenses for most software are designed to take away your
+freedom to share and change it.  By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users.  This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it.  (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.)  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+  To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have.  You must make sure that they, too, receive or can get the
+source code.  And you must show them these terms so they know their
+rights.
+
+  We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+  Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software.  If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+  Finally, any free program is threatened constantly by software
+patents.  We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary.  To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+\f
+                    GNU GENERAL PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License.  The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language.  (Hereinafter, translation is included without limitation in
+the term "modification".)  Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope.  The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+  1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+  2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+    a) You must cause the modified files to carry prominent notices
+    stating that you changed the files and the date of any change.
+
+    b) You must cause any work that you distribute or publish, that in
+    whole or in part contains or is derived from the Program or any
+    part thereof, to be licensed as a whole at no charge to all third
+    parties under the terms of this License.
+
+    c) If the modified program normally reads commands interactively
+    when run, you must cause it, when started running for such
+    interactive use in the most ordinary way, to print or display an
+    announcement including an appropriate copyright notice and a
+    notice that there is no warranty (or else, saying that you provide
+    a warranty) and that users may redistribute the program under
+    these conditions, and telling the user how to view a copy of this
+    License.  (Exception: if the Program itself is interactive but
+    does not normally print such an announcement, your work based on
+    the Program is not required to print an announcement.)
+\f
+These requirements apply to the modified work as a whole.  If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works.  But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+  3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+    a) Accompany it with the complete corresponding machine-readable
+    source code, which must be distributed under the terms of Sections
+    1 and 2 above on a medium customarily used for software interchange; or,
+
+    b) Accompany it with a written offer, valid for at least three
+    years, to give any third party, for a charge no more than your
+    cost of physically performing source distribution, a complete
+    machine-readable copy of the corresponding source code, to be
+    distributed under the terms of Sections 1 and 2 above on a medium
+    customarily used for software interchange; or,
+
+    c) Accompany it with the information you received as to the offer
+    to distribute corresponding source code.  (This alternative is
+    allowed only for noncommercial distribution and only if you
+    received the program in object code or executable form with such
+    an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it.  For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable.  However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+\f
+  4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License.  Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+  5. You are not required to accept this License, since you have not
+signed it.  However, nothing else grants you permission to modify or
+distribute the Program or its derivative works.  These actions are
+prohibited by law if you do not accept this License.  Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+  6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions.  You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+  7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all.  For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices.  Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+\f
+  8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded.  In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+  9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number.  If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation.  If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+  10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission.  For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this.  Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+                            NO WARRANTY
+
+  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+                     END OF TERMS AND CONDITIONS
+\f
+        Appendix: How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software Foundation,
+    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+    Gnomovision version 69, Copyright (C) year  name of author
+    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  Here is a sample; alter the names:
+
+  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+  `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+  <signature of Ty Coon>, 1 April 1989
+  Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs.  If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library.  If this is what you want to do, use the GNU Library General
+Public License instead of this License.
diff --git a/ChangeLog b/ChangeLog
new file mode 100644 (file)
index 0000000..7c401db
--- /dev/null
+++ b/ChangeLog
@@ -0,0 +1,5421 @@
+2019-08-24  Bruno Haible  <bruno@clisp.org>
+
+       Bump shared library version numbers.
+       * Makefile.in (LIBFFCALL_VERSION_INFO): Bump to 0:2:0.
+       * avcall/Makefile.in (LIBAVCALL_VERSION_INFO): Bump to 1:2:0.
+       * trampoline/Makefile.in (LIBTRAMPOLINE_VERSION_INFO): Likewise.
+       * callback/Makefile.in (LIBCALLBACK_VERSION_INFO): Likewise.
+
+2019-08-24  Bruno Haible  <bruno@clisp.org>
+
+       hppa: Add comments about structure arguments.
+       * avcall/avcall-hppa.c: Add comment.
+       * avcall/avcall-internal.h (__av_struct): Likewise.
+       * vacall/vacall-internal.h (__va_arg_struct): Likewise.
+
+2019-08-24  Bruno Haible  <bruno@clisp.org>
+
+       Add a test for by-value passing.
+       * testcases.c (v_clobber_K): New function.
+       * avcall/tests.c (by_value_tests): New function.
+       (main): Invoke it.
+       * vacall/tests.c (simulator, main): Test v_clobber_K.
+       * callback/tests.c (v_clobber_K_simulator): New function.
+       (main): Test it.
+
+2019-08-24  Bruno Haible  <bruno@clisp.org>
+
+       hppa: Implement correct floating-point argument passing on Linux.
+       * avcall/avcall.h (__AV_ALIST_WORDS): Add comment.
+       * avcall/avcall-alist.h (__av_alist) [__hppa__]: Add farg_mask,
+       darg_mask.
+       * avcall/avcall-internal.h (__av_start1) [__hppa__]: Initialize
+       farg_mask, darg_mask.
+       (_av_float) [__hppa__]: Set a bit in farg_mask.
+       (_av_double) [__hppa__]: Set a bit in darg_mask.
+       * avcall/avcall-hppa.c (avcall_call): Copy floating-point arguments
+       among the first 4 words to %fr4L...%fr7L and %fr5,%fr7.
+       * vacall/vacall-internal.h (_va_arg_float, _va_arg_double) [__hppa__]:
+       For floating-point arguments among the first 4 words, use the value
+       passed in floating-point registers.
+       * PLATFORMS, */PLATFORMS: List the Linux/hppa ABI.
+       * NEWS: Mention the new port.
+
+2019-08-24  Bruno Haible  <bruno@clisp.org>
+
+       hppa: Fix stack corruption in avcall.
+       * avcall/avcall-hppa.c (avcall_call): Don't let GCC optimize away the
+       stack-allocated array.
+       * NEWS: Mention the fix.
+
+2019-08-24  Bruno Haible  <bruno@clisp.org>
+
+       Add another integer test.
+       * testcases.c (i17, ..., i32): New variables.
+       (i_i32): New function.
+       * avcall/tests.c (int_tests): Test it.
+       * vacall/tests.c (simulator, main): Likewise.
+       * callback/tests.c (i_i32_simulator): New function.
+       (main): Test it.
+
+2019-08-24  Bruno Haible  <bruno@clisp.org>
+
+       cross-tools: Add support for GCC 8 and 9.
+       * cross-tools/cross-build.sh (func_build_gcc): Handle also GCC 8 and 9.
+
+2019-08-21  Bruno Haible  <bruno@clisp.org>
+
+       mips: Change the default 32-bit ABI from fp32 to fpxx.
+       Reported by Sébastien Villemot <sebastien@debian.org>
+       at <https://savannah.gnu.org/bugs/?52510>.
+       He also found the trick with -fno-tree-dce.
+       * porting-tools/abis/mips-abis.txt: New file.
+       * cross-tools/cross.conf (mips): Use gcc 5 and binutils 2.27.
+       * common/asm-mips.sh: Eliminate .nan and .module lines.
+       * avcall/avcall-mipsn32.c (avcall_call): Use return value of
+       __builtin_alloca instead of accessing the stack pointer directly.
+       * avcall/Makefile.devel (avcall-mipseb-linux.s, avcall-mipsel-linux.s):
+       Build with gcc 5, with option -mfpxx (for compatibility with current
+       Debian), with -march=mips2 (required by -mfpxx), and -fno-tree-dce
+       (required to avoid that gcc eliminates the __builtin_alloca call).
+       (avcall-mipsn32eb-linux.s, avcall-mipsn32el-linux.s,
+       avcall-mips64eb-linux.s, avcall-mips64el-linux.s): Build with gcc 5.
+       * vacall/Makefile.devel (vacall-mipseb-linux.s, vacall-mipsel-linux.s):
+       Build with gcc 5, with option -mfpxx (for compatibility with current
+       Debian) and -march=mips2 (required by -mfpxx).
+       (vacall-mipsn32eb-linux.s, vacall-mipsn32el-linux.s,
+       vacall-mips64eb-linux.s, vacall-mips64el-linux.s): Build with gcc 5.
+       * callback/vacall_r/Makefile.devel (vacall-mipseb-linux.s,
+       vacall-mipsel-linux.s): Build with gcc 5, with option -mfpxx (for
+       compatibility with current Debian) and -march=mips2 (required by
+       -mfpxx).
+       (vacall-mipsn32eb-linux.s, vacall-mipsn32el-linux.s,
+       vacall-mips64eb-linux.s, vacall-mips64el-linux.s): Build with gcc 5.
+       * NEWS: Mention the change.
+
+2019-08-20  Bruno Haible  <bruno@clisp.org>
+
+       riscv32: Add support for riscv32-ilp32d ABI.
+       * cross-tools/cross.conf: Add configuration for riscv32 cross tools.
+       * porting-tools/emulation/buildroot-riscv-2018-10-20-riscv32.config: New
+       file.
+       * porting-tools/emulation/tinyemu-riscv32.txt: New file.
+       * porting-tools/emulation/README: Refer to it.
+       * porting-tools/abis/README: Tweaks.
+       * porting-tools/abis/call-used-registers.txt: Add info about riscv32.
+       * porting-tools/abis/reg-struct-return.txt: Likewise.
+       * porting-tools/abis/stack-frame.txt: Likewise.
+       * porting-tools/execstack/voidfunc.c: Add command for riscv32.
+       * porting-tools/execstack/voidfunc-riscv32.o: New generated file.
+       * porting-tools/execstack/README: Add info about riscv32.
+       * ffcall-abi.h: Add support for riscv32-lp64.
+       * configure.ac: Check for <sys/cachectl.h> also on riscv32.
+       * avcall/avcall.h (__AV_STRUCT_RETURN): Add code for __riscv32__.
+       * avcall/avcall-alist.h (__av_alist): Likewise.
+       * avcall/avcall-internal.h: Add code for __riscv32__, especially
+       __av_start1, __av_reg_struct_return, __av_start_struct4, __av_word,
+       __av_longlong, __av_ulonglong, __av_arg_longlong, _av_float, _av_double,
+       __av_struct.
+       * avcall/avcall-riscv32.c: New file.
+       * avcall/Makefile.devel (avcall-riscv32-ilp32d-linux.s,
+       avcall-riscv32-ilp32d-macro.S): New targets.
+       * avcall/Makefile.in (avcall-riscv32-ilp32d.lo,
+       avcall-riscv32-ilp32d.s): New targets.
+       (clean): Remove avcall-riscv32-ilp32d.s.
+       (SOURCE_FILES): Add avcall-riscv32.c, avcall-riscv32-ilp32d-linux.s,
+       avcall-riscv32-ilp32d-macro.S.
+       * vacall/vacall.h (__VA_STRUCT_RETURN): Add code for __riscv32__.
+       * vacall/vacall-internal.h: Add code for __riscv32__, especially
+       __va_alist, __va_reg_struct_return, __va_start_struct2,
+       __va_arg_leftadjusted, __va_arg_adjusted, _va_arg_longlong,
+       _va_arg_ulonglong, __va_arg_longlong, __va_align_double, _va_arg_float,
+       _va_arg_double, __va_arg_struct.
+       * vacall/vacall-riscv32.c: New file.
+       * vacall/Makefile.devel (vacall-riscv32-ilp32d-linux.s,
+       vacall-riscv32-ilp32d-macro.S): New targets.
+       * vacall/Makefile.in (vacall-riscv32-ilp32d.@OBJEXT@,
+       vacall-riscv32-ilp32d.s): New targets.
+       (clean): Remove vacall-riscv32-ilp32d.s.
+       (SOURCE_FILES): Add vacall-riscv32.c, vacall-riscv32-ilp32d-linux.s,
+       vacall-riscv32-ilp32d-macro.S.
+       * callback/vacall_r/vacall_r.h (__VA_STRUCT_RETURN): Add code for
+       __riscv32__.
+       * callback/vacall_r/Makefile.devel (vacall-riscv32-ilp32d-linux.s,
+       vacall-riscv32-ilp32d-macro.S): New targets.
+       * callback/vacall_r/Makefile.in (vacall-riscv32-ilp32d.lo,
+       vacall-riscv32-ilp32d.s): New targets.
+       (clean): Remove vacall-riscv32-ilp32d.s.
+       (SOURCE_FILES): Add vacall-riscv32-ilp32d-linux.s,
+       vacall-riscv32-ilp32d-macro.S.
+       * trampoline/Makefile.devel (proto-riscv32.s, tramp-riscv32.o): New
+       targets.
+       * trampoline/proto-riscv32.s: New generated file.
+       * trampoline/tramp-riscv32.old.s: New file.
+       * trampoline/tramp-riscv32.old.o: New generated file.
+       * trampoline/tramp-riscv32.s: New file.
+       * trampoline/tramp-riscv32.o: New generated file.
+       * trampoline/trampoline.c: Implement for __riscv32__.
+       * callback/trampoline_r/Makefile.devel (proto-riscv32.s,
+       tramp-riscv32.o): New targets.
+       * callback/trampoline_r/proto.c: Add code for __riscv32__.
+       * callback/trampoline_r/proto-riscv32.s: New generated file.
+       * callback/trampoline_r/tramp-riscv32.old.s: New file.
+       * callback/trampoline_r/tramp-riscv32.old.o: New generated file.
+       * callback/trampoline_r/tramp-riscv32.s: New file.
+       * callback/trampoline_r/tramp-riscv32.o: New generated file.
+       * callback/trampoline_r/trampoline.c: Implement for __riscv32__.
+       * callback/trampoline_r/test1.c: Add support for __riscv32__.
+       * PLATFORMS, */PLATFORMS: List the 32-bit RISC-V ABI.
+       * NEWS: Mention the new port.
+
+2019-08-19  Bruno Haible  <bruno@clisp.org>
+
+       Add some more general-purpose args boundary tests.
+       * testcases.c (l_l0J, l_l1J, l_l2J, l_l3J, l_l4J, l_l5J, l_l6J, l_l7J):
+       New functions.
+       * avcall/tests.c (gpargs_boundary_tests): Test them.
+       * vacall/tests.c (simulator, main): Likewise.
+       * callback/tests.c (l_l*J_simulator): New functions.
+       (main): Test them.
+       * porting-tools/abis/gpargs*.c: Add a corresponding test here as well.
+
+2019-08-19  Bruno Haible  <bruno@clisp.org>
+
+       riscv64: Fix bug regarding passing of more than 8 arguments.
+       * porting-tools/abis/stack-frame.txt: Correct information about riscv64
+       ABI.
+       * avcall/avcall-alist.h (__av_alist) [__riscv64__]: Remove ianum and
+       iargs.
+       * avcall/avcall-internal.h (__av_start1, __av_start_struct4, __av_long,
+       __av_ulong, __av_ptr, _av_float, _av_double, __av_struct) [__riscv64__]:
+       Change accordingly.
+       * avcall/avcall-riscv64.c (avcall_call): Likewise.
+       * vacall/vacall-internal.h (__va_arg_adjusted): Deal with a split struct
+       that spans the 8th and 9th argument words.
+       * vacall/vacall-riscv64.c (struct gpargsequence): New type.
+       (vacall_receiver): Use it to make sure that room is allocated when a
+       struct is passed that spans the 8th and 9th argument words.
+
+2019-08-19  Bruno Haible  <bruno@clisp.org>
+
+       arm64: Fix bug regarding passing of more than 8 arguments.
+       * vacall/vacall-internal.h (__va_arg_adjusted): Bump (LIST)->ianum when
+       switching from registers to the stack.
+       * NEWS: Mention it.
+
+2019-08-19  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Remove unnecessary parentheses.
+       * avcall/avcall-internal.h (av_double, _av_float, _av_double): Remove
+       unnecessary level of parentheses.
+
+2019-05-11  Bruno Haible  <bruno@clisp.org>
+
+       Update bug reporting instructions.
+       * README: Tell users to report bugs in the bug tracker or by email.
+       * cross-tools/cross-build.sh (func_usage): Likewise.
+
+2019-04-01  Bruno Haible  <bruno@clisp.org>
+
+       build: Separate git operations from build operations.
+       * gitsub.sh: New file, from gnulib.
+       * .gitmodules: New file.
+       * autogen.sh: Remove all git operations. Look at GNULIB_SRCDIR
+       environment variable. Ignore the GNULIB_TOOL environment variable.
+       * README-hacking: Explain when to use gitsub.sh.
+
+2019-01-19  Bruno Haible  <bruno@clisp.org>
+
+       Record support for NetBSD/SPARC64.
+       * PLATFORMS, */PLATFORMS: List this platform.
+
+2018-05-04  Bruno Haible  <bruno@clisp.org>
+
+       Simplify code. Drop support for Borland C++ on Windows.
+       * common/asm-x86_64.h, common/asm-x86_64.sh, ffcall-stdint.h:
+       Simplify 'defined _WIN32 || defined __WIN32__' to just 'defined _WIN32'.
+       * avcall/avcall.h, avcall/avcall-alist.h: Likewise.
+       * vacall/vacall.h, vacall/vacall-internal.h: Likewise.
+       * callback/vacall_r/vacall_r.h: Likewise.
+       * trampoline/trampoline.c: Likewise.
+       * callback/trampoline_r/trampoline.c: Likewise.
+
+2018-04-08  Bruno Haible  <bruno@clisp.org>
+
+       riscv64: Add support for riscv64-lp64d ABI.
+       * cross-tools/cross-build.sh (func_build_gcc): Add support for GCC 7.2.0
+       and 7.3.0.
+       * cross-tools/cross.conf: Add configuration for riscv64 cross tools.
+       * porting-tools/emulation/qemu-riscv64.txt: New file.
+       * porting-tools/emulation/README: Refer to it.
+       * porting-tools/abis/README: Tweaks.
+       * porting-tools/abis/call-used-registers.txt: Add info about riscv64.
+       * porting-tools/abis/reg-struct-return.txt: Likewise.
+       * porting-tools/abis/stack-frame.txt: Likewise.
+       * porting-tools/abis/function-pointer.txt: Clarify file locations.
+       * porting-tools/execstack/voidfunc.c: Add command for riscv64.
+       * porting-tools/execstack/voidfunc-riscv64.o: New generated file.
+       * porting-tools/execstack/main.c (voidfunc): Define also for riscv.
+       * porting-tools/execstack/README: Add info about riscv64.
+       * ffcall-abi.h: Add support for riscv64-lp64.
+       * common/asm-riscv.sh: New file.
+       * Makefile.in (SOURCE_FILES): Add it.
+       * configure.ac: Check for <sys/cachectl.h> also on riscv64.
+       * avcall/avcall.h (__AV_STRUCT_RETURN, __AV_REGISTER_STRUCT_RETURN): Add
+       code for __riscv64__.
+       * avcall/avcall-alist.h (__av_alist): Likewise.
+       * avcall/avcall-internal.h: Add code for __riscv64__, especially
+       __av_start1, __av_reg_struct_return, __av_start_struct4, __av_word,
+       __av_long, __av_ulong, __av_ptr, __av_longlong, __av_ulonglong,
+       _av_float, _av_double, __av_struct.
+       * avcall/avcall-riscv64.c: New file.
+       * avcall/Makefile.devel (avcall-riscv64-lp64d-linux.s,
+       avcall-riscv64-lp64d-macro.S): New targets.
+       * avcall/Makefile.in (avcall-riscv64-lp64d.lo, avcall-riscv64-lp64d.s):
+       New targets.
+       (clean): Remove avcall-riscv64-lp64d.s.
+       (SOURCE_FILES): Add avcall-riscv64.c, avcall-riscv64-lp64d-linux.s,
+       avcall-riscv64-lp64d-macro.S.
+       * vacall/vacall.h (__VA_STRUCT_RETURN, __VA_REGISTER_STRUCT_RETURN): Add
+       code for __riscv64__.
+       * vacall/vacall-internal.h: Add code for __riscv64__, especially
+       __va_alist, __va_reg_struct_return, __va_start_struct2,
+       __va_arg_leftadjusted, __va_arg_adjusted, _va_arg_longlong,
+       _va_arg_ulonglong, __va_align_double, _va_arg_float, _va_arg_double,
+       __va_arg_struct, _va_return_longlong.
+       * vacall/vacall-riscv64.c: New file.
+       * vacall/Makefile.devel (vacall-riscv64-lp64d-linux.s,
+       vacall-riscv64-lp64d-macro.S): New targets.
+       * vacall/Makefile.in (vacall-riscv64-lp64d.@OBJEXT@,
+       vacall-riscv64-lp64d.s): New targets.
+       (clean): Remove vacall-riscv64-lp64d.s.
+       (SOURCE_FILES): Add vacall-riscv64.c, vacall-riscv64-lp64d-linux.s,
+       vacall-riscv64-lp64d-macro.S.
+       * callback/vacall_r/vacall_r.h (__VA_STRUCT_RETURN,
+       __VA_REGISTER_STRUCT_RETURN): Add code for __riscv64__.
+       * callback/vacall_r/Makefile.devel (vacall-riscv64-lp64d-linux.s,
+       vacall-riscv64-lp64d-macro.S): New targets.
+       * callback/vacall_r/Makefile.in (vacall-riscv64-lp64d.lo,
+       vacall-riscv64-lp64d.s): New targets.
+       (clean): Remove vacall-riscv64-lp64d.s.
+       (SOURCE_FILES): Add vacall-riscv64-lp64d-linux.s,
+       vacall-riscv64-lp64d-macro.S.
+       * trampoline/Makefile.devel (proto-riscv64.s, tramp-riscv64.o): New
+       targets.
+       * trampoline/proto-riscv64.s: New generated file.
+       * trampoline/tramp-riscv64.s: New file.
+       * trampoline/tramp-riscv64.o: New generated file.
+       * trampoline/trampoline.c: Implement for __riscv64__.
+       * callback/trampoline_r/Makefile.devel (proto-riscv64.s,
+       tramp-riscv64.o): New targets.
+       * callback/trampoline_r/proto64.c: Add code for __riscv64__.
+       * callback/trampoline_r/proto-riscv64.s: New generated file.
+       * callback/trampoline_r/tramp-riscv64.s: New file.
+       * callback/trampoline_r/tramp-riscv64.o: New generated file.
+       * callback/trampoline_r/trampoline.c: Implement for __riscv64__.
+       * callback/trampoline_r/test1.c: Add support for __riscv64__.
+       * PLATFORMS, */PLATFORMS: List the 64-bit RISC-V ABI.
+       * NEWS: Mention the new port.
+
+2018-04-08  Bruno Haible  <bruno@clisp.org>
+
+       s390x: Trivial tweak.
+       * avcall/avcall-s390x.c (avcall_call): Rename result variable from 'i'
+       to 'iret'.
+
+2018-02-26  Bruno Haible  <bruno@clisp.org>
+
+       Add support for Linux/arm on Raspberry Pi.
+       Reported by Simon Dales <simon@getThingsFixed.co.uk>.
+       * avcall/Makefile.devel (avcall-armhf-macro.S): Pass option
+       '-march=armv6' to gcc.
+       * vacall/Makefile.devel (vacall-arm-linux.s, vacall-arm-linux-pic.s):
+       Likewise.
+       * callback/vacall_r/Makefile.devel (vacall-armhf-macro.S): Likewise.
+       * PLATFORMS, */PLATFORMS: List this platform.
+       * NEWS: Mention this.
+
+2018-02-24  Bruno Haible  <bruno@clisp.org>
+
+       Add support for Linux/i386 with PIE-enabled gcc.
+       * vacall/Makefile.devel (vacall-i386-linux-pic.s): New target.
+       (vacall-i386-macro.S): Include code for the PIC and the non-PIC case.
+       * vacall/Makefile.in (SOURCE_FILES): Add vacall-i386-linux-pic.s.
+
+2018-02-18  Bruno Haible  <bruno@clisp.org>
+
+       Avoid undesired compiler optimizations.
+       Reported by Jerry James <loganjerry@gmail.com>.
+       * configure.ac (DISABLE_TYPE_BASED_ALIASING): New substituted variable.
+       * avcall/Makefile.in (avcall-libapi.lo): Use it.
+       * vacall/Makefile.in (vacall-libapi.o): Likewise.
+       * callback/vacall_r/Makefile.in (vacall-libapi.lo): Likewise.
+
+2018-02-17  Bruno Haible  <bruno@clisp.org>
+
+       Bump version number.
+       * VERSION: Set to 2.2.
+       * NEWS: Open new section for 2.2.
+
+2018-02-17  Bruno Haible  <bruno@clisp.org>
+
+       Bump shared library version numbers.
+       * Makefile.in (LIBFFCALL_VERSION_INFO): Bump to 0:1:0.
+       * avcall/Makefile.in (LIBAVCALL_VERSION_INFO): Bump to 1:1:0.
+       * trampoline/Makefile.in (LIBTRAMPOLINE_VERSION_INFO): Likewise.
+       * callback/Makefile.in (LIBCALLBACK_VERSION_INFO): Likewise.
+
+2018-02-17  Bruno Haible  <bruno@clisp.org>
+
+       Add support for HardenedBSD.
+       The fix was done in gnulib today.
+       * NEWS: Mention this.
+
+2018-02-17  Bruno Haible  <bruno@clisp.org>
+
+       Add support for Linux/arm with PIE-enabled gcc.
+       Reported by Nelson Beebe.
+       * vacall/Makefile.devel (vacall-arm-linux.s, vacall-arm-linux-pic.s,
+       vacall-armhf-linux.s, vacall-armhf-linux-pic.s): New targets.
+       (vacall-arm-macro.S, vacall-armhf-macro.S): Include code for the PIC and
+       the non-PIC case.
+       * vacall/Makefile.in (SOURCE_FILES): Add vacall-arm*-linux*.s.
+
+2018-02-17  Bruno Haible  <bruno@clisp.org>
+
+       Add support for OpenBSD 6.1 and newer.
+       Reported by Nelson Beebe.
+       * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): Also test whether mprotect
+       returns with errno=ENOTSUP.
+       * NEWS: Mention this.
+
+2018-01-30  Bruno Haible  <bruno@clisp.org>
+
+       Verify support for Minix/i386.
+       * PLATFORMS, */PLATFORMS: List this platform.
+
+2018-01-27  Bruno Haible  <bruno@clisp.org>
+
+       Rename some files.
+       * INSTALL.windows: Renamed from README.windows.
+       * INSTALL.os2: Renamed from README.os2.
+       * Makefile.in (SOURCE_FILES): Update.
+
+2018-01-09  Bruno Haible  <bruno@clisp.org>
+
+       Make processing of assembly-language files work with GNU clisp.
+       * common/asm-arm.sh: Don't introduce C() macro in .req lines.
+       * common/asm-hppa.h (DEF): Don't use token-pasting operator here, since
+       the result would not be a valid token.
+       * common/asm-hppa64.h (DEF): Likewise.
+       * common/asm-i386.h (INSN2SHCL): Omit the cl register only on Solaris.
+       All other assemblers support it.
+       (P2ALIGN): Use __SVR4, not __sun, to detect Solaris.
+       * common/asm-i386.sh: Allow spaces instead of tabs after .type and
+       .size. Recognize INSN2SHCL without assuming an 'shcl' macro.
+
+2017-11-28  Bruno Haible  <bruno@clisp.org>
+
+       mips, mipsn32, mips64: Improvement for ELF format.
+       * common/asm-mips.h (DECLARE_FUNCTION): Test __ELF__, not __GNU__.
+
+2017-11-25  Bruno Haible  <bruno@clisp.org>
+
+       mips64: Fix crash on some real hardware mips64el (Octeon).
+       Reported by Sébastien Villemot <sebastien@debian.org>.
+       Reminder: Some real MIPS hardware executes the "branch delay slot"
+       after a branch or jump instruction. See
+       <https://stackoverflow.com/questions/3807480>
+       <https://stackoverflow.com/questions/4115847>
+       * trampoline/trampoline.c (alloc_trampoline) [__mips64__]: Store the
+       instructions as 32-bit words, so that the instructions come out as
+       expected, regardless of the endianness.
+       * trampoline/tramp-mips*.s: Update comments.
+       * callback/trampoline_r/tramp-mips*.s: Likewise.
+
+2017-10-29  Bruno Haible  <bruno@clisp.org>
+
+       Verify support for Haiku/i386.
+       * PLATFORMS, */PLATFORMS: List this platform.
+
+2017-10-22  Bruno Haible  <bruno@clisp.org>
+
+       x86_64-x32: Fix passing of pointers.
+       * avcall/avcall-internal.h (__av_start_struct4, __av_ptr): For pointer
+       values, use zero-extend instead of cast from 'void*' to '__avword'.
+       * vacall/vacall-x86_64.c (vacall_receiver): For pointer values, use
+       zero-extend instead of cast from 'void*' to '__vaword'.
+
+2017-10-21  Bruno Haible  <bruno@clisp.org>
+
+       Include libtool fix for Solaris 11.3.
+       Reported at <https://savannah.gnu.org/patch/?9467>.
+       * Makefile.maint (libtool-imported-files): Download and apply said fix.
+
+2017-10-09  Bruno Haible  <bruno@clisp.org>
+
+       Avoid build failures caused by parallel make.
+       Reported by Riccardo G Corsi <riccardogcorsi@gmail.com>.
+       * Makefile.in (GNUMAKEFLAGS): New variable.
+
+2017-09-24  Bruno Haible  <bruno@clisp.org>
+
+       Update NEWS.
+       * NEWS: Mention the <callback.h> API changes in 2.0.
+
+2017-09-15  Bruno Haible  <bruno@clisp.org>
+
+       tests: Consistency.
+       * avcall/tests.c (pointer_tests): Move before the mixed_number_tests.
+       (gpargs_boundary_tests): Fix weakness in the f_f17l3L test.
+
+2017-09-12  Bruno Haible  <bruno@clisp.org>
+
+       sparc: Verify support for NetBSD.
+       * PLATFORMS, */PLATFORMS: List this platform.
+
+2017-09-11  Bruno Haible  <bruno@clisp.org>
+
+       Bump version number.
+       * VERSION: Set to 2.1.
+       * NEWS: Open new section for 2.1.
+
+2017-09-10  Bruno Haible  <bruno@clisp.org>
+
+       Install the libraries as shared libraries by default.
+       * configure.ac (LT_INIT): Remove option 'disable-shared'.
+       * README: Remove outdated text.
+       * NEWS: Mention the change.
+
+2017-09-10  Bruno Haible  <bruno@clisp.org>
+
+       Install a library named libffcall.
+       * ffcall-version.c: New file.
+       * ffcall-version.in.h: Rename double-inclusion guard.
+       (ffcall_get_version): New declaration.
+       * Makefile.in: Add variables for using libtool.
+       (LIBFFCALL_EXPORTED_SYMBOLS_REGEX, LIBFFCALL_VERSION_INFO): New
+       variables.
+       (all-subdirs, ffcall-version.lo, libffcall.la): New targets.
+       (all): Depend on them.
+       (install): Install also libffcall.la.
+       (installdirs): Create also $(libdir).
+       (uninstall): Uninstall also libffcall.la.
+       (MOSTLYCLEANDIRS, MOSTLYCLEANFILES): New variables.
+       (mostlyclean, clean, distclean, maintainer-clean): Delete these.
+       (SOURCE_FILES): Add ffcall-version.c.
+       * README: Mention libffcall.{a,so}. Mark libavcall and libcallback as
+       deprecated.
+       * NEWS: Mention the change.
+
+2017-09-10  Bruno Haible  <bruno@clisp.org>
+
+       Move the backward compatibility code to separate object files.
+       * avcall/avcall-compat.c: New file, extracted from
+       avcall/avcall-libapi.c.
+       * avcall/Makefile.in (SOURCE_FILES): Add it.
+       (avcall-compat.lo): New target.
+       (OBJECTS): Add it.
+       * avcall/avcall-libapi.c (__builtin_avcall): Remove function.
+       * callback/callback-compat.c: New file, extracted from
+       callback/callback-libapi.c.
+       * callback/Makefile.in (SOURCE_FILES): Add it.
+       (callback-compat.lo): New target.
+       (libcallback.la): Include it.
+       * callback/callback-libapi.c (trampoline_r_data0): Remove function.
+
+2017-09-10  Bruno Haible  <bruno@clisp.org>
+
+       vacall: Fix build failure with gcc configured with --enable-default-pie.
+       Works around a GCC bug, reported at
+       <https://gcc.gnu.org/bugzilla/show_bug.cgi?id=81653>.
+       * configure.ac (WORKAROUND_BUG_81653): New variable.
+       * vacall/Makefile.in (vacall-sparc.@OBJEXT@, vacall-sparc.s): Use it.
+
+2017-09-10  Bruno Haible  <bruno@clisp.org>
+
+       Fix build failure "error: narrowing conversion" with g++ on arm.
+       * testcases.c (C5): Cast -1 to 'char' explicitly.
+
+2017-09-10  Bruno Haible  <bruno@clisp.org>
+
+       Fix build failure with --enable-shared on Solaris/x86 with cc.
+       * common/asm-i386.h: Test __SVR4, not __svr4__.
+
+2017-09-10  Bruno Haible  <bruno@clisp.org>
+
+       Support building shared libraries on native Windows.
+       * configure.ac (LT_INIT): Add option 'win32-dll'.
+       * avcall/Makefile.in (avcall-x86_64.lo): Copy object file into .libs/
+       directory.
+       * callback/vacall_r/Makefile.in (vacall-x86_64.lo): Likewise.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       i386: Verify support for Hurd.
+       * NEWS: List this platform.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Verify support for FreeBSD, NetBSD, OpenBSD.
+       * PLATFORMS, */PLATFORMS: List these platforms.
+       * NEWS: Likewise.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       i386: Restore support for FreeBSD, NetBSD, OpenBSD, DragonFly BSD.
+       * avcall/avcall.h (__AV_STRUCT_RETURN): Enable __AV_SMALL_STRUCT_RETURN
+       on FreeBSD/i386, OpenBSD/i386, DragonFly/i386.
+       * vacall/vacall.h (__VA_STRUCT_RETURN): Enable __VA_SMALL_STRUCT_RETURN
+       on FreeBSD/i386, OpenBSD/i386, DragonFly/i386.
+       * callback/vacall_r/vacall_r.h: Likewise.
+       * avcall/avcall-i386.c: Update comments.
+       * vacall/vacall-i386.c (vacall_receiver): Return the structure address
+       in %eax also for other platforms than MSVC.
+       * PLATFORMS, */PLATFORMS: List these platforms.
+       * NEWS: Likewise.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       i386: Assume MSVC struct return convention also on 32-bit mingw.
+       * avcall/avcall.h (__AV_STRUCT_RETURN): Enable __AV_MSVC_STRUCT_RETURN
+       on 32-bit mingw.
+       * vacall/vacall.h (__VA_STRUCT_RETURN): Enable __VA_MSVC_STRUCT_RETURN
+       on 32-bit mingw.
+       * callback/vacall_r/vacall_r.h: Likewise.
+       * NEWS: Mention the fix.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       vacall: Fix warnings on DragonFly BSD.
+       * vacall/vacall-internal.h (__va_start, __va_arg): Undefine first.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       avcall, vacall: Optimize struct return of small structs.
+       * avcall/avcall-arm64.c (avcall_call): Add alternative optimized code
+       for struct return.
+       * avcall/avcall-hppa.c (avcall_call): Likewise.
+       * avcall/avcall-ia64.c (avcall_call): Likewise.
+       * avcall/avcall-mipsn32.c (avcall_call): Likewise.
+       * avcall/avcall-mips64.c (avcall_call): Likewise.
+       * avcall/avcall-powerpc64.c (avcall_call): Likewise.
+       * avcall/avcall-sparc64.c (avcall_call): Likewise.
+       * avcall/avcall-x86_64.c (avcall_call): Likewise.
+       * avcall/avcall-x86_64-windows.c (avcall_call): Likewise.
+       * avcall/avcall-hppa64.c (avcall_call): Likewise, but don't enable it.
+       * vacall/vacall-arm64.c (vacall_receiver): Add alternative optimized
+       code for struct return.
+       * vacall/vacall-hppa.c (vacall_receiver): Likewise.
+       * vacall/vacall-ia64.c (vacall_receiver): Likewise.
+       * vacall/vacall-mipsn32.c (vacall_receiver): Likewise.
+       * vacall/vacall-mips64.c (vacall_receiver): Likewise.
+       * vacall/vacall-powerpc64.c (vacall_receiver): Likewise.
+       * vacall/vacall-sparc64.c (vacall_receiver): Likewise.
+       * vacall/vacall-x86_64.c (vacall_receiver): Likewise.
+       * vacall/vacall-x86_64-windows.c (vacall_receiver): Likewise.
+       * vacall/vacall-hppa64.c (vacall_receiver): Likewise.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       avcall, vacall: Align code style.
+       * avcall/avcall-hppa.c (avcall_call): Use variable name 'iret', like
+       for the other ABIs.
+       * avcall/avcall-ia64.c: Likewise.
+       * avcall/avcall-arm64.c (avcall_call): Use variable names 'iret' and
+       'iret2', like for the other ABIs.
+       * avcall/avcall-x86_64.c: Likewise.
+       * avcall/avcall-sparc64.c (avcall_call): Use variable names 'iret',
+       'iret2', 'iret3', 'iret4', for consistency.
+       * vacall/vacall-sparc64 (vacall_receiver): Likewise.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Remove register pressure on gcc.
+       * avcall/avcall-x86_64.c: Don't declare iarg[1-6].
+       (avcall_call): Pass the integer arguments through arguments.
+       * avcall/avcall-x86_64-windows.c: Don't declare iarg[1-4].
+       (avcall_call): Pass the integer arguments through arguments.
+       * vacall/vacall-x86_64.c: Don't declare iarg[1-6].
+       (vacall_receiver): Use another way to save the integer registers.
+       * vacall/vacall-x86_64-windows.c: Don't declare iarg[1-4].
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       Fix preprocessor warning "does not give a valid preprocessing token".
+       * common/asm-i386.h (NUM): Don't use token concatenation between '$'
+       and a possibly negative number.
+       * common/asm-x86_64.h (NUM): Likewise.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       hppa64: Simplify trampoline.
+       * trampoline/tramp-hppa64-old.s: Renamed from trampoline/tramp-hppa64.s.
+       * trampoline/tramp-hppa64-old.o: Renamed from trampoline/tramp-hppa64.o.
+       * trampoline/tramp-hppa64-macro.S: New file.
+       * trampoline/Makefile.in (tramp-hppa64.lo, tramp-hppa64.s): New targets.
+       (clean): Remove tramp-hppa64.s.
+       (SOURCE_FILES): Add tramp-hppa64-macro.S.
+       * trampoline/trampoline.c: Distinguish __hppa64old__ and __hppa64new__.
+       Implement trampoline for __hppa64new__.
+       * callback/trampoline_r/tramp-hppa64-old.s: Renamed from
+       callback/trampoline_r/tramp-hppa64.s.
+       * callback/trampoline_r/tramp-hppa64-old.o: Renamed from
+       callback/trampoline_r/tramp-hppa64.o.
+       * callback/trampoline_r/tramp-hppa64-macro.S: New file.
+       * callback/trampoline_r/Makefile.in (tramp-hppa64.lo, tramp-hppa64.s):
+       New targets.
+       (clean): Remove tramp-hppa64.s.
+       (SOURCE_FILES): Add tramp-hppa64-macro.S.
+       * callback/trampoline_r/trampoline.c: Distinguish __hppa64old__ and
+       __hppa64new__. Implement trampoline for __hppa64new__.
+       * configure.ac (CPU_OBJECTS): Augment with tramp-hppa64.lo.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       hppa64: Add support for HP-PA in 64-bit mode on HP-UX.
+       * cross-tools/cross.conf: Add configuration for hppa64 cross tools.
+       * porting-tools/abis/README: Add details about platforms where function
+       pointers are actually pointers to some struct.
+       * porting-tools/abis/call-used-registers.txt: Add info about hppa64.
+       Fix info about hppa.
+       * porting-tools/abis/reg-struct-return.txt: Add info about hppa64.
+       * porting-tools/abis/stack-frame.txt: Likewise.
+       * porting-tools/execstack/voidfunc-hppa64.o: New file.
+       * common/asm-hppa64.h: New file.
+       * common/asm-hppa64.sh: New file.
+       * Makefile.in (SOURCE_FILES): Add them.
+       * avcall/avcall.h (__AV_REGISTER_STRUCT_RETURN): Add code for
+       __hppa64__.
+       * avcall/avcall-alist.h (__av_alist): Likewise.
+       * avcall/avcall-internal.h: Add code for __hppa64__, especially
+       __av_start1, __av_reg_struct_return, __av_start_struct4, __av_word,
+       __av_longlong, __av_ulonglong, _av_float, _av_double,
+       __av_struct_leftadjusted, __av_struct.
+       * avcall/avcall-hppa64.c: New file.
+       * avcall/Makefile.devel (avcall-hppa64-linux.s, avcall-hppa64-macro.S):
+       New targets.
+       * avcall/Makefile.in (avcall-hppa64.lo, avcall-hppa64.s): New targets.
+       (clean): Remove avcall-hppa64.s.
+       (SOURCE_FILES): Add avcall-hppa64.c, avcall-hppa64-linux.s,
+       avcall-hppa64-macro.S.
+       * vacall/vacall.h (__VA_REGISTER_STRUCT_RETURN): Add code for
+       __hppa64__.
+       * vacall/vacall-internal.h: Add code for __hppa64__, especially
+       __va_alist, __va_reg_struct_return, __va_start_struct2,
+       __va_arg_leftadjusted, __va_arg_rightadjusted, __va_arg_adjusted,
+       _va_arg_longlong, _va_arg_ulonglong, __va_align_double, _va_arg_float,
+       _va_arg_double, __va_arg_struct, _va_return_longlong.
+       * vacall/vacall-hppa64.c: New file.
+       * vacall/Makefile.devel (vacall-hppa64-linux.s, vacall-hppa64-macro.S):
+       New targets.
+       * vacall/Makefile.in (vacall-hppa64.@OBJEXT@, vacall-hppa64.s): New
+       targets.
+       (clean): Remove vacall-hppa64.s.
+       (SOURCE_FILES): Add vacall-hppa64.c, vacall-hppa64-linux.s,
+       vacall-hppa64-macro.S.
+       * callback/vacall_r/vacall_r.h (__VA_REGISTER_STRUCT_RETURN): Add code
+       for __hppa64__.
+       * callback/vacall_r/Makefile.devel (vacall-hppa64-linux.s,
+       vacall-hppa64-macro.S): New targets.
+       * callback/vacall_r/Makefile.in (vacall-hppa64.lo, vacall-hppa64.s): New
+       targets.
+       (clean): Remove vacall-hppa64.s.
+       (SOURCE_FILES): Add vacall-hppa64-linux.s, vacall-hppa64-macro.S.
+       * trampoline/Makefile.devel (cache-hppa64-linux.s,
+       cache-hppa64-macro.S): New targets.
+       (proto-hppa64.s, tramp-hppa64.o): New targets.
+       * trampoline/proto-hppa64.s: New generated file.
+       * trampoline/tramp-hppa64.s: New file.
+       * trampoline/tramp-hppa64.o: New generated file.
+       * trampoline/tramp-hppa-macro.S: Fix comment.
+       * trampoline/cache-hppa.c: Add code for __hppa64__.
+       * trampoline/trampoline.c: Implement for __hppa64__.
+       * trampoline/Makefile.in (cache-hppa64.lo, cache-hppa64.s): New targets.
+       (clean): Remove cache-hppa64.s.
+       (SOURCE_FILES): Add cache-hppa64-linux.s, cache-hppa64-macro.S.
+       * callback/trampoline_r/Makefile.devel (cache-hppa64-linux.s,
+       cache-hppa64-macro.S): New targets.
+       (proto-hppa64.s, tramp-hppa64.o): New targets.
+       * callback/trampoline_r/proto64.c: Add code for __hppa64__.
+       * callback/trampoline_r/proto-hppa64.s: New generated file.
+       * callback/trampoline_r/tramp-hppa64.s: New file.
+       * callback/trampoline_r/tramp-hppa64.o: New generated file.
+       * callback/trampoline_r/tramp-hppa-macro.S: Fix comment.
+       * callback/trampoline_r/trampoline.c: Implement for __hppa64__.
+       * callback/trampoline_r/test1.c: Add support for __hppa64__.
+       * callback/trampoline_r/Makefile.in (cache-hppa64.lo, cache-hppa64.s):
+       New targets.
+       (clean): Remove cache-hppa64.s.
+       (SOURCE_FILES): Add cache-hppa64-linux.s, cache-hppa64-macro.S.
+       * configure.ac (CPU_OBJECTS): Augment also for hppa64 ABI.
+       * PLATFORMS, */PLATFORMS: List the 64-bit HP-PA machine.
+       * NEWS: Mention the new port.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       Don't violate ISO C rules.
+       * avcall/avcall-internal.h (__av_struct): Don't store an unaligned
+       pointer in (LIST).aptr.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       Assume the C preprocessor discards // comments.
+       * common/asm-i386.h: Renamed from common/asm-i386.hh.
+       * Makefile.maint (common/asm-i386.h): Remove target.
+       * Makefile.in (SOURCE_FILES): Add common/asm-i386.h. Remove
+       common/asm-i386.hh.
+       (GENERATED_FILES): Remove common/asm-i386.h.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Optimize struct return of small structs.
+       * avcall/avcall-*.c: Cache l->raddr in a local variable.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Improve processing of assembly-language files.
+       * common/asm-x86_64.sh: Eliminate #APP and #NO_APP directives.
+       In the MEM* patterns, recognize all 64-bit register names.
+
+2017-09-09  Bruno Haible  <bruno@clisp.org>
+
+       Fix compilation error on HP-UX (regression from 2017-09-03).
+       * avcall/avcall-libapi.c: Include <stdlib.h> before ffcall-stdint.h.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       i386: Align processing of assembly-language files with x86_64 case.
+       * common/asm-i386.hh (INSN2MOVXL): Renamed from INSN2MOVX.
+       * common/asm-i386.sh: Generate INSN2MOVXL instead of INSN2MOVX.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       i386: Provide disambiguating size prefixes in more cases.
+       * common/asm-i386.sh: Introduce size prefixes also for the second
+       operand of instructions with two operands.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       i386: Simplify processing of assembly-language files.
+       * common/asm-i386.sh: Remove unused introduction of FUNEND. Remove
+       no-op rule for GLOBL.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Add support for MSVC 14.
+       * common/asm-x86_64.h (R, NUM, ADDR, ADDR_PCRELATIVE, X1, X2, X4, X8,
+       MEM, MEM_DISP, MEM_INDEX, MEM_SHINDEX, MEM_DISP_SHINDEX0,
+       MEM_DISP_SHINDEX, MEM_PCRELATIVE, INDIR, INSNCONC, INSN1, INSN2,
+       INSN2S, INSN2MOVXL, INSN2MOVXQ, INSN2MOVXLQ, _): New macros.
+       (TEXT, P2ALIGN, DECLARE_FUNCTION, FUNBEGIN, FUNEND): Implement for MSVC.
+       * common/asm-x86_64.sh: Generate instructions as macros that may expand
+       into AT&T syntax or MSVC syntax.
+       * avcall/Makefile.in (avcall-x86_64.lo): Use a different rule for MSVC.
+       (clean): Remove also avcall-x86_64.asm.
+       * vacall/Makefile.in (vacall-x86_64.@OBJEXT@): Use a different rule for
+       MSVC.
+       (clean): Remove also vacall-x86_64.asm.
+       * callback/vacall_r/Makefile.in (vacall-x86_64.lo): Use a different rule
+       for MSVC.
+       (clean): Remove also vacall-x86_64.asm.
+       * PLATFORMS, */PLATFORMS: List the 64-bit mingw machine.
+       * NEWS: Mention the new port.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Add support for mingw.
+       * avcall/avcall.h (__AV_LLP64): New macro.
+       (__avword): Use it.
+       * avcall/avcall-alist.h (__av_alist): Change fields of type
+       'unsigned long' to 'uintptr_t'.
+       * avcall/avcall-internal.h (__av_longlong): Update implementation for
+       LLP64 platforms.
+       * vacall/vacall.h (__VA_LLP64): New macro.
+       (__vaword): Use it.
+       * callback/vacall_r/vacall_r.h: Likewise.
+       * vacall/vacall-internal.h (__va_alist): Change fields of type
+       'unsigned long' to 'uintptr_t'. Don't assume that 'long long' is the
+       same as 'long' on x86_64.
+       (_va_arg_longlong, _va_arg_ulonglong, _va_return_longlong,
+       _va_return_ulonglong): Update implementation for LLP64 platforms.
+       * PLATFORMS, */PLATFORMS: List the 64-bit mingw machine.
+       * NEWS: Mention the new port.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       Fix warnings on 64-bit native Windows.
+       * avcall/tests.c (pointer_tests): Use %p to display the value of a
+       pointer.
+       * vacall/tests.c (main): Likewise,
+       * callback/tests.c (main): Likewise,
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       Add support for platforms where sizeof(long) < sizeof(void*).
+       * ffcall-stdint.h: New file.
+       * Makefile.in (SOURCE_FILES): Add it.
+       * avcall/avcall-internal.h: Include ffcall-stdint.h. Use [u]intptr_t
+       instead of 'long', 'unsigned long', or '__avword' where appropriate.
+       * vacall/vacall-internal.h: Include ffcall-stdint.h. Use [u]intptr_t
+       instead of 'long', 'unsigned long', or '__vaword' where appropriate.
+       * Makefile.maint (GNULIB_MODULES): Add stdint.
+       * trampoline/trampoline.c: Include <stdint.h>. Use [u]intptr_t instead
+       of 'long' or 'unsigned long' where appropriate. For __x86_64__, use
+       'unsigned long long' instead of 'unsigned long'.
+       * callback/trampoline_r/trampoline.c: Likewise.
+       * callback/trampoline_r/test1.c (f): Use 'void*' instead of 'long' to
+       access env.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Add support for Cygwin.
+       * porting-tools/abis/call-used-registers.txt: Add info about x86_64-ms
+       ABI.
+       * porting-tools/abis/reg-struct-return.txt: Likewise.
+       * porting-tools/abis/stack-frame.txt: Likewise.
+       * common/asm-x86_64.h: Add support for compilers on Windows.
+       (TEXT, GLOBL): New macros.
+       * common/asm-x86_64.sh: Truncate the EH_FRAME_SECTION also on Windows.
+       Eliminate .file pseudo-op. Macroize .text, .p2align, .globl directives.
+       * avcall/avcall-alist.h (__x86_64_ms__, __x86_64_sysv__): New macros.
+       (__av_alist): Add support for __x86_64_ms__.
+       * avcall/avcall-internal.h (__av_start1, __av_reg_struct_return,
+       __av_start_struct3, __av_start_struct4, __av_word, _av_float,
+       _av_double, __av_struct): Add support for __x86_64_ms__.
+       * avcall/avcall-x86_64.c: Improve comments.
+       * avcall/avcall-x86_64-windows.c: New file.
+       * avcall/Makefile.devel (avcall-x86_64-windows.s,
+       avcall-x86_64-windows-macro.S): New targets.
+       * avcall/Makefile.in (avcall-x86_64.s): On Windows, use
+       avcall-x86_64-windows-macro.S.
+       (SOURCE_FILES): Add avcall-x86_64-windows.c, avcall-x86_64-windows.s,
+       avcall-x86_64-windows-macro.S.
+       * vacall/vacall-internal.h (__x86_64_ms__, __x86_64_sysv__): New macros.
+       (__VA_FARG_NUM): Define also for __mipsn32__ || __mips64__.
+       (__va_alist): Add support for __x86_64_ms__.
+       (__va_reg_struct_return, __va_start_struct1, __va_start_struct2,
+       __va_arg_leftadjusted, __va_arg_rightadjusted, __va_arg_adjusted,
+       _va_arg_float, _va_arg_double, __va_arg_struct): Likewise.
+       * vacall/vacall-x86_64.c: Update comments.
+       * vacall/vacall-x86_64-windows.c: New file.
+       * vacall/Makefile.devel (vacall-x86_64-windows.s,
+       vacall-x86_64-windows-macro.S): New targets.
+       * vacall/Makefile.in (vacall-x86_64.s): On Windows, use
+       vacall-x86_64-windows-macro.S.
+       (SOURCE_FILES): Add vacall-x86_64-windows.c, vacall-x86_64-windows.s,
+       vacall-x86_64-windows-macro.S.
+       * callback/vacall_r/Makefile.devel (vacall-x86_64-windows.s,
+       vacall-x86_64-windows-macro.S): New targets.
+       * callback/vacall_r/Makefile.in (vacall-x86_64.s): On Windows, use
+       vacall-x86_64-windows-macro.S.
+       (SOURCE_FILES): Add vacall-x86_64-windows.s,
+       vacall-x86_64-windows-macro.S.
+       * PLATFORMS, */PLATFORMS: List the 64-bit Cygwin machine.
+       * NEWS: Mention the new port.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       Remove special build infrastructure for MSVC. The generic one works.
+       * avcall/Makefile.msvc: Remove file.
+       * avcall/Makefile.in (SOURCE_FILES): Remove it.
+       * vacall/Makefile.maint (config.h.msvc): Remove target.
+       (totally-clean): Don't remove config.h.msvc.
+       * vacall/Makefile.msvc: Remove file.
+       * vacall/Makefile.in (SOURCE_FILES): Remove it.
+       (GENERATED_FILES): Remove config.h.msvc.
+       * trampoline/Makefile.maint (config.h.msvc): Remove target.
+       (totally-clean): Don't remove config.h.msvc.
+       * trampoline/Makefile.msvc: Remove file.
+       * trampoline/Makefile.in (SOURCE_FILES): Remove it.
+       (GENERATED_FILES): Remove config.h.msvc.
+       * callback/vacall_r/Makefile.maint (config.h.msvc): Remove target.
+       (totally-clean): Don't remove config.h.msvc.
+       * callback/vacall_r/Makefile.msvc: Remove file.
+       * callback/vacall_r/Makefile.in (SOURCE_FILES): Remove it.
+       (GENERATED_FILES): Remove config.h.msvc.
+       * callback/trampoline_r/Makefile.maint (config.h.msvc): Remove target.
+       (totally-clean): Don't remove config.h.msvc.
+       * callback/trampoline_r/Makefile.msvc: Remove file.
+       * callback/trampoline_r/Makefile.in (SOURCE_FILES): Remove it.
+       (GENERATED_FILES): Remove config.h.msvc.
+       * callback/Makefile.maint (vacall_r/config.h.msvc,
+       trampoline_r/config.h.msvc): Remove targets.
+       * callback/Makefile.msvc: Remove file.
+       * callback/Makefile.in (SOURCE_FILES): Remove it.
+       * Makefile.msvc: Remove file.
+       * Makefile.in (SOURCE_FILES): Remove it.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       Make the generic build infrastructure work on MSVC.
+       * m4/as-underscore.m4: Rely on gl_ASM_SYMBOL_PREFIX from gnulib. Don't
+       define ASM_UNDERSCORE any more.
+       * configure.ac: Set IF_MSVC, IFNOT_MSVC.
+       * common/asm-i386.hh: Fix P2ALIGN parameter list.
+       * common/asm-i386.sh: Improve handling of indirect calls and jmps.
+       * avcall/Makefile.in: Use OBJEXT.
+       (avcall-i386.lo): Use a different rule for MSVC.
+       * vacall/Makefile.devel: Transform 'vacall_function' before the
+       asm-i386.sh script, not afterwards.
+       * vacall/Makefile.in: Use OBJEXT.
+       (vacall-i386.o): Use a different rule for MSVC.
+       * trampoline/trampoline.c: On native Windows, when CODE_EXECUTABLE is
+       not defined, use VirtualAlloc.
+       * trampoline/Makefile.in: Use OBJEXT.
+       * callback/vacall_r/get_receiver.c: New file.
+       * callback/vacall_r/Makefile.maint (vacall-i386-msvc.c): Use the C
+       source code of callback_get_receiver.
+       * callback/vacall_r/Makefile.in: Use OBJEXT.
+       (vacall-i386.lo): Use a different rule for MSVC.
+       (SOURCE_FILES): Add get_receiver.c.
+       * callback/trampoline_r/trampoline.c: On native Windows, when
+       CODE_EXECUTABLE is not defined, use VirtualAlloc.
+       * callback/trampoline_r/Makefile.in: Use OBJEXT.
+       * callback/Makefile.in: Use OBJEXT.
+       * README.win32: Remove file.
+       * README.windows: New file, from GNU gettext.
+       * Makefile.in (SOURCE_FILES): Remove README.win32. Add README.windows.
+       * PLATFORMS, */PLATFORMS: List the 32-bit mingw and MSVC machine.
+       * NEWS: Mention MSVC support.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       Don't use symbolic links for .h files.
+       MSVC 14 does not follow the symbolic links set by Cygwin's 'ln -s'.
+       * trampoline/Makefile.in (LN_S): Remove variable.
+       * callback/trampoline_r/Makefile.in (LN_S): Remove variable.
+       * callback/Makefile.in (INCLUDES): Add an -I option for vacall_r.h.
+       (LN_S): Remove variable.
+       (vacall_r.h, trampoline_r.h): Remove targets.
+       (callback-libapi.lo): Use explicit -I option for trampoline_r.h. Update
+       dependencies.
+       (test1.o, minitests.o, minitests.s, minitests-c++.o, tests.o, tests.s):
+       Update dependencies.
+       (MOSTLYCLEANFILES): Remove vacall_r.h, trampoline_r.h.
+       * configure.ac: Don't invoke CL_PROG_LN_S.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       Remove special build infrastructure for mingw. The generic one works.
+       * avcall/Makefile.maint (avcall-i386-mingw32.c): Remove target.
+       (totally-clean): Don't remove avcall-i386-mingw32.c.
+       * avcall/Makefile.mingw32: Remove file.
+       * avcall/Makefile.in (SOURCE_FILES): Remove it.
+       (GENERATED_FILES): Remove avcall-i386-mingw32.c.
+       * vacall/Makefile.maint (config.h.mingw32, vacall-i386-mingw32.c):
+       Remove targets.
+       (totally-clean): Don't remove config.h.mingw32, vacall-i386-mingw32.c.
+       * vacall/Makefile.mingw32: Remove file.
+       * vacall/Makefile.in (SOURCE_FILES): Remove it.
+       (GENERATED_FILES): Remove config.h.mingw32, vacall-i386-mingw32.c.
+       * trampoline/Makefile.maint (config.h.mingw32): Remove target.
+       (totally-clean): Don't remove config.h.mingw32.
+       * trampoline/Makefile.mingw32: Remove file.
+       * trampoline/Makefile.in (SOURCE_FILES): Remove it.
+       (GENERATED_FILES): Remove config.h.mingw32.
+       * callback/vacall_r/Makefile.maint (config.h.mingw32,
+       vacall-i386-mingw32.c): Remove targets.
+       (totally-clean): Don't remove config.h.mingw32, vacall-i386-mingw32.c.
+       * callback/vacall_r/Makefile.mingw32: Remove file.
+       * callback/vacall_r/Makefile.in (SOURCE_FILES): Remove it.
+       (GENERATED_FILES): Remove config.h.mingw32, vacall-i386-mingw32.c).
+       * callback/trampoline_r/Makefile.maint (config.h.mingw32): Remove
+       target.
+       (totally-clean): Don't remove config.h.mingw32.
+       * callback/trampoline_r/Makefile.mingw32: Remove file.
+       * callback/trampoline_r/Makefile.in (SOURCE_FILES): Remove it.
+       (GENERATED_FILES): Remove config.h.mingw32.
+       * callback/Makefile.maint (vacall_r/config.h.mingw32,
+       vacall_r/vacall-i386-mingw32.c, trampoline_r/config.h.mingw32): Remove
+       targets.
+       * callback/Makefile.mingw32: Remove file.
+       * callback/Makefile.in (SOURCE_FILES): Remove it.
+       * Makefile.mingw32: Remove file.
+       * Makefile.in (SOURCE_FILES): Remove it.
+
+2017-09-03  Bruno Haible  <bruno@clisp.org>
+
+       Fix leftover files after "make distclean" (regression from 2017-08-27).
+       * avcall/Makefile.in (distclean): Also remove minitests-c++.output.*.
+       * vacall/Makefile.in (distclean): Likewise.
+       * callback/Makefile.in (DISTCLEANFILES): Add minitests-c++.output.*.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Enable building shared libraries on Windows.
+       * avcall/Makefile.in (libavcall.la): Pass option '-no-undefined' to
+       $(LIBTOOL_LINK).
+       * trampoline/Makefile.in (libtrampoline.la): Likewise.
+       * callback/vacall_r/Makefile.in (libvacall.la): Likewise.
+       * callback/trampoline_r/Makefile.in (libtrampoline.la): Likewise.
+       * callback/Makefile.in (libcallback.la): Likewise.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Do proper versioning of shared libraries.
+       * avcall/Makefile.in (LIBAVCALL_VERSION_INFO): New variable.
+       (libavcall.la): Use libtool option -version-info.
+       * trampoline/Makefile.in (LIBTRAMPOLINE_VERSION_INFO): New variable.
+       (libtrampoline.la): Use libtool option -version-info.
+       * callback/Makefile.in (LIBCALLBACK_VERSION_INFO): New variable.
+       (libcallback.la): Use libtool option -version-info.
+       * README: Remove statement of problem. Update figures about code size.
+       * NEWS: Mention the change.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Fix warnings on 64-bit native Windows.
+       * testcases.c (vp_vpdpcpsp): Use %p to display the value of a pointer.
+       * vacall/tests.c (simulator): Likewise.
+       * callback/tests.c (vp_vpdpcpsp_simulator): Likewise,
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Remove code duplication of test cases.
+       * testcases.c: New file, extracted from avcall/tests.c.
+       * Makefile.in (SOURCE_FILES): Add it.
+       * avcall/tests.c: Remove testcases functions. Include testcases.c
+       instead.
+       * vacall/tests.c: Likewise.
+       * callback/tests.c: Likewise.
+       * porting-tools/abis/README: Update.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Fix weakness in tests (added on 2017-01-29).
+       * avcall/tests.c (ll_l2ll, ll_l3ll, ll_l4ll, ll_l5ll, ll_l6ll, ll_l7ll):
+       Use a temporary variable of type 'long long'.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       vacall, callback: Remove workarounds for obsolete platforms.
+       * vacall/tests.c: Remove workarounds for SunOS 4 cc, gcc-2.5, gcc-2.7.x.
+       * callback/tests.c: Likewise.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Add tests that verify the C++ support.
+       * Makefile.maint (GNULIB_MODULES): Add ansi-c++-opt.
+       * configure.ac: Invoke gl_PROG_ANSI_CXX. Set IF_CXX.
+       * avcall/minitests-c++.cc: New file.
+       * avcall/Makefile.in (CXX, CXXFLAGS): New variables.
+       (minitests-c++.o, minitests-c++): New targets.
+       (check): Optionally, test also minitests-c++.
+       (clean): Remove minitests-c++.o, minitests-c++, minitests-c++.out.
+       (SOURCE_FILES): Add minitests-c++.cc.
+       * vacall/minitests-c++.cc: New file.
+       * vacall/Makefile.in (CXX, CXXFLAGS): New variables.
+       (minitests-c++.o, minitests-c++): New targets.
+       (check): Optionally, test also minitests-c++.
+       (clean): Remove minitests-c++.o, minitests-c++, minitests-c++.out.
+       (SOURCE_FILES): Add minitests-c++.cc.
+       * trampoline/test2-c++.cc: New file.
+       * trampoline/test2.c (main): Don't test &main in C++ mode.
+       * trampoline/Makefile.in (CXX, CXXFLAGS): New variables.
+       (test2-c++.o, test2-c++): New targets.
+       (check): Optionally, test also test2-c++.
+       (clean): Remove test2-c++.o, test2-c++.
+       (SOURCE_FILES): test2-c++.cc.
+       * callback/minitests-c++.cc: New file.
+       * callback/Makefile.in (CXX, CXXFLAGS): New variables.
+       (minitests-c++.o, minitests-c++): New targets.
+       (check): Optionally, test also minitests-c++.
+       (MOSTLYCLEANFILES): Add minitests-c++.o, minitests-c++,
+       minitests-c++.out.
+       (SOURCE_FILES): Add minitests-c++.cc.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Add support for SUNWspro C++ on Solaris.
+       * avcall/avcall.h: Treat SUNWspro C++ like SUNWspro C.
+       * vacall/vacall.h: Likewise.
+       * callback/vacall_r/vacall_r.h: Likewise.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Make the include files C++-safe.
+       * avcall/avcall.h: Add C++ guards.
+       (__AV_alignof): Test __IBM__ALIGNOF__. Use template-based definition
+       for C++.
+       * vacall/vacall.h: Add C++ guards.
+       (__VA_alignof): Test __IBM__ALIGNOF__. Use template-based definition
+       for C++.
+       * callback/vacall_r/vacall_r.h: Add C++ guards.
+       (__VA_alignof): Test __IBM__ALIGNOF__. Use template-based definition
+       for C++.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Make sure the tests use only the public include files.
+       * avcall/tests.c: Don't include config.h.
+       * vacall/tests.c: Don't include config.h.
+       * callback/tests.c: Likewise.
+       * callback/trampoline_r/test1.c: Likewise. Include ffcall-abi.h instead.
+       * avcall/Makefile.in (avcall-libapi.lo): Use $(INCLUDES).
+       * vacall/Makefile.in (INCLUDES): Remove -I options that reference
+       gnulib-lib.
+       (INCLUDES_WITH_GNULIB): New variable.
+       (vacall-libapi.o): Use INCLUDES_WITH_GNULIB instead of INCLUDES.
+       * trampoline/Makefile.in (INCLUDES): Remove -I options that reference
+       gnulib-lib.
+       (INCLUDES_WITH_GNULIB): New variable.
+       (trampoline.lo): Use INCLUDES_WITH_GNULIB instead of INCLUDES.
+       * callback/vacall_r/Makefile.in (INCLUDES): Remove -I options that
+       reference gnulib-lib.
+       (INCLUDES_WITH_GNULIB): New variable.
+       (vacall-libapi.lo): Use INCLUDES_WITH_GNULIB instead of INCLUDES.
+       * callback/trampoline_r/Makefile.in (INCLUDES): Remove -I options that
+       reference gnulib-lib.
+       (INCLUDES_WITH_GNULIB): New variable.
+       (trampoline.lo): Use INCLUDES_WITH_GNULIB instead of INCLUDES.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Make recognition of Solaris more robust.
+       * avcall/avcall.h: Test for '__sun', not for 'sun'.
+       * vacall/vacall.h: Likewise.
+       * callback/vacall_r/vacall_r.h: Likewise.
+       * vacall/tests.c: Likewise.
+       * callback/tests.c: Likewise.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Align field names.
+       * avcall/avcall-alist.h (__av_alist): Rename field 'farg' to 'fargs'.
+       * avcall/avcall-internal.h (_av_float): Update.
+       * avcall/avcall-mipsn32.c (avcall_call): Likewise.
+       * avcall/avcall-mips64.c (avcall_call): Likewise.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Remove support for old NeXTstep.
+       * avcall/avcall.h (__AV_NEXTGCC_STRUCT_RETURN): Remove enum value.
+       * avcall/avcall-internal.h (__av_start_struct4) [__i386__]: Remove test
+       for __AV_NEXTGCC_STRUCT_RETURN.
+       * avcall/avcall-i386.c (avcall_call): Likewise.
+       * avcall/PLATFORMS: Update.
+       * vacall/vacall.h (__VA_NEXTGCC_STRUCT_RETURN): Remove enum value.
+       * callback/vacall_r/vacall_r.h: Likewise.
+       * vacall/vacall-internal.h (__va_start_struct2) [__i386__]: Remove test
+       for __VA_NEXTGCC_STRUCT_RETURN.
+       * vacall/vacall-i386.c (vacall_receiver): Likewise.
+       * trampoline/trampoline.c: Don't include <mach/mach_init.h>.
+       * callback/trampoline_r/trampoline.c: Likewise.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       hppa: Remove support for old gcc-2.6.3.
+       * avcall/avcall.h (__AV_OLDGCC_STRUCT_RETURN): Remove enum value.
+       * avcall/avcall-internal.h (__av_reg_struct_return) [__hppa__]: Remove
+       test for __AV_OLDGCC_STRUCT_RETURN.
+       * avcall/avcall-hppa.c (avcall_call): Likewise.
+       * vacall/vacall.h (__VA_OLDGCC_STRUCT_RETURN): Remove enum value.
+       * callback/vacall_r/vacall_r.h (__VA_OLDGCC_STRUCT_RETURN): Likewise.
+       * vacall/vacall-internal.h (__va_reg_struct_return) [__hppa__]: Remove
+       test for __VA_OLDGCC_STRUCT_RETURN.
+       * vacall/vacall-hppa.c (vacall_receiver): Likewise.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Evaluate __AV_ALIST_WORDS only during av_start_* macros. Part 2.
+       * avcall/avcall-alist.h (__av_alist) [__hppa__]: Add 'args_end' field.
+       * avcall/avcall-internal.h (__av_start1) [__hppa__]: Initialize it.
+       * avcall/avcall-hppa.c (avcall_call): Use it to reduce the use of
+       __AV_ALIST_WORDS.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Fix overflow detection bug on hppa.
+       * avcall/avcall-internal.h (__av_struct) [__hppa__]: Use LIST.eptr
+       instead of &LIST.args[0].
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Fix build failure with --enable-shared on Solaris/SPARC with cc.
+       * common/asm-sparc.h: Test __SVR4, not __svr4__.
+       * common/asm-sparc.sh: Fix comment about postprocessing.
+       * avcall/Makefile.in (avcall-sparc.s, avcall-sparc64.s): Remove space
+       after '#'.
+       * vacall/Makefile.in (vacall-sparc.s, vacall-sparc64.s): Likewise.
+       * trampoline/Makefile.in (cache-sparc.s, cache-sparc64.s): Likewise.
+       * callback/vacall_r/Makefile.in (vacall-sparc.s, vacall-sparc64.s):
+       Likewise.
+       * callback/trampoline_r/Makefile.in (cache-sparc.s, cache-sparc64.s):
+       Likewise.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       vacall: Fix build failure with gcc configured with --enable-default-pie.
+       Works around a GCC bug, reported at
+       <https://gcc.gnu.org/bugzilla/show_bug.cgi?id=81653>.
+       * vacall/Makefile.devel (vacall-sparc-linux-pic.s): New target.
+       (vacall-sparc-macro.S): Combine vacall-sparc-linux.s and
+       vacall-sparc-linux-pic.s in one file.
+       (vacall-sparc64-linux-pic.s): New target.
+       (vacall-sparc64-macro.S): Combine vacall-sparc64-linux.s and
+       vacall-sparc64-linux-pic.s in one file.
+       * vacall/Makefile.in (SOURCE_FILES): Add vacall-sparc-linux-pic.s,
+       vacall-sparc64-linux-pic.s.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       mips: Avoid warning about undeclared function 'cacheflush' on Linux.
+       * trampoline/trampoline.c: On Linux, include <sys/cachectl.h>, not
+       <asm/cachectl.h>.
+       * callback/trampoline_r/trampoline.c: Likewise.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       vacall: Fix struct returns on mips (o32 ABI).
+       * vacall/vacall-mips.c (vacall_receiver): Return the struct return
+       address in register $2.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       ia64: Test __GNUC__ only in av/va_start_* (regression from 2017-07-30).
+       * avcall/avcall.h (__AV_OLDGCC_STRUCT_ARGS): New enum item.
+       (__AV_STRUCT_ARGS): Use it.
+       * avcall/avcall-internal.h (__av_struct) [__ia64__]: Test flag
+       __AV_OLDGCC_STRUCT_ARGS, not __GNUC__.
+       * vacall/vacall.h (__VA_OLDGCC_STRUCT_ARGS): New enum item.
+       (__VA_STRUCT_ARGS): Use it.
+       * callback/vacall_r/vacall_r.h: Likewise.
+       * vacall/vacall-internal.h (__va_arg_struct): Test flag
+       __VA_OLDGCC_STRUCT_ARGS, not __GNUC__.
+
+2017-08-27  Bruno Haible  <bruno@clisp.org>
+
+       Fix "make check" failure on Linux/mips (regression from 2017-07-30).
+       * ffcall-abi.h: For mipsn32, test _MIPS_SIM, because <sgidefs.h> defines
+       both _ABIO32 and _ABIN32.
+
+2017-07-31  Bruno Haible  <bruno@clisp.org>
+
+       Fix preprocessor warning "does not give a valid preprocessing token".
+       Reported by Reini Urban at <https://savannah.gnu.org/support/?109280>.
+       * common/asm-arm.sh: Don't put a colon inside the C() or L() argument.
+       * common/asm-i386.sh: Likewise.
+       * common/asm-m68k.sh: Likewise.
+       * common/asm-sparc.sh: Likewise.
+       * common/asm-x86_64.sh: Likewise.
+       * common/asm-arm.h (FUNBEGIN): Don't put a colon inside the C()
+       argument.
+       * common/asm-i386.hh (FUNBEGIN): Likewise.
+       * common/asm-m68k.h (FUNBEGIN): Likewise.
+       * common/asm-sparc.h (FUNBEGIN): Likewise.
+       * common/asm-x86_64.h (FUNBEGIN): Likewise.
+
+2017-07-31  Bruno Haible  <bruno@clisp.org>
+
+       Fix preprocessor warning "Unknown preprocessing directive".
+       * common/asm-hppa.sh: Eliminate #APP, #NO_APP lines.
+       * common/asm-powerpc.sh: Likewise.
+
+2017-07-31  Bruno Haible  <bruno@clisp.org>
+
+       trampoline_r: Rework API.
+       * callback/trampoline_r/trampoline_r.h (trampoline_r_address,
+       trampoline_r_data0, trampoline_r_data1): Change signatures.
+       * callback/trampoline_r/trampoline.c (trampoline_r_address,
+       trampoline_r_data0, trampoline_r_data1): Update accordingly.
+       * callback/trampoline_r/test2.c: Update.
+       * callback/callback-libapi.c (is_callback): Likewise.
+
+2017-07-31  Bruno Haible  <bruno@clisp.org>
+
+       vacall: Fix build error on IRIX with cc (regression from 2017-07-30).
+       * vacall/vacall-internal.h (__va_arg_adjusted, __va_arg_struct): Cast
+       result of __va_arg_leftadjusted and __va_arg_rightadjusted to 'void*'.
+
+2017-07-31  Bruno Haible  <bruno@clisp.org>
+
+       Fix "make check" failure on arm (regression from 2017-07-30).
+       * vacall/vacall-internal.h (__va_alist): Move the 'filler1' field right
+       before the 'tmp' field.
+       * callback/vacall_r/vacall_r.h (vacall_alist): Add 'filler1' field
+       between 'flags' and 'tmp' fields.
+
+2017-07-31  Bruno Haible  <bruno@clisp.org>
+
+       Fix build error (regression from 2017-07-30).
+       * vacall/Makefile.in (INCLUDES): Add -I options for <stdnoreturn.h>.
+       * callback/vacall_r/Makefile.in (INCLUDES): Likewise.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       vacall: Polish Makefile.in.
+       * vacall/Makefile.in (vacall-x86_64-x32.o): Remove spurious reference to
+       LIBTOOL_COMPILE.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       m68k: Fix callback test crash on Linux.
+       * avcall/Makefile.in (avcall-m68k.s): Use the .S file in Motorola
+       syntax (cross-compiled for m68k-linux), not the one in MIT syntax
+       (cross-compiled for m68k-sun).
+       * vacall/Makefile.in (vacall-m68k.s): Likewise.
+       * callback/vacall_r/Makefile.in (vacall-m68k.s): Likewise.
+       * avcall/PLATFORM, NEWS: Update.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       m68k: Fix build failure on Linux.
+       * common/asm-m68k.sh: In mit syntax, recognize 'pc' as a register name.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Limit the exported symbols of the installed shared libraries.
+       * avcall/Makefile.in (LIBAVCALL_EXPORTED_SYMBOLS_REGEX): New variable.
+       (libavcall.la): Use libtool's -export-symbols-regex option.
+       * trampoline/Makefile.in (LIBTRAMPOLINE_EXPORTED_SYMBOLS_REGEX): New
+       variable.
+       (libtrampoline.la): Use libtool's -export-symbols-regex option.
+       * callback/Makefile.in (LIBCALLBACK_EXPORTED_SYMBOLS_REGEX): New
+       variable.
+       (libcallback.la): Use libtool's -export-symbols-regex option.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Ensure source compatibility with existing versions of GNU clisp, part 3.
+       * vacall/vacall-internal.h (__va_alist): Move the 'flags' and 'tmp'
+       fields to the beginning.
+       * callback/vacall_r/vacall_r.h (vacall_alist): When used by GNU clisp,
+       declare 'flags' and 'tmp' members.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Ensure source compatibility with existing versions of GNU clisp, part 2.
+       * avcall/avcall-alist.h (__av_alist): Move the 'flags' field to the
+       beginning.
+       * avcall/avcall.h (av_alist): When used by GNU clisp, declare a 'flags'
+       member.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Ensure source compatibility with existing versions of GNU clisp, part 1.
+       * avcall/avcall-libapi.c (__builtin_avcall): New dummy function.
+       * callback/callback-libapi.c (trampoline_r_data0): New dummy function.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Remove copied files from callback/vacall_r/.
+       * callback/vacall_r/Makefile.devel (vacall-*.s): Compile
+       ../../vacall/vacall-*.c directly.
+       * autogen.sh: Don't invoke target 'copied-files' in callback/vacall_r/.
+       * Makefile.devel (precompiled): Likewise.
+       * Makefile.in (COPIED_FILES): Remove callback/vacall_r/*.
+       * callback/vacall_r/Makefile.maint (COPIED_FILES): Remove variable.
+       (copied-files): Remove target.
+       * callback/vacall_r/Makefile.in (SOURCE_FILES): Remove vacall-*.c.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       callback: Allow for binary-compatible future changes of main API.
+       * callback/callback.h: Renamed from callback/callback.h.in.
+       Don't include trampoline_r.h.
+       (callback_t, __TR_function): New types.
+       (callback_function_t): Renamed from __VA_function.
+       (alloc_callback, free_callback, is_callback, callback_address,
+       callback_data): Declare as functions, not as macros.
+       * callback/callback-libapi.c: New file.
+       * configure.ac: Don't create callback/callback.h.
+       * callback/Makefile.in (LIBTOOL_COMPILE): New variable.
+       (callback.h): Remove target
+       (callback-libapi.lo): New target.
+       (libcallback.la): Include it.
+       (install-lib, install, installdirs, uninstall): Don't recurse into
+       'trampoline_r' directory.
+       (test1.o, minitests.o, minitests.s, tests.o, tests.s): Update
+       dependency.
+       (MOSTLYCLEANFILES): Remove callback.h.
+       (SOURCE_FILES): Add callback.h, callback-libapi.c. Remove callback.h.in.
+       * callback/test1.c (function): Remove type.
+       (main): Remove a cast.
+       * callback/tests.c (main): Use the type 'callback_t'.
+       * Makefile.in (DISTCLEANFILES): Update stamp file list.
+       * NEWS: Mention the improvement.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       callback: Remove version number from trampoline_r.h.
+       Rationale: It is already present in callback.h.
+       * callback/trampoline_r/trampoline_r.h: Renamed from
+       callback/trampoline_r/trampoline_r.h.in.
+       (LIBFFCALL_VERSION): Remove macro.
+       * configure.ac: Don't create callback/trampoline_r/trampoline_r.h.
+       * callback/trampoline_r/Makefile.in (trampoline_r.h): Remove target.
+       (trampoline.lo, test1.o, test2.o): Update dependencies.
+       (install-lib, install): Update.
+       (distclean): Don't remove trampoline_r.h.
+       (SOURCE_FILES): Add trampoline_r.h. Remove trampoline_r.h.in.
+       * callback/Makefile.in (trampoline_r.h): Link to
+       $(srcdir)/trampoline_r/trampoline_r.h.
+       * Makefile.in (DISTCLEANFILES): Update stamp file list.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       vacall, callback: Allow compiler optimizations regarding noreturn.
+       * Makefile.maint (GNULIB_MODULES): Add 'stdnoreturn'.
+       * vacall/vacall-libapi.c: Include <stdnoreturn.h>.
+       (__va_struct_buffer_t): Moved to here.
+       (vacall_struct_buffer): Declare static.
+       (vacall_error_type_mismatch, vacall_error_struct_too_large): Declare
+       static and noreturn.
+       * callback/vacall_r/vacall-libapi.c: Likewise.
+       * vacall/vacall-internal.h (__va_start_struct, __va_return): Update.
+       (vacall_error_type_mismatch, vacall_error_struct_too_large,
+       __va_struct_buffer_t, vacall_struct_buffer): Remove declarations.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       vacall, callback: Move copyright notice up.
+       * vacall/vacall.h: Put double-inclusion guard after copyright header.
+       * callback/vacall_r/vacall_r.h: Likewise.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       callback: Allow for binary-compatible future changes of __va_* macros.
+       * callback/vacall_r/vacall_r.h: New file, extracted from
+       callback/vacall_r/vacall_r.h.in. Include <stddef.h>, ffcall-abi.h.
+       (vacall_*): Define to symbols that start with 'callback_'.
+       (va_alist): Define als pointer to 'struct vacall_alist'.
+       (vacall_start, vacall_start_struct, vacall_arg_char, vacall_arg_schar,
+       vacall_arg_uchar, vacall_arg_short, vacall_arg_ushort, vacall_arg_int,
+       vacall_arg_uint, vacall_arg_long, vacall_arg_ulong, vacall_arg_longlong,
+       vacall_arg_ulonglong, vacall_arg_float, vacall_arg_double,
+       vacall_arg_ptr, vacall_arg_struct, vacall_return_void,
+       vacall_return_char, vacall_return_schar, vacall_return_uchar,
+       vacall_return_short, vacall_return_ushort, vacall_return_int,
+       vacall_return_uint, vacall_return_long, vacall_return_ulong,
+       vacall_return_longlong, vacall_return_ulonglong, vacall_return_float,
+       vacall_return_double, vacall_return_ptr, vacall_return_struct): New
+       declarations.
+       (va_start_void, va_start_char, va_start_schar, va_start_uchar,
+       va_start_short, va_start_ushort, va_start_int, va_start_uint,
+       va_start_long, va_start_ulong, va_start_longlong, va_start_ulonglong,
+       va_start_float, va_start_double, va_start_ptr, _va_start_struct,
+       va_arg_char, va_arg_schar, va_arg_uchar, va_arg_short, va_arg_ushort,
+       va_arg_int, va_arg_uint, va_arg_long, va_arg_ulong, va_arg_longlong,
+       va_arg_ulonglong, va_arg_float, va_arg_double, va_arg_ptr,
+       va_arg_struct, _va_arg_struct, va_return_void, va_return_char,
+       va_return_schar, va_return_uchar, va_return_short, va_return_ushort,
+       va_return_int, va_return_uint, va_return_long, va_return_ulong,
+       va_return_longlong, va_return_ulonglong, va_return_float,
+       va_return_double, va_return_ptr, _va_return_struct): Define in terms of
+       these functions.
+       * callback/vacall_r/vacall-libapi.c: Include vacall-internal.h instead
+       of vacall_r.h.in.
+       (vacall_start, vacall_start_struct, vacall_arg_char, vacall_arg_schar,
+       vacall_arg_uchar, vacall_arg_short, vacall_arg_ushort, vacall_arg_int,
+       vacall_arg_uint, vacall_arg_long, vacall_arg_ulong, vacall_arg_longlong,
+       vacall_arg_ulonglong, vacall_arg_float, vacall_arg_double,
+       vacall_arg_ptr, vacall_arg_struct, vacall_return_void,
+       vacall_return_char, vacall_return_schar, vacall_return_uchar,
+       vacall_return_short, vacall_return_ushort, vacall_return_int,
+       vacall_return_uint, vacall_return_long, vacall_return_ulong,
+       vacall_return_longlong, vacall_return_ulonglong, vacall_return_float,
+       vacall_return_double, vacall_return_ptr, vacall_return_struct): New
+       functions.
+       * vacall/vacall-internal.h: If REENTRANT, include vacall_r.h.
+       * callback/vacall_r/vacall_r.h.in: Remove file.
+       * vacall/vacall-*.c: Include vacall-internal.h instead of vacall_r.h.in.
+       * vacall/vacall-libapi.c: Likewise.
+       * callback/vacall_r/Makefile.devel (GCCFLAGS): Add -I option for
+       ffcall-abi.h.
+       (vacall-*.s): Update dependencies. Pass -I options to gcc.
+       * configure.ac: Don't create callback/vacall_r/vacall_r.h.
+       * callback/vacall_r/Makefile.maint (vacall_r.h.msvc,
+       vacall_r.h.mingw32): Remove targets.
+       (totally-clean): Don't remove vacall_r.h.msvc, vacall_r.h.mingw32.
+       * callback/Makefile.maint (vacall_r/vacall_r.h.msvc,
+       vacall_r/vacall_r.h.mingw32): Remove targets.
+       * callback/vacall_r/Makefile.in (INCLUDES): Add -I options for
+       vacall-internal.h and ffcall-abi.h.
+       (all): Don't depend on vacall_r.h.
+       (vacall-libapi.lo): Update dependencies. Pass -DREENTRANT option.
+       (install-lib, install): Update.
+       (distclean): Don't remove vacall_r.h.
+       (SOURCE_FILES): Add vacall_r.h. Remove vacall_r.h.in.
+       (GENERATED_FILES): Remove vacall_r.h.mingw32, vacall_r.h.msvc.
+       * callback/Makefile.in (INCLUDES): Add -I option for ffcall-abi.h.
+       (vacall_r.h): Link to $(srcdir)/vacall_r/vacall_r.h.
+       * Makefile.in (DISTCLEANFILES): Update.
+       * porting-tools/abis/README: Update.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       vacall: Allow for binary-compatible future changes of the __va_* macros.
+       * vacall/vacall.h: New file, extracted from vacall/vacall.h.in.
+       Include <stddef.h>, ffcall-abi.h.
+       (va_alist): Define als pointer to 'struct vacall_alist'.
+       (vacall_start, vacall_start_struct, vacall_arg_char, vacall_arg_schar,
+       vacall_arg_uchar, vacall_arg_short, vacall_arg_ushort, vacall_arg_int,
+       vacall_arg_uint, vacall_arg_long, vacall_arg_ulong, vacall_arg_longlong,
+       vacall_arg_ulonglong, vacall_arg_float, vacall_arg_double,
+       vacall_arg_ptr, vacall_arg_struct, vacall_return_void,
+       vacall_return_char, vacall_return_schar, vacall_return_uchar,
+       vacall_return_short, vacall_return_ushort, vacall_return_int,
+       vacall_return_uint, vacall_return_long, vacall_return_ulong,
+       vacall_return_longlong, vacall_return_ulonglong, vacall_return_float,
+       vacall_return_double, vacall_return_ptr, vacall_return_struct): New
+       declarations.
+       (va_start_void, va_start_char, va_start_schar, va_start_uchar,
+       va_start_short, va_start_ushort, va_start_int, va_start_uint,
+       va_start_long, va_start_ulong, va_start_longlong, va_start_ulonglong,
+       va_start_float, va_start_double, va_start_ptr, _va_start_struct,
+       va_arg_char, va_arg_schar, va_arg_uchar, va_arg_short, va_arg_ushort,
+       va_arg_int, va_arg_uint, va_arg_long, va_arg_ulong, va_arg_longlong,
+       va_arg_ulonglong, va_arg_float, va_arg_double, va_arg_ptr,
+       va_arg_struct, _va_arg_struct, va_return_void, va_return_char,
+       va_return_schar, va_return_uchar, va_return_short, va_return_ushort,
+       va_return_int, va_return_uint, va_return_long, va_return_ulong,
+       va_return_longlong, va_return_ulonglong, va_return_float,
+       va_return_double, va_return_ptr, _va_return_struct): Define in terms of
+       these functions.
+       * vacall/vacall-libapi.c: Include vacall-internal.h instead of
+       vacall.h.in.
+       (vacall_start, vacall_start_struct, vacall_arg_char, vacall_arg_schar,
+       vacall_arg_uchar, vacall_arg_short, vacall_arg_ushort, vacall_arg_int,
+       vacall_arg_uint, vacall_arg_long, vacall_arg_ulong, vacall_arg_longlong,
+       vacall_arg_ulonglong, vacall_arg_float, vacall_arg_double,
+       vacall_arg_ptr, vacall_arg_struct, vacall_return_void,
+       vacall_return_char, vacall_return_schar, vacall_return_uchar,
+       vacall_return_short, vacall_return_ushort, vacall_return_int,
+       vacall_return_uint, vacall_return_long, vacall_return_ulong,
+       vacall_return_longlong, vacall_return_ulonglong, vacall_return_float,
+       vacall_return_double, vacall_return_ptr, vacall_return_struct): New
+       functions.
+       * vacall/vacall-internal.h: New file, extracted from vacall/vacall.h.in.
+       (__VA_ALIST_WORDS): Fix comment.
+       (__va_alist): Declare as 'struct vacall_alist'.
+       (__va_start): Add FLAGS argument.
+       (__va_start_struct): Renamed from _va_start_struct. Add FLAGS argument.
+       (_va_arg_*): Renamed from va_arg_*.
+       (_va_arg_ptr): Renamed from va_arg_ptr. Remove TYPE argument.
+       (_va_return_*): Renamed from va_return_*.
+       (_va_return_ptr): Renamed from va_return_ptr. Remove TYPE argument.
+       (__va_return_struct): Renamed from _va_return_struct.
+       * vacall/vacall.h.in: Remove file.
+       * configure.ac: Don't create vacall.h by substitution.
+       * vacall/vacall-*.c: Include vacall-internal.h instead of vacall.h.in.
+       * vacall/Makefile.devel (GCCFLAGS): Add -I option for ffcall-abi.h.
+       (vacall-*.s): Update dependencies.
+       (tests-*.s): Likewise. No more need to symlink vacall.h.
+       * vacall/Makefile.maint (vacall.h.msvc, vacall.h.mingw32): Remove
+       targets.
+       (totally-clean): Don't remove them.
+       * vacall/Makefile.in (INCLUDES): Add -I option for ffcall-abi.h.
+       (vacall-libapi.o): Update dependencies.
+       (install): Update.
+       (minitests.o, minitests.s, tests.o, tests.s): Update dependency.
+       (distclean): Don't remove vacall.h.
+       (SOURCE_FILES): Add vacall.h, vacall-internal.h. Remove vacall.h.in.
+       (GENERATED_FILES): Remove vacall.h.mingw32, vacall.h.msvc.
+       * Makefile.in (DISTCLEANFILES): Update stamp file list.
+       * vacall/README: Update.
+       * porting-tools/abis/README: Update.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       vacall: Remove special optimization of va_return_struct macro.
+       * vacall/vacall.h.in (va_return_struct): Define through
+       _va_return_struct.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       vacall, callback: Prefix all exported symbols at linker level.
+       * vacall/vacall-*.c: Define vacall_receiver instead of __vacall,
+       callback_receiver instead of __vacall_r,
+       callback_get_receiver instead of get__vacall_r.
+       * vacall/vacall-libapi.c: Include config.h first.
+       (vacall_receiver): Renamed from __vacall.
+       (vacall_struct_buffer): Renamed from __va_struct_buffer.
+       (vacall_error_type_mismatch): Renamed from __va_error1.
+       (vacall_error_struct_too_large): Renamed from __va_error2.
+       * vacall/vacall.h.in (_va_start_struct, __va_return): Update.
+       (vacall_error_type_mismatch): Renamed from __va_error1.
+       (vacall_error_struct_too_large): Renamed from __va_error2.
+       (vacall_struct_buffer): Renamed from __va_struct_buffer.
+       * callback/vacall_r/vacall-libapi.c: Include config.h first.
+       (vacall_struct_buffer): Renamed from __va_struct_buffer.
+       (vacall_error_type_mismatch): Renamed from __va_error1.
+       (vacall_error_struct_too_large): Renamed from __va_error2.
+       * callback/vacall_r/vacall_r.h.in (vacall_error_type_mismatch,
+       vacall_error_struct_too_large, vacall_structcpy, vacall_struct_buffer):
+       Define to symbols that start with 'callback_'.
+       (_va_start_struct, __va_return): Update.
+       (callback_receiver): Renamed from __vacall_r.
+       (callback_get_receiver): Renamed from get__vacall_r.
+       (vacall_error_type_mismatch): Renamed from __va_error1.
+       (vacall_error_struct_too_large): Renamed from __va_error2.
+       (vacall_struct_buffer): Renamed from __va_struct_buffer.
+       * callback/callback.h.in: Update.
+       * callback/trampoline_r/trampoline_r.h.in (alloc_trampoline_r,
+       free_trampoline_r, is_trampoline_r, trampoline_r_address,
+       trampoline_r_data0, trampoline_r_data1): Define to symbols that start
+       with 'callback_trampoline_'.
+       * callback/elf-hack.txt: Update.
+       * porting-tools/abis/call-used-registers.txt: Update.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       callback: Use distinct object file names in static library.
+       * callback/vacall_r/vacall-libapi.c: Renamed from
+       callback/vacall_r/misc.c.
+       * callback/vacall_r/Makefile.in (OBJECTS, SOURCE_FILES): Update.
+       (vacall-libapi.lo): Renamed from misc.lo.
+       * callback/Makefile.in (libcallback.la): Update.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       vacall: Use distinct object file names in static library.
+       * vacall/vacall-libapi.c: Renamed from vacall/misc.c.
+       * vacall/Makefile.in (OBJECTS, SOURCE_FILES): Update.
+       (vacall-libapi.o): Renamed from misc.o.
+       * vacall/README: Update.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Modernize.
+       * avcall/avcall.h: Change double-include guard. Modernize copyright
+       header.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Allow for binary-compatible future changes of the __av_* macros.
+       * avcall/avcall.h: New file, extracted from avcall/avcall.h.in.
+       Include <stddef.h>, ffcall-abi.h.
+       When included from avcall-internal.h, include avcall-alist.h and add
+       member '_av_m_alist' in av_alist type.
+       (avcall_overflown, avcall_start, avcall_start_struct, avcall_arg_long,
+       avcall_arg_ulong, avcall_arg_ptr, avcall_arg_longlong,
+       avcall_arg_ulonglong, avcall_arg_float, avcall_arg_double,
+       avcall_arg_struct): New declarations.
+       (av_overflown, av_start_void, av_start_char, av_start_schar,
+       av_start_uchar, av_start_short, av_start_ushort, av_start_int,
+       av_start_uint, av_start_long, av_start_ulong, av_start_longlong,
+       av_start_ulonglong, av_start_float, av_start_double, av_start_ptr,
+       _av_start_struct, av_char, av_schar, av_short, av_int, av_long,
+       av_uchar, av_ushort, av_uint, av_ulong, av_ptr, av_longlong,
+       av_ulonglong, av_float, av_double, av_struct, _av_struct, av_call):
+       Define in terms of these functions.
+       * avcall/avcall-libapi.c: New file.
+       * avcall/avcall-alist.h: New file, extracted from avcall/avcall.h.in.
+       * avcall/avcall-internal.h: New file, extracted from avcall/avcall.h.in.
+       (__av_start): Add LIST_ARGS_END and FLAGS arguments.
+       (__av_start1, __av_start_init_eptr): Add LIST_ARGS_END argument.
+       (__av_start_struct): Add LIST_ARGS, LIST_ARGS_END, FLAGS arguments.
+       (__av_long): Renamed from _av_long.
+       (__av_ulong): Renamed from _av_ulong.
+       (__av_ptr): Renamed from _av_ptr. Remove TYPE argument.
+       (__av_arg_longlong): Renamed from __av_longlong.
+       (__av_longlong): Renamed from _av_longlong.
+       (__av_ulonglong): Renamed from _av_ulonglong.
+       * avcall/avcall.h.in: Remove file.
+       * configure.ac: Don't create avcall.h by substitution.
+       * avcall/avcall-*.c: Include avcall-internal.h instead of avcall.h.in.
+       (avcall_call): Change argument type to 'av_alist*'.
+       * avcall/Makefile.devel (GCCFLAGS): Add -I option for ffcall-abi.h.
+       (avcall-*.s): Update dependencies.
+       (tests-*.s): Likewise. No more need to symlink avcall.h.
+       * avcall/Makefile.maint (avcall.h.msvc, avcall.h.mingw32): Remove
+       targets.
+       (totally-clean): Don't remove them.
+       * avcall/Makefile.in (INCLUDES): Add -I option for ffcall-abi.h.
+       (OBJECTS): Add avcall-libapi.lo.
+       (avcall-libapi.lo): New target.
+       (install-lib, install): Update.
+       (minitests.o, minitests.s, tests.o, tests.s): Update dependency.
+       (distclean): Don't remove avcall.h.
+       (SOURCE_FILES): Add avcall.h, avcall-internal.h, avcall-alist.h,
+       avcall-libapi.c. Remove avcall.h.in.
+       (GENERATED_FILES): Remove avcall.h.mingw32, avcall.h.msvc.
+       * Makefile.in (DISTCLEANFILES): Update stamp file list.
+       * avcall/README: Update.
+       * porting-tools/abis/README: Update.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Allow for binary-compatible future changes of __av_alist.
+       * avcall/avcall.h.in (__AV_ALIST_SIZE_BOUND): New macro.
+       (__av_alist_verify): New verification.
+       (av_alist): Use it to allocate room.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Separate the fixed-size part from the variable part of av_alist.
+       * avcall/avcall.h.in (__av_alist): Renamed from av_alist. Add 'args'
+       field as a pointer.
+       (av_alist): New type.
+       (_av_overflown): Renamed from av_overflown.
+       (av_overflown): New macro.
+       (__av_start): Add LIST_ARGS argument.
+       (av_start_*, _av_start_struct): Update accordingly.
+       (_av_long): Renamed from av_long.
+       (_av_ulong): Renamed from av_ulong.
+       (_av_ptr): Renamed from av_ptr.
+       (av_long, av_ulong, av_ptr): New macros.
+       (_av_longlong): Renamed from av_longlong.
+       (_av_ulonglong): Renamed from av_ulonglong.
+       (av_longlong, av_ulonglong): New macros.
+       (_av_float): Renamed from av_float.
+       (_av_double): Renamed from av_double.
+       (av_float, av_double): New macros.
+       (av_struct, _av_struct, av_call): Update.
+       (avcall_call): Take an '__av_alist*' parameter.
+       * avcall/avcall-*.c (avcall_call): Take an '__av_alist*' parameter.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Remove unused macro argument TYPE.
+       * avcall/avcall.h.in (__av_struct_copy, __av_struct_leftadjusted,
+       __av_struct_rightadjusted, __av_struct): Remove TYPE argument.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Remove special optimization of av_struct macro.
+       * avcall/avcall.h.in (av_struct): Take the address of VAL.
+       (__av_struct_assign): Remove macro.
+       (__av_struct, __av_struct_leftadjusted, __av_struct_rightadjusted):
+       Remove ASSIGN argument; use __av_struct_copy instead.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Evaluate __AV_ALIST_WORDS only during av_start_* macros. Part 1.
+       * avcall/avcall.h.in (av_alist): Enable 'eptr' field on all platforms.
+       (__av_eptr): Remove macro. Use (LIST).eptr eveywhere instead.
+       (__av_start_init_eptr): New macro.
+       (__av_start): Invoke it.
+       (__av_start1): Don't initialize (LIST).eptr here.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       avcall: Prefix all exported symbols at linker level with 'avcall_'.
+       * avcall/avcall.h.in (avcall_call): Renamed from __builtin_avcall.
+       * avcall/avcall-*.c: Update accordingly.
+       * avcall/DOC: Likewise.
+       * avcall/avcall.3: Likewise.
+       * avcall/avcall.html: Likewise.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       trampoline: Rework API.
+       * trampoline/trampoline.h: Add C++ guards. Add comments.
+       (trampoline_function_t): Renamed from __TR_function.
+       (alloc_trampoline, trampoline_address, trampoline_variable,
+       trampoline_data): Change signatures.
+       * trampoline/trampoline.c: Update accordingly.
+       * trampoline/test1.c (function): Remove type.
+       (main): Update.
+       * trampoline/test2.c (function): Remove type.
+       (main): Update.
+       * NEWS: Mention the changes.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       trampoline: Restructure include file.
+       * trampoline/trampoline.h: Renamed from trampoline/trampoline.h.in.
+       * configure.ac: Don't create trampoline.h by substitution.
+       * trampoline/Makefile.in (trampoline.h): Remove target.
+       (trampoline.lo, test1.o, test2.o): Update dependency.
+       (install, SOURCE_FILES): Update.
+       (distclean): Don't remove trampoline.h.
+       * trampoline/README: Update.
+       * Makefile.in (DISTCLEANFILES): Update stamp file list.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Move ABI indicator macro definitions to a separate include file.
+       Rationale: Prepare for getting rid of most .h.in -> .h substitutions.
+       * ffcall-abi.h: New file.
+       * Makefile.in (install, uninstall): Install/uninstall ffcall-abi.h.
+       (SOURCE_FILES): Add ffcall-abi.h.
+       * porting-tools/abis/predefines.c: New file.
+       * porting-tools/abis/README: Update.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Move libffcall version number to a separate include file.
+       Rationale: Prepare for getting rid of most .h.in -> .h substitutions.
+       * ffcall-version.in.h: New file.
+       * configure.ac: Invoke AC_CONFIG_HEADERS for ffcall-version.h.
+       * avcall/avcall.h.in (LIBFFCALL_VERSION): Remove definition. Include
+       ffcall-version.h instead.
+       * vacall/vacall.h.in: Likewise.
+       * trampoline/trampoline.h.in: Likewise.
+       * callback/callback.h.in: Likewise.
+       * callback/vacall_r/vacall_r.h.in (LIBFFCALL_VERSION): Remove
+       definition.
+       * callback/trampoline_r/trampoline_r.h.in (LIBFFCALL_VERSION): Likewise.
+       * dummy/ffcall-version.h: New file.
+       * avcall/Makefile.devel (GCCFLAGS): Add -I option to find a dummy
+       ffcall-version.h.
+       * vacall/Makefile.devel (GCCFLAGS): Likewise.
+       * callback/vacall_r/Makefile.devel (GCCFLAGS): Likewise.
+       * vacall/Makefile.maint (VERSION): Remove macro.
+       (vacall.h.msvc, vacall.h.mingw32): Don't substitute LIBFFCALL_VERSION.
+       * callback/vacall_r/Makefile.maint (VERSION): Remove macro.
+       (vacall_r.h.msvc, vacall_r.h.mingw32): Don't substitute
+       LIBFFCALL_VERSION.
+       * Makefile.in (ffcall-version.h): New target.
+       (install, installdirs, uninstall): Install/uninstall ffcall-version.h.
+       (DISTCLEANFILES): Add ffcall-version.h. Update stamp file list.
+       (SOURCE_FILES): Add ffcall-version.in.h, dummy/ffcall-version.h.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Remove configure test for 'long long'. Assume the compiler has it.
+       Rationale: All compilers nowadays have 'long long', for years.
+       * configure.ac: Don't invoke AC_TYPE_LONG_LONG_INT.
+       * avcall/avcall.h.in (HAVE_LONG_LONG_INT): Remove macro.
+       * vacall/vacall.h.in (HAVE_LONG_LONG_INT): Likewise.
+       * callback/vacall_r/vacall_r.h.in (HAVE_LONG_LONG_INT): Likewise.
+       * vacall/Makefile.devel (GCCFLAGS): Remove -DHAVE_LONG_LONG_INT.
+       * callback/vacall_r/Makefile.devel (GCCFLAGS): Likewise.
+       * avcall/tests.c: Remove test for HAVE_LONG_LONG_INT.
+       * vacall/tests.c: Likewise.
+       * callback/tests.c: Likewise.
+       * porting-tools/abis/README: Update.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Remove unused configure test AC_C_CHAR_UNSIGNED.
+       * vacall/vacall.h.in (__CHAR_UNSIGNED__): Remove unuseed macro.
+       * callback/vacall_r/vacall_r.h.in (__CHAR_UNSIGNED__): Likewise.
+       * configure.ac: Don't invoke AC_C_CHAR_UNSIGNED.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Don't depend on FFCALL_IREG_FLOAT_RETURN configure result.
+       Rationale: The installed .h files should be compiler independent.
+       * avcall/avcall.h.in (__IREG_FLOAT_RETURN__): Remove macro. Assume it is
+       not defined on m68k.
+       * vacall/vacall.h.in (__IREG_FLOAT_RETURN__): Likewise.
+       * callback/vacall_r/vacall_r.h.in (__IREG_FLOAT_RETURN__): Likewise.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Don't depend on FFCALL_SMALL_STRUCT_RETURN configure result.
+       Rationale: The installed .h files should be compiler independent.
+       * avcall/avcall.h.in (__SMALL_STRUCT_RETURN__): Remove macro. Use
+       explicit ABI conditional instead.
+       * vacall/vacall.h.in (__SMALL_STRUCT_RETURN__): Likewise.
+       * callback/vacall_r/vacall_r.h.in (__SMALL_STRUCT_RETURN__): Likewise.
+       * avcall/Makefile.maint (avcall.h.msvc, avcall.h.mingw32): Don't
+       substitute __SMALL_STRUCT_RETURN__.
+       * vacall/Makefile.maint (vacall.h.msvc, vacall.h.mingw32): Likewise.
+       * callback/vacall_r/Makefile.maint (vacall_r.h.msvc,
+       vacall_r.h.mingw32): Likewise.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Move a file.
+       * avcall/port-structs.c: Moved to porting-tools/abis/.
+       * porting-tools/abis/README: Mention it.
+
+2017-07-30  Bruno Haible  <bruno@clisp.org>
+
+       Remove support for old PCC struct return convention.
+       It is not reentrant and therefore a fortiori not multithread-safe.
+       * m4/pccstruct.m4: Remove file.
+       * Makefile.in (SOURCE_FILES): Remove it.
+       * configure.ac: Remove FFCALL_PCC_STRUCT_RETURN invocation.
+       * avcall/avcall.h.in (__PCC_STRUCT_RETURN__): Remove macro.
+       (__AV_PCC_STRUCT_RETURN): Remove enum value.
+       (__av_start_struct1): Remove macro.
+       (_av_start_struct): Use __av_start_struct2 instead.
+       * avcall/avcall-*.c: Remove support for __AV_PCC_STRUCT_RETURN flag.
+       * vacall/vacall.h.in (__PCC_STRUCT_RETURN__): Remove macro.
+       (__VA_PCC_STRUCT_RETURN): Remove enum value.
+       (_va_start_struct): Update accordingly.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-*.c: Remove support for __VA_PCC_STRUCT_RETURN flag.
+       * vacall/misc.c (__va_error2): Update error message.
+       * callback/vacall_r/misc.c (__va_error2): Likewise.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       ia64: Make vacall code more robust.
+       * vacall/vacall-ia64.c: Use a split struct to allocate room for the
+       8 leading words in the callee's stack.
+       * porting-tools/abis/stack-frame.txt: Mention the change.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       alpha: Make vacall code more robust.
+       * vacall/vacall-alpha.c: Use a split struct to allocate room for the
+       6 leading words in the callee's stack.
+       * porting-tools/abis/stack-frame.txt: Mention the change.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       alpha: Make vacall code more maintainable.
+       * vacall/vacall.h.in (__va_alist, va_arg_double, va_arg_float) [alpha]:
+       Add fields 'farg_offset', 'farg'.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-alpha.c (__vacall): Don't allocate the fargs in the
+       'locals' struct. Initialize 'farg_offset' field.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       mipsn32, mips64: Remove unused field.
+       * vacall/vacall.h.in (__va_alist) [__mipsn32__ || __mips64__]: Remove
+       field 'memargptr'.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-mipsn32.c (__vacall): Update accordingly.
+       * vacall/vacall-mips64.c (__vacall): Likewise.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       mipsn32, mips64: Make vacall code more robust.
+       * vacall/Makefile.devel (vacall-mipsn32eb-macro.S,
+       vacall-mipsn32el-macro.S, vacall-mips64eb-macro.S,
+       vacall-mips64el-macro.S): Remove post-processing hack.
+       * callback/vacall_r/Makefile.devel (vacall-mipsn32eb-macro.S,
+       vacall-mipsn32el-macro.S, vacall-mips64eb-macro.S,
+       vacall-mips64el-macro.S): Likewise.
+       * vacall/vacall-mipsn32.c: Use a split struct to allocate room for the
+       8 leading words in the callee's stack.
+       * vacall/vacall-mips64.c: Likewise.
+       * porting-tools/abis/stack-frame.txt: Mention the change.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       mips: Don't store dynamic state in the flags.
+       * avcall/avcall.h.in (__AV_FLOAT_1, __AV_FLOAT_2, __AV_DOUBLE_1,
+       __AV_DOUBLE_2): Remove enum values.
+       (av_alist) [mips]: Store the number of floating-point register arguments
+       in fanum. Store bitmasks in farg_mask and darg_mask. Rename field
+       'floatarg' to 'fargs'. Rename field 'doublearg' to 'dargs'.
+       (__av_start1, av_float, av_double): Update implementation accordingly.
+       * avcall/avcall-mips.c (__builtin_avcall): Access farg_mask and
+       darg_mask instead of the flags.
+       * vacall/vacall.h.in (__VA_FLOAT_1, __VA_FLOAT_2): Remove enum values.
+       (__VA_REGISTER_FLOATSTRUCT_RETURN, __VA_REGISTER_DOUBLESTRUCT_RETURN):
+       Change values.
+       (__va_alist, va_arg_float, va_arg_double) [mips]: Store the number of
+       floating-point register arguments in fanum. Use it instead of the
+       __VA_FLOAT_1 flag.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-mips.c (__vacall): Update accordingly.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       powerpc, powerpc64, ia64, x86_64: Undo premature optimization.
+       * vacall/vacall.h.in: Use 'fanum' field instead of 'memfargptr' field.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-ia64.c: Update accordingly.
+       * vacall/vacall-powerpc.c: Likewise.
+       * vacall/vacall-powerpc64.c: Likewise.
+       * vacall/vacall-x86_64.c: Likewise.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Undo premature optimization.
+       * vacall/vacall.h.in [__x86_64__]: Use 'ianum' field instead of
+       'memiargptr' field.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-x86_64.c (__vacall): Update accordingly.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Undo premature optimization.
+       * avcall/avcall.h.in [__x86_64__]: Use 'ianum' field instead of 'iaptr'
+       field.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       ia64, x86_64: Use symbolic constants.
+       * avcall/avcall.h.in (__AV_FARG_NUM) [__ia64__ || __x86_64__]:
+       New macro.
+       (av_float, av_double): Use it.
+       (__av_struct): Use __AV_IARG_NUM.
+       * vacall/vacall.h.in (__VA_FARG_NUM) [__ia64__ || __x86_64__]:
+       New macro.
+       (va_arg_float, va_arg_double): Use it.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       armhf: Fix a bug in vacall (failing tests d_d13i, f_f17l3L, d_d17l3L).
+       * vacall/vacall.h.in (__va_alist, __va_start_struct2,
+       __va_arg_leftadjusted, __va_arg_rightadjusted, __va_arg_longlong)
+       [__armhf__]: Use 'iarg' and 'ianum' fields instead of 'saptr' field.
+       (va_arg_float, va_arg_double) [__armhf__]: Don't force all remaining
+       integer arguments to the stack.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-armhf.c (__vacall): Update accordingly.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       armhf: Fix a bug in avcall (failing tests f_f17l3L, d_d17l3L).
+       * avcall/avcall.h.in [__armhf__]: Store integer argument count in ianum.
+       (__av_start1, __av_start_struct4, __av_word, __av_longlong, av_float,
+       av_double, __av_struct): Update implementation accordingly.
+       * avcall/avcall-arm.c: Add comment.
+       * avcall/avcall-armhf.c: Likewise.
+       * porting-tools/abis/stack-frame.txt: Update information.
+       * NEWS: Mention the fix.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       powerpc: Make avcall code more robust.
+       * avcall/avcall-powerpc.c (__builtin_avcall) [_AIX]: Don't rely on a
+       particular stack frame layout produced by GCC. Use __builtin_alloca
+       instead.
+       * avcall/avcall-powerpc64.c (STACK_OFFSET): Remove unused macro.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       powerpc: Don't ever access out-of-range array elements.
+       * avcall/avcall-powerpc.c (__builtin_avcall): Access only 8 fargs when
+       only 8 exist.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       powerpc, powerpc64: Use symbolic constants.
+       * avcall/avcall.h.in (__AV_FARG_NUM) [__powerpc__ || __powerpc64__]:
+       New macro.
+       (av_float, av_double): Use it.
+       * vacall/vacall.h.in (__VA_FARG_NUM) [__powerpc__ || __powerpc64__]:
+       New macro.
+       (va_arg_float, va_arg_double): Use it.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       powerpc: Fix a bug (failing tests f_f12i, f_f13i, d_d12i, d_d13i).
+       * avcall/avcall.h.in [__powerpc_sysv4__]: Store integer register
+       arguments in iargs[] and their count in ianum.
+       (__av_start1, __av_start_struct4, av_long, av_ulong, av_ptr,
+       __av_longlong, __av_struct): Update implementation accordingly.
+       * avcall/avcall-powerpc.c (__builtin_avcall): Update accordingly.
+       Ignore farglen in the arg copy loop.
+       * vacall/vacall.h.in (__va_alist, __va_start_struct2,
+       __va_arg_leftadjusted, __va_arg_rightadjusted, __va_arg_longlong,
+       va_arg_float, va_arg_double) [__powerpc_sysv4__]: Use 'ianum' field
+       instead of 'saptr', 'onstack' fields. Don't bump 'ianum' in
+       va_arg_float, va_arg_double.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-powerpc.c (__vacall): Update accordingly
+       * porting-tools/abis/stack-frame.txt: Fix information.
+       * NEWS: Mention the fix.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       powerpc: Simplify #if expressions.
+       * avcall/avcall.h.in (__powerpc_aix__, __powerpc_sysv4__): New macros.
+       Use them in #if expressions.
+       * vacall/vacall.h.in: Likewise.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * avcall/avcall-powerpc.c: Add comments.
+       * vacall/vacall-powerpc.c: Likewise.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       s390, s390x: Merge common code.
+       * vacall/vacall.h.in (va_arg_float, va_arg_double) [s390,s390x]: Merge.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       s390: Fix a bug (failing tests f_f3i...f_f13i, d_d3i...d_d13i).
+       * vacall/vacall.h.in (va_arg_float, va_arg_double) [s390]: Don't bump
+       ianum,
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * NEWS: Mention the fix.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       s390: Make vacall code more similar to s390x, arm64 cases.
+       * vacall/vacall.h.in (__va_alist, __va_start_struct2,
+       __va_arg_leftadjusted, __va_arg_rightadjusted, __va_arg_adjusted,
+       va_arg_float, va_arg_double, __va_arg_struct) [s390]: Use 'ianum'
+       field instead of 'saptr', 'onstack' fields.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-s390.c: Update accordingly.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       Add some mixed-number args boundary tests.
+       * avcall/tests.c (f_f17l3L, d_d17l3L): New tests.
+       * vacall/tests.c: Likewise.
+       * callback/tests.c: Likewise.
+
+2017-07-22  Bruno Haible  <bruno@clisp.org>
+
+       Add more mixed-number tests.
+       * avcall/tests.c (f_fi, ..., f_f13i, d_di, ..., d_d13i): New tests.
+       * vacall/tests.c: Likewise.
+       * callback/tests.c: Likewise.
+
+2017-07-19  Bruno Haible  <bruno@clisp.org>
+
+       s390: Make avcall code more robust.
+       * avcall/avcall-s390.c (STACK_OFFSET): Remove macro.
+       (__builtin_avcall): Don't rely on a particular stack frame layout
+       produced by GCC. Use __builtin_alloca instead.
+
+2017-07-19  Bruno Haible  <bruno@clisp.org>
+
+       s390: Make avcall code more similar to s390x, arm64, x86_64 cases.
+       * avcall/avcall.h.in (av_alist, __av_start_struct4, __av_word, av_long,
+       av_ulong, av_ptr, __av_longlong, __av_struct) [s390]: Use iargs[] array
+       for the first 5 general-purpose argument words, like on s390x.
+       (__av_struct_rightadjusted) [s390]: Remove macro.
+       * avcall/avcall-s390.c (__builtin_avcall): Update accordingly.
+
+2017-07-19  Bruno Haible  <bruno@clisp.org>
+
+       s390: Simplify avcall code.
+       * avcall/avcall.h.in (av_alist, __av_start1, __av_start_struct4,
+       __av_word, __av_longlong, av_float, av_double,
+       __av_struct_rightadjusted, __av_struct) [s390]: Use 'ianum' field
+       instead of 'fargwords' field.
+       * avcall/avcall-s390.c (__builtin_avcall): Update accordingly.
+
+2017-07-16  Bruno Haible  <bruno@clisp.org>
+
+       Allow building statically linked binaries, through LDFLAGS="-static".
+       * Makefile.main (libtool-imported-files): Fetch and apply patch from
+       <https://lists.gnu.org/archive/html/bug-libtool/2017-07/msg00000.html>:
+
+       2017-07-15  Bruno Haible  <bruno@clisp.org>
+
+               * build-aux/ltmain.sh (func_mode_help, func_mode_link): In the
+               link mode, accept option '-static-uninstalled-libs' in place of
+               '-static', and make '-static' an equivalent of '-all-static'.
+
+2017-07-07  Bruno Haible  <bruno@clisp.org>
+
+       build: Avoid a hanging configure test on FreeBSD/arm64.
+       Seen with FreeBSD 11.1-RC1 on arm64 (under qemu 2.9.0).
+       * m4/codeexec.m4 (FFCALL_CODEEXEC): Avoid running the test on
+       FreeBSD/arm64.
+
+2017-06-27  Bruno Haible  <bruno@clisp.org>
+
+       build: Fix warning in autoconf test.
+       * m4/shm.m4 (CL_SHM): Include <stdlib.h>, to declare exit().
+
+2017-06-25  Bruno Haible  <bruno@clisp.org>
+
+       Add doc about ABIs and calling conventions.
+       * porting-tools/abis: New directory.
+       * common/reg-struct-return.txt: Moved to porting-tools/abis/.
+       * callback/call-used-registers.txt: Likewise.
+
+2017-06-25  Bruno Haible  <bruno@clisp.org>
+
+       Add doc about emulation of target platforms.
+       * porting-tools/emulation: New directory.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       s390: Simplify code.
+       * vacall/vacall.h.in (__va_alist) [s390]: Use a counter instead of
+       2 pointers.
+       (va_arg_float, va_arg_double): Update accordingly;
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-s390.c: Update accordingly.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       s390: Simplify code.
+       * avcall/avcall.h.in (av_alist) [s390]: Use a counter instead of
+       4 pointers. Use 2 bitmasks instead of 2 int[] arrays.
+       (__av_start1, av_float, av_double): Update accordingly.
+       * avcall/avcall-s390.c (__builtin_avcall): Likewise.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       build: Improve guesses when cross-compiling.
+       * m4/codeexec.m4 (FFCALL_CODEEXEC, FFCALL_CODEEXEC_PAX): When
+       cross-compiling, use the known autoconf test results.
+       * m4/mmap.m4 (FFCALL_MMAP): Likewise.
+       * m4/mprotect.m4 (FFCALL_MPROTECT): Likewise.
+       * m4/pccstruct.m4 (FFCALL_PCC_STRUCT_RETURN): Likewise.
+       * m4/shm.m4 (CL_SHM): Likewise.
+       * m4/smallstruct.m4 (FFCALL_SMALL_STRUCT_RETURN): Likewise.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       Bump version number.
+       * VERSION: Set to 2.0.
+       * NEWS: Open new section for 2.0.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       build: Use decimal notation for the version number.
+       * VERSION: Set to 1.13.
+       * configure.ac: Simplify AC_CONFIG_HEADERS invocations. Define
+       LIBFFCALL_VERSION as C macro, based on PACKAGE_VERSION.
+       * avcall/avcall.h.in (LIBFFCALL_VERSION): Use a plain #define, for
+       substitution by config.status.
+       * vacall/vacall.h.in: Likewise.
+       * trampoline/trampoline.h.in: Likewise.
+       * callback/callback.h.in: Likewise.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * callback/trampoline_r/trampoline_r.h.in: Likewise.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       trampoline, callback: Make multithread-safe.
+       * Makefile.maint (AUTOMAKE): New variable.
+       (all): Depend on Makefile-ins.
+       (GNULIB_MODULES): Add 'lock'.
+       (gnulib-m4/gnulib-cache.m4): Don't remove generated gnulib-lib files.
+       (ALL_MAKEFILE_IN_FROM_AM): New variable.
+       (Makefile-ins, gnulib-lib/Makefile.in): New targets.
+       * configure.ac: Invoke AM_INIT_AUTOMAKE. Arrange to generate
+       gnulib-lib/Makefile. Invoke gl_EARLY earlier. Recurse into gnulib-lib
+       directory.
+       * Makefile.in (DISTCLEANFILES): Add the various stamp-h* files created
+       by config.status at the end of the 'configure' run.
+       (AUTOMAKE_IMPORTED_FILES): New variable.
+       (IMPORTED_FILES): Use it.
+       * trampoline/Makefile.in (INCLUDES): Reference the gnulib build dir and
+       source dir.
+       (LTLIBTHREAD): New variable.
+       (libtrampoline.la): Link against libgnu.la, with options $(LTLIBTHREAD).
+       (test1, test2): Link against libtrampoline.la.
+       * trampoline/trampoline.c: Include glthread/lock.h.
+       (zero_fd, file_fd, file_length): Move to file scope.
+       (for_mmap_init): New function, extracted from alloc_trampoline.
+       (for_mmap_once): New variable.
+       (freelist_lock): New variable.
+       (alloc_trampoline): Use once-only execution and locking.
+       * callback/trampoline_r/Makefile.in (INCLUDES): Reference the gnulib
+       build dir and source dir.
+       (LTLIBTHREAD): New variable.
+       (libtrampoline.la): Link against libgnu.la, with options $(LTLIBTHREAD).
+       (test1, test2): Link against libtrampoline.la.
+       * callback/trampoline_r/trampoline.c: Include glthread/lock.h.
+       (zero_fd, file_fd, file_length): Move to file scope.
+       (for_mmap_init): New function, extracted from alloc_trampoline.
+       (for_mmap_once): New variable.
+       (freelist_lock): New variable.
+       (alloc_trampoline_r): Use once-only execution and locking.
+       * callback/Makefile.in (LTLIBTHREAD): New variable.
+       (libcallback.la): Link against libgnu.la, with options $(LTLIBTHREAD).
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       build: Rename glm4 to gnulib-m4.
+       * autogen.sh: Write gnulib-m4 instead of glm4.
+       * Makefile.maint: Likewise.
+       * Makefile.in (GNULIB_IMPORTED_FILES): Likewise.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       build: Assume a single configure.ac file.
+       * Makefile.maint (ALL_CONFIGURE_AC, aclocal.m4): Simplify.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       Merge all autoconf configurations into a single one.
+       * configure.ac: Include the body of all other configure.ac files.
+       Use a single config.h file. Inline FFCALL_COMMON_LIBTOOL and
+       FFCALL_COMMON_TRAMPOLINE.
+       * avcall/configure.ac: Remove file.
+       * vacall/configure.ac: Remove file.
+       * trampoline/configure.ac: Remove file.
+       * callback/configure.ac: Remove file.
+       * callback/vacall_r/configure.ac: Remove file.
+       * callback/trampoline_r/configure.ac: Remove file.
+       * m4/general.m4 (FFCALL_COMMON_LIBTOOL, FFCALL_COMMON_TRAMPOLINE):
+       Remove macros.
+       * build-aux/ac-help.sed: Remove file.
+       * Makefile.maint (CONFIGURED_SUBDIRS, SUBDIRS_CONFIGURE): Remove
+       variables.
+       (ALL_CONFIGURE): Keep only the top-level configure.
+       (%/configure): Remove rule.
+       (ALL_CONFIG_H_IN): Set to only the top-level config.h.in.
+       (config.h.in): Replace the %/config.h.in rule.
+       * vacall/Makefile.maint (config.h.msvc, config.h.mingw32): Use top-level
+       config.h.in.
+       * trampoline/Makefile.maint (config.h.msvc, config.h.mingw32): Use
+       top-level config.h.in.
+       * callback/Makefile.maint (vacall_r/config.h.msvc,
+       vacall_r/config.h.mingw32, trampoline_r/config.h.msvc,
+       trampoline_r/config.h.mingw32): Update dependencies.
+       * callback/vacall_r/Makefile.maint (config.h.msvc, config.h.mingw32):
+       Use top-level config.h.in.
+       * callback/trampoline_r/Makefile.maint (config.h.msvc,
+       config.h.mingw32): Use top-level config.h.in.
+       * Makefile.in (DISTCLEANFILES): Add config.h, libtool.
+       (SOURCE_FILES): Remove build-aux/ac-help.sed.
+       (GENERATED_FILES): Add config.h.in. Remove */config* and
+       callback/*/config*.
+       * avcall/Makefile.in (INCLUDES): Look also in '..'.
+       (top_builddir): Set to '..'.
+       (distclean): Don't remove config* and libtool.
+       (SOURCE_FILES): Remove configure.ac.
+       * vacall/Makefile.in (INCLUDES): Look also in '..'.
+       (misc.o): Update dependency.
+       (distclean): Don't remove config* and libtool.
+       (SOURCE_FILES): Remove configure.ac.
+       * trampoline/Makefile.in (INCLUDES): Look also in '..'.
+       (top_builddir): Set to '..'.
+       (distclean): Don't remove config* and libtool.
+       (SOURCE_FILES): Remove configure.ac.
+       * callback/Makefile.in (INCLUDES): Look also in '..'.
+       (top_builddir): Set to '..'.
+       (DISTCLEANFILES): Remove config* and libtool.
+       (SOURCE_FILES): Remove configure.ac.
+       * callback/vacall_r/Makefile.in (INCLUDES): Look also in '../..'.
+       (top_builddir): Set to '../..'.
+       (misc.lo): Update dependency.
+       (distclean): Don't remove config* and libtool.
+       (SOURCE_FILES): Remove configure.ac.
+       * callback/trampoline_r/Makefile.in (INCLUDES): Look also in '../..'.
+       (top_builddir): Set to '../..'.
+       (distclean): Don't remove config* and libtool.
+       (SOURCE_FILES): Remove configure.ac.
+       * README, */README: Update.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       trampoline: Build library using libtool.
+       * trampoline/configure.ac: Invoke FFCALL_COMMON_LIBTOOL.
+       (CPU_OBJECTS): Now contains .lo file names instead of .o file names.
+       * trampoline/Makefile.in (LIBTOOL*, top_builddir): New variables.
+       (*.lo): Targets renamed from *.o.
+       (libtrampoline.la): Replaces target libtrampoline.a.
+       Use LIBTOOL* variables as appropriate.
+       (clean): Remove also *.lo, libtrampoline.*, .libs, _libs.
+       (distclean): Remove also 'libtool'.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       trampoline: Generate position-independent code.
+       * trampoline/Makefile.devel (GCCFLAGS): Add -fPIC.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       vacall: Explain why not using libtool.
+       * vacall/README: Add comment about libtool.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       Fix result of an autoconf test on AIX.
+       * m4/codeexec.m4 (FFCALL_CODEEXEC): Don't actually run the test on
+       powerpc64 (AIX and Linux) and ia64 (Linux).
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       build: Avoid testing an undefined variable.
+       * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): Before testing
+       cl_cv_func_mprotect_works, test ac_cv_func_mprotect.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       build: Add necessary AC_REQUIREs.
+       * m4/codeexec.m4 (FFCALL_CODEEXEC): Require AC_CANONICAL_HOST and
+       gl_HOST_CPU_C_ABI.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       Fix build error on Solaris 11 with Oracle Developer Studio 12.5.
+       * common/asm-x86_64.sh: Clarify the necessary postprocessing.
+       * common/asm-i386.sh: Document the necessary postprocessing.
+       * avcall/Makefile.in (avcall-i386.s): Do more postprocessing.
+       * vacall/Makefile.in (vacall-i386.s): Likewise.
+       * callback/vacall_r/Makefile.in (vacall-i386.s): Likewise.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       Fix compilation error on CentOS 5.
+       * trampoline/trampoline.c (open_noinherit): New function.
+       (alloc_trampoline): Use it.
+       * callback/trampoline_r/trampoline.c: Likewise.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       Prefer https over http URLs.
+       * autogen.sh: Access ftp.gnu.org through https.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       Remove obsolete mention of nonexistent file.
+       * avcall/README: Don't mention underscore.h.
+       * vacall/README: Likewise.
+
+2017-06-24  Bruno Haible  <bruno@clisp.org>
+
+       Remove obsolete protexec.c file.
+       * trampoline/protexec.c: Remove file.
+       * trampoline/README: Update.
+       * callback/trampoline_r/Makefile.maint (COPIED_FILES): Remove
+       protexec.c.
+
+2017-06-21  Bruno Haible  <bruno@clisp.org>
+
+       Fix list of distributed files.
+       * Makefile.in (SOURCE_FILES): Add m4/endianness.m4, common/asm-s390.sh.
+
+2017-06-19  Bruno Haible  <bruno@clisp.org>
+
+       Fix a misnomer.
+       * vacall/vacall.h.in: Rename 'regarg' to 'iarg'.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-powerpc.c: Update accordingly.
+       * vacall/vacall-s390.c: Likewise.
+
+2017-06-18  Bruno Haible  <bruno@clisp.org>
+
+       s390x: Add support for s390x CPU (64-bit S/390).
+       * cross-tools/cross.conf: Add configuration for s390x cross tools.
+       * common/reg-struct-return.txt: Add info about s390x.
+       * callback/call-used-registers.txt: Likewise.
+       * common/asm-s390.sh: New file.
+       * avcall/avcall.h.in: Optionally define __s390x__. Add code for
+       __s390x__, especially __av_start_struct4, av_float, av_double,
+       __av_struct.
+       * avcall/avcall-s390x.c: New file.
+       * avcall/Makefile.devel (avcall-s390-macro.S): Use asm-s390.sh.
+       (avcall-s390x-linux.s, avcall-s390x-macro.S): New targets.
+       * avcall/Makefile.in (avcall-s390x.lo, avcall-s390x.s): New targets.
+       (clean): Remove avcall-s390x.s.
+       (SOURCE_FILES): Add avcall-s390x.c, avcall-s390x-linux.s,
+       avcall-s390x-macro.S.
+       * vacall/vacall.h.in: Optionally define __s390x__. Add code for
+       __s390x__, especially __va_start_struct2, __va_arg_adjusted,
+       va_arg_float, va_arg_double, __va_arg_struct.
+       * vacall/vacall-s390x.c: New file.
+       * vacall/Makefile.devel (vacall-s390-macro.S): Use asm-s390.sh.
+       (vacall-s390x-linux.s, vacall-s390x-macro.S): New targets.
+       * vacall/Makefile.in (vacall-s390x.o, vacall-s390x.s): New targets.
+       (clean): Remove vacall-s390x.s.
+       (SOURCE_FILES): Add vacall-s390x.c, vacall-s390x-linux.s,
+       vacall-s390x-macro.S.
+       * callback/vacall_r/Makefile.maint (COPIED_FILES): Add vacall-s390x.c.
+       * Makefile.in (COPIED_FILES): Add callback/vacall_r/vacall-s390x.c.
+       * callback/vacall_r/vacall_r.h.in: Optionally define __s390x__. Add code
+       for __s390x__, especially __va_start_struct2, __va_arg_adjusted,
+       va_arg_float, va_arg_double, __va_arg_struct.
+       * callback/vacall_r/Makefile.devel (vacall-s390-macro.S): Use
+       asm-s390.sh.
+       (vacall-s390x-linux.s, vacall-s390x-macro.S): New targets.
+       * callback/vacall_r/Makefile.in (vacall-s390x.lo, vacall-s390x.s): New
+       targets.
+       (clean): Remove vacall-s390x.s.
+       (SOURCE_FILES): Add vacall-s390x.c, vacall-s390x-linux.s,
+       vacall-s390x-macro.S.
+       * trampoline/Makefile.devel (proto-s390x.s, tramp-s390x.o): New targets.
+       * trampoline/proto-s390x.s: New generated file.
+       * trampoline/tramp-s390x.s: New file.
+       * trampoline/tramp-s390x.o: New generated file.
+       * trampoline/trampoline.c: Implement for __s390x__.
+       * callback/trampoline_r/Makefile.devel (proto-s390x.s, tramp-s390x.o):
+       New targets.
+       * callback/trampoline_r/proto64.c: Add support for __s390x__.
+       * callback/trampoline_r/proto-s390x.s: New generated file.
+       * callback/trampoline_r/tramp-s390x.s: New file.
+       * callback/trampoline_r/tramp-s390x.o: New generated file.
+       * callback/trampoline_r/trampoline.c: Implement for __s390x__.
+       * callback/trampoline_r/test1.c: Add support for __s390x__.
+       * PLATFORMS, */PLATFORMS: List the s390x machine.
+       * NEWS: Mention the new port.
+
+2017-06-18  Bruno Haible  <bruno@clisp.org>
+
+       Small code style improvements.
+       * avcall/avcall.h.in [__arm64__]: Define and use __AV_FARG_NUM.
+       [__s390__, __arm64__] (__av_struct): Avoid a boolean negation.
+       * vacall/vacall.h.in [__arm64__]: Define and use __VA_IARG_NUM,
+       __VA_FARG_NUM.
+       [__x86_64__]: Define and use __VA_IARG_NUM.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+
+2017-06-18  Bruno Haible  <bruno@clisp.org>
+
+       s390: Reorder code.
+       * avcall/avcall.h.in: Move s390 specific code to the end (after ia64 and
+       x86_64 specific code).
+       * vacall/vacall.h.in: Likewise.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+
+2017-06-18  Bruno Haible  <bruno@clisp.org>
+
+       s390: Improve trampolines.
+       * trampoline/Makefile.devel (proto-s390.s): New target.
+       (tramp-s390.o): Use cross tools.
+       * trampoline/proto-s390.s: Regenerated with gcc 3.1.
+       * trampoline/tramp-s390.s: Rewritten from scratch, to not use %r13.
+       * trampoline/tramp-s390.o: New generated file.
+       * trampoline/trampoline.c (alloc_trampoline) [__s390__]: Change the
+       trampoline to not use %r13.
+       * callback/trampoline_r/Makefile.devel (proto-s390.s): New target.
+       (tramp-s390.o): Use cross tools.
+       * callback/trampoline_r/proto-s390.s: Regenerated with gcc 3.1.
+       * callback/trampoline_r/tramp-s390.s: Rewritten from scratch. Use 'lm'
+       instruction.
+       * callback/trampoline_r/tramp-s390.o: Regenerated.
+       * callback/trampoline_r/trampoline.c (alloc_trampoline_r) [__s390__]:
+       Change the trampoline accordingly.
+
+2017-06-17  Bruno Haible  <bruno@clisp.org>
+
+       arm64: Add support for arm64 CPU (a.k.a. aarch64).
+       * cross-tools/cross.conf: Add configuration for arm64 cross tools.
+       * common/reg-struct-return.txt: Add info about arm64.
+       * callback/call-used-registers.txt: Likewise.
+       * avcall/avcall.h.in: Add code for __arm64__, especially __av_start1,
+       av_long, av_ulong, av_ptr, av_float, av_double, __av_struct.
+       * avcall/avcall-arm64.c: New file.
+       * avcall/Makefile.devel (avcall-arm64-macro.S): New target.
+       * avcall/Makefile.in (avcall-arm64.lo, avcall-arm64.s): New targets.
+       (clean): Remove avcall-arm64.s.
+       (SOURCE_FILES): Add avcall-arm64.c, avcall-arm64-macro.S.
+       * vacall/vacall.h.in: Add code for __arm64__, especially
+       __va_arg_adjusted, va_arg_float, va_arg_double, __va_arg_struct.
+       * vacall/vacall-arm64.c: New file.
+       * vacall/Makefile.devel (vacall-arm64-macro.S): New target.
+       * vacall/Makefile.in (vacall-arm64.o, vacall-arm64.s): New targets.
+       (clean): Remove vacall-arm64.s.
+       (SOURCE_FILES): Add vacall-arm64.c, vacall-arm64-macro.S.
+       * callback/vacall_r/Makefile.maint (COPIED_FILES): Add vacall-arm64.c.
+       * Makefile.in (COPIED_FILES): Add callback/vacall_r/vacall-arm64.c.
+       * callback/vacall_r/vacall_r.h.in: Add code for __arm64__, especially
+       __va_arg_adjusted, va_arg_float, va_arg_double, __va_arg_struct.
+       * callback/vacall_r/Makefile.devel (vacall-arm64-macro.S): New target.
+       * callback/vacall_r/Makefile.in (vacall-arm64.lo, vacall-arm64.s): New
+       targets.
+       (clean): Remove vacall-arm64.s.
+       (SOURCE_FILES): Add vacall-arm64.c, vacall-arm64-macro.S.
+       * trampoline/Makefile.devel (proto-arm64.s, tramp-arm64.o): New targets.
+       * trampoline/proto-arm64.s: New generated file.
+       * trampoline/tramp-arm64.s: New file.
+       * trampoline/tramp-arm64.o: New generated file.
+       * trampoline/trampoline.c: Implement for __arm64__.
+       * callback/trampoline_r/Makefile.devel (proto-arm64.s, tramp-arm64.o):
+       New targets.
+       * callback/trampoline_r/proto64.c: Add support for __arm64__.
+       * callback/trampoline_r/proto-arm64.s: New generated file.
+       * callback/trampoline_r/tramp-arm64.s: New file.
+       * callback/trampoline_r/tramp-arm64.o: New generated file.
+       * callback/trampoline_r/trampoline.c: Implement for __arm64__.
+       * callback/trampoline_r/test1.c: Add support for __arm64__.
+       * PLATFORMS, */PLATFORMS: List the arm64 machine.
+       * NEWS: Mention the new port.
+
+2017-06-16  Bruno Haible  <bruno@clisp.org>
+
+       Remove unused fields from __va_alist.
+       * vacall/vacall.h.in (__va_alist): Don't include _longlong and
+       _ulonglong on platforms where they are unused.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+
+2017-06-15  Bruno Haible  <bruno@clisp.org>
+
+       Reduce the amount of cache invalidation to the necessary minimum.
+       * trampoline/trampoline.c (alloc_trampoline): New macro
+       TRAMP_CODE_LENGTH. Use it instead of TRAMP_LENGTH for cache
+       invalidation.
+       * callback/trampoline_r/trampoline.c (alloc_trampoline_r): Likewise.
+
+2017-06-10  Bruno Haible  <bruno@clisp.org>
+
+       Make the top-level "./configure --help" output complete.
+       Reported by Karl Berry <karl@freefriends.org> in
+       <https://lists.gnu.org/archive/html/libffcall/2017-03/msg00000.html>.
+       * build-aux/ac-help.sed: New file, from GNU gettext with modifications.
+       * Makefile.in (SOURCE_FILES): Add it.
+       * configure.ac: Collect the AC_ARG_* options from the subdirectories,
+       like in GNU gettext.
+       * callback/configure.ac: Likewise.
+       * Makefile.maint (aclocal.m4): Disable esyscmd invocations while running
+       aclocal.
+
+2017-06-10  Bruno Haible  <bruno@clisp.org>
+
+       In comments, write 'libffcall' instead of 'ffcall'.
+
+2017-06-10  Bruno Haible  <bruno@clisp.org>
+
+       Add cache invalidation for 64-bit powerpc.
+       * trampoline/cache-powerpc64.c: New file.
+       * trampoline/Makefile.devel (cache-powerpc64-elfv2-linux.s,
+       cache-powerpc64-elfv2-macro.S): New rules.
+       * trampoline/configure.ac (CPU_OBJECTS): Augment also for
+       powerpc64-elfv2 ABI.
+       * trampoline/Makefile.in (cache-powerpc64-elfv2.o,
+       cache-powerpc64-elfv2.s): New rules.
+       (clean): Remove also cache-powerpc64-elfv2.s.
+       (SOURCE_FILES): Add cache-powerpc64.c, cache-powerpc64-elfv2-linux.s,
+       cache-powerpc64-elfv2-macro.S.
+       * trampoline/trampoline.c (__TR_clear_cache): Declare also for
+       powerpc64-elfv2 ABI.
+       (alloc_trampoline): Invoke __TR_clear_cache also on powerpc64-elfv2 ABI.
+       * callback/trampoline_r/cache-powerpc64.c: New file.
+       * callback/trampoline_r/Makefile.devel (cache-powerpc64-elfv2-linux.s,
+       cache-powerpc64-elfv2-macro.S): New rules.
+       * trampoline/configure.ac (CPU_OBJECTS): Augment also for
+       powerpc64-elfv2 ABI.
+       * callback/trampoline_r/Makefile.in (cache-powerpc64-elfv2.lo,
+       cache-powerpc64-elfv2.s): New rules.
+       (clean): Remove also cache-powerpc64-elfv2.s.
+       (SOURCE_FILES): Add cache-powerpc64.c, cache-powerpc64-elfv2-linux.s,
+       cache-powerpc64-elfv2-macro.S.
+       * callback/trampoline_r/trampoline.c (__TR_clear_cache): Declare also
+       for powerpc64-elfv2 ABI.
+       (alloc_trampoline_r): Invoke __TR_clear_cache also on powerpc64-elfv2
+       ABI.
+
+2017-06-10  Bruno Haible  <bruno@clisp.org>
+
+       Fix cache invalidation for 32-bit powerpc.
+       * trampoline/cache-powerpc.c: Add comment.
+       * callback/trampoline_r/cache-powerpc.c: New file, based on
+       trampoline/cache-powerpc.c.
+       * callback/trampoline_r/Makefile.maint (COPIED_FILES): Remove
+       cache-powerpc.c.
+       * Makefile.in (COPIED_FILES): Remove
+       callback/trampoline_r/cache-powerpc.c.
+
+2017-06-10  Bruno Haible  <bruno@clisp.org>
+
+       Don't declare the need for an executable stack on Linux and FreeBSD.
+       * porting-tools: New directory.
+       * common/asm-alpha.sh: New file.
+       * common/asm-powerpc.sh: New file.
+       * common/asm-arm.sh: Remove the GNU-stack note line.
+       * common/asm-sparc.sh: Likewise.
+       * common/asm-x86_64.sh: Likewise.
+       * common/noexecstack.h: New file.
+       * common/noexecstack-arm.h: New file.
+       * avcall/Makefile.devel (precompiled): Add avcall-alpha-macro.S,
+       avcall-powerpc-linux-macro.S, avcall-powerpc-sysv4-macro.S,
+       avcall-powerpc64-linux.S, avcall-powerpc64-elfv2-linux.S,
+       avcall-ia64-macro.S, avcall-s390-macro.S. Remove avcall-alpha.s,
+       avcall-powerpc-linux.s, avcall-powerpc-sysv4.s,
+       avcall-powerpc64-linux.s, avcall-powerpc64-elfv2-linux.s, avcall-ia64.s,
+       avcall-s390.s.
+       (avcall-i386-macro.S, avcall-m68k.mit.S, avcall-m68k.motorola.S,
+       avcall-sparc-macro.S, avcall-sparc64-macro.S, avcall-hppa-macro.S,
+       avcall-x86_64-macro.S): Include noexecstack.h.
+       (avcall-alpha-linux.s): Renamed from avcall-alpha.s.
+       (avcall-alpha-macro.S): New rule.
+       (avcall-arm-macro.S, avcall-armhf-macro.S): Include noexecstack-arm.h.
+       (avcall-powerpc-linux-macro.S): New rule.
+       (avcall-powerpc-sysv4-macro.S): Replaces rule for
+       avcall-powerpc-sysv4.s.
+       (avcall-powerpc64-linux.S): Replaces rule for avcall-powerpc64-linux.s.
+       (avcall-powerpc64-elfv2-linux.S): Replaces rule for
+       avcall-powerpc64-elfv2-linux.s.
+       (avcall-ia64-linux.s): Renamed from avcall-ia64.s.
+       (avcall-ia64-macro.S): New rule.
+       (avcall-s390-linux.s): Renamed from avcall-s390.s.
+       (avcall-s390-macro.S): New rule.
+       * avcall/Makefile.in (avcall-alpha.s): New rule.
+       (avcall-alpha.lo): Update.
+       (avcall-powerpc.s): Use avcall-powerpc-linux-macro.S,
+       avcall-powerpc-sysv4-macro.S instead of avcall-powerpc-linux.s,
+       avcall-powerpc-sysv4.s.
+       (avcall-powerpc64.s): Use avcall-powerpc64-linux.S instead of
+       avcall-powerpc64-linux.s.
+       (avcall-powerpc64-elfv2.s): Use avcall-powerpc64-elfv2-linux.S instead
+       of avcall-powerpc64-elfv2-linux.s.
+       (avcall-ia64.s): New rule.
+       (avcall-ia64.lo): Update.
+       (avcall-s390.s): New rule.
+       (avcall-s390.lo): Update.
+       (clean): Remove also avcall-alpha.s, avcall-ia64.s, avcall-s390.s.
+       (SOURCE_FILES): Update.
+       * vacall/Makefile.devel (precompiled): Add vacall-alpha-macro.S,
+       vacall-powerpc-linux-macro.S, vacall-powerpc-sysv4-macro.S,
+       vacall-powerpc64-linux.S, vacall-powerpc64-elfv2-linux.S,
+       vacall-ia64-macro.S, vacall-s390-macro.S. Remove vacall-alpha.s,
+       vacall-powerpc-linux.s, vacall-powerpc-sysv4.s,
+       vacall-powerpc64-linux.s, vacall-powerpc64-elfv2-linux.s, vacall-ia64.s,
+       vacall-s390.s.
+       (vacall-i386-macro.S, vacall-m68k.mit.S, vacall-m68k.motorola.S,
+       vacall-sparc-macro.S, vacall-sparc64-macro.S, vacall-hppa-macro.S,
+       vacall-x86_64-macro.S): Include noexecstack.h.
+       (vacall-alpha-linux.s): Renamed from vacall-alpha.s.
+       (vacall-alpha-macro.S): New rule.
+       (vacall-arm-macro.S, vacall-armhf-macro.S): Include noexecstack-arm.h.
+       (vacall-powerpc-linux-macro.S): New rule.
+       (vacall-powerpc-sysv4-macro.S): Replaces rule for
+       vacall-powerpc-sysv4.s.
+       (vacall-powerpc64-linux.S): Replaces rule for vacall-powerpc64-linux.s.
+       (vacall-powerpc64-elfv2-linux.S): Replaces rule for
+       vacall-powerpc64-elfv2-linux.s.
+       (vacall-ia64-linux.s): Renamed from vacall-ia64.s.
+       (vacall-ia64-macro.S): New rule.
+       (vacall-s390-linux.s): Renamed from vacall-s390.s.
+       (vacall-s390-macro.S): New rule.
+       * vacall/Makefile.in (vacall-alpha.s): New rule.
+       (vacall-alpha.o): Update.
+       (vacall-powerpc.s): Use vacall-powerpc-linux-macro.S,
+       vacall-powerpc-sysv4-macro.S instead of vacall-powerpc-linux.s,
+       vacall-powerpc-sysv4.s.
+       (vacall-powerpc64.s): Use vacall-powerpc64-linux.S instead of
+       vacall-powerpc64-linux.s.
+       (vacall-powerpc64-elfv2.s): Use vacall-powerpc64-elfv2-linux.S instead
+       of vacall-powerpc64-elfv2-linux.s.
+       (vacall-ia64.s): New rule.
+       (vacall-ia64.o): Update.
+       (vacall-s390.s): New rule.
+       (vacall-s390.o): Update.
+       (clean): Remove also vacall-alpha.s, vacall-ia64.s, vacall-s390.s.
+       (SOURCE_FILES): Update.
+       * callback/vacall_r/Makefile.devel (precompiled): Add
+       vacall-powerpc64-linux.S, vacall-powerpc64-elfv2-linux.S,
+       vacall-ia64-macro.S. Remove vacall-powerpc64-linux.s,
+       vacall-powerpc64-elfv2-linux.s, vacall-ia64.s.
+       (vacall-i386-macro.S, vacall-m68k.mit.S, vacall-m68k.motorola.S,
+       vacall-sparc-macro.S, vacall-sparc64-macro.S, vacall-alpha-macro.S,
+       vacall-hppa-macro.S, vacall-powerpc-linux-macro.S,
+       vacall-powerpc-sysv4-macro.S, vacall-x86_64-macro.S,
+       vacall-s390-macro.S): Include noexecstack.h.
+       (vacall-arm-macro.S, vacall-armhf-macro.S): Include noexecstack-arm.h.
+       (vacall-powerpc64-linux.S): Replaces rule for vacall-powerpc64-linux.s.
+       (vacall-powerpc64-elfv2-linux.S): Replaces rule for
+       vacall-powerpc64-elfv2-linux.s.
+       (vacall-ia64-linux.s): Renamed from vacall-ia64.s.
+       (vacall-ia64-macro.S): New rule.
+       * callback/vacall_r/Makefile.in (vacall-powerpc64.s): Use
+       vacall-powerpc64-linux.S instead of vacall-powerpc64-linux.s.
+       (vacall-powerpc64-elfv2.s): Use vacall-powerpc64-elfv2-linux.S instead
+       of vacall-powerpc64-elfv2-linux.s.
+       (vacall-ia64.s): New rule.
+       (vacall-ia64.lo): Update.
+       (vacall-s390.s): New rule.
+       (vacall-s390.lo): Update.
+       (clean): Remove also vacall-ia64.s.
+       (SOURCE_FILES): Update.
+       * trampoline/cache-alpha.s: Remove file.
+       * trampoline/cache-hppa.s: Remove file.
+       * trampoline/cache-powerpc-macos.s, trampoline/cache-powerpc-sysv4.s:
+       Remove files.
+       * trampoline/cache-sparc-macro.S: Remove file.
+       * trampoline/tramp-hppa-macro.S: Renamed from trampoline/tramp-hppa.s.
+       Include "noexecstack.h".
+       * trampoline/tramp-ia64-macro.S: Renamed from trampoline/tramp-ia64.s.
+       Include "noexecstack.h".
+       * trampoline/tramp-powerpc64-aix.S: Include "noexecstack.h".
+       * trampoline/Makefile.devel: Rename GCCFLAGS to OLDGCCFLAGS in old
+       rules.
+       (cache-*): Remove old rules.
+       (precompiled): New target.
+       (cache-sparc-linux.s, cache-sparc-macro.S, cache-sparc64-linux.s,
+       cache-sparc64-macro.S, cache-alpha-linux.s, cache-alpha-macro.S,
+       cache-hppa-linux.s, cache-hppa-macro.S, cache-powerpc-linux.s,
+       cache-powerpc-linux-macro.S, cache-powerpc-macos.s): New rules.
+       * trampoline/Makefile.in (tramp-hppa.s): New rule.
+       (tramp-hppa.o): Update.
+       (tramp-powerpc64.s: Depend on noexecstack.h.
+       (tramp-ia64.s): New rule.
+       (tramp-ia64.o): Update.
+       (cache-sparc64.s): Update.
+       (cache-alpha.s): New rule.
+       (cache-alpha.o): Update.
+       (cache-hppa.s): New rule.
+       (cache-hppa.o): Update.
+       (cache-powerpc.s): New rule.
+       (cache-powerpc.o): Update.
+       (clean): Remove also tramp-hppa.s, tramp-ia64.s, cache-alpha.s,
+       cache-hppa.s, cache-powerpc.s.
+       (SOURCE_FILES): Update.
+       * callback/trampoline_r/cache-sparc-macro.S: Remove file.
+       * callback/trampoline_r/tramp-hppa-macro.S: Renamed from
+       callback/trampoline_r/tramp-hppa.s. Include "noexecstack.h".
+       * callback/trampoline_r/tramp-ia64-macro.S: Renamed from
+       callback/trampoline_r/tramp-ia64.s. Include "noexecstack.h".
+       * callback/trampoline_r/tramp-powerpc64-aix.S: Include "noexecstack.h".
+       * callback/trampoline_r/Makefile.maint (COPIED_FILES): Remove
+       cache-alpha.s, cache-hppa.s, cache-powerpc-macos.s,
+       cache-powerpc-sysv4.s.
+       * callback/trampoline_r/Makefile.devel: Rename GCCFLAGS to OLDGCCFLAGS
+       in old rules.
+       (cache-*): Remove old rules.
+       (precompiled): New target.
+       (cache-sparc-linux.s, cache-sparc-macro.S, cache-sparc64-linux.s,
+       cache-sparc64-macro.S, cache-alpha-linux.s, cache-alpha-macro.S,
+       cache-hppa-linux.s, cache-hppa-macro.S, cache-powerpc-linux.s,
+       cache-powerpc-linux-macro.S, cache-powerpc-macos.s): New rules.
+       * callback/trampoline_r/Makefile.in (tramp-hppa.s): New rule.
+       (tramp-hppa.lo): Update.
+       (tramp-powerpc64.s: Depend on noexecstack.h.
+       (tramp-ia64.s): New rule.
+       (tramp-ia64.lo): Update.
+       (cache-sparc64.s): Update.
+       (cache-alpha.s): New rule.
+       (cache-alpha.lo): Update.
+       (cache-hppa.s): New rule.
+       (cache-hppa.lo): Update.
+       (cache-powerpc.s): New rule.
+       (cache-powerpc.lo): Update.
+       (clean): Remove also tramp-hppa.s, tramp-ia64.s, cache-alpha.s,
+       cache-hppa.s, cache-powerpc.s.
+       (SOURCE_FILES): Update.
+       * Makefile.devel (precompiled): Recurse also into trampoline and
+       callback/trampoline_r directories.
+       * Makefile.in (SOURCE_FILES): Update.
+       (COPIED_FILES): Remove callback/trampoline_r/cache-alpha.s,
+       callback/trampoline_r/cache-hppa.s,
+       callback/trampoline_r/cache-powerpc-macos.s,
+       callback/trampoline_r/cache-powerpc-sysv4.s.
+       * NEWS: Mention the change.
+
+2017-06-10  Bruno Haible  <bruno@clisp.org>
+
+       Simplify Makefile.devel.
+       * avcall/Makefile.devel (HOST, CPU): Remove unused variables.
+       * vacall/Makefile.devel (HOST, CPU): Likewise.
+       * trampoline/Makefile.devel (HOST, CPU): Likewise.
+       * callback/vacall_r/Makefile.devel (HOST, CPU): Likewise.
+       * callback/trampoline_r/Makefile.devel (HOST, CPU): Likewise.
+
+2017-06-10  Bruno Haible  <bruno@clisp.org>
+
+       Make the EXECUTABLE_VIA_MMAP_FILE_SHARED support work on i386.
+       * trampoline/trampoline.c (alloc_trampoline): New local variable
+       'function_x'. Use it instead of 'function' for the computation of the
+       relative address in the i386 trampoline.
+       * callback/trampoline_r/trampoline.c (alloc_trampoline_r): Likewise.
+
+2017-06-04  Bruno Haible  <bruno@clisp.org>
+
+       build: Get rid of autom4te.cache directories.
+       * Makefile.maint (configure, $(SUBDIRS_CONFIGURE), $(ALL_CONFIG_H_IN)):
+       Remove autom4te.cache subdirectory.
+
+2017-06-04  Bruno Haible  <bruno@clisp.org>
+
+       Change the license from GPLv2 to GPLv2+.
+       * **/configure.ac, **/*.3, **/*.html, **/minitests.c,
+       callback/MIGRATION, common/asm-*: Add copyright notice.
+       * m4/*.m4: Use GPLv2+ with exception notice.
+       * Everywhere else: Change GPLv2 copyright notice to GPLv2+ copyright
+       notice. Update copyright years.
+
+2017-06-03  Bruno Haible  <bruno@clisp.org>
+
+       Make the cross-build.sh script work with argument 'all'.
+       * cross-tools/cross-build.sh: Fix typo.
+
+2017-06-03  Bruno Haible  <bruno@clisp.org>
+
+       Improve support for SELinux.
+       * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): On SELinux systems, define
+       HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC to -1.
+       * trampoline/trampoline.c: When HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC is
+       -1, assume the worst and don't set EXECUTABLE_VIA_MALLOC_THEN_MPROTECT.
+       * callback/trampoline_r/trampoline.c: Likewise.
+
+2017-06-03  Bruno Haible  <bruno@clisp.org>
+
+       Improve support for SELinux.
+       * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): On SELinux systems, define
+       HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC to -1.
+       * trampoline/trampoline.c: When HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC is -1,
+       assume the worst and don't set EXECUTABLE_VIA_MMAP_THEN_MPROTECT.
+       * callback/trampoline_r/trampoline.c: Likewise.
+
+2017-06-03  Bruno Haible  <bruno@clisp.org>
+
+       Indent the *.m4 files.
+       * m4/as-underscore.m4: Use reasonable indentation.
+       * m4/cc-gcc.m4: Likewise.
+       * m4/codeexec.m4: Likewise.
+       * m4/endianness.m4: Likewise.
+       * m4/general.m4: Likewise.
+       * m4/getpagesize.m4: Likewise.
+       * m4/ireg.m4: Likewise.
+       * m4/ln.m4: Likewise.
+       * m4/mach-vm.m4: Likewise.
+       * m4/mmap.m4: Likewise.
+       * m4/mprotect.m4: Likewise.
+       * m4/pccstruct.m4: Likewise.
+       * m4/shm.m4: Likewise.
+       * m4/smallstruct.m4: Likewise.
+       * m4/proto.m4: Likewise.
+       (CL_PROTO_TRY, CL_PROTO_CONST, CL_PROTO_MISSING, CONST_VARIANTS,
+       SIZE_VARIANTS): Remove macros.
+
+2017-02-26  Bruno Haible  <bruno@clisp.org>
+
+       Document more clearly the maintainer prerequisites.
+       * Makefile.in (ACLOCAL, AUTOCONF, AUTOHEADER): Add comments.
+       * README-hacking: Likewise.
+       Reported by Don Cohen <don-ffcall@isis.cs3-inc.com> in
+       <https://lists.gnu.org/archive/html/libffcall/2017-02/msg00001.html>
+       and Sam Steingold <sds@gnu.org>.
+
+2017-02-26  Bruno Haible  <bruno@clisp.org>
+
+       Document the support for GNU Hurd.
+       * PLATFORMS, */PLATFORMS: List i686-unknown-gnu0.9 (gcc).
+
+2017-02-19  Bruno Haible  <bruno@clisp.org>
+
+       configuration: Avoid running an unneeded test.
+       * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): Require FFCALL_CODEEXEC. Do
+       nothing if its result is that malloc()ed memory is already executable.
+
+2017-02-19  Bruno Haible  <bruno@clisp.org>
+
+       Remove useless double-inclusion guard on .c files.
+       * avcall/tests.c: Remove double-inclusion guard.
+       * avcall/avcall-*.c: Likewise. Fix comment.
+
+2017-02-19  Bruno Haible  <bruno@clisp.org>
+
+       powerpc: Fix build failure on MacOS X (regression from 2017-01-29).
+       1.
+       * cross-tools/cross.conf: For powerpc-darwin, go back to gcc 3.3.6.
+       * cross-tools/patches/gcc-3.3.6.patch: New file.
+       * avcall/Makefile.devel (avcall-powerpc-macos.s): Use gcc 3.3.6.
+       * vacall/Makefile.devel (vacall-powerpc-macos.s): Use gcc 3.3.6.
+       * callback/vacall_r/Makefile.devel (vacall-powerpc-macos.s): Use gcc
+       3.3.6.
+       2.
+       * avcall/Makefile.in (avcall-powerpc.s): For MacOS, remove the .machine
+       pseudo-op.
+       * vacall/Makefile.in (vacall-powerpc.s): Likewise.
+       * callback/vacall_r/Makefile.in (vacall-powerpc.s): Likewise.
+       3.
+       * PLATFORMS, */PLATFORMS: List powerpc-apple-darwin9.8.0 (gcc).
+       * NEWS: Mention the status of MacOS X / powerpc.
+
+2017-02-12  Bruno Haible  <bruno@clisp.org>
+
+       Make the cross-build.sh script work on an x86_64-linux host.
+       * cross-tools/cross-build.sh: Remove the binutils-*/gprof directory.
+       * cross-tools/patches/binutils-*.patch: Backport a buffer overrun bug
+       fix from binutils-2.17.
+
+2017-02-12  Bruno Haible  <bruno@clisp.org>
+
+       Make the cross-build.sh script more usable.
+       * README-hacking: Add more text.
+       * cross-tools/cross-build.sh: Don't assume the script is run from the
+       current directory. Accept a relative HOST_CROSS_DIR.
+       Reported by Don Cohen <don-ffcall@isis.cs3-inc.com>.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       Update documentation.
+       * NEWS: List the progress since version 1.12.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       powerpc: Add support for OpenBSD.
+       * avcall/Makefile.in (avcall-powerpc.s): Treat OpenBSD like NetBSD.
+       * vacall/Makefile.in (vacall-powerpc.s): Likewise.
+       * callback/vacall_r/Makefile.in (vacall-powerpc.s): Likewise.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       mips64: Add support for OpenBSD.
+       On OpenBSD, cacheflush() is declared in <machine/sysarch.h>, see
+       openbsd-src/blob/master/lib/libarch/mips64/cacheflush.3 .
+       * trampoline/trampoline.c [__OpenBSD__]: Include <machine/sysarch.h>.
+       * callback/trampoline_r/trampoline.c: Likewise.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       Support the LDFLAGS configure variable.
+       * avcall/Makefile.in (LDFLAGS): New variable.
+       Use it in all linking commands.
+       * vacall/Makefile.in (LDFLAGS): New variable.
+       Use it in all linking commands.
+       * trampoline/Makefile.in (LDFLAGS): New variable.
+       Use it in all linking commands.
+       * callback/Makefile.in (LDFLAGS): New variable.
+       Use it in all linking commands.
+       * callback/vacall_r/Makefile.in (LDFLAGS): New variable.
+       Use it in all linking commands.
+       * callback/trampoline_r/Makefile.in (LDFLAGS): New variable.
+       Use it in all linking commands.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       Fix build failure on Mac OS X 10.5 / x86_64. Regression from today.
+       * common/asm-x86_64.sh: Recognize symbol in symbol(%rip) syntax.
+       * vacall/Makefile.devel (vacall-x86_64-macro.S): Remove extra
+       postprocessing, now done by common/asm-x86_64.sh.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       Fix build failure on Mac OS X 10.5 / i386. Regression from today.
+       * common/asm-i386.sh: Simplify the function referencing code, originally
+       for PIC on ELF platforms, so that it works also on non-ELF platforms.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Add support for the x32 ABI on Linux.
+       * avcall/avcall.h.in: Optionally define __x86_64_x32__.
+       (__avword, __av_longlong): Define differently for __x86_64_x32__.
+       * avcall/Makefile.devel (avcall-x86_64-x32-linux.s): New target.
+       * avcall/Makefile.in (avcall-x86_64-x32.lo, avcall-x86_64-x32.s): New
+       targets.
+       (clean): Remove also avcall-x86_64-x32.s.
+       (SOURCE_FILES): Add avcall-x86_64-x32-linux.s.
+       * vacall/vacall-x86_64.c: Don't declare a register variable in %rbp for
+       GCC >= 4.9.
+       For __x86_64_x32__, treat return of 'long long' and 'unsigned long long'
+       differently.
+       * vacall/vacall.h.in: Optionally define __x86_64_x32__.
+       (__vaword, va_arg_longlong, va_return_longlong): Define differently for
+       __x86_64_x32__.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/Makefile.devel (vacall-x86_64-x32-linux.s): New target.
+       * vacall/Makefile.in (vacall-x86_64-x32.o, vacall-x86_64-x32.s): New
+       targets.
+       (clean): Remove also vacall-x86_64-x32.s.
+       (SOURCE_FILES): Add vacall-x86_64-x32-linux.s.
+       * trampoline/Makefile.devel (proto-x86_64-x32.s, tramp-x86_64-x32.o):
+       New targets.
+       * trampoline/proto-x86_64-x32.s: New generated file.
+       * trampoline/tramp-x86_64-x32.s: New file.
+       * trampoline/tramp-x86_64-x32.o: New generated file.
+       * trampoline/trampoline.c: Add code for __x86_64_x32__.
+       * callback/vacall_r/Makefile.devel (vacall-x86_64-x32-linux.s): New
+       target.
+       * callback/vacall_r/Makefile.in (vacall-x86_64-x32.lo,
+       vacall-x86_64-x32.s): New targets.
+       (clean): Remove also vacall-x86_64-x32.s.
+       (SOURCE_FILES): Add vacall-x86_64-x32-linux.s.
+       * callback/trampoline_r/Makefile.devel (proto-x86_64-x32.s,
+       tramp-x86_64-x32.o): New targets.
+       * callback/trampoline_r/proto.c: Specify env register for
+       __x86_64_x32__.
+       * callback/trampoline_r/proto-x86_64-x32.s: New generated file.
+       * callback/trampoline_r/tramp-x86_64-x32.s: New file.
+       * callback/trampoline_r/tramp-x86_64-x32.o: New generated file.
+       * callback/trampoline_r/trampoline.c: Add code for __x86_64_x32__.
+       * PLATFORMS, */PLATFORMS: List x86_64-unknown-linux (gcc -mx32).
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       Simplify platform defines. Reverts commit from 2010-07-20.
+       * trampoline/trampoline.h.in: Remove CPU symbol definitions.
+       * callback/trampoline_r/trampoline_r.h.in: Likewise.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       powerpc64: Add support for the ELFv2 ABI on Linux.
+       * avcall/avcall-powerpc64.c: Handle small struct return in registers
+       when __AV_REGISTER_STRUCT_RETURN is set.
+       * avcall/avcall.h.in: Optionally define __powerpc64_elfv2__.
+       (__AV_REGISTER_STRUCT_RETURN): Define also for __powerpc64__.
+       (__av_reg_struct_return, __av_start_struct3): Define differently for
+       __powerpc64_elfv2__.
+       (av_float) [__powerpc64__]: Define in a simplified way if
+       __AV_AIXCC_FLOAT_ARGS cannot be set.
+       (__av_struct): Define differently for little-endian __powerpc64__.
+       * avcall/Makefile.devel (avcall-powerpc64-elfv2-linux.s): New target.
+       * avcall/Makefile.in (avcall-powerpc64-elfv2.lo,
+       avcall-powerpc64-elfv2.s): New targets.
+       (clean): Remove also avcall-powerpc64-elfv2.s.
+       (SOURCE_FILES): Add avcall-powerpc64-elfv2-linux.s.
+       * vacall/vacall-powerpc64.c: Handle small struct return in registers
+       when __VA_REGISTER_STRUCT_RETURN is set.
+       * vacall/vacall.h.in: Optionally define __powerpc64_elfv2__.
+       (__VA_REGISTER_STRUCT_RETURN): Define also for __powerpc64__.
+       (__va_reg_struct_return, __va_start_struct1): Define differently for
+       __powerpc64_elfv2__.
+       (__va_arg_adjusted): Define differently for little-endian __powerpc64__.
+       (va_arg_float) [__powerpc64__]: Define in a simplified way if
+       __VA_AIXCC_FLOAT_ARGS cannot be set.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/Makefile.devel (vacall-powerpc64-elfv2-linux.s): New target.
+       * vacall/Makefile.in (vacall-powerpc64-elfv2.o,
+       vacall-powerpc64-elfv2.s): New targets.
+       (clean): Remove also vacall-powerpc64-elfv2.s.
+       (SOURCE_FILES): Add vacall-powerpc64-elfv2-linux.s.
+       * trampoline/Makefile.devel (proto-powerpc64-elfv2.s,
+       tramp-powerpc64-elfv2.o): New targets.
+       * trampoline/proto-powerpc64elfv2.s: New generated file.
+       * trampoline/tramp-powerpc64elfv2.s: New file.
+       * trampoline/tramp-powerpc64elfv2.o: New generated file.
+       * trampoline/trampoline.c: Add code for __powerpc64_elfv2__.
+       * callback/vacall_r/Makefile.devel (vacall-powerpc64-elfv2-linux.s):
+       New target.
+       * callback/vacall_r/Makefile.in (vacall-powerpc64-elfv2.lo,
+       vacall-powerpc64-elfv2.s): New targets.
+       (clean): Remove also vacall-powerpc64-elfv2.s.
+       (SOURCE_FILES): Add vacall-powerpc64-elfv2-linux.s.
+       * callback/trampoline_r/Makefile.devel (proto-powerpc64-elfv2.s,
+       tramp-powerpc64-elfv2.o): New targets.
+       * callback/trampoline_r/proto-powerpc64elfv2.s: New generated file.
+       * callback/trampoline_r/tramp-powerpc64elfv2.s: New file.
+       * callback/trampoline_r/tramp-powerpc64elfv2.o: New generated file.
+       * callback/trampoline_r/trampoline.c: Add code for __powerpc64_elfv2__.
+       * PLATFORMS, */PLATFORMS: List powerpc64le-unknown-linux (gcc).
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       powerpc64: Add support for AIX in a 64-bit build, with xlc.
+       * avcall/avcall.h.in (__AV_AIXCC_FLOAT_ARGS, __AV_FLOAT_ARGS): New enum
+       values.
+       (__AV_START_FLAGS): Include __AV_FLOAT_ARGS.
+       (av_float) [__powerpc64__]: Pick word according to whether
+       __AV_AIXCC_FLOAT_ARGS is set.
+       * vacall/vacall.h.in (__VA_AIXCC_FLOAT_ARGS, __VA_FLOAT_ARGS): New enum
+       values.
+       (__VA_START_FLAGS): Include __VA_FLOAT_ARGS.
+       (va_arg_float) [__powerpc64__]: Pick word according to whether
+       __VA_AIXCC_FLOAT_ARGS is set.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * PLATFORMS, */PLATFORMS: List powerpc-ibm-aix7.1.3.0 (xlc -q64).
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       powerpc64: Add support for AIX in a 64-bit build, with gcc.
+       * avcall/avcall.h.in (__AV_AIXCC_STRUCT_ARGS): Define also on
+       __powerpc64__.
+       (__AV_STRUCT_ARGS): Set to __AV_AIXCC_STRUCT_ARGS on __powerpc64__ with
+       AIX.
+       (__av_struct): Define for __powerpc64__ like for __powerpc__.
+       * vacall/vacall.h.in (__VA_AIXCC_STRUCT_ARGS): Define also on
+       __powerpc64__.
+       (__VA_STRUCT_ARGS): Set to __VA_AIXCC_STRUCT_ARGS on __powerpc64__ with
+       AIX.
+       (__va_arg_struct): Define for __powerpc64__ with AIX like for
+       __powerpc__ with AIX.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * PLATFORMS, */PLATFORMS: List powerpc-ibm-aix7.1.3.0 (gcc -maix64).
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       powerpc64: Add support for AIX in a 64-bit build, part 1.
+       * avcall/Makefile.devel (avcall-powerpc64-aix.s,
+       avcall-powerpc64-linux.s): New targets.
+       (avcall-powerpc64.s): Remove target.
+       * avcall/Makefile.in (avcall-powerpc64.s): New target.
+       (avcall-powerpc64.lo): Update.
+       (clean): Remove also avcall-powerpc64.s.
+       (SOURCE_FILES): Add avcall-powerpc64-aix.s, avcall-powerpc64-linux.s.
+       Remove avcall-powerpc64.s.
+       * vacall/Makefile.devel (vacall-powerpc64-aix.s,
+       vacall-powerpc64-linux.s): New targets.
+       (vacall-powerpc64.s): Remove target.
+       * vacall/Makefile.in (vacall-powerpc64.s): New target.
+       (vacall-powerpc64.o): Update.
+       (clean): Remove also vacall-powerpc64.s.
+       (SOURCE_FILES): Add vacall-powerpc64-aix.s, vacall-powerpc64-linux.s.
+       Remove vacall-powerpc64.s.
+       * callback/vacall_r/Makefile.devel (vacall-powerpc64-aix.s,
+       vacall-powerpc64-linux.s): New targets.
+       (vacall-powerpc64.s): Remove target.
+       * callback/vacall_r/Makefile.in (vacall-powerpc64.s): New target.
+       (vacall-powerpc64.lo): Update.
+       (clean): Remove also vacall-powerpc64.s.
+       (SOURCE_FILES): Add vacall-powerpc64-aix.s, vacall-powerpc64-linux.s.
+       Remove vacall-powerpc64.s.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       powerpc64: Update Makefile.devel rules.
+       * trampoline/Makefile.devel (CROSS_TOOL): New variable.
+       (proto-powerpc64-aix.s): Update rule.
+       * callback/trampoline_r/Makefile.devel (proto-powerpc64-aix.s): Update
+       rule.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       hppa: Fix bug with structure return for sizes 5, 6, 7.
+       * avcall/avcall-hppa.c: For structure return for sizes > 4, get 4 bytes
+       from iret2.
+       * vacall/vacall-hppa.c: For structure return for sizes > 4, put 4 bytes
+       into iret2.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Fix bug with structure return for sizes < 16, != 1, 2, 4, 8.
+       * avcall/avcall-x86_64.c: Treat structure returns for all sizes <= 16
+       like those with sizes 1, 2, 4, 8, 16.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       Add some dedicated small structure return tests.
+       * avcall/tests.c (Size1, Size2, Size3, Size4, Size7, Size8, Size12,
+       Size15, Size16): New types.
+       (S1_v, S2_v, S3_v, S4_v, S7_v, S8_v, S12_v, S15_v, S15_v): New tests.
+       * vacall/tests.c: Likewise.
+       * callback/tests.c: Likewise.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       Remove outdated no-op definition.
+       * vacall/vacall.h.in (__VA_ANSI_FLOAT_ARGS): Remove enum value.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       powerpc: Don't special-case NetBSD.
+       * vacall/vacall-powerpc.c: Remove special case of NetBSD.
+       * callback/vacall_r/Makefile.devel (vacall-powerpc-netbsd-macro.S):
+       Remove target.
+       * callback/vacall_r/vacall-powerpc-netbsd.s: Remove file.
+       * callback/vacall_r/vacall-powerpc-netbsd-macro.S: Remove file.
+       * callback/vacall_r/Makefile.in (vacall-powerpc.s): Use
+       vacall-powerpc-linux-macro.S instead of vacall-powerpc-netbsd-macro.S.
+       (SOURCE_FILES): Remove vacall-powerpc-netbsd.s,
+       vacall-powerpc-netbsd-macro.S.
+       * callback/trampoline_r/proto.c: Remove special case of powerpc/NetBSD.
+       * callback/trampoline_r/trampoline.c: Remove special case of
+       powerpc/NetBSD.
+       * callback/trampoline_r/test1.c: Likewise.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       m68k: Don't special-case NetBSD.
+       * callback/call-used-registers.txt: Add comment about NetBSD.
+       * vacall/vacall-m68k.c: Remove special case of NetBSD.
+       * callback/vacall_r/Makefile.devel (vacall-m68k-netbsd-macro.S): Remove
+       target.
+       * callback/vacall_r/Makefile.in (vacall-m68k.s): Always use
+       vacall-m68k.mit.S.
+       (SOURCE_FILES): Remove vacall-m68k-netbsd-macro.S.
+       * callback/trampoline_r/proto.c: Remove special case of m68k/NetBSD.
+       * callback/trampoline_r/proto-m68k-netbsd.s: Remove file.
+       * callback/trampoline_r/tramp-m68k-netbsd.s: Remove file.
+       * callback/trampoline_r/tramp-m68k-netbsd.o: Remove file.
+       * callback/trampoline_r/Makefile.devel (proto-m68k-netbsd.s,
+       tramp-m68k-netbsd.o): Remove targets.
+       * callback/trampoline_r/trampoline.c: Remove special case of
+       m68k/NetBSD.
+       * callback/trampoline_r/test1.c: Likewise.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       Revert BINFMT_ELF hack.
+       * callback/elf-hack.txt: Explain the new workaround.
+       * callback/vacall_r/Makefile.devel (vacall-i386-macro.S,
+       vacall-m68k.mit.S, vacall-m68k.motorola.S, vacall-m68k-netbsd-macro.S,
+       vacall-mipseb-macro.S, vacall-mipsel-macro.S, vacall-mipsn32eb-macro.S,
+       vacall-mipsn32el-macro.S, vacall-mips64eb-macro.S,
+       vacall-mips64el-macro.S, vacall-alpha-macro.S,
+       vacall-powerpc-linux-macro.S, vacall-powerpc-netbsd-macro.S,
+       vacall-powerpc-sysv4-macro.S, vacall-x86_64-macro.S,
+       vacall-s390-macro.S): Don't postprocess through elfhack-*.sed.
+       * callback/vacall_r/elfhack-alpha.S: Remove file.
+       * callback/vacall_r/elfhack-alpha.sed: Remove file.
+       * callback/vacall_r/elfhack-i386.S: Remove file.
+       * callback/vacall_r/elfhack-i386.sed: Remove file.
+       * callback/vacall_r/elfhack-m68k.S: Remove file.
+       * callback/vacall_r/elfhack-m68k.sed: Remove file.
+       * callback/vacall_r/elfhack-mips.S: Remove file.
+       * callback/vacall_r/elfhack-mips.sed: Remove file.
+       * callback/vacall_r/elfhack-mips64.S: Remove file.
+       * callback/vacall_r/elfhack-mips64.sed: Remove file.
+       * callback/vacall_r/elfhack-powerpc.S: Remove file.
+       * callback/vacall_r/elfhack-powerpc.sed: Remove file.
+       * callback/vacall_r/elfhack-s390.S: Remove file.
+       * callback/vacall_r/elfhack-s390.sed: Remove file.
+       * callback/vacall_r/elfhack-x86_64.S: Remove file.
+       * callback/vacall_r/elfhack-x86_64.sed: Remove file.
+       * callback/vacall_r/Makefile.in (ASPFLAGS): Don't set BINFMT_ELF.
+       (SOURCE_FILES): Remove elhack-*.S and elfhack-*.sed.
+       * callback/vacall_r/configure.ac: Don't invoke FFCALL_BINFMT_ELF.
+       * callback/trampoline_r/trampoline.c: Remove code for BINFMT_ELF.
+       * callback/trampoline_r/tramp-alpha.s: Remove trampelf.
+       * callback/trampoline_r/tramp-alpha.o: Regenerated.
+       * callback/trampoline_r/tramp-i386.s: Remove trampelf.
+       * callback/trampoline_r/tramp-i386.o: Regenerated.
+       * callback/trampoline_r/tramp-m68k-netbsd.s: Remove trampelf.
+       * callback/trampoline_r/tramp-m68k-netbsd.o: Regenerated.
+       * callback/trampoline_r/tramp-m68k.s: Remove trampelf.
+       * callback/trampoline_r/tramp-m68k.o: Regenerated.
+       * callback/trampoline_r/tramp-mips.s: Remove trampelf.
+       * callback/trampoline_r/tramp-mips.o: Regenerated.
+       * callback/trampoline_r/tramp-mips64.s: Remove trampelf.
+       * callback/trampoline_r/tramp-mips64.o: Regenerated.
+       * callback/trampoline_r/tramp-powerpc-sysv4.s: Remove trampelf.
+       * callback/trampoline_r/tramp-powerpc-sysv4.o: Regenerated.
+       * callback/trampoline_r/tramp-s390.s: Remove trampelf.
+       * callback/trampoline_r/tramp-s390.o: Regenerated.
+       * callback/trampoline_r/tramp-x86_64.s: Remove trampelf.
+       * callback/trampoline_r/tramp-x86_64.o: Regenerated.
+       * callback/trampoline_r/test1.c: Reenable on ELF platforms.
+       * callback/trampoline_r/configure.ac: Don't invoke FFCALL_BINFMT_ELF.
+       * callback/configure.ac: Don't invoke FFCALL_BINFMT_ELF_OPTION.
+       * configure.ac: Don't invoke FFCALL_BINFMT_ELF_OPTION.
+       * m4/binfmt-elf.m4: Remove file.
+       * Makefile.in (SOURCE_FILES): Remove it.
+       * README: Update regarding the ELF problem.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       Access __vacall_r through an indirection, except on SPARC.
+       * callback/vacall_r/vacall_r.h.in (__vacall_r_t): New type.
+       (get__vacall_r): New declaration.
+       (__vacall_r): Remove declaration.
+       * vacall/vacall-alpha.c [REENTRANT]: Make __vacall_r static.
+       (get__vacall_r): New function.
+       * vacall/vacall-arm.c: Likewise.
+       * vacall/vacall-armhf.c: Likewise.
+       * vacall/vacall-hppa.c: Likewise.
+       * vacall/vacall-i386.c: Likewise.
+       * vacall/vacall-ia64.c: Likewise.
+       * vacall/vacall-m68k.c: Likewise.
+       * vacall/vacall-mips.c: Likewise.
+       * vacall/vacall-mipsn32.c: Likewise.
+       * vacall/vacall-mips64.c: Likewise.
+       * vacall/vacall-powerpc.c: Likewise.
+       * vacall/vacall-powerpc64.c: Likewise.
+       * vacall/vacall-s390.c: Likewise.
+       * vacall/vacall-x86_64.c: Likewise.
+       * callback/vacall_r/vacall-powerpc-netbsd-macro.S: Update accordingly.
+       * callback/vacall_r/Makefile.devel (vacall-mipseb-linux.s,
+       vacall-mipsel-linux.s): Use option -mno-explicit-relocs. Needed for
+       IRIX.
+       * callback/vacall_r/Makefile.in (vacall-i386.s): Remove space after '@'.
+       Needed on Solaris/x86.
+       * callback/callback.h.in (alloc_callback, is_callback): Use
+       get__vacall_r().
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       s390: Regenerate .s and .S files with known compilers.
+       * avcall/avcall-s390.c: Fix include statement.
+       * avcall/Makefile.devel (avcall-s390.s): New target.
+       * vacall/Makefile.devel (vacall-s390.s): New target.
+       * callback/vacall_r/Makefile.devel (vacall-s390-linux.s): New target.
+       * avcall/Makefile.in: Move avcall-s390.lo target.
+       * vacall/Makefile.in: Move vacall-s390.o target.
+       * avcall/avcall-s390.s: Remove from version control.
+       * vacall/vacall-s390.s: Likewise.
+       * callback/vacall_r/vacall-s390-linux.s: Likewise.
+       * callback/vacall_r/vacall-s390-macro.S: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Regenerate .s and .S files with known compilers.
+       * common/asm-x86_64.h (P2ALIGN): New macro.
+       (ALIGN): Remove macro.
+       * common/asm-x86_64.sh: Rewritten to consume ELF input. Produce L,
+       P2ALIGN macros.
+       * avcall/avcall-x86_64.c: Use __builtin_alloca instead of hacking on the
+       'sp' register.
+       * avcall/Makefile.devel (avcall-x86_64-linux.s): Rewritten.
+       * vacall/Makefile.devel (vacall-x86_64-linux.s): Rewritten.
+       * callback/vacall_r/Makefile.devel (vacall-x86_64-linux.s): Rewritten.
+       * avcall/avcall-x86_64-linux.s: Remove from version control.
+       * avcall/avcall-x86_64-macro.S: Likewise.
+       * vacall/vacall-x86_64-linux.s: Likewise.
+       * vacall/vacall-x86_64-macro.S: Likewise.
+       * callback/vacall_r/vacall-x86_64-linux.s: Likewise.
+       * callback/vacall_r/vacall-x86_64-macro.S: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       ia64: Regenerate .s and .S files with known compilers.
+       * avcall/Makefile.devel (avcall-ia64.s): Rewritten.
+       * vacall/Makefile.devel (vacall-ia64.s): Rewritten.
+       * callback/vacall_r/Makefile.devel (vacall-ia64.s): Rewritten.
+       * vacall/vacall-ia64.c: Put all local variables in a struct.
+       * avcall/avcall-ia64.s: Remove from version control.
+       * vacall/vacall-ia64.s: Likewise.
+       * callback/vacall_r/vacall-ia64.s: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       powerpc, powerpc64: Regenerate .s and .S files with known compilers.
+       * avcall/avcall-powerpc64.c: Use __builtin_alloca. Use an 'if' cascade
+       instead of gotos.
+       * avcall/Makefile.devel (avcall-powerpc-linux.s): New target.
+       (avcall-powerpc-aix.s, avcall-powerpc-sysv4.s, avcall-powerpc-macos.s,
+       avcall-powerpc64.s): Rewritten.
+       * vacall/Makefile.devel (vacall-powerpc-linux.s): New target.
+       (vacall-powerpc-aix.s, vacall-powerpc-sysv4.s, vacall-powerpc-macos.s,
+       vacall-powerpc64.s): Rewritten.
+       * callback/vacall_r/Makefile.devel (vacall-powerpc-linux.s): New target.
+       (vacall-powerpc-aix.s, vacall-powerpc-sysv4-macro.S,
+       vacall-powerpc-macos.s, vacall-powerpc64.s): Rewritten.
+       * avcall/avcall-powerpc-aix.s: Remove from version control.
+       * avcall/avcall-powerpc-linux.s: Likewise.
+       * avcall/avcall-powerpc-sysv4.s: Likewise.
+       * avcall/avcall-powerpc-macos.s: Likewise.
+       * avcall/avcall-powerpc64.s: Likewise.
+       * vacall/vacall-powerpc-aix.s: Likewise.
+       * vacall/vacall-powerpc-linux.s: Likewise.
+       * vacall/vacall-powerpc-sysv4.s: Likewise.
+       * vacall/vacall-powerpc-macos.s: Likewise.
+       * vacall/vacall-powerpc64.s: Likewise.
+       * callback/vacall_r/vacall-powerpc-aix.s: Likewise.
+       * callback/vacall_r/vacall-powerpc-linux.s: Likewise.
+       * callback/vacall_r/vacall-powerpc-linux-macro.S: Likewise.
+       * callback/vacall_r/vacall-powerpc-sysv4-macro.S: Likewise.
+       * callback/vacall_r/vacall-powerpc-macos.s: Likewise.
+       * callback/vacall_r/vacall-powerpc64.s: Likewise.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       armhf: Add support for arm with -mfloat-abi=hard.
+       * avcall/avcall.h.in: Add code for __armhf__, especially __av_start1,
+       __av_start_struct4, av_long, av_ulong, av_ptr, __av_longlong, av_float,
+       av_double, __av_struct.
+       * avcall/avcall-armhf.c: New file.
+       * avcall/Makefile.devel (avcall-armhf-macro.S): New target.
+       * avcall/Makefile.in (avcall-armhf.lo, avcall-armhf.s): New targets.
+       (clean): Remove avcall-armhf.s.
+       (SOURCE_FILES): Add avcall-armhf.c, avcall-armhf-macro.S.
+       * vacall/vacall.h.in: Add code for __armhf__, especially va_arg_float,
+       va_arg_double.
+       * vacall/vacall-armhf.c: New file.
+       * vacall/Makefile.devel (vacall-armhf-macro.S): New target.
+       * vacall/Makefile.in (vacall-armhf.o, vacall-armhf.s): New targets.
+       (clean): Remove vacall-armhf.s.
+       (SOURCE_FILES): Add vacall-armhf.c, vacall-armhf-macro.S.
+       * callback/vacall_r/Makefile.maint (COPIED_FILES): Add vacall-armhf.c.
+       * Makefile.in (COPIED_FILES): Add callback/vacall_r/vacall-armhf.c.
+       * callback/vacall_r/vacall_r.h.in: Add code for __armhf__, especially
+       va_arg_float, va_arg_double.
+       * callback/vacall_r/Makefile.devel (vacall-armhf-macro.S): New target.
+       * callback/vacall_r/Makefile.in (vacall-armhf.lo, vacall-armhf.s): New
+       targets.
+       (clean): Remove vacall-armhf.s.
+       (SOURCE_FILES): Add vacall-armhf.c, vacall-armhf-macro.S.
+       * trampoline/trampoline.h.in: Optionally define __armhf__.
+       * trampoline/trampoline.c: Treat __armhf__ like __arm__.
+       * callback/trampoline_r/trampoline_r.h.in: Optionally define __armhf__.
+       * callback/trampoline_r/trampoline.c: Treat __armhf__ like __arm__.
+       * PLATFORMS, */PLATFORMS: List the armv7 machine with 'hard' floats.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       arm: Make callback work, for -mfloat-abi=soft.
+       * callback/trampoline_r/Makefile.devel (CROSS_TOOL): New variable.
+       (proto-arm.s): Use known cross-compiler and -fno-omit-frame-pointer.
+       (tramp-arm.o): Use known cross-assembler.
+       * callback/trampoline_r/proto-arm.s: Regenerated.
+       * callback/trampoline_r/tramp-arm.s: Try three different trampolines.
+       The third one, trampcallwithframe, works.
+       * callback/trampoline_r/tramp-arm.o: Regenerated.
+       * callback/call-used-registers.txt: Add comments about arm.
+       * callback/trampoline_r/trampoline.c: For arm, use a trampoline with
+       standard prologue with struct args and standard epilogue.
+       * callback/trampoline_r/test1.c: On arm platforms, don't check the
+       passing of env.
+       * vacall/vacall-arm.c [REENTRANT]: Expect to find env on the stack, not
+       in r12.
+       * callback/vacall_r/Makefile.devel (vacall-arm-macro.S): Don't
+       postprocess through elfhack-arm.sed.
+       * callback/vacall_r/elfhack-arm.S: Remove file.
+       * callback/vacall_r/elfhack-arm.sed: Remove file.
+       * callback/vacall_r/Makefile.in (SOURCE_FILES): Remove elfhack-arm.S,
+       elfhack-arm.sed.
+       * PLATFORMS: List the arm5 machine with 'soft' floats.
+       * callback/PLATFORMS: Likewise.
+
+2017-01-31  Bruno Haible  <bruno@clisp.org>
+
+       arm: Make vacall work, for -mfloat-abi=soft.
+       * vacall/vacall.h.in [__arm__] (__va_alist): Enable the filler word.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * vacall/vacall-arm.c: Use a split struct to convince GCC to allocate
+       room on the stack for the first 4 general-purpose argument words.
+       * vacall/PLATFORMS: List the arm5 machine with 'soft' floats.
+       * avcall/PLATFORMS: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       arm: Fulfil the constraint that the sp register must be 8-bytes-aligned.
+       * avcall/avcall-arm.c: Enforce 8-bytes-alignment of the stack pointer.
+       * vacall/vacall-arm.c: Likewise.
+
+       arm: Remove support for old arm platforms without the ARM EABI.
+       * avcall/avcall.h.in: Revisit all __arm__ and __ARMEL__ conditionals.
+       * vacall/vacall.h.in: Likewise.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * avcall/avcall-arm.c: Renamed from avcall/avcall-armel.c.
+       * avcall/Makefile.devel (avcall-arm-macro.S): Make sure it's usable for
+       both endiannesses.
+       (avcall-armel.s): Remove target.
+       * avcall/Makefile.in (avcall-armel.lo): Remove target.
+       (SOURCE_FILES): Remove avcall-armel.[cs].
+       * vacall/vacall-arm.c: Renamed from vacall/vacall-armel.c.
+       * vacall/Makefile.devel (vacall-arm-macro.S): Make sure it's usable for
+       both endiannesses.
+       (vacall-armel.s): Remove target.
+       * vacall/Makefile.in (vacall-armel.o): Remove target.
+       (SOURCE_FILES): Remove vacall-armel.[cs].
+       * Makefile.in (COPIED_FILES): Remove callback/vacall_r/vacall-armel.c.
+       * callback/vacall_r/Makefile.devel (vacall-arm-macro.S): Make sure it's
+       usable for both endiannesses.
+       (vacall-armel-macro.S): Remove target.
+       * callback/vacall_r/Makefile.maint (COPIED_FILES): Remove
+       vacall-armel.c.
+       * callback/vacall_r/Makefile.in (vacall-armel.lo, vacall-armel.s):
+       Remove targets.
+       (clean): Don't remove vacall-armel.s.
+       (SOURCE_FILES): Remove vacall-armel.c, vacall-armel-macro.S.
+
+       arm: Regenerate .s and .S files with known compilers.
+       * common/asm-arm.h (L, FUNBEGIN, FUNEND): New macros.
+       * common/asm-arm.sh: Rewritten to consume ELF input. Produce L,
+       FUNBEGIN, FUNEND macros.
+       * avcall/Makefile.devel (avcall-arm-macro.S, avcall-armel.s): Rewritten.
+       * vacall/Makefile.devel (vacall-arm-macro.S, vacall-armel.s): Rewritten.
+       * callback/vacall_r/Makefile.devel (vacall-arm-macro.S,
+       vacall-armel-macro.S): Rewritten.
+       * avcall/avcall-arm-macro.S: Remove from version control.
+       * avcall/avcall-armel.s: Likewise.
+       * vacall/vacall-arm-macro.S: Likewise.
+       * vacall/vacall-armel.s: Likewise.
+       * callback/vacall_r/vacall-arm-macro.S: Likewise.
+       * callback/vacall_r/vacall-armel-macro.S: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       hppa: Regenerate .s and .S files with known compilers.
+       * common/asm-hppa.sh: New file.
+       * common/asm-hppa.h: New file.
+       * Makefile.in (SOURCE_FILES): Add them.
+       * avcall/Makefile.devel (avcall-hppa-linux.s, avcall-hppa-macro.S): New
+       targets.
+       (avcall-hppa.s): Remove target.
+       * avcall/Makefile.in (avcall-hppa.s): New target.
+       (avcall-hppa.lo): Update.
+       (clean): Remove also avcall-hppa.s.
+       (SOURCE_FILES): Add avcall-hppa-linux.s, avcall-hppa-macro.S. Remove
+       avcall-hppa.s.
+       * vacall/vacall-hppa.c: Use explicit assignments to move the arguments
+       to their stack locations.
+       * vacall/Makefile.devel (vacall-hppa-linux.s, vacall-hppa-macro.S): New
+       targets.
+       (vacall-hppa.s): Remove target.
+       * vacall/Makefile.in (vacall-hppa.s): New target.
+       (vacall-hppa.o): Update.
+       (clean): Remove also vacall-hppa.s.
+       (SOURCE_FILES): Add vacall-hppa-linux.s, vacall-hppa-macro.S. Remove
+       vacall-hppa.s.
+       * callback/vacall_r/Makefile.devel (vacall-hppa-linux.s,
+       vacall-hppa-macro.S): New targets.
+       (vacall-hppa.s): Remove target.
+       * callback/vacall_r/Makefile.in (vacall-hppa.s): New target.
+       (vacall-hppa.lo): Update.
+       (clean): Remove also vacall-hppa.s.
+       (SOURCE_FILES): Add vacall-hppa-linux.s, vacall-hppa-macro.S. Remove
+       vacall-hppa.s.
+       * avcall/avcall-hppa.s: Remove from version control.
+       * vacall/vacall-hppa.s: Likewise.
+       * callback/vacall_r/vacall-hppa.s: Likewise.
+       * PLATFORMS, */PLATFORMS: List hppa2.0w-hp-hpux11.31 (cc).
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       alpha: Regenerate .s and .S files with known compilers.
+       * avcall/avcall-alpha.c: Use __builtin_alloca.
+       * avcall/Makefile.devel (precompiled): Depend on avcall-alpha.s.
+       (avcall-alpha.s): Rewritten.
+       * vacall/vacall-alpha.c: Put all local variables in a struct.
+       * vacall/Makefile.devel (precompiled): Depend on vacall-alpha.s.
+       (vacall-alpha.s): Rewritten.
+       * callback/vacall_r/Makefile.devel (precompiled): Depend on
+       vacall-alpha-macro.S.
+       (vacall-alpha-linux.s): New target.
+       (vacall-alpha-macro.S): Rewritten.
+       * callback/vacall_r/Makefile.in (SOURCE_FILES): Add
+       vacall-alpha-linux.s.
+       * avcall/avcall-alpha.s: Remove from version control.
+       * vacall/vacall-alpha.s: Likewise.
+       * callback/vacall_r/vacall-alpha-macro.S: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       sparc64: Fix for Solaris.
+       * vacall/Makefile.devel (vacall-sparc64-linux.s): Produce code that does
+       not make assumptions about the address space.
+       * PLATFORMS, */PLATFORMS: List sparc64-sun-solaris2.10 (gcc -m64,
+       cc -xarch=generic64).
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       sparc, sparc64: Regenerate .s and .S files with known compilers.
+       * common/asm-sparc.h (L, FUNBEGIN, FUNEND): New macros.
+       * common/asm-sparc.sh: Rewritten to consume ELF input. Produce L,
+       FUNBEGIN, FUNEND macros.
+       * common/asm-sparc64.sh: Remove file.
+       * Makefile.in (SOURCE_FILES): Remove common/asm-sparc64.sh.
+       * avcall/Makefile.devel (precompiled): Depend on avcall-sparc-macro.S
+       and avcall-sparc64-macro.S.
+       (avcall-sparc-linux.s, avcall-sparc64-linux.s): New target.
+       (avcall-sparc-macro.S, avcall-sparc64-macro.S): Rewritten.
+       * avcall/Makefile.in (SOURCE_FILES): Add avcall-sparc-linux.s,
+       avcall-sparc64-linux.s.
+       * vacall/Makefile.devel (precompiled): Depend on vacall-sparc-macro.S
+       and vacall-sparc64-macro.S.
+       (vacall-sparc-linux.s, vacall-sparc64-linux.s): New target.
+       (vacall-sparc-macro.S, vacall-sparc64-macro.S): Rewritten.
+       * vacall/Makefile.in (SOURCE_FILES): Add vacall-sparc-linux.s,
+       vacall-sparc64-linux.s.
+       * callback/vacall_r/Makefile.devel (precompiled): Depend on
+       vacall-sparc-macro.S and vacall-sparc64-macro.S.
+       (vacall-sparc-linux.s, vacall-sparc64-linux.s): New target.
+       (vacall-sparc-macro.S, vacall-sparc64-macro.S): Rewritten.
+       * callback/vacall_r/Makefile.in (SOURCE_FILES): Add
+       vacall-sparc-linux.s, vacall-sparc64-linux.s.
+       * avcall/avcall-sparc-macro.S: Remove from version control.
+       * avcall/avcall-sparc64-macro.S: Likewise.
+       * vacall/vacall-sparc-macro.S: Likewise.
+       * vacall/vacall-sparc64-macro.S: Likewise.
+       * callback/vacall_r/vacall-sparc-macro.S: Likewise.
+       * callback/vacall_r/vacall-sparc64-macro.S: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       mips64: Make it work on Linux (mips64, mips64el) with "gcc -mabi=64".
+       * avcall/avcall-mips64.c: Add code for struct returns on _MIPSEL.
+       * avcall/Makefile.devel (avcall-mips64eb-linux.s,
+       avcall-mips64eb-macro.S, avcall-mips64el-linux.s,
+       avcall-mips64el-macro.S): New targets.
+       (avcall-mips64-linux.s, avcall-mips64-macro.S): Remove targets.
+       * avcall/Makefile.in (avcall-mips64.s): Take into account the
+       ENDIANNESS.
+       (SOURCE_FILES): Add avcall-mips64eb-linux.s, avcall-mips64el-linux.s,
+       avcall-mips64eb-macro.S, avcall-mips64el-macro.S.
+       Remove avcall-mips64-linux.s, avcall-mips64-macro.S.
+       * vacall/vacall-mips64.c: Add code for struct returns on _MIPSEL.
+       * vacall/Makefile.devel (vacall-mips64eb-linux.s,
+       vacall-mips64eb-macro.S, vacall-mips64el-linux.s,
+       vacall-mips64el-macro.S): New targets.
+       (vacall-mips64-linux.s, vacall-mips64-macro.S): Remove targets.
+       * vacall/Makefile.in (vacall-mips64.s): Take into account the
+       ENDIANNESS.
+       (SOURCE_FILES): Add vacall-mips64eb-linux.s, vacall-mips64el-linux.s,
+       vacall-mips64eb-macro.S, vacall-mips64el-macro.S.
+       Remove vacall-mips64-linux.s, vacall-mips64-macro.S.
+       * callback/vacall_r/Makefile.devel (vacall-mips64eb-linux.s,
+       vacall-mips64eb-macro.S, vacall-mips64el-linux.s,
+       vacall-mips64el-macro.S): New targets.
+       (vacall-mips64-linux.s, vacall-mips64-macro.S): Remove targets.
+       * callback/vacall_r/Makefile.in (vacall-mips64.s): Take into account the
+       ENDIANNESS.
+       (SOURCE_FILES): Add vacall-mips64eb-linux.s, vacall-mips64el-linux.s,
+       vacall-mips64eb-macro.S, vacall-mips64el-macro.S.
+       Remove vacall-mips64-linux.s, vacall-mips64-macro.S.
+       * PLATFORMS, */PLATFORMS: List mips64-unknown-linux (gcc -mabi=64).
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       mipsn32: Make it work on Linux (mips64, mips64el) with "gcc -mabi=n32".
+       * avcall/avcall-mipsn32.c: Add code for struct returns on _MIPSEL.
+       * avcall/Makefile.devel (avcall-mipsn32eb-linux.s,
+       avcall-mipsn32eb-macro.S, avcall-mipsn32el-linux.s,
+       avcall-mipsn32el-macro.S): New targets.
+       (avcall-mipsn32-linux.s, avcall-mipsn32-macro.S): Remove targets.
+       * avcall/Makefile.in (avcall-mipsn32.s): Take into account the
+       ENDIANNESS.
+       (SOURCE_FILES): Add avcall-mipsn32eb-linux.s,
+       avcall-mipsn32el-linux.s, avcall-mipsn32eb-macro.S,
+       avcall-mipsn32el-macro.S.
+       Remove avcall-mipsn32-linux.s, avcall-mipsn32-macro.S.
+       * vacall/vacall-mipsn32.c: Add code for struct returns on _MIPSEL.
+       * vacall/Makefile.devel (vacall-mipsn32eb-linux.s,
+       vacall-mipsn32eb-macro.S, vacall-mipsn32el-linux.s,
+       vacall-mipsn32el-macro.S): New targets.
+       (vacall-mipsn32-linux.s, vacall-mipsn32-macro.S): Remove targets.
+       * vacall/Makefile.in (vacall-mipsn32.s): Take into account the
+       ENDIANNESS.
+       (SOURCE_FILES): Add vacall-mipsn32eb-linux.s, vacall-mipsn32el-linux.s,
+       vacall-mipsn32eb-macro.S, vacall-mipsn32el-macro.S.
+       Remove vacall-mipsn32-linux.s, vacall-mipsn32-macro.S.
+       * callback/vacall_r/Makefile.devel (vacall-mipsn32eb-linux.s,
+       vacall-mipsn32eb-macro.S, vacall-mipsn32el-linux.s,
+       vacall-mipsn32el-macro.S): New targets.
+       (vacall-mipsn32-linux.s, vacall-mipsn32-macro.S): Remove targets.
+       * callback/vacall_r/Makefile.in (vacall-mipsn32.s): Take into account
+       the ENDIANNESS.
+       (SOURCE_FILES): Add vacall-mipsn32eb-linux.s, vacall-mipsn32el-linux.s,
+       vacall-mipsn32eb-macro.S, vacall-mipsn32el-macro.S.
+       Remove vacall-mipsn32-linux.s, vacall-mipsn32-macro.S.
+       * PLATFORMS, */PLATFORMS: List mips64-unknown-linux (gcc -mabi=n32).
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       mips: Make it work on Linux (mips, mipsel) with "gcc -mabi=32".
+       * m4/endianness.m4: New file.
+       * avcall/Makefile.devel (avcall-mipseb-linux.s, avcall-mipseb-macro.S,
+       avcall-mipsel-linux.s, avcall-mipsel-macro.S): New targets.
+       (avcall-mips-linux.s, avcall-mips-macro.S): Remove targets.
+       * avcall/configure.ac: Invoke FFCALL_ENDIANNESS.
+       * avcall/Makefile.in (avcall-mips.s): Take into account the ENDIANNESS.
+       (SOURCE_FILES): Add avcall-mipseb-linux.s, avcall-mipsel-linux.s,
+       avcall-mipseb-macro.S, avcall-mipsel-macro.S.
+       Remove avcall-mips-linux.s, avcall-mips-macro.S.
+       * vacall/Makefile.devel (vacall-mipseb-linux.s, vacall-mipseb-macro.S,
+       vacall-mipsel-linux.s, vacall-mipsel-macro.S): New targets.
+       (vacall-mips-linux.s, vacall-mips-macro.S): Remove targets.
+       * vacall/configure.ac: Invoke FFCALL_ENDIANNESS.
+       * vacall/Makefile.in (vacall-mips.s): Take into account the ENDIANNESS.
+       (SOURCE_FILES): Add vacall-mipseb-linux.s, vacall-mipsel-linux.s,
+       vacall-mipseb-macro.S, vacall-mipsel-macro.S.
+       Remove vacall-mips-linux.s, vacall-mips-macro.S.
+       * callback/vacall_r/Makefile.devel (vacall-mipseb-linux.s,
+       vacall-mipseb-macro.S, vacall-mipsel-linux.s, vacall-mipsel-macro.S):
+       New targets.
+       * callback/vacall_r/configure.ac: Invoke FFCALL_ENDIANNESS.
+       * callback/vacall_r/Makefile.in (vacall-mips.s): Take into account the
+       ENDIANNESS.
+       (SOURCE_FILES): Add vacall-mipseb-linux.s, vacall-mipsel-linux.s,
+       vacall-mipseb-macro.S, vacall-mipsel-macro.S.
+       Remove vacall-mips-linux.s, vacall-mips-macro.S.
+       * PLATFORMS, */PLATFORMS: List mips-unknown-linux (gcc -mabi=32).
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       mips, mipsn32, mips64: Regenerate .s and .S files with known compilers.
+       This restores support for IRIX with cc -32 (regression from 2008-09-26).
+       * common/asm-mips.sh: Rewritten to consume ELF input.
+       * avcall/avcall-mips.c: Rely on the compiler to set $25 at each
+       function call. Add comment about broken GCC 3.3.x and 3.4.x. Avoid
+       'switch' statements, to make the generated code position-independent.
+       Declare iret2 as single __avword.
+       * avcall/avcall-mipsn32.c: Use __builtin_alloca. Rely on the compiler
+       to set $25 at each function call.
+       * avcall/avcall-mips64.c: Likewise.
+       * avcall/Makefile.devel (precompiled): Depend on avcall-mips-macro.S,
+       avcall-mipsn32-macro.S, avcall-mips64-macro.S.
+       (avcall-mips-linux.s, avcall-mipsn32-linux.s, avcall-mips64-linux.s):
+       New targets.
+       (avcall-mips-macro.S, avcall-mipsn32-macro.S, avcall-mips64-macro.S):
+       Rewritten.
+       * avcall/Makefile.in (SOURCE_FILES): Add avcall-mips-linux.s,
+       avcall-mipsn32-linux.s, avcall-mips64-linux.s.
+       * vacall/vacall-mips.c: Rely on the compiler to set $25 at each
+       function call.
+       * vacall/vacall-mipsn32.c: Likewise.
+       * vacall/vacall-mips64.c: Likewise. Add offset to references of
+       arguments in the stack.
+       * vacall/Makefile.devel (precompiled): Depend on vacall-mips-macro.S,
+       vacall-mipsn32-macro.S, vacall-mips64-macro.S.
+       (vacall-mips-linux.s, vacall-mipsn32-linux.s, vacall-mips64-linux.s):
+       New targets.
+       (vacall-mips-macro.S): Rewritten.
+       (vacall-mipsn32-macro.S): Rewritten. Update the postprocessing hack.
+       (vacall-mips64-macro.S): Rewritten. Add a postprocessing hack.
+       * vacall/Makefile.in (SOURCE_FILES): Add vacall-mips-linux.s,
+       vacall-mipsn32-linux.s, vacall-mips64-linux.s.
+       * callback/vacall_r/Makefile.devel (precompiled): Depend on
+       vacall-mips-macro.S, vacall-mipsn32-macro.S, vacall-mips64-macro.S.
+       (vacall-mips-linux.s, vacall-mipsn32-linux.s, vacall-mips64-linux.s):
+       New targets.
+       (vacall-mips-macro.S): Rewritten.
+       (vacall-mipsn32-macro.S): Rewritten. Update the postprocessing hack.
+       (vacall-mips64-macro.S): Rewritten. Add a postprocessing hack.
+       * callback/vacall_r/Makefile.in (SOURCE_FILES): Add vacall-mips-linux.s,
+       vacall-mipsn32-linux.s, vacall-mips64-linux.s.
+       * avcall/avcall-mips-macro.S: Remove from version control.
+       * avcall/avcall-mipsn32-macro.S: Likewise.
+       * avcall/avcall-mips64-macro.S: Likewise.
+       * vacall/vacall-mips-macro.S: Likewise.
+       * vacall/vacall-mipsn32-macro.S: Likewise.
+       * vacall/vacall-mips64-macro.S: Likewise.
+       * callback/vacall_r/vacall-mips-macro.S: Likewise.
+       * callback/vacall_r/vacall-mipsn32-macro.S: Likewise.
+       * callback/vacall_r/vacall-mips64-macro.S: Likewise.
+       * PLATFORMS, */PLATFORMS: List mips-sgi-irix6.5 (cc -32).
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       m68k: Regenerate .s and .S files with known compilers.
+       * common/asm-m68k.h (L, FUNBEGIN, FUNEND): New macros.
+       * common/asm-m68k.sh: Expect a syntax argument. Produce L, FUNBEGIN,
+       FUNEND macros.
+       * avcall/avcall-m68k.c: Use __builtin_alloca instead of hacking on the
+       'sp' register.
+       * avcall/Makefile.devel (precompiled): Depend on avcall-m68k.mit.S and
+       avcall-m68k.motorola.S.
+       (avcall-m68k-linux.s, avcall-m68k-sun.s): New targets.
+       (avcall-m68k.mit.S, avcall-m68k.motorola.S): Rewritten.
+       * avcall/Makefile.in (avcall-m68k.s): Depend on avcall-m68k.motorola.S
+       instead of avcall-m68k.mot.s.
+       (SOURCE_FILES): Add avcall-m68k-linux.s, avcall-m68k-sun.s.
+       Replace avcall-m68k.mot.s with avcall-m68k.motorola.S.
+       * vacall/Makefile.devel (precompiled): Depend on vacall-m68k.mit.S and
+       vacall-m68k.motorola.S.
+       (vacall-m68k-linux.s, vacall-m68k-sun.s): New targets.
+       (vacall-m68k.mit.S, vacall-m68k.motorola.S): Rewritten.
+       * vacall/Makefile.in (vacall-m68k.s): Depend on vacall-m68k.motorola.S
+       instead of vacall-m68k.mot.s.
+       (SOURCE_FILES): Add vacall-m68k-linux.s,
+       vacall-m68k-sun.s, vacall-mips-linux.s, vacall-mipsn32-linux.s,
+       Replace vacall-m68k.mot.s with vacall-m68k.motorola.S.
+       * callback/vacall_r/Makefile.devel (precompiled): Depend on
+       vacall-m68k.mit.S, vacall-m68k.motorola.S, vacall-m68k-netbsd-macro.S.
+       (vacall-m68k-linux.s, vacall-m68k-sun.s): New targets.
+       (vacall-m68k.mit.S, vacall-m68k.motorola.S, vacall-m68k-netbsd-macro.S):
+       Rewritten.
+       * callback/vacall_r/Makefile.in (vacall-m68k.s): Depend on
+       vacall-m68k.motorola.S instead of vacall-m68k.mot.s.
+       (SOURCE_FILES): Add vacall-m68k-linux.s, vacall-m68k-sun.s.
+       Replace vacall-m68k.mot.s with vacall-m68k.motorola.S.
+       * avcall/avcall-m68k.mit.S: Remove from version control.
+       * avcall/avcall-m68k.mot.s: Likewise.
+       * callback/vacall_r/vacall-m68k-netbsd-macro.S: Likewise.
+       * callback/vacall_r/vacall-m68k.mit.S: Likewise.
+       * callback/vacall_r/vacall-m68k.mot.s: Likewise.
+       * vacall/vacall-m68k.mit.S: Likewise.
+       * vacall/vacall-m68k.mot.s: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       i386: Regenerate .s and .S files with known compilers.
+       * common/asm-i386.hh (P2ALIGN): New macro.
+       (FUNEND): Take two arguments.
+       * common/asm-i386.sh: Rewritten to consume ELF input. Produce P2ALIGN
+       macro. Handle indirect call statements.
+       * avcall/avcall-i386.c: Use __builtin_alloca instead of hacking on the
+       'sp' register.
+       * avcall/Makefile.devel (precompiled): Depend on avcall-i386-macro.S.
+       (avcall-i386-linux.s): New target.
+       (avcall-i386-macro.S): Rewritten.
+       * avcall/Makefile.in (SOURCE_FILES): Add avcall-i386-linux.s.
+       * vacall/vacall-i386.c: Insert the appropriate stack cleanup before
+       'ret $4'.
+       * vacall/Makefile.devel (precompiled): Depend on vacall-i386-macro.S.
+       (vacall-i386-linux.s): New target.
+       (vacall-i386-macro.S): Rewritten.
+       * vacall/Makefile.in (SOURCE_FILES): Add vacall-i386-linux.s.
+       * callback/vacall_r/Makefile.devel (precompiled): Depend on
+       vacall-i386-macro.S.
+       (vacall-i386-linux.s): New target.
+       (vacall-i386-macro.S): Rewritten.
+       * callback/vacall_r/Makefile.in (SOURCE_FILES): Add vacall-i386-linux.s.
+       * avcall/avcall-i386-macro.S: Remove from version control.
+       * vacall/vacall-i386-macro.S: Likewise.
+       * callback/vacall_r/vacall-i386-macro.S: Likewise.
+
+2017-02-11  Bruno Haible  <bruno@clisp.org>
+
+       Prepare for regenerating .s and .S files with known compilers.
+       This serves three purposes:
+       1. Being able to regenerate everything if avcall.h.in or vacall.h.in
+          changes.
+       2. Allow safe stack unwinding across avcall and vacall invocations.
+       3. Allow distributing libavcall and libcallback as shared libraries.
+       * README-hacking: Document the cross compilers.
+       * cross-tools/cross.conf: New file.
+       * cross-tools/cross-build.sh: New file.
+       * cross-tools/cross.in: New file.
+       * cross-tools/patches/*.patch: New files.
+       * avcall/Makefile.devel (GCCFLAGS): Add -fno-omit-frame-pointer, -fPIC.
+       (CROSS_TOOL): New variable.
+       * vacall/Makefile.devel (GCCFLAGS): Add -fno-omit-frame-pointer.
+       (CROSS_TOOL): New variable.
+       * callback/vacall_r/Makefile.devel (GCCFLAGS): Add
+       -fno-omit-frame-pointer, -fPIC.
+       (CROSS_TOOL): New variable.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       s390: Fix long long args.
+       * avcall/avcall.h.in (__av_longlong): Align only on a 4-bytes boundary,
+       not on an 8-bytes boundary. Fix condition for switching from register
+       args to stack args.
+       * vacall/vacall.h.in (__va_arg_leftadjusted, __va_arg_rightadjusted):
+       Fix condition for switching from register args to stack args.
+       (__va_arg_longlong): Use __va_arg.
+       * callback/vacall_r/vacall_r.h.in (__va_arg_leftadjusted,
+       __va_arg_rightadjusted): Fix condition for switching from register args
+       to stack args.
+       (__va_arg_longlong): Use __va_arg.
+       * PLATFORMS, */PLATFORMS: List s390x-ibm-linux with "gcc -m31".
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       s390: Fix trampoline.
+       * trampoline/trampoline.c [__s390__]: Fix is_tramp macro.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       ia64: Fix struct args.
+       * avcall/avcall.h.in (__av_struct): Tweak #if.
+       * avcall/avcall-ia64.c: Fix comment.
+       * vacall/vacall.h.in (__va_arg_struct): Change #if to match
+       callback/vacall_r/vacall_r.h.in.
+       * callback/call-used-registers.txt: Fix info about ia64.
+       * callback/vacall_r/vacall_r.h.in (__va_arg_struct): Tweak #if.
+       * callback/trampoline_r/trampoline.c [__ia64__]: Fix is_tramp macro.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       powerpc64: Make trampoline work on AIX in a 64-bit build.
+       * trampoline/tramp-powerpc64-aix.S: Add assembler pseudo-ops for AIX.
+       * callback/trampoline_r/tramp-powerpc64-aix.S: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       arm: Comments.
+       * avcall/avcall-arm.c: Add comments.
+       * avcall/avcall.h.in: Fix comment.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       arm: Make trampoline work on real ARM harware.
+       The cache flushing code in cache-arm.c and cache-armel.c are for old
+       Linux versions. Nowadays the best way is through the GCC builtin
+       function __clear_cache (which makes the appropriate Linux system call).
+       * trampoline/trampoline.c (alloc_trampoline) [__arm__]: Invoke GCC
+       builtin function __clear_cache. Remove call to __TR_clear_cache.
+       * callback/trampoline_r/trampoline.c (alloc_trampoline_r) [__arm__]:
+       Likewise.
+       * trampoline/cache-arm.[cs]: Remove files.
+       * trampoline/cache-armel.[cs]: Remove files.
+       * callback/trampoline_r/Makefile.maint (COPIED_FILES): Remove
+       cache-arm*.
+       * Makefile.in (COPIED_FILES): Remove callback/trampoline_r/cache-arm*.
+       * trampoline/Makefile.devel (cache-armel.s): Remove target.
+       * trampoline/configure.ac (CPU_OBJECTS): Leave empty for arm and armel.
+       * trampoline/Makefile.in (cache-arm.o, cache-armel.o): Remove targets.
+       (SOURCE_FILES): Remove cache-arm.[cs], cache-armel.[cs].
+       * callback/trampoline_r/Makefile.devel (cache-armel.s): Remove target.
+       * callback/trampoline_r/configure.ac (CPU_OBJECTS): Leave empty for arm
+       and armel.
+       * callback/trampoline_r/Makefile.in (cache-arm.lo, cache-armel.lo):
+       Remove targets.
+       (SOURCE_FILES): Remove cache-arm.[cs], cache-armel.[cs].
+       * trampoline/PLATFORMS: Add two ARM platforms.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       hppa: Fix struct returns.
+       * avcall/avcall.h.in [__hppa__]: Don't set __AV_PCC_STRUCT_RETURN by
+       default.
+       * avcall/avcall-hppa.c: Fix comment.
+       * vacall/vacall.h.in [__hppa__]: Don't set __VA_PCC_STRUCT_RETURN by
+       default.
+       * callback/vacall_r/vacall_r.h.in [__hppa__]: Don't set
+       __VA_PCC_STRUCT_RETURN by default.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       sparc64: Fix the passing of 'float' arguments.
+       * vacall/vacall.h.in (va_arg_float): Expect the float in the upper half
+       of the 8-bytes word.
+       * callback/vacall_r/vacall_r.h.in (va_arg_float): Likewise.
+       * PLATFORMS, */PLATFORMS: List sparc64-unknown-linux (gcc).
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       sparc64: Fix a compiler warning.
+       * vacall/vacall.h.in (__va_arg_struct): Add a cast to pointer.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       mips64: Fix trampoline_r.
+       * callback/trampoline_r/trampoline.c: Fix conditionals that involve
+       __mips64__.
+       * callback/trampoline_r/test1.c: Fix duplicate declaration of 'env' on
+       mips64.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       mipsn32, mips64: Fix for little-endian platforms.
+       * vacall/vacall.h.in (__va_arg_adjusted): Use same conditional on
+       _MIPSEB and _MIPSEL as in callback/vacall_r/vacall_r.h.in.
+       * callback/vacall_r/vacall_r.h.in: Reorder parts of a #if condition.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       mips: Fix for Linux with "gcc -mabi=32".
+       * trampoline/tramp-mips.old.o: Renamed from trampoline/tramp-mips.o.
+       * trampoline/tramp-mips.old.s: Renamed from trampoline/tramp-mips.s.
+       * trampoline/tramp-mips.s: New file, based on
+       trampoline/tramp-mipsn32.s.
+       * trampoline/tramp-mips.o: New generated file.
+       * trampoline/trampoline.c: For __mips__, use the same trampoline as for
+       __mipsn32__.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       mips: Fix for Linux with "gcc -mabi=32".
+       * vacall/vacall.h.in (__va_arg_adjusted): Use same conditional on
+       _MIPSEB as in callback/vacall_r/vacall_r.h.in.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       mipsn32, mips64: Fix struct args and struct returns with newer GCC.
+       * avcall/avcall.h.in: For mipsn32 and mips64 in gcc >= 3.4:
+       1. Don't set __AV_GCC_STRUCT_RETURN.
+       2. Use __AV_SGICC_STRUCT_ARGS.
+       * vacall/vacall.h.in: For mipsn32 and mips64 in gcc >= 3.4:
+       1. Don't set __VA_GCC_STRUCT_RETURN.
+       2. Use __VA_SGICC_STRUCT_ARGS.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * PLATFORMS, */PLATFORMS: List mips-sgi-irix6.5 (gcc -mabi=n32).
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       x86_64: Fix bug with structure arguments larger than 16 bytes.
+       * avcall/avcall.h.in (__av_struct): Pass structures > 16 bytes on the
+       stack.
+       * vacall/vacall.h.in (__va_arg_adjusted): Expect types > 16 bytes passed
+       on the stack.
+       * callback/vacall_r/vacall_r.h.in (__va_arg_adjusted): Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       i386, x86_64, sparc, sparc64: Fix for the Sun Studio 11 compiler.
+       When preprocessing a .S file, "cc -E" activates some other preprocessor
+       than the usual C preprocessor.
+       * avcall/Makefile.in (avcall-i386.s, avcall-sparc.s, avcall-sparc64.s,
+       avcall-x86_64.s): Feed the input to the preprocessor through standard
+       input. Postprocess to remove space after '.' and '@'.
+       * vacall/Makefile.in (vacall-i386.s, vacall-sparc.s, vacall-sparc64.s,
+       vacall-x86_64.s): Likewise.
+       * trampoline/Makefile.in (cache-sparc.s, cache-sparc64.s): Likewise.
+       * callback/vacall_r/Makefile.in (vacall-i386.s, vacall-sparc.s,
+       vacall-sparc64.s, vacall-x86_64.s): Likewise.
+       * callback/trampoline_r/Makefile.in (cache-sparc.s, cache-sparc64.s):
+       Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       List platforms on which libffcall is known to work.
+       * PLATFORMS, */PLATFORMS: List i386-pc-solaris2.10 (gcc),
+       mips-sgi-irix6.5 (cc -n32), sparc-unknown-linux (gcc),
+       alphaev67-unknown-linux (gcc), powerpc-ibm-aix7.1.3.0 (xlc, gcc).
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       Don't violate ISO C rules.
+       * avcall/avcall.h.in (__av_struct): Don't store an unaligned pointer
+       in (LIST).aptr.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       Don't make side-effects before overflow checking.
+       * avcall/avcall.h.in: In most macro definitions, modify (LIST).aptr
+       after checking that it will remain within range, not before. But
+       continue to modify (LIST).aptr before storing the argument, as this
+       makes it easier w.r.t. to the alignment. This produces some more
+       duplicate expressions that the compiler will eliminate. But the code
+       is clearer this way.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       Add more floating-point, mixed-number, general-purpose args tests.
+       * avcall/tests.c (f_f24, d_iiidi, d_fdi, ll_iiilli, D_Dfd,
+       l_l0K, ..., l_l6K, ll_l2ll, ..., ll_l7ll, d_l2d, ... d_l7d): New tests.
+       * vacall/tests.c: Likewise.
+       * callback/tests.c: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       Enable the 'long long' tests in callback.
+       * callback/configure.ac: Invoke AC_TYPE_LONG_LONG_INT.
+       * callback/tests.c: Test HAVE_LONG_LONG_INT, not HAVE_LONG_LONG.
+       * avcall/avcall.h.in: Fix comment.
+       * vacall/vacall.h.in: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       devel: Make it easy to keep the autogenerated files up-to-date.
+       * avcall/Makefile.devel: Make all *.[sS] files depend on this file.
+       (precompiled): Comment out all dependencies.
+       * vacall/Makefile.devel: Likewise.
+       * callback/vacall_r/Makefile.devel: Likewise.
+       * callback/vacall_r/Makefile.maint (copied-files): New target.
+       * callback/trampoline_r/Makefile.maint (copied-files): New target.
+       * autogen.sh: To copy the files, just invoke these targets.
+       * Makefile.devel (precompiled): New target.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       configuration: Support the AR configure variable.
+       Needed for a 64-bit build on AIX.
+       * vacall/configure.ac: Invoke gl_PROG_AR_RANLIB instead of
+       AC_PROG_RANLIB.
+       * trampoline/configure.ac: Likewise.
+       * vacall/Makefile.in (AR): Use value determined by gl_PROG_AR_RANLIB.
+       * trampoline/Makefile.in (AR): Likewise.
+       * avcall/Makefile.in (AR): Use value determined by libtool.
+       * callback/Makefile.in (AR): Likewise.
+       * callback/vacall_r/Makefile.in (AR): Likewise.
+       * callback/trampoline_r/Makefile.in (AR): Likewise.
+       * avcall/configure.ac: Reorder (a no-op).
+       * callback/configure.ac: Likewise.
+       * callback/vacall_r/configure.ac: Likewise.
+       * callback/trampoline_r/configure.ac: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       configuration: Simplification.
+       * m4/general.m4 (CL_CONFIG_SUBDIRS): Remove macro.
+       * configure.ac: Use AC_CONFIG_SUBDIRS instead of CL_CONFIG_SUBDIRS.
+       * callback/configure.ac: Likewise.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       Revert the addition of a powerpc64le port by Masanori Mitsugi
+       (commit from 2015-08-23).
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       Add support for some Linux+PaX or SELinux kernels and for HardenedBSD.
+       Reported
+       - by Gerard Milmeister in https://sourceforge.net/p/clisp/bugs/356/,
+       - by Pradeep Kumar in https://sourceforge.net/p/clisp/bugs/415/,
+       - by Don Cohen in
+         https://lists.gnu.org/archive/html/libffcall/2016-12/msg00002.html,
+       - by Nelson Beebe.
+       * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): New macro.
+       * m4/general.m4 (FFCALL_COMMON_TRAMPOLINE): Require it.
+       * trampoline/trampoline.c (EXECUTABLE_VIA_MALLOC_THEN_MPROTECT,
+       EXECUTABLE_VIA_MMAP_THEN_MPROTECT, EXECUTABLE_VIA_MMAP_FILE_SHARED):
+       New macros.
+       (EXECUTABLE_VIA_MPROTECT, EXECUTABLE_VIA_MMAP_ANONYMOUS,
+       EXECUTABLE_VIA_MMAP_DEVZERO): Remove macros.
+       (MAP_FILE, MAP_VARIABLE): Define fallbacks.
+       (pagesize): Define outside of functions.
+       (alloc_trampoline): If EXECUTABLE_VIA_MMAP_FILE_SHARED is defined,
+       create separate mappings of a file, for writing and for executing.
+       If EXECUTABLE_VIA_MMAP_THEN_MPROTECT is defined, use mmap of an
+       anonymous page, then mprotect.
+       (free_trampoline): Convert back from executable address to writable
+       address.
+       * callback/trampoline_r/trampoline.c
+       (EXECUTABLE_VIA_MALLOC_THEN_MPROTECT, EXECUTABLE_VIA_MMAP_THEN_MPROTECT,
+       EXECUTABLE_VIA_MMAP_FILE_SHARED): New macros.
+       (EXECUTABLE_VIA_MPROTECT, EXECUTABLE_VIA_MMAP_ANONYMOUS,
+       EXECUTABLE_VIA_MMAP_DEVZERO): Remove macros.
+       (MAP_FILE, MAP_VARIABLE): Define fallbacks.
+       (pagesize): Define outside of functions.
+       (alloc_trampoline_r): If EXECUTABLE_VIA_MMAP_FILE_SHARED is defined,
+       create separate mappings of a file, for writing and for executing.
+       If EXECUTABLE_VIA_MMAP_THEN_MPROTECT is defined, use mmap of an
+       anonymous page, then mprotect.
+       (free_trampoline_r, is_trampoline_r): Convert back from executable
+       address to writable address.
+
+2017-01-29  Bruno Haible  <bruno@clisp.org>
+
+       Fix "Generic workaround against the ELF symbol resolving routine".
+       * callback/vacall_r/elfhack-alpha.S: Put env in register $1, not $2.
+       * callback/vacall_r/elfhack-alpha.sed: Make it find the correct line.
+       * callback/trampoline_r/trampoline.c [__ia64__]: Fix code for
+       BINFMT_ELF.
+       [__mips64__]: Fix a typo in the trampoline for BINFMT_ELF.
+       [__s390__]: Fix typo in is_tramp macro for BINFMT_ELF.
+
+2017-01-10  Bruno Haible  <bruno@clisp.org>
+
+       Update documentation.
+       * README: Refer to the git repository, not to the last release.
+       * DEPENDENCIES: New file.
+       * Makefile.in (SOURCE_FILES): Add it.
+       * README-hacking: New file.
+
+2017-01-09  Bruno Haible  <bruno@clisp.org>
+
+       Remove support for m68k/HP-UX, m68k/NeXT, apollo, mips/Ultrix.
+       * trampoline/trampoline.c: Remove hpux, NeXT, apollo, ultrix
+       conditionals.
+       * trampoline/cache.c: Likewise.
+       * callback/trampoline_r/trampoline.c: Likewise.
+
+2017-01-09  Bruno Haible  <bruno@clisp.org>
+
+       Remove support for m68k/AmigaOS.
+       * avcall/Makefile.devel (avcall-m68k-amiga.s): Remove target.
+       * avcall/avcall-m68k-amiga.c: Remove file.
+       * avcall/avcall-m68k-amiga.s: Remove file.
+       * avcall/Makefile.in (SOURCE_FILES): Remove them.
+       * avcall/avcall.h.in: Remove AMIGA conditionals.
+       * avcall/tests.c: Likewise.
+       * trampoline/trampoline.c: Likewise.
+       * callback/trampoline_r/trampoline.c: Likewise.
+
+2017-01-09  Bruno Haible  <bruno@clisp.org>
+
+       Remove support for the AIX 3 operating system.
+       * avcall/Makefile.devel (avcall-powerpc-aix.s): Renamed from
+       avcall-powerpc-aix.new.s.
+       (avcall-powerpc-aix.old.s): Remove target.
+       * avcall/avcall-powerpc-aix.s: Renamed from
+       avcall/avcall-powerpc-aix.new.s.
+       * avcall/avcall-powerpc-aix.old.s: Remove file.
+       * avcall/Makefile.in (avcall-powerpc.s): No longer use
+       avcall-powerpc-aix.old.s.
+       (SOURCE_FILES): Add avcall-powerpc-aix.s. Remove
+       avcall-powerpc-aix.new.s, avcall-powerpc-aix.old.s.
+       * vacall/Makefile.devel (vacall-powerpc-aix.s): Renamed from
+       vacall-powerpc-aix.new.s.
+       (vacall-powerpc-aix.old.s): Remove target.
+       * vacall/vacall-powerpc-aix.s: Renamed from
+       vacall/vacall-powerpc-aix.new.s.
+       * vacall/vacall-powerpc-aix.old.s: Remove file.
+       * vacall/Makefile.in (vacall-powerpc.s): No longer use
+       vacall-powerpc-aix.old.s.
+       (SOURCE_FILES): Add vacall-powerpc-aix.s. Remove
+       vacall-powerpc-aix.new.s, vacall-powerpc-aix.old.s.
+       * callback/vacall_r/Makefile.devel (vacall-powerpc-aix.s): Renamed from
+       vacall-powerpc-aix.new.s.
+       (vacall-powerpc-aix.old.s): Remove target.
+       * callback/vacall_r/vacall-powerpc-aix.s: Renamed from
+       callback/vacall_r/vacall-powerpc-aix.new.s.
+       * callback/vacall_r/vacall-powerpc-aix.old.s: Remove file.
+       * callback/vacall_r/Makefile.in (vacall-powerpc.s): No longer use
+       vacall-powerpc-aix.old.s.
+       (SOURCE_FILES): Add vacall-powerpc-aix.s. Remove
+       vacall-powerpc-aix.new.s, vacall-powerpc-aix.old.s.
+       * trampoline/Makefile.devel (proto-powerpc-aix.s): Renamed from
+       proto-powerpc-aix.new.s.
+       (proto-powerpc-aix.old.s): Remove target.
+       * trampoline/proto-powerpc-aix.s: Renamed from 
+       trampoline/proto-powerpc-aix.new.s.
+       * trampoline/proto-powerpc-aix.old.s: Remove file.
+       * trampoline/tramp-powerpc-aix.S: Renamed from
+       trampoline/tramp-powerpc.new.S.
+       * trampoline/tramp-powerpc.old.S: Remove file.
+       * trampoline/tramp-powerpc64-aix.S: Renamed from
+       trampoline/tramp-powerpc64.new.S.
+       * trampoline/Makefile.in (tramp-powerpc.s): No longer use
+       tramp-powerpc.old.S.
+       (tramp-powerpc64.s): Update.
+       (SOURCE_FILES): Add tramp-powerpc-aix.S, tramp-powerpc64-aix.S. Remove
+       tramp-powerpc.old.S, tramp-powerpc.new.S tramp-powerpc64.new.S.
+       * callback/trampoline_r/Makefile.devel (proto-powerpc-aix.s): Renamed
+       from proto-powerpc-aix.new.s.
+       (proto-powerpc-aix.old.s): Remove target.
+       * callback/trampoline_r/proto-powerpc-aix.s: Renamed from
+       callback/trampoline_r/proto-powerpc-aix.new.s.
+       * callback/trampoline_r/proto-powerpc-aix.old.s: Remove file.
+       * callback/trampoline_r/tramp-powerpc-aix.S: Renamed from
+       callback/trampoline_r/tramp-powerpc.new.S.
+       * callback/trampoline_r/tramp-powerpc.old.S: Remove file.
+       * callback/trampoline_r/tramp-powerpc64-aix.S: Renamed from
+       callback/trampoline_r/tramp-powerpc64.new.S.
+       * callback/trampoline_r/Makefile.in (tramp-powerpc.s): No longer use
+       tramp-powerpc.old.S.
+       (tramp-powerpc64.s): Update.
+       (SOURCE_FILES): Add tramp-powerpc-aix.S, tramp-powerpc64-aix.S. Remove
+       tramp-powerpc.old.S, tramp-powerpc.new.S tramp-powerpc64.new.S.
+       * PLATFORMS, **/PLATFORMS: Update.
+
+2017-01-08  Bruno Haible  <bruno@clisp.org>
+
+       Remove support for the m88k CPU.
+       The only place where this CPU is still used is in the OpenBSD 5.8
+       luna88k port. The luna88k is museum hardware. They use the ELF binary
+       format, through an inofficial port of the 10-years old binutils-2.17.
+       * avcall/Makefile.devel (avcall-m88k.s, tests-m88k.s): Remove targets.
+       * avcall/avcall-m88k.[cs]: Remove files.
+       * avcall/Makefile.in (avcall-m88k.lo): Remove target.
+       (SOURCE_FILES): Remove avcall-m88k.[cs].
+       * avcall/avcall.h.in: Remove defined(__m88k__) conditionals.
+       * vacall/Makefile.devel (vacall-m88k.s, tests-m88k.s): Remove targets.
+       * vacall/vacall-m88k.[cs]: Remove files.
+       * vacall/Makefile.in (vacall-m88k.o): Remove target.
+       (SOURCE_FILES): Remove vacall-m88k.[cs].
+       * vacall/vacall.h.in: Remove defined(__m88k__) conditionals.
+       * trampoline/Makefile.devel (proto-m88k.s, tramp-m88k.s): Remove targets.
+       * trampoline/proto-m88k.s: Remove file.
+       * trampoline/tramp-m88k.s: Remove file.
+       * trampoline/protexec.c: Remove __DOLPHIN__ conditionals.
+       * trampoline/trampoline.c: Remove defined(__m88k__), HAVE_SYS_M88KBCS_H conditionals.
+       * trampoline/trampoline.h.in: Don't test for m88k host.
+       * trampoline/configure.ac: Don't test for m88k host.
+       * callback/vacall_r/Makefile.devel (vacall-m88k.s): Remove target.
+       * callback/vacall_r/vacall-m88k.s: Remove file.
+       * callback/vacall_r/Makefile.in (vacall-m88k.lo): Remove target.
+       (SOURCE_FILES): Remove vacall-m88k.[cs].
+       * callback/vacall_r/vacall_r.h.in: Remove defined(__m88k__) conditionals.
+       * callback/trampoline_r/Makefile.devel (proto-m88k.s, tramp-m88k.s): Remove targets.
+       * callback/trampoline_r/proto-m88k.s: Remove file.
+       * callback/trampoline_r/tramp-m88k.s: Remove file.
+       * callback/trampoline_r/proto.c: Remove defined(__m88k__) conditional.
+       * callback/trampoline_r/trampoline.c: Remove defined(__m88k__), HAVE_SYS_M88KBCS_H conditionals.
+       * callback/trampoline_r/trampoline_r.h.in: Don't test for m88k host.
+       * callback/trampoline_r/test1.c: Remove defined(__m88k__) conditionals.
+       * callback/trampoline_r/configure.ac: Don't test for m88k host.
+       * callback/call-used-registers.txt: Update.
+       * callback/elf-hack.txt: Update.
+       * common/reg-struct-return.txt: Update.
+       * PLATFORMS, **/PLATFORMS: Update.
+       * README: Update.
+       * autogen.sh: Don't copy vacall-m88k.c.
+       * Makefile.in (COPIED_FILES): Remove callback/vacall_r/vacall-m88k.c.
+
+2017-01-08  Bruno Haible  <bruno@clisp.org>
+
+       Fix last commit.
+       * common/asm-x86_64.sh: Escape '&' characters in replacement string.
+
+2017-01-03  Bruno Haible  <bruno@clisp.org>
+
+       Add support for the Mac OS X 10.5 / x86_64 platform.
+       * common/asm-x86_64.sh: Disable the frame info for exception handlers
+       on Mac OS X.
+       * avcall/avcall-x86_64-macro.S: Regenerated.
+       * vacall/vacall-x86_64-macro.S: Likewise.
+       * callback/vacall_r/vacall-x86_64-macro.S: Likewise.
+       * m4/mmap.m4 (FFCALL_MMAP): Renamed from CL_MMAP. Remove AC_BEFORE
+       invocations. Test mmap without MAP_FIXED only. Don't define
+       HAVE_MMAP_DEVZERO_SUN4_29.
+       * m4/mprotect.m4 (FFCALL_MPROTECT): Renamed from CL_MPROTECT. Update
+       dependency.
+       * m4/getpagesize.m4 (CL_GETPAGESIZE): Remove AC_BEFORE invocations.
+       * m4/general.m4 (FFCALL_COMMON_TRAMPOLINE): Update dependencies.
+
+2017-01-02  Bruno Haible  <bruno@clisp.org>
+
+       Ensure the alignment of trampolines when we use the free-list approach.
+       * trampoline/trampoline.c (alloc_trampoline): Consider TRAMP_ALIGN
+       when allocating a page of trampolines.
+       * callback/trampoline_r/trampoline.c (alloc_trampoline_r): Likewise.
+
+2017-01-02  Bruno Haible  <bruno@clisp.org>
+
+       Fix a build failure on Solaris/SPARC with newer gcc.
+       * trampoline/trampoline.c: Remove 'extern inline' declarations.
+       * callback/trampoline_r/trampoline.c: Likewise. For SPARC, declare
+       __TR_clear_cache_2, not __TR_clear_cache_4.
+       * PLATFORMS: Update.
+       * avcall/PLATFORMS: Likewise.
+       * vacall/PLATFORMS: Likewise.
+       * trampoline/PLATFORMS: Likewise.
+       * callback/PLATFORMS: Likewise.
+
+2017-01-02  Bruno Haible  <bruno@clisp.org>
+
+       Add support for the Solaris/x86 platform with cc.
+       * common/asm-i386.sh: Remove the whitespace in the second argument of
+       INSN2MOVX.
+       * vacall/vacall-i386-macro.S: Regenerated.
+       * callback/vacall_r/vacall-i386-macro.S: Likewise.
+       * avcall/Makefile.in (avcall-i386.s): Eliminate ##.
+       * vacall/Makefile.in (vacall-i386.s): Likewise.
+       * callback/vacall_r/Makefile.in (vacall-i386.s): Likewise.
+       * PLATFORMS: Update.
+       * avcall/PLATFORMS: Likewise.
+       * vacall/PLATFORMS: Likewise.
+       * trampoline/PLATFORMS: Likewise.
+       * callback/PLATFORMS: Likewise.
+
+2017-01-02  Bruno Haible  <bruno@clisp.org>
+
+       Add support for the Solaris/x86_64 platform.
+       * common/asm-x86_64.sh: Introduce ALIGN macro. Disable the frame info
+       for exception handlers on Solaris.
+       * common/asm-x86_64.h (ALIGN): New macro.
+       (FUNEND, EH_FRAME_SECTION): Define differently for Solaris.
+       * vacall/Makefile.devel (vacall-x86_64-macro.S): Don't use a #define
+       that assumes an ANSI C preprocessor.
+       * avcall/avcall-x86_64-macro.S: Regenerated.
+       * vacall/vacall-x86_64-macro.S: Likewise.
+       * callback/vacall_r/vacall-x86_64-macro.S: Likewise.
+       * avcall/Makefile.in (avcall-x86_64.s): Eliminate ##.
+       * vacall/Makefile.in (vacall-x86_64.s): Likewise.
+       * callback/vacall_r/Makefile.in (vacall-x86_64.s): Likewise.
+       * PLATFORMS: Update.
+       * avcall/PLATFORMS: Likewise.
+       * vacall/PLATFORMS: Likewise.
+       * trampoline/PLATFORMS: Likewise.
+       * callback/PLATFORMS: Likewise.
+
+2017-01-01  Bruno Haible  <bruno@clisp.org>
+
+       Assume ANSI C in the documentation.
+       * vacall/vacall.{3,html}: Use ANSI C declaration syntax. Stop
+       mentioning <varargs.h>. Reference stdarg(3).
+       * trampoline/trampoline.{3,html}: Reference stdarg(3).
+       * callback/callback.{3,html}: Use ANSI C declaration syntax. Stop
+       mentioning <varargs.h>.
+       * callback/trampoline_r/trampoline_r.{3,html}: Reference stdarg(3).
+
+2017-01-01  Bruno Haible  <bruno@clisp.org>
+
+       Support the CPPFLAGS configure variable.
+       * avcall/Makefile.in (CPPFLAGS): New variable.
+       Use it in all .c file compilations.
+       * vacall/Makefile.in (CPPFLAGS): New variable.
+       Use it in all .c file compilations.
+       * trampoline/Makefile.in (CPPFLAGS): New variable.
+       Use it in all .c file compilations.
+       * callback/Makefile.in (CPPFLAGS): New variable.
+       Use it in all .c file compilations.
+       * callback/vacall_r/Makefile.in (CPPFLAGS): New variable.
+       Use it in all .c file compilations.
+       * callback/trampoline_r/Makefile.in (CPPFLAGS): New variable.
+       Use it in all .c file compilations.
+
+2017-01-01  Bruno Haible  <bruno@clisp.org>
+
+       Add option --disable-elf-hack to disable the ELF workaround.
+       * m4/binfmt-elf.m4 (FFCALL_BINFMT_ELF_OPTION): New macro.
+       (FFCALL_BINFMT_ELF): Require it. Set BINFMT_ELF to false and define
+       BINFMT_ELF to 0 if --disable-elf-hack was specified.
+       * configure.ac: Invoke FFCALL_BINFMT_ELF_OPTION.
+       * callback/configure.ac: Likewise.
+       * callback/elf-hack.txt: Explain how to use --disable-elf-hack for
+       testing.
+
+2017-01-01  Bruno Haible  <bruno@clisp.org>
+
+       Generic workaround against the ELF symbol resolving routine.
+       Reported for x86_64 by Andrey Kutejko <andy128k@gmail.com>
+       at https://savannah.gnu.org/bugs/?32466 .
+       * m4/binfmt-elf.m4: New file.
+       * Makefile.in (SOURCE_FILES): Add it.
+       * callback/elf-hack.txt: New file.
+       * callback/test1.c: New file.
+       * callback/Makefile.in (SOURCE_FILES): Add both.
+       (test1.o, test1): New targets.
+       (check): Also run test1.
+       (MOSTLYCLEANFILES): Add test1.o, test1.
+       * callback/trampoline_r/configure.ac: Invoke FFCALL_BINFMT_ELF.
+       * callback/trampoline_r/Makefile.devel: Update the paths to the cross
+       assemblers.
+       * callback/trampoline_r/tramp-*.s: Add a 'trampelf' function.
+       * callback/trampoline_r/tramp-*.S: Likewise.
+       * callback/trampoline_r/tramp-*.o: Regenerated.
+       * callback/trampoline_r/trampoline.c: Implement alternate trampolines on
+       platforms with BINFMT_ELF.
+       * callback/trampoline_r/test1.c: Skip the test if BINFMT_ELF.
+       * callback/vacall_r/configure.ac: Invoke FFCALL_BINFMT_ELF.
+       * callback/vacall_r/elfhack-alpha.S: New file.
+       * callback/vacall_r/elfhack-alpha.sed: New file.
+       * callback/vacall_r/elfhack-arm.S: New file.
+       * callback/vacall_r/elfhack-arm.sed: New file.
+       * callback/vacall_r/elfhack-i386.S: New file.
+       * callback/vacall_r/elfhack-i386.sed: New file.
+       * callback/vacall_r/elfhack-m68k.S: New file.
+       * callback/vacall_r/elfhack-m68k.sed: New file.
+       * callback/vacall_r/elfhack-mips.S: New file.
+       * callback/vacall_r/elfhack-mips.sed: New file.
+       * callback/vacall_r/elfhack-mips64.S: New file.
+       * callback/vacall_r/elfhack-mips64.sed: New file.
+       * callback/vacall_r/elfhack-powerpc.S: New file.
+       * callback/vacall_r/elfhack-powerpc.sed: New file.
+       * callback/vacall_r/elfhack-powerpc64le.S: New file.
+       * callback/vacall_r/elfhack-powerpc64le.sed: New file.
+       * callback/vacall_r/elfhack-s390.S: New file.
+       * callback/vacall_r/elfhack-s390.sed: New file.
+       * callback/vacall_r/elfhack-x86_64.S: New file.
+       * callback/vacall_r/elfhack-x86_64.sed: New file.
+       * callback/vacall_r/Makefile.devel (vacall-i386-macro.S): Insert an
+       include of elfhack-i386.S.
+       (vacall-m68k.mit.S, vacall-m68k-netbsd-macro.S): Insert an include of
+       elfhack-m68k.S.
+       (vacall-mips-macro.S, vacall-mipsn32-macro.S): Insert an include of
+       elfhack-mips.S.
+       (vacall-mips64-macro.S): Insert an include of elfhack-mips64.S.
+       (vacall-alpha-macro.S): Renamed from vacall-alpha.s. Insert an include
+       of elfhack-alpha.S.
+       (vacall-arm-macro.S): Insert an include of elfhack-arm.S.
+       (vacall-armel-macro.S): Renamed from vacall-armel.s. Insert an include
+       of asm-arm.h and elfhack-arm.S.
+       (vacall-powerpc-linux-macro.S, vacall-powerpc-netbsd-macro.S): New
+       targets.
+       (vacall-powerpc-sysv4-macro.S): Renamed from vacall-powerpc-sysv4.s.
+       Insert an include of elfhack-powerpc.S.
+       (vacall-powerpc64le-macro.S): Renamed from vacall-powerpc64le.s. Insert
+       an include of elfhack-powerpc64.S.
+       (vacall-x86_64-macro.S): Insert an include of elfhack-x86_64.S.
+       (vacall-s390-macro.S): New target.
+       * callback/vacall_r/vacall-alpha-macro.S: Renamed from
+       callback/vacall_r/vacall-alpha.s. Include elfhack-alpha.S.
+       * callback/vacall_r/vacall-arm-macro.S: Include elfhack-arm.S.
+       * callback/vacall_r/vacall-armel-macro.S: Renamed from
+       callback/vacall_r/vacall-armel.s. Include asm-arm.h and elfhack-arm.S.
+       * callback/vacall_r/vacall-i386-macro.S: Include elfhack-i386.S.
+       * callback/vacall_r/vacall-m68k.mit.S: Include elfhack-m68k.S.
+       * callback/vacall_r/vacall-m68k-netbsd-macro.S: Likewise.
+       * callback/vacall_r/vacall-mips-macro.S: Include elfhack-mips.S.
+       * callback/vacall_r/vacall-mipsn32-macro.S: Likewise.
+       * callback/vacall_r/vacall-mips64-macro.S: Include elfhack-mips64.S.
+       * callback/vacall_r/vacall-powerpc-linux-macro.S: Generated, to include
+       elfhack-powerpc.S.
+       * callback/vacall_r/vacall-powerpc-netbsd-macro.S: Generated, to include
+       elfhack-powerpc.S.
+       * callback/vacall_r/vacall-powerpc-sysv4-macro.S: Renamed from
+       callback/vacall_r/vacall-powerpc-sysv4.s. Include elfhack-powerpc.S.
+       * callback/vacall_r/vacall-powerpc64le-macro.S: Renamed from
+       callback/vacall_r/vacall-powerpc64le.s. Include elfhack-powerpc64le.S.
+       * callback/vacall_r/vacall-s390-linux.s: Renamed from
+       callback/vacall_r/vacall-s390.s.
+       * callback/vacall_r/vacall-s390-macro.S: Generated, to include
+       elfhack-s390.S.
+       * callback/vacall_r/vacall-x86_64-macro.S: Include elfhack-x86_64.S.
+       * callback/vacall_r/Makefile.in (ASPFLAGS): Conditionally define
+       BINFMT_ELF.
+       (vacall-i386.s, vacall-m68k.s, vacall-mips.s, vacall-mipsn32.s,
+       vacall-mips64.s): Add a -I option for elfhack-*.S.
+       (vacall-alpha.s): New target.
+       (vacall-alpha.lo): Depend on it.
+       (vacall-arm.s): Add a -I option for elfhack-*.S.
+       (vacall-armel.s): New target.
+       (vacall-armel.lo): Depend on it.
+       (vacall-powerpc.s): For the linux, netbsd, sysv4 syntaxes, use the
+       corresponding *.S file.
+       (vacall-powerpc64le.s): New target.
+       (vacall-powerpc64le.lo): Depend on it.
+       (vacall-x86_64.s): Add a -I option for elfhack-*.S.
+       (vacall-s390.s): New target.
+       (vacall-s390.lo): Depend on it.
+       (clean): Remove also vacall-alpha.s, vacall-armel.s,
+       vacall-powerpc64le.s, vacall-s390.s.
+       (SOURCE_FILES): Update for the renamed files. Add
+       vacall-powerpc-linux-macro.S, vacall-powerpc-netbsd-macro.S,
+       vacall-s390-macro.S, elfhack-*.S, elfhack-*.sed.
+       * README: Clarify on which platforms the problem with the ELF symbol
+       resolving routine still exists.
+
+2016-12-31  Bruno Haible  <bruno@clisp.org>
+
+       Update doc about available registers.
+       * callback/call-used-registers.txt: Clarify call-used registers versus
+       registers available for use in trampolines.
+       * trampoline/tramp-powerpc-old.s: Mark as obsolete.
+       * callback/trampoline_r/tramp-powerpc-old.s: Likewise.
+       * trampoline/tramp-x86_64.s: Fix comment about available registers.
+       * callback/trampoline_r/tramp-x86_64.s: Likewise.
+       * trampoline/tramp-powerpc-sysv4.s: Likewise.
+       * callback/trampoline_r/tramp-powerpc-sysv4.s: Likewise.
+       * trampoline/tramp-*.s: Update comment about available registers.
+       * trampoline/tramp-*.S: Likewise.
+       * callback/trampoline_r/tramp-*.s: Likewise.
+       * callback/trampoline_r/tramp-*.S: Likewise.
+
+2016-12-31  Bruno Haible  <bruno@clisp.org>
+
+       Simplify powerpc compilation rules.
+       * avcall/Makefile.in (avcall-powerpc.s): New rule.
+       (avcall-powerpc.lo): Depend on it. Remove libtool specific workaround.
+       (clean): Remove also avcall-powerpc.s.
+       * vacall/Makefile.in (vacall-powerpc.s): New rule.
+       (vacall-powerpc.o): Depend on it.
+       (clean): Remove also vacall-powerpc.s.
+       * callback/vacall_r/Makefile.in (vacall-powerpc.s): New rule.
+       (vacall-powerpc.lo): Depend on it. Remove libtool specific workaround.
+       (clean): Remove also vacall-powerpc.s.
+
+2016-12-29  Bruno Haible  <bruno@clisp.org>
+
+       Revert "Pass the environment argument through the stack, not in a
+       register." commit from 1999-06-01.
+       * vacall/vacall-i386.c: Revert: Allow use of registers %esi, %edi, %ebp.
+       Expect env in %ecx, not as first stack argument.
+       * vacall/vacall-i386-macro.S: Revert.
+       * callback/vacall_r/vacall-i386-macro.S: Revert.
+       * callback/trampoline_r/proto.c (tramp2): Remove function.
+       * callback/trampoline_r/proto-i386.s: Revert accordingly.
+       * callback/trampoline_r/tramp-i386.s: Put the data in %ecx, not as
+       first stack argument.
+       * callback/trampoline_r/trampoline.c [i386]: Revert to simple
+       trampoline.
+       * callback/trampoline_r/test1.c (f) [i386]: Expect env in %ecx, not as
+       first stack argument.
+
+2016-12-29  Bruno Haible  <bruno@clisp.org>
+
+       Revert "Never build shared libraries: --enable-shared has no effect."
+       commit from 2012-04-24.
+       * README: Revert, but still recommend --disable-shared.
+       * avcall/Makefile.in (libavcall.la): Don't pass -static to libtool.
+       * callback/Makefile.in (libcallback.la): Likewise.
+       * callback/vacall_r/Makefile.in (libvacall.la): Likewise.
+       * callback/trampoline_r/Makefile.in (libtrampoline.la): Likewise.
+
+2016-12-30  Bruno Haible  <bruno@clisp.org>
+
+       Rename text files.
+       * common/reg-struct-return.txt: Renamed from common/reg-struct-return.
+       * callback/call-used-registers.txt: Renamed from
+       callback/call-used-registers.
+       * trampoline/PORTING: Update.
+       * callback/README: Likewise.
+
+2016-12-29  Bruno Haible  <bruno@clisp.org>
+
+       Update documentation about register usage.
+       * callback/call-used-registers: Update regarding powerpc/NetBSD.
+
+2016-12-29  Bruno Haible  <bruno@clisp.org>
+
+       Remove support for the 'convex' CPU.
+       * avcall/Makefile.devel (avcall-convex.s, tests-convex.s): Remove
+       targets.
+       * avcall/avcall-convex.[cs]: Remove files.
+       * avcall/Makefile.in (avcall-convex.lo): Remove target.
+       (SOURCE_FILES): Remove avcall-convex.[cs].
+       * avcall/avcall.h.in: Remove defined(__convex__) conditionals.
+       * vacall/Makefile.devel (vacall-convex.s, tests-convex.s): Remove
+       targets.
+       * vacall/vacall-convex.[cs]: Remove files.
+       * vacall/Makefile.in (vacall-convex.o): Remove target.
+       (SOURCE_FILES): Remove vacall-convex.[cs].
+       * vacall/vacall.h.in: Remove defined(__convex__) conditionals.
+       * trampoline/Makefile.devel (proto-convex.s, cache-convex.s,
+       tramp-convex.s): Remove targets.
+       * trampoline/proto-convex.s: Remove file.
+       * trampoline/cache-convex.[cs]: Remove files.
+       * trampoline/tramp-convex.s: Remove file.
+       * trampoline/Makefile.in (cache-convex.o): Remove target.
+       (SOURCE_FILES): Remove cache-convex.[cs].
+       * trampoline/cache.c: Remove defined(__convex__) conditionals.
+       * trampoline/protexec.c: Remove defined(__convex__) conditionals.
+       * trampoline/trampoline.c: Remove defined(__convex__) conditionals.
+       * trampoline/trampoline.h.in: Don't test for convex host.
+       * trampoline/configure.ac: Don't test for convex host.
+       * callback/vacall_r/Makefile.devel (vacall-convex.s): Remove target.
+       * callback/vacall_r/vacall-convex.s: Remove file.
+       * callback/vacall_r/Makefile.in (vacall-convex.lo): Remove target.
+       (SOURCE_FILES): Remove vacall-convex.[cs].
+       * callback/vacall_r/vacall_r.h.in: Remove defined(__convex__)
+       conditionals.
+       * callback/trampoline_r/Makefile.devel (proto-convex.s, cache-convex.s,
+       tramp-convex.s): Remove targets.
+       * callback/trampoline_r/proto-convex.s: Remove file.
+       * callback/trampoline_r/tramp-convex.s: Remove file.
+       * callback/trampoline_r/Makefile.in (cache-convex.lo): Remove target.
+       (SOURCE_FILES): Remove cache-convex.[cs].
+       * callback/trampoline_r/proto.c: Remove defined(__convex__)
+       conditionals.
+       * callback/trampoline_r/trampoline.c: Remove defined(__convex__)
+       conditionals.
+       * callback/trampoline_r/trampoline_r.h.in: Don't test for convex host.
+       * callback/trampoline_r/test1.c: Remove defined(__convex__)
+       conditionals.
+       * callback/trampoline_r/configure.ac: Don't test for convex host.
+       * callback/call-used-registers: Update.
+       * common/reg-struct-return: Update.
+       * PLATFORMS, **/PLATFORMS: Update.
+       * autogen.sh: Don't copy vacall-convex.c, cache-convex.[cs].
+       * Makefile.in (COPIED_FILES): Remove callback/vacall_r/vacall-convex.c,
+       callback/trampoline_r/cache-convex.[cs].
+
+2016-12-29  Bruno Haible  <bruno@clisp.org>
+
+       Fix collision between different copies of __structcpy.
+       Reported in https://savannah.gnu.org/bugs/?23474 .
+       * avcall/avcall-structcpy.c: New file.
+       * avcall/Makefile.in (avcall-structcpy.lo): Renamed from structcpy.lo.
+       (SOURCE_FILES): Add avcall-structcpy.c.
+       * avcall/Makefile.mingw32 (avcall-structcpy.o): Renamed from
+       structcpy.o.
+       * avcall/Makefile.msvc (avcall-structcpy.obj): Renamed from
+       structcpy.obj.
+       * avcall/avcall.h.in: Declare and use avcall_structcpy instead of
+       __structcpy.
+       * avcall/README: Update.
+       * vacall/vacall-structcpy.c: New file.
+       * vacall/Makefile.in (vacall-structcpy.o): Renamed from structcpy.o.
+       (SOURCE_FILES): Add vacall-structcpy.c.
+       * vacall/Makefile.mingw32 (vacall-structcpy.o): Renamed from
+       structcpy.o.
+       * vacall/Makefile.msvc (vacall-structcpy.obj): Renamed from
+       structcpy.obj.
+       * vacall/vacall.h.in: Declare and use vacall_structcpy instead of
+       __structcpy.
+       * callback/vacall_r/vacall-structcpy.c: New file.
+       * callback/vacall_r/Makefile.in (vacall-structcpy.lo): Renamed from
+       structcpy.lo.
+       (SOURCE_FILES): Add vacall-structcpy.c.
+       * callback/vacall_r/Makefile.mingw32 (vacall-structcpy.o): Renamed from
+       structcpy.o.
+       * callback/vacall_r/Makefile.msvc (vacall-structcpy.obj): Renamed from
+       structcpy.obj.
+       * callback/vacall_r/vacall_r.h.in: Declare and use callback_structcpy
+       instead of __structcpy.
+       * callback/Makefile.in (libcallback.la): Use vacall-structcpy.lo, not
+       structcpy.lo.
+       * callback/Makefile.mingw32 (OBJECTS): Use vacall-structcpy.o, not
+       structcpy.o.
+       * callback/Makefile.msvc (OBJECTS): Use vacall-structcpy.obj, not
+       structcpy.obj.
+       (vacall_r/vacall-structcpy.obj): Renamed from vacall_r/structcpy.obj.
+       (clean): Update accordingly.
+
+2016-12-29  Bruno Haible  <bruno@clisp.org>
+
+       Put duplicated files under version control only once, part 2.
+       * vacall/vacall-powerpc.c: Update with the 'REENTRANT' code from
+       callback/vacall_r/.
+       * vacall/vacall-s390.c: Likewise.
+       * callback/vacall_r/vacall-alpha.c: Remove file.
+       * callback/vacall_r/vacall-arm.c: Remove file.
+       * callback/vacall_r/vacall-armel.c: Remove file.
+       * callback/vacall_r/vacall-convex.c: Remove file.
+       * callback/vacall_r/vacall-hppa.c: Remove file.
+       * callback/vacall_r/vacall-i386.c: Remove file.
+       * callback/vacall_r/vacall-ia64.c: Remove file.
+       * callback/vacall_r/vacall-m68k.c: Remove file.
+       * callback/vacall_r/vacall-m88k.c: Remove file.
+       * callback/vacall_r/vacall-mips.c: Remove file.
+       * callback/vacall_r/vacall-mipsn32.c: Remove file.
+       * callback/vacall_r/vacall-mips64.c: Remove file.
+       * callback/vacall_r/vacall-powerpc.c: Remove file.
+       * callback/vacall_r/vacall-powerpc64.c: Remove file.
+       * callback/vacall_r/vacall-powerpc64le.c: Remove file.
+       * callback/vacall_r/vacall-s390.c: Remove file.
+       * callback/vacall_r/vacall-sparc.c: Remove file.
+       * callback/vacall_r/vacall-sparc64.c: Remove file.
+       * callback/vacall_r/vacall-x86_64.c: Remove file.
+       * autogen.sh: Copy these files from vacall/.
+       * Makefile.in (COPIED_FILES): Add these files.
+
+2016-12-28  Bruno Haible  <bruno@clisp.org>
+
+       More robust quoting in Autoconf macros.
+       * configure.ac: Add brackets around Autoconf macro arguments.
+       * avcall/configure.ac: Likewise.
+       * vacall/configure.ac: Likewise.
+       * trampoline/configure.ac: Likewise.
+       * callback/configure.ac: Likewise.
+       * callback/vacall_r/configure.ac: Likewise.
+       * callback/trampoline_r/configure.ac: Likewise.
+       * m4/as-underscore.m4: Likewise.
+       * m4/cc-gcc.m4: Likewise.
+       * m4/codeexec.m4: Likewise.
+       * m4/general.m4: Likewise.
+       * m4/getpagesize.m4: Likewise.
+       * m4/ireg.m4: Likewise.
+       * m4/ln.m4: Likewise.
+       * m4/mach-vm.m4: Likewise.
+       * m4/mmap.m4: Likewise.
+       * m4/mprotect.m4: Likewise.
+       * m4/pccstruct.m4: Likewise.
+       * m4/proto.m4: Likewise.
+       * m4/shm.m4: Likewise.
+       * m4/smallstruct.m4: Likewise.
+
+2016-12-28  Bruno Haible  <bruno@clisp.org>
+
+       Update list of contributors.
+       * README: List all contributors.
+
+2016-12-28  Bruno Haible  <bruno@clisp.org>
+
+       Add support for 64-bit mode (x86_64) on Mac OS X.
+       * common/asm-x86_64.sh: New file.
+       * common/asm-x86_64.h: New file.
+       * Makefile.in (SOURCE_FILES): Add them.
+       * avcall/avcall-x86_64-linux.s: Renamed from avcall/avcall-x86_64.s.
+       * avcall/Makefile.devel (avcall-x86_64-linux.s): Renamed from avcall-x86_64.s.
+       (avcall-x86_64-macro.S): New target.
+       * avcall/avcall-x86_64-macro.S: New file, generated through avcall/Makefile.devel.
+       * avcall/Makefile.in (avcall-x86_64.s): New target.
+       (avcall-x86_64.lo): Use it, in the build dir.
+       (clean): Remove it.
+       (SOURCE_FILES): Add avcall-x86_64-linux.s, avcall-x86_64-macro.S. Remove avcall-x86_64.s.
+       * vacall/vacall-x86_64-linux.s: Renamed from vacall/vacall-x86_64.s.
+       * vacall/Makefile.devel (vacall-x86_64-linux.s): Renamed from vacall-x86_64.s.
+       (vacall-x86_64-macro.S): New target.
+       * vacall/vacall-x86_64-macro.S: New file, generated through vacall/Makefile.devel.
+       * vacall/Makefile.in (vacall-x86_64.s): New target.
+       (vacall-x86_64.o): Use it, in the build dir.
+       (clean): Remove it.
+       (SOURCE_FILES): Add vacall-x86_64-linux.s, vacall-x86_64-macro.S. Remove vacall-x86_64.s.
+       * callback/vacall_r/vacall-x86_64-linux.s: Renamed from callback/vacall_r/vacall-x86_64.s.
+       * callback/vacall_r/Makefile.devel (vacall-x86_64-linux.s): Renamed from vacall-x86_64.s.
+       (vacall-x86_64-macro.S): New target.
+       * callback/vacall_r/vacall-x86_64-macro.S: New file, generated through callback/vacall_r/Makefile.devel.
+       * callback/vacall_r/Makefile.in (vacall-x86_64.s): New target.
+       (vacall-x86_64.lo): Use it, in the build dir.
+       (clean): Remove it.
+       (SOURCE_FILES): Add vacall-x86_64-linux.s, vacall-x86_64-macro.S. Remove vacall-x86_64.s.
+       * callback/trampoline_r/test1.c (CHECK_ENV_REGISTER): New macro.
+       (f, main): Use it instead of __GNUC__.
+       * NEWS: Mention the change.
+
+2016-12-28  Bruno Haible  <bruno@clisp.org>
+
+       Rename the asm* files.
+       * common/asm-arm.h: Renamed from common/asmarm.h.
+       * common/asm-arm.sh: Renamed from common/asmarm.sh.
+       * common/asm-i386.hh: Renamed from common/asmi386.hh.
+       * common/asm-i386.sh: Renamed from common/asmi386.sh.
+       * common/asm-m68k.h: Renamed from common/asmm68k.h.
+       * common/asm-m68k.sh: Renamed from common/asmm68k.sh.
+       * common/asm-mips.h: Renamed from common/asmmips.h.
+       * common/asm-mips.sh: Renamed from common/asmmips.sh.
+       * common/asm-sparc.h: Renamed from common/asmsparc.h.
+       * common/asm-sparc.sh: Renamed from common/asmsparc.sh.
+       * common/asm-sparc64.sh: Renamed from common/asmsparc64.sh.
+       * **/Makefile.devel, **/*.S: Update.
+       * Makefile.maint (common/asm-i386.h): Renamed from common/asmi386.h.
+       * Makefile.in (SOURCE_FILES, GENERATED_FILES): Update.
+
+2016-12-27  Bruno Haible  <bruno@clisp.org>
+
+       Add the real source of asmi386.h.
+       * common/asmi386.hh: New file, from GNU clisp.
+       * common/asmi386.h: Remove file.
+       * Makefile.maint (common/asmi386.h): New target. Rule copied from
+       GNU clisp's Makefile.devel.
+       (all): Depend on it.
+       * Makefile.in (SOURCE_FILES): Add common/asmi386.hh. Remove
+       common/asmi386.h.
+       (GENERATED_FILES): Add common/asmi386.h.
+
+2016-12-27  Bruno Haible  <bruno@clisp.org>
+
+       Modernize Cygwin detection.
+       * common/asmi386.h: Test __CYGWIN__, not __CYGWIN32__.
+       From Ken Brown <kbrown@cornell.edu> on 2015-03-05.
+
+2016-12-27  Bruno Haible  <bruno@clisp.org>
+
+       Create tarballs through an Automake-like "make dist" command.
+       * Makefile.in (SOURCE_FILES, LIBTOOL_IMPORTED_FILES,
+       GNULIB_IMPORTED_FILES, IMPORTED_FILES, COPIED_FILES, GENERATED_FILES,
+       DISTFILES): New macros.
+       (distdir): New target.
+       (PACKAGE, VERSION, TAR, GZIP): New macros.
+       (dist): New target.
+       * avcall/Makefile.in (SOURCE_FILES, GENERATED_FILES, DISTFILES): New
+       macros.
+       (distdir): New target.
+       * vacall/Makefile.in (SOURCE_FILES, GENERATED_FILES, DISTFILES): New
+       macros.
+       (distdir): New target.
+       * trampoline/Makefile.in (SOURCE_FILES, GENERATED_FILES, DISTFILES):
+       New macros.
+       (distdir): New target.
+       * callback/Makefile.in (SOURCE_FILES, GENERATED_FILES, DISTFILES): New
+       macros.
+       (distdir): New target.
+       * callback/vacall_r/Makefile.in (SOURCE_FILES, GENERATED_FILES,
+       DISTFILES): New macros.
+       (distdir): New target.
+       * callback/trampoline_r/Makefile.in (SOURCE_FILES, GENERATED_FILES,
+       DISTFILES): New macros.
+       (distdir): New target.
+       * configure.ac (extrasub): Replace all occurrences of @subdir@.
+       * callback/configure.ac (extrasub): Likewise.
+
+2016-12-27  Bruno Haible  <bruno@clisp.org>
+
+       Bump version number.
+       * VERSION: Set to 0x010D (= 1.13).
+
+2016-12-27  Bruno Haible  <bruno@clisp.org>
+
+       Rename each configure.in to configure.ac.
+       * configure.ac: Renamed from configure.in.
+       * avcall/configure.ac: Renamed from avcall/configure.in.
+       * vacall/configure.ac: Renamed from vacall/configure.in.
+       * trampoline/configure.ac: Renamed from trampoline/configure.in.
+       * callback/configure.ac: Renamed from callback/configure.in.
+       * callback/vacall_r/configure.ac: Renamed from
+       callback/vacall_r/configure.in.
+       * callback/trampoline_r/configure.ac: Renamed from
+       callback/trampoline_r/configure.in.
+       * Makefile.maint (ALL_CONFIGURE_AC): Renamed from ALL_CONFIGURE_IN.
+       (aclocal.m4, configure, %/configure, %/config.h.in): Update.
+       * README, */README: Update.
+
+2016-12-27  Bruno Haible  <bruno@clisp.org>
+
+       Modernize quoting.
+       * NEWS: Quote ‘like this’, not `like this'.
+       * README.os2: Likewise.
+       * common/uniq-u.c: Likewise.
+       * avcall/DOC: Likewise.
+       * avcall/avcall-i386.c: Likewise.
+       * avcall/avcall-sparc.c: Likewise.
+       * avcall/avcall-sparc64.c: Likewise.
+       * avcall/avcall.h.in: Likewise.
+       * avcall/avcall.html: Likewise.
+       * vacall/vacall.h.in: Likewise.
+       * callback/trampoline_r/trampoline.c: Likewise.
+       * callback/trampoline_r/trampoline_r.h.in: Likewise.
+       * trampoline/PORTING: Likewise.
+       * trampoline/trampoline.c: Likewise.
+       * trampoline/trampoline.h.in: Likewise.
+       * callback/vacall_r/vacall_r.h.in: Likewise.
+       * configurations/README: Likewise.
+       * avcall/Makefile.maint (ROFF_MAN): Produce UTF-8 output instead of
+       ASCII output.
+       * vacall/Makefile.maint (ROFF_MAN): Likewise.
+       * trampoline/Makefile.maint (ROFF_MAN): Likewise.
+       * callback/Makefile.maint (ROFF_MAN): Likewise.
+       * callback/trampoline_r/Makefile.maint (ROFF_MAN): Likewise.
+
+2016-12-27  Bruno Haible  <bruno@clisp.org>
+
+       Avoid unnecessary recursion in "make maintainer-clean".
+       * Makefile.in (DISTCLEANFILES): New variable.
+       (distclean, maintainer-clean): Use it.
+       * callback/Makefile.in (DISTCLEANFILES): New variable.
+       (distclean): Use it. Don't depend on 'clean'. Instead, use
+       MOSTLYCLEANDIRS, MOSTLYCLEANFILES.
+       (maintainer-clean): Don't depend on 'distclean'. Instead, use
+       MOSTLYCLEANDIRS, MOSTLYCLEANFILES, DISTCLEANFILES.
+       (distclean-subdirs, maintainerclean-subdirs): Inline and remove targets.
+
+2016-12-27  Bruno Haible  <bruno@clisp.org>
+
+       Make "make mostlyclean" act like "make clean".
+       * callback/Makefile.in (MOSTLYCLEANDIRS, MOSTLYCLEANFILES): New
+       variables.
+       (mostlyclean, clean): Use them.
+       (clean-subdirs): Inline and remove target.
+
+2016-12-27  Bruno Haible  <bruno@clisp.org>
+
+       Fix Makefile rules for powerpc64, from 2006-04-27.
+       * trampoline/Makefile.in (clean): Also remove tramp-powerpc64.s.
+       * callback/trampoline_r/Makefile.in (clean): Likewise.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Reorder Makefile targets.
+       * trampoline/Makefile.in: Reorder.
+       * callback/trampoline_r/Makefile.in: Reorder.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Fix Makefile rules for powerpc64le, from 2015-08-23.
+       * trampoline/Makefile.devel (CPP): New variable.
+       (tramp-powerpc64le.o, tramp-powerpc64le.s): New targets.
+       * trampoline/Makefile.in (tramp-powerpc64le.o, tramp-powerpc64le.s):
+       Remove targets.
+       * callback/trampoline_r/Makefile.devel (CPP): New variable.
+       (tramp-powerpc64le.o, tramp-powerpc64le.s): New targets.
+       * callback/trampoline_r/Makefile.in (tramp-powerpc64le.lo,
+       tramp-powerpc64le.s): Remove targets.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Fix Makefile rules for s390, from 2002-03-24.
+       * trampoline/Makefile.devel (tramp-s390.o): New target.
+       * trampoline/Makefile.in (tramp-s390.o): Remove target.
+       * callback/trampoline_r/Makefile.devel (tramp-s390.o): New target.
+       * callback/trampoline_r/Makefile.in (tramp-s390.lo): Remove target.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Fix "make distclean".
+       * avcall/Makefile.in (distclean): Also remove config.h.
+       * callback/Makefile.in (distclean): Likewise.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Make it possible to build in $(srcdir) on case-insensitive file systems.
+       * avcall/avcall-${cpu}-macro.S: Renamed from avcall/avcall-${cpu}.S.
+       * avcall/Makefile.devel: Update accordingly.
+       * avcall/Makefile.in: Likewise.
+       * vacall/vacall-${cpu}-macro.S: Renamed from vacall/vacall-${cpu}.S.
+       * vacall/Makefile.devel: Update accordingly.
+       * vacall/Makefile.in: Likewise.
+       * trampoline/cache-sparc-macro.S: Renamed from trampoline/cache-sparc.S.
+       * trampoline/Makefile.devel: Update accordingly.
+       * trampoline/Makefile.in: Update accordingly.
+       * callback/vacall_r/vacall-${cpu}-macro.S: Renamed from
+       callback/vacall_r/vacall-${cpu}.S.
+       * callback/vacall_r/Makefile.devel: Update accordingly.
+       * callback/vacall_r/Makefile.in: Likewise.
+       * callback/trampoline_r/cache-sparc-macro.S: Renamed from
+       callback/trampoline_r/cache-sparc.S.
+       * callback/trampoline_r/Makefile.devel: Update accordingly.
+       * callback/trampoline_r/Makefile.in: Update accordingly.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Simplify armel build rule.
+       * avcall/Makefile.devel (avcall-armel.s): Renamed from avcall-armel.S.
+       Simplify.
+       * avcall/Makefile.in (avcall-armel.lo): Use $(srcdir)/avcall-armel.s.
+       (avcall-armel.s): Remove target.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Put duplicated files under version control only once.
+       * autogen.sh: Copy some files from trampoline/ to callback/trampoline_r.
+       * common/asm*.sh: Moved here from avcall/, vacall/, callback/vacall_r.
+       * common/asm*.h: Likewise.
+       * common/reg-struct-return: Likewise.
+       * common/structcpy.c: Likewise.
+       * common/uniq-u.c: Moved here from avcall/, vacall/, callback/.
+       * avcall/Makefile.devel: Update paths of asm*.sh.
+       * avcall/Makefile.in: Add -I options for asm*.h. Update path of structcpy.c.
+       * avcall/Makefile.mingw32: Likewise.
+       * avcall/Makefile.msvc: Likewise. Update path of uniq-u.c.
+       * vacall/Makefile.devel: Update paths of asm*.sh.
+       * vacall/Makefile.in: Add -I options for asm*.h. Update path of structcpy.c.
+       * vacall/Makefile.mingw32: Likewise.
+       * vacall/Makefile.msvc: Likewise. Update path of uniq-u.c.
+       * trampoline/Makefile.devel: Update paths of asm*.sh.
+       * trampoline/Makefile.in: Add -I options for asm*.h.
+       * callback/Makefile.msvc: Update path of uniq-u.c.
+       * callback/vacall_r/Makefile.devel: Update paths of asm*.sh.
+       * callback/vacall_r/Makefile.in: Add -I options for asm*.h. Update path of structcpy.c.
+       * callback/vacall_r/Makefile.mingw32: Likewise.
+       * callback/vacall_r/Makefile.msvc: Likewise.
+       * callback/trampoline_r/Makefile.devel: Update paths of asm*.sh.
+       * callback/trampoline_r/Makefile.in: Add -I options for asm*.h.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Fix dependencies.
+       * avcall/Makefile.devel (avcall-sparc64.S): Depend on asmsparc64.sh,
+       not asmsparc.sh.
+       * vacall/Makefile.devel (vacall-sparc64.S): Likewise.
+       * callback/vacall_r/Makefile.devel (vacall-sparc64.S): Likewise.
+       * callback/Makefile.maint (vacall_r/vacall-i386-*.c): Don't depend on
+       vacall_r/asmi386.sh.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Add missing dependency.
+       * callback/vacall_r/Makefile.devel (vacall-m68k-netbsd.S): Depend on
+       asmm68k.sh.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Switch to libtool-2.4.6.
+       * autogen.sh (LIBTOOL_VERSION): Set to 2.4.6.
+       * Makefile.maint (libtool-imported-files): Import also m4/ltoptions.m4,
+       m4/ltsugar.m4, m4/ltversion.m4, m4/lt~obsolete.m4.
+       * m4/general.m4 (FFCALL_COMMON_LIBTOOL): Invoke LT_INIT.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Switch to autoconf 2.69 and automake 1.15.
+       * Makefile.maint (ACLOCAL, AUTOCONF, AUTOHEADER): Bump version numbers.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Remove files that can easily be autogenerated from version control.
+       * autogen.sh: New file.
+       * Makefile.maint: New file, partially inspired by Makefile.devel.
+       * Makefile.devel (all): Remove target and its subtargets.
+       * avcall/Makefile.maint: New file, extracted from avcall/Makefile.devel.
+       * avcall/Makefile.devel (precompiled): Renamed from 'all'.
+       Remove all targets that are moved to avcall/Makefile.maint.
+       * vacall/Makefile.maint: New file, extracted from vacall/Makefile.devel.
+       * vacall/Makefile.devel (precompiled): Renamed from 'all'.
+       Remove all targets that are moved to vacall/Makefile.maint.
+       * trampoline/Makefile.maint: New file, extracted from
+       trampoline/Makefile.devel.
+       * trampoline/Makefile.devel (precompiled): Renamed from 'all'.
+       Remove all targets that are moved to trampoline/Makefile.maint.
+       * callback/Makefile.maint: Renamed from callback/Makefile.devel.
+       (trampoline_r/trampoline_r.man): New target.
+       (totally-clean, force): New targets.
+       * callback/vacall_r/Makefile.maint: New file, extracted from
+       callback/vacall_r/Makefile.devel.
+       * callback/vacall_r/Makefile.devel (precompiled): Renamed from 'all'.
+       Remove all targets that are moved to callback/vacall_r/Makefile.maint.
+       (vacall_r.man): Remove target.
+       * callback/trampoline_r/Makefile.maint: New file, extracted from
+       callback/trampoline_r/Makefile.devel.
+       * callback/trampoline_r/Makefile.devel (precompiled): Renamed from
+       'all'.
+       Remove all targets that are moved to
+       callback/trampoline_r/Makefile.maint.
+
+2016-12-26  Bruno Haible  <bruno@clisp.org>
+
+       Remove test result files from version control.
+       * callback/trampoline_r/tests.passed.i386-pc-win32-gcc: Remove file.
+
+2015-08-23  Hernán Erasmo  <dherasmo@gmail.com>
+
+       Added compatibility with ppc64le architecture. Credit goes
+       to Masanori Mitsugi <mitsugi@linux.vnet.ibm.com>
+
+2012-04-24  Sam Steingold  <sds@gnu.org>
+
+       Never build shared libraries: --enable-shared has no effect.
+       * avcall/Makefile.in (libavcall.la): pass -static to LIBTOOL_LINK
+       * callback/Makefile.in (libcallback.la): ditto
+       * callback/trampoline_r/Makefile.in (libtrampoline.la): ditto
+       * callback/vacall_r/Makefile.in (libvacall.la): ditto
+
+2010-09-03  Sam Steingold  <sds@gnu.org>
+
+       * configure.in: call AC_CONFIG_AUX_DIR(build-aux)
+
+2010-09-03  Sam Steingold  <sds@gnu.org>
+
+       * Makefile.devel (gnulib-imported): also import host-cpu-c-abi
+       * avcall/configure.in, callback/configure.in:
+       * callback/trampoline_r/configure.in, callback/vacall_r/configure.in:
+       * trampoline/configure.in, vacall/configure.in:
+       use gl_HOST_CPU_C_ABI instead of FFCALL_CANONICAL_HOST_CPU
+       * m4/general.m4: remove FFCALL_CANONICAL_HOST_CPU,
+       FFCALL_CACHE_EGREP_CPP, FFCALL_SET_CPU_ABI
+       * glm4/host-cpu-c-abi.m4: add
+       * avcall/Makefile.in, callback/Makefile.in:
+       * callback/trampoline_r/Makefile.in, callback/vacall_r/Makefile.in:
+       * trampoline/Makefile.in, vacall/Makefile.in,
+       use @HOST_CPU_C_ABI@ instead of @host_cpu_abi@
+       * callback/trampoline_r/configure.in, trampoline/configure.in:
+       * m4/codeexec.m4: use $HOST_CPU_C_ABI instead of $host_cpu_abi
+
+2010-07-20  Sam Steingold  <sds@gnu.org>
+
+       * callback/trampoline_r/trampoline_r.h.in, trampoline/trampoline.h.in:
+       add autoconf CPU detection block; this fixes trampoline on sparc64/linux
+       Suggested by Valeriy E. Ushakov <uwe@netbsd.org>
+
+2010-07-20  Valeriy E. Ushakov  <uwe@netbsd.org>
+
+       https://savannah.gnu.org/bugs/?22081
+       support sparc64 for solaris & *bsd
+       * avcall/avcall-sparc64.c, avcall/avcall.h.in:
+       Kill callee (%g2). Sparc64 doesn't need that code.
+       Delete space[] - gcc optimizes it away anyway, and it doesn't
+       guarantee correct operation even if it's not removed - if compiler
+       allocs it below other local vars on the stack, then calling
+       function with enough arguments will clobber local vars.
+       Instead i've changed the code to use alloca, see the comment in
+       the code for details on why this works. It also doesn't waste 2K
+       of stack on each call, we only grab the space we actually need.
+       I nuked farg_mask. It's not necessary for float args, marking
+       them in darg_mask does the right thing (new av_float). And they
+       just hurt structure passing, where, again, marking up darg_mask
+       does the right thing.
+       * avcall/avcall-saprc64.S: Regenerated with NetBSD gcc4
+       * vacall/vacall-sparc64.S, callback/vacall_r/vacall-sparc64.S:
+       New binutils on sparc64 insist on having global registers properly
+       declared with .register. I've just added the declarations manually
+       w/out actually regenerating the files to demonstrate that's the
+       only change needed there. IF the files are regenerated with a
+       newer compiler you will get them automatically.
+
+2009-11-10  Sam Steingold  <sds@gnu.org>
+
+       * vacall/Makefile.in (vacall-armel.o): vacall-armel.s is in $(srcdir)
+       * callback/vacall_r/Makefile.in (vacall-armel.lo): ditto
+
+2009-10-16  Sam Steingold  <sds@gnu.org>
+
+       the final fix for LIBFFCALL_VERSION
+       * Makefile.devel (vacall/vacall.h.msvc, vacall/vacall.h.mingw32)
+       (callback/vacall_r/vacall_r.h.msvc)
+       (callback/vacall_r/vacall_r.h.mingw32): depend on VERSION
+       * avcall/avcall.h.in, callback/callback.h.in,
+       * callback/trampoline_r/trampoline_r.h.in, vacall/vacall.h.in,
+       * callback/vacall_r/vacall_r.h.in, trampoline/trampoline.h.in:
+       use @LIBFFCALL_VERSION@ instead of @PACKAGE_VERSION@
+       * avcall/configure.in: additional processing for avcall.h to
+       substitute @LIBFFCALL_VERSION@
+       * callback/configure.in: ditto for callback.h
+       * callback/trampoline_r/configure.in: ditto for trampoline_r.h
+       * callback/vacall_r/configure.in: ditto for vacall_r.h
+       * trampoline/configure.in: ditto for trampoline.h
+       * vacall/configure.in: ditto for vacall.h
+       * callback/vacall_r/Makefile.devel (vacall_r.h.msvc)
+       (vacall_r.h.mingw32): depend on ../../VERSION;
+       substitute @LIBFFCALL_VERSION@
+       * vacall/Makefile.devel (vacall.h.msvc, vacall.h.mingw32): depend
+       on ../VERSION; substitute @LIBFFCALL_VERSION@
+
+2009-10-16  Sam Steingold  <sds@gnu.org>
+
+       * glm4/longlong.m4, glm4/nocrash.m4: update from gnulib
+
+2009-10-16  Sam Steingold  <sds@gnu.org>
+
+       * Makefile.devel (update-gnulib): use git when available
+
+2009-10-16  Sam Steingold  <sds@gnu.org>
+
+       * avcall/configure.in, callback/configure.in,
+       * callback/trampoline_r/configure.in, callback/vacall_r/configure.in,
+       * trampoline/configure.in, vacall/configure.in: list the main generated
+       header (avcall.h et al) in AC_CONFIG_HEADERS, not in AC_CONFIG_FILES
+       fixes the bug#27706 (introduced on 2009-04-24)
+
+2009-04-28  Sam Steingold  <sds@gnu.org>
+
+       * m4/general.m4 (FFCALL_CACHE_EGREP_CPP, FFCALL_SET_CPU_ABI):
+       abstracted out of FFCALL_CANONICAL_HOST_CPU
+       (FFCALL_CANONICAL_HOST_CPU): use them
+
+2009-04-27  Max Lapan  <max.lapan@gmail.com>
+       Sam Steingold  <sds@gnu.org>
+
+       * avcall/Makefile.devel, avcall/Makefile.in, avcall/avcall.h.in,
+       * callback/trampoline_r/Makefile.devel,
+       * callback/trampoline_r/Makefile.in,
+       * callback/trampoline_r/configure.in,
+       * callback/vacall_r/Makefile.devel, callback/vacall_r/Makefile.in,
+       * callback/vacall_r/vacall_r.h.in, trampoline/Makefile.devel,
+       * trampoline/Makefile.in, trampoline/configure.in,
+       * vacall/Makefile.devel, vacall/Makefile.in, vacall/vacall.h.in:
+       Add ARMel support <https://savannah.gnu.org/bugs/?22492>
+       * m4/general.m4 (FFCALL_CANONICAL_HOST_CPU): use AC_EGREP_CPP to
+       distinguish between arm and armel
+       * avcall/avcall-armel.S, avcall/avcall-armel.c,
+       * callback/trampoline_r/cache-armel.c,
+       * callback/trampoline_r/cache-armel.s,
+       * callback/vacall_r/vacall-armel.c, callback/vacall_r/vacall-armel.s,
+       * trampoline/cache-armel.c, trampoline/cache-armel.s,
+       * vacall/vacall-armel.c, vacall/vacall-armel.s:
+       new files
+
+2009-04-27  Max Lapan  <max.lapan@gmail.com>
+
+       * avcall/tests.c, callback/tests.c, vacall/tests.c:
+       #include "config.h" for HAVE_LONG_LONG_INT
+
+2009-04-27  Max Lapan  <max.lapan@gmail.com>
+
+       * callback/trampoline_r/trampoline.c (is_tramp) [__arm__]:
+       fix bug in the last patch
+
+2009-04-24  Sam Steingold  <sds@gnu.org>
+
+       * avcall/configure.in, callback/configure.in,
+       * callback/trampoline_r/configure.in, callback/vacall_r/configure.in,
+       * trampoline/configure.in, vacall/configure.in:
+       use AC_CONFIG_FILES instead of AC_OUTPUT with argument
+       * Makefile.devel (aclocal.m4): adjust the grep regexp
+
+2009-04-24  Sam Steingold  <sds@gnu.org>
+
+       * Makefile.in, avcall/Makefile.in, callback/Makefile.in,
+       * callback/trampoline_r/Makefile.in, callback/vacall_r/Makefile.in,
+       * trampoline/Makefile.in, vacall/Makefile.in (datarootdir):
+       set to @datarootdir@ to avoid a configure warning
+
+2009-04-24  Sam Steingold  <sds@gnu.org>
+
+       * Makefile.devel (SUBDIRS_CONFIG_H): add avcall and callback
+
+2009-04-24  Sam Steingold  <sds@gnu.org>
+
+       * VERSION: new file
+       * configure.in: use AC_INIT with the version argument
+       * avcall/Makefile.mingw32: use sed to set LIBFFCALL_VERSION in avcall.h
+       * callback/vacall_r/Makefile.mingw32:
+       use sed to set LIBFFCALL_VERSION in vacall_r.h
+       * vacall/Makefile.mingw32: use sed to set LIBFFCALL_VERSION in vacall.h
+       * avcall/avcall.h.in, callback/callback.h.in,
+       * callback/trampoline_r/trampoline_r.h.in,
+       * callback/vacall_r/vacall_r.h.in,
+       * trampoline/trampoline.h.in, vacall/vacall.h.in:
+       (LIBFFCALL_VERSION): define to @PACKAGE_VERSION@
+       * avcall/configure.in, callback/configure.in,
+       * callback/trampoline_r/configure.in, callback/vacall_r/configure.in,
+       * trampoline/configure.in, vacall/configure.in:
+       use AC_INIT with the version argument,
+       pass [config.h] to AC_CONFIG_HEADERS
+
+2009-04-23  Sam Steingold  <sds@gnu.org>
+
+       * m4/codeexec.m4, m4/ireg.m4, m4/pccstruct.m4, m4/smallstruct.m4:
+       all 3 arguments of AC_DEFINE are now required
+
+2009-04-21  Sam Steingold  <sds@gnu.org>
+
+       * m4/as-underscore.m4, m4/codeexec.m4, m4/general.m4:
+       * m4/getpagesize.m4, m4/ireg.m4, m4/mach-vm.m4, m4/mmap.m4:
+       * m4/mprotect.m4, m4/pccstruct.m4, m4/shm.m4, m4/smallstruct.m4:
+       quote AC_DEFINE arguments
+
+2008-09-28  Sam Steingold  <sds@gnu.org>
+
+       * Makefile.devel (aclocal.m4): include glm4 (this defined gl_EARLY
+       and gl_INIT and fixes make check on x86_64)
+
+2008-09-26  Sam Steingold  <sds@gnu.org>
+
+       * avcall/avcall-ia64.s, avcall/avcall.h.in:
+       * callback/vacall_r/vacall_r.h.in:
+       support IA64 on Linux (kernel 2.6.16+ and gcc 4.1.0+)
+       https://savannah.gnu.org/bugs/index.php?22130
+       https://sourceforge.net/tracker/index.php?func=detail&aid=1528895&group_id=1355&atid=301355
+
+2008-09-26  Sam Steingold  <sds@gnu.org>
+
+       * callback/trampoline_r/Makefile.in, callback/trampoline_r/cache-arm.c:
+       * callback/trampoline_r/cache-arm.s, callback/trampoline_r/configure.in:
+       * callback/trampoline_r/tramp-arm.s, callback/trampoline_r/tramp-mips.s:
+       * callback/trampoline_r/trampoline.c, trampoline/cache-arm.c:
+       * trampoline/cache-arm.s, trampoline/configure.in:
+       * trampoline/tramp-arm.s, trampoline/trampoline.c:
+       add arm support from Jonathan Olson (debian 1.10-2)
+       https://savannah.gnu.org/bugs/?func=detailitem&item_id=9468
+
+2008-09-26  Sam Steingold  <sds@gnu.org>
+
+       * avcall/avcall-mips.S, avcall/avcall-mips.c, avcall/avcall.h.in:
+       * callback/trampoline_r/trampoline.c, callback/vacall_r/vacall_r.h.in:
+       * m4/general.m4, trampoline/trampoline.c, vacall/vacall.h.in:
+       add mipsel support from Thiemo Seufer (debian 1.10-2)
+
+2008-09-26  Sam Steingold  <sds@gnu.org>
+
+       * Makefile.devel, Makefile.in, callback/Makefile.devel,
+       * callback/Makefile.in: use "&&" instead of ";" for all targets
+
+2008-07-13  Sam Steingold  <sds@gnu.org>
+
+       * glm4/gnulib-cache.m4, glm4/gnulib-common.m4, glm4/gnulib-comp.m4:
+       * glm4/gnulib-tool.m4, glm4/onceonly.m4: add from gnulib
+       * glm4/nocrash.m4: update from gnulib
+       * Makefile.devel (gnulib-imported): remove gllib
+       * configure.ac: call gl_EARLY and gl_INIT
+
+2008-07-08  Sam Steingold  <sds@gnu.org>
+
+       * Makefile.devel (SUBDIRS_CONFIGURE): use $(CURDIR) instead of .
+       (%/configure): use "&&" instead of ";"
+
+2008-07-03  Sam Steingold  <sds@gnu.org>
+
+       * Makefile.devel (all): split into a few manageable targets
+       (config-h-in, woe32-h, woe32-c): new targets
+       (configure): use patterns
+
+2008-07-03  Sam Steingold  <sds@gnu.org>
+
+       * m4/smallstruct.m4 (FFCALL_SMALL_STRUCT_RETURN): rename from
+       CL_SMALL_STRUCT_RETURN; use ffcall_cv_* instead of cl_cv_*;
+       use return instead of exit()
+       * m4/pccstruct.m4 (FFCALL_PCC_STRUCT_RETURN): rename from
+       CL_PCC_STRUCT_RETURN; use ffcall_cv_* instead of cl_cv_*;
+       use return instead of exit()
+       * m4/ireg.m4 (FFCALL_IREG_FLOAT_RETURN): remame from
+       CL_IREG_FLOAT_RETURN; use ffcall_cv_* instead of cl_cv_*;
+       use return instead of exit()
+       * m4/codeexec.m4 (FFCALL_CODEEXEC): rename from CL_CODEEXEC
+       use ffcall_cv_* instead of cl_cv_*; use return instead of exit()
+       * m4/general.m4: remove non-FFCALL code
+       (FFCALL_COMMON_LIBTOOL): rename from CL_FFCALL_COMMON_LIBTOOL
+       (FFCALL_COMMON_TRAMPOLINE): rename from CL_FFCALL_COMMON_TRAMPOLINE
+       (FFCALL_CANONICAL_HOST_CPU): <- CL_CANONICAL_HOST_CPU_FOR_FFCALL
+
+2008-07-03  Sam Steingold  <sds@gnu.org>
+
+       * Makefile.devel (build-aux-update): new target
+
+2008-07-02  Sam Steingold  <sds@gnu.org>
+
+       * Makefile.devel (gnulib-imported, update-gnulib): new targets
+       * glm4: new directory
+       * longlong.m4, nocrash.m4: move from m4 to glm4
+
+2008-07-02  Sam Steingold  <sds@gnu.org>
+
+       * m4/ln.m4: update from clisp
+       * m4/cp.m4: remove
+       * m4/getpagesize.m4: update from clisp
+       * m4/general.m4: update from clisp
+       * m4/mmap.m4: update from clisp
+       * m4/mprotect.m4: update from clisp
+       * m4/proto.m4: update from clisp
+       * m4/openflags.m4: remove
+       * m4/cc-void.m4: remove
+
+2008-07-02  Sam Steingold  <sds@gnu.org>
+
+       * Makefile.devel, aclocal.m4: move autoconf/aclocal.m4 to aclocal.m4
+       * aclocal/autoconf.m4: remove
+       * Makefile.devel (CLISP_DIR): remove
+
+2008-07-02  Sam Steingold  <sds@gnu.org>
+
+       * m4/ffcall-pccstruct.m4, m4/ffcall-smallstruct.m4, m4/ffcall-ireg.m4:
+       * m4/ffcall-codeexec.m4: remove "ffcall-" prefix
+       * Makefile.devel: update
+
+See clisp ChangeLog for earlier changes.
diff --git a/DEPENDENCIES b/DEPENDENCIES
new file mode 100644 (file)
index 0000000..fcbd036
--- /dev/null
@@ -0,0 +1,69 @@
+The following packages should be installed before GNU libffcall is installed
+(runtime dependencies that are also build dependencies):
+
+None.
+
+
+The following packages should be installed when GNU libffcall is installed
+(runtime dependencies, but not build dependencies):
+
+None.
+
+
+The following should be installed when GNU libffcall is built, but are not
+needed later, once it is installed (build dependencies, but not runtime
+dependencies):
+
+* A C runtime, compiler, linker, etc.
+  + Mandatory. Either the platform's native 'cc', or GCC 2.95 or newer.
+  + GCC Homepage:
+    https://gcc.gnu.org/
+  + Download:
+    https://ftp.gnu.org/gnu/gcc/
+
+* A 'make' utility.
+  + Mandatory. Either the platform's native 'make' (for in-tree builds only),
+    or GNU Make 3.79.1 or newer.
+  + GNU Make Homepage:
+    https://www.gnu.org/software/make/
+  + Download:
+    https://ftp.gnu.org/gnu/make/
+
+* A shell
+  + Mandatory. Either the platform's native 'sh', or Bash.
+  + Homepage:
+    https://www.gnu.org/software/bash/
+  + Download:
+    https://ftp.gnu.org/gnu/bash/
+
+* Core POSIX utilities, including:
+    [ basename cat chgrp chmod chown cp dd echo expand expr
+    false hostname install kill ln ls md5sum mkdir mkfifo
+    mknod mv printenv pwd rm rmdir sleep sort tee test touch
+    true uname
+  + Mandatory. Either the platform's native utilities, or GNU coreutils.
+  + Homepage:
+    https://www.gnu.org/software/coreutils/
+  + Download:
+    https://ftp.gnu.org/gnu/coreutils/
+
+* The comparison utilities 'cmp' and 'diff'.
+  + Mandatory. Either the platform's native utilities, or GNU diffutils.
+  + Homepage:
+    https://www.gnu.org/software/diffutils/
+  + Download:
+    https://ftp.gnu.org/gnu/diffutils/
+
+* Grep.
+  + Mandatory. Either the platform's native grep, or GNU grep.
+  + Homepage:
+    https://www.gnu.org/software/grep/
+  + Download:
+    https://ftp.gnu.org/gnu/grep/
+
+* Awk.
+  + Mandatory. Either the platform's native awk, or GNU awk.
+  + Homepages:
+    https://www.gnu.org/software/gawk/
+  + Download:
+    https://ftp.gnu.org/gnu/gawk/
diff --git a/INSTALL.os2 b/INSTALL.os2
new file mode 100644 (file)
index 0000000..0c804fe
--- /dev/null
@@ -0,0 +1,10 @@
+Installation on OS/2:
+
+- Requires emx+gcc and a working shell (Bourne shell, Korn shell or GNU bash).
+
+- Set the environment variables CC=gcc CFLAGS="-Zexe" before calling
+  ‘configure’.
+
+- Must build in a separate directory and pass the --srcdir option to
+  ‘configure’, otherwise avcall-i386.s will overwrite avcall-i386.S.
+
diff --git a/INSTALL.windows b/INSTALL.windows
new file mode 100644 (file)
index 0000000..6892f36
--- /dev/null
@@ -0,0 +1,263 @@
+Installation on Microsoft Windows:
+
+There are three ways to create binaries of this package for Microsoft Windows:
+1) Native binaries, built using the mingw tool chain.
+2) Native binaries, built using the MS Visual C/C++ tool chain.
+3) Binaries for the Cygwin environment.
+
+===============================================================================
+1) Native binaries, built using the mingw tool chain.
+
+   I recommend to use the Cygwin environment as the development environment
+   and mingw only as the target (runtime, deployment) environment.
+   For this, you need to install
+     * Cygwin (from https://cygwin.com/),
+     * some packages available from the Cygwin package installer:
+         make
+     * the mingw cross-compilation tools and runtime package, available from
+       the Cygwin package installer (setup-x86_64.exe):
+       - for creating 32-bit binaries: packages
+           mingw64-i686-gcc-core,
+           mingw64-i686-gcc-g++,
+           mingw64-i686-headers,
+           mingw64-i686-runtime
+       - for creating 64-bit binaries: packages
+           mingw64-x86_64-gcc-core,
+           mingw64-x86_64-gcc-g++,
+           mingw64-x86_64-headers,
+           mingw64-x86_64-runtime
+
+   Building 32-bit binaries for mingw is achieved through the following
+   preparation, configure, and build commands:
+
+      PATH=/usr/local/mingw32/bin:/usr/i686-w64-mingw32/sys-root/mingw/bin:$PATH
+      export PATH
+      ./configure --host=i686-w64-mingw32 --prefix=/usr/local/mingw32 \
+            CC=i686-w64-mingw32-gcc \
+            CXX=i686-w64-mingw32-g++ \
+            CPPFLAGS="-I/usr/local/mingw32/include -Wall" \
+            LDFLAGS="-L/usr/local/mingw32/lib"
+      make
+      make check
+
+   Building 64-bit binaries for mingw is achieved through the following
+   preparation, configure, and build commands:
+
+      PATH=/usr/local/mingw64/bin:/usr/x86_64-w64-mingw32/sys-root/mingw/bin:$PATH
+      export PATH
+      ./configure --host=x86_64-w64-mingw32 --prefix=/usr/local/mingw64 \
+            CC=x86_64-w64-mingw32-gcc \
+            CXX=x86_64-w64-mingw32-g++ \
+            CPPFLAGS="-I/usr/local/mingw64/include -Wall" \
+            LDFLAGS="-L/usr/local/mingw64/lib"
+      make
+      make check
+
+   Installation:
+
+      make install
+
+===============================================================================
+2) Native binaries, built using the MS Visual C/C++ tool chain.
+
+   Note that binaries created with MSVC have a distribution constraint: They
+   depend on a closed-source library ('msvcr90.dll' for MSVC 9.0,
+   'vcruntime140.dll' for MSVC 14.0, and so on) which is not normally part of
+   a Windows installation.
+   You cannot distribute 'vcruntime*.dll' with the binaries - this would be a
+   violation of the GPL and of the Microsoft EULA.
+   You can distribute the binaries without including 'vcruntime*.dll'. Users
+   who don't have this library on their system will require to pull some files
+   (api-ms-win*.dll) through the Windows Update mechanism, see
+   https://support.microsoft.com/en-us/kb/2999226 .
+
+   This recipe requires MS Visual C/C++ 9.0 or newer.
+   You don't need the Visual Studio IDE, just the C/C++ tool chain.
+   As of 2016, you can install the MS Visual C/C++ 14.0 tool chain from
+   http://landinghub.visualstudio.com/visual-cpp-build-tools (it's the file
+   visualcppbuildtools_full.exe).
+
+   This recipe requires also a Cygwin environment (with 'bash', the common POSIX
+   commands, and 'make') as a build environment. Building with 'nmake' is not
+   supported.
+   For this, you need to install
+     * Cygwin (from https://cygwin.com/),
+     * some packages available from the Cygwin package installer:
+         make
+
+   You also need the scripts 'ar-lib' and 'compile' from
+     https://git.savannah.gnu.org/gitweb/?p=automake.git;a=blob_plain;f=lib/ar-lib;hb=HEAD
+     https://git.savannah.gnu.org/gitweb/?p=automake.git;a=blob_plain;f=lib/compile;hb=HEAD
+   respectively.
+   They may also be included in this package, in directory 'build-aux/'.
+   Save them; the instructions below assume that you stored them in $HOME/msvc/.
+   Make them executable:
+      chmod a+x ar-lib compile
+
+   Start a bash (from Cygwin).
+
+   Make sure that the MSVC tools ("cl" etc.) are found in PATH and the
+   environment variables INCLUDE and LIB are set appropriately.
+   In a typical MSVC 9.0 installation, it can be achieved by running
+     C:\Program Files\Microsoft Visual Studio 9.0\Common7\Tools\vsvars32.bat
+   In a typical MSVC 14.0 installation on Windows 10, it can be achieved
+   - for creating 32-bit binaries: through the following bash commands:
+
+      # Set environment variables for using MSVC 14,
+      # for creating native 32-bit Windows executables.
+
+      # Windows C library headers and libraries.
+      WindowsCrtIncludeDir='C:\Program Files (x86)\Windows Kits\10\Include\10.0.10240.0\ucrt'
+      WindowsCrtLibDir='C:\Program Files (x86)\Windows Kits\10\Lib\10.0.10240.0\ucrt\'
+      INCLUDE="${WindowsCrtIncludeDir};$INCLUDE"
+      LIB="${WindowsCrtLibDir}x86;$LIB"
+
+      # Windows API headers and libraries.
+      WindowsSdkIncludeDir='C:\Program Files (x86)\Windows Kits\8.1\Include\'
+      WindowsSdkLibDir='C:\Program Files (x86)\Windows Kits\8.1\Lib\winv6.3\um\'
+      INCLUDE="${WindowsSdkIncludeDir}um;${WindowsSdkIncludeDir}shared;$INCLUDE"
+      LIB="${WindowsSdkLibDir}x86;$LIB"
+
+      # Visual C++ tools, headers and libraries.
+      VSINSTALLDIR='C:\Program Files (x86)\Microsoft Visual Studio 14.0'
+      VCINSTALLDIR="${VSINSTALLDIR}"'\VC'
+      PATH=`cygpath -u "${VCINSTALLDIR}"`/bin:"$PATH"
+      INCLUDE="${VCINSTALLDIR}"'\include;'"${INCLUDE}"
+      LIB="${VCINSTALLDIR}"'\lib;'"${LIB}"
+
+      export INCLUDE LIB
+
+   - for creating 64-bit binaries: through the following bash commands:
+
+     # Set environment variables for using MSVC 14,
+     # for creating native 64-bit Windows executables.
+
+     # Windows C library headers and libraries.
+     WindowsCrtIncludeDir='C:\Program Files (x86)\Windows Kits\10\Include\10.0.10240.0\ucrt'
+     WindowsCrtLibDir='C:\Program Files (x86)\Windows Kits\10\Lib\10.0.10240.0\ucrt\'
+     INCLUDE="${WindowsCrtIncludeDir};$INCLUDE"
+     LIB="${WindowsCrtLibDir}x64;$LIB"
+
+     # Windows API headers and libraries.
+     WindowsSdkIncludeDir='C:\Program Files (x86)\Windows Kits\8.1\Include\'
+     WindowsSdkLibDir='C:\Program Files (x86)\Windows Kits\8.1\Lib\winv6.3\um\'
+     INCLUDE="${WindowsSdkIncludeDir}um;${WindowsSdkIncludeDir}shared;$INCLUDE"
+     LIB="${WindowsSdkLibDir}x64;$LIB"
+
+     # Visual C++ tools, headers and libraries.
+     VSINSTALLDIR='C:\Program Files (x86)\Microsoft Visual Studio 14.0'
+     VCINSTALLDIR="${VSINSTALLDIR}"'\VC'
+     PATH=`cygpath -u "${VCINSTALLDIR}"`/bin/amd64:"$PATH"
+     INCLUDE="${VCINSTALLDIR}"'\include;'"${INCLUDE}"
+     LIB="${VCINSTALLDIR}"'\lib\amd64;'"${LIB}"
+
+     export INCLUDE LIB
+
+   Building 32-bit binaries with MSVC is achieved through the following
+   preparation, configure, and build commands:
+
+      PATH=/usr/local/msvc32/bin:$PATH
+      export PATH
+
+      win32_target=_WIN32_WINNT_WINXP   # for MSVC 9.0
+      win32_target=_WIN32_WINNT_VISTA   # possibly for MSVC >= 10.0
+      win32_target=_WIN32_WINNT_WIN7    # possibly for MSVC >= 10.0
+      win32_target=_WIN32_WINNT_WIN8    # possibly for MSVC >= 10.0
+
+      ./configure --host=i686-w64-mingw32 --prefix=/usr/local/msvc32 \
+            CC="$HOME/msvc/compile cl -nologo" \
+            CFLAGS="-MD" \
+            CXX="$HOME/msvc/compile cl -nologo" \
+            CXXFLAGS="-MD" \
+            CPPFLAGS="-D_WIN32_WINNT=$win32_target -I/usr/local/msvc32/include" \
+            LDFLAGS="-L/usr/local/msvc32/lib" \
+            LD="link" \
+            NM="dumpbin -symbols" \
+            STRIP=":" \
+            AR="$HOME/msvc/ar-lib lib" \
+            RANLIB=":"
+      make
+      make check
+
+   Building 64-bit binaries with MSVC is achieved through the following
+   preparation, configure, and build commands:
+
+      PATH=/usr/local/msvc64/bin:$PATH
+      export PATH
+
+      win32_target=_WIN32_WINNT_WINXP   # for MSVC 9.0
+      win32_target=_WIN32_WINNT_VISTA   # possibly for MSVC >= 10.0
+      win32_target=_WIN32_WINNT_WIN7    # possibly for MSVC >= 10.0
+      win32_target=_WIN32_WINNT_WIN8    # possibly for MSVC >= 10.0
+
+      ./configure --host=x86_64-w64-mingw32 --prefix=/usr/local/msvc64 \
+            CC="$HOME/msvc/compile cl -nologo" \
+            CFLAGS="-MD" \
+            CXX="$HOME/msvc/compile cl -nologo" \
+            CXXFLAGS="-MD" \
+            CPPFLAGS="-D_WIN32_WINNT=$win32_target -I/usr/local/msvc64/include" \
+            LDFLAGS="-L/usr/local/msvc64/lib" \
+            LD="link" \
+            NM="dumpbin -symbols" \
+            STRIP=":" \
+            AR="$HOME/msvc/ar-lib lib" \
+            RANLIB=":"
+      make
+      make check
+
+   Installation:
+
+      make install
+
+===============================================================================
+3) Binaries for the Cygwin environment.
+
+   The generic instructions in the INSTALL file apply. But here are more
+   specific ones.
+
+   You need to install
+     * Cygwin (from https://cygwin.com/),
+     * some packages available from the Cygwin package installer:
+         make
+     * the Cygwin [cross-]compilation tools package, available from
+       the Cygwin package installer (setup-x86_64.exe):
+       - for creating 32-bit binaries: packages
+           cygwin32-gcc-core,
+           cygwin32-gcc-g++,
+           cygwin32
+       - for creating 64-bit binaries: packages
+           gcc-core,
+           gcc-g++
+
+   Building 32-bit binaries for Cygwin must be done in a directory *outside*
+   the Cygwin /home and /usr hierarchies. It is achieved through the following
+   preparation, configure, and build commands:
+
+      PATH=/usr/local/cygwin32/bin:/usr/i686-pc-cygwin/sys-root/usr/bin:$PATH
+      export PATH
+      ./configure --host=i686-pc-cygwin --prefix=/usr/local/cygwin32 \
+            CC=i686-pc-cygwin-gcc \
+            CXX=i686-pc-cygwin-g++ \
+            CPPFLAGS="-I/usr/local/cygwin32/include -Wall" \
+            LDFLAGS="-L/usr/local/cygwin32/lib"
+      make
+      make check
+
+   Building 64-bit binaries for Cygwin is achieved through the following
+   preparation, configure, and build commands:
+
+      PATH=/usr/local/cygwin64/bin:$PATH
+      export PATH
+      ./configure --host=x86_64-pc-cygwin --prefix=/usr/local/cygwin64 \
+            CC=x86_64-pc-cygwin-gcc \
+            CXX=x86_64-pc-cygwin-g++ \
+            CPPFLAGS="-I/usr/local/cygwin64/include -Wall" \
+            LDFLAGS="-L/usr/local/cygwin64/lib"
+      make
+      make check
+
+   Installation:
+
+      make install
+
+===============================================================================
diff --git a/Makefile.devel b/Makefile.devel
new file mode 100644 (file)
index 0000000..ae8d87f
--- /dev/null
@@ -0,0 +1,29 @@
+# This is the developer's -*-Makefile-*-, not the user's makefile.
+# Do not use it unless you know exactly what you do!
+
+# ============ Rules that require cross-compilation tools ============
+
+precompiled : force
+       cd avcall && $(MAKE) -f Makefile.devel precompiled
+       cd vacall && $(MAKE) -f Makefile.devel precompiled
+       cd trampoline && $(MAKE) -f Makefile.devel precompiled
+       cd callback/vacall_r \
+         && $(MAKE) -f Makefile.devel precompiled
+       cd callback/trampoline_r \
+         && $(MAKE) -f Makefile.maint copied-files \
+         && $(MAKE) -f Makefile.devel precompiled
+
+# ==================== Targets for testing ====================
+
+COMPILERS="cc -O" "gcc -freg-struct-return" "gcc -fpcc-struct-return"
+
+multibuild : force
+       for compiler in $(COMPILERS) ; do \
+         dir=build-`echo $$compiler | sed -e 's, ,,g' -e 's,/,_,g'`; \
+         mkdir $$dir; cd $$dir; \
+         CC="$$compiler" ../configure --srcdir=.. && make && make check; \
+         cd ..; \
+       done
+
+
+force :
diff --git a/Makefile.in b/Makefile.in
new file mode 100644 (file)
index 0000000..d234bdf
--- /dev/null
@@ -0,0 +1,239 @@
+# Makefile for libffcall
+
+#### Start of system configuration section. ####
+
+# Directories used by "make":
+srcdir = @srcdir@
+
+# Directories used by "make install":
+prefix = @prefix@
+local_prefix = /usr/local
+exec_prefix = @exec_prefix@
+libdir = @libdir@
+includedir = @includedir@
+mandir = @mandir@
+datadir = @datadir@
+datarootdir = @datarootdir@
+
+# Programs used by "make":
+# C compiler
+CC = @CC@
+CFLAGS = @CFLAGS@
+CPP = @CPP@
+# Both C and C++ compiler
+CPPFLAGS = @CPPFLAGS@
+INCLUDES = -I. -I$(srcdir) -I.. -I$(srcdir)/.. -I$(srcdir)/vacall_r
+LDFLAGS = @LDFLAGS@
+LIBTOOL = @LIBTOOL@
+LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile
+LIBTOOL_LINK = $(LIBTOOL) --mode=link
+LIBTOOL_INSTALL = $(LIBTOOL) --mode=install
+LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall
+AR = @AR@
+AR_FLAGS = rc
+RANLIB = @RANLIB@
+RM = rm -f
+@SET_MAKE@
+
+# Programs used by "make install":
+INSTALL = @INSTALL@
+INSTALL_DATA = @INSTALL_DATA@
+
+#### End of system configuration section. ####
+
+SHELL = /bin/sh
+
+# This package does not support parallel make.
+# So, turn off parallel execution (at least in GNU make >= 4.0).
+GNUMAKEFLAGS = -j1
+
+# Needed by $(LIBTOOL).
+top_builddir = .
+
+# Limit the set of exported symbols, on those platforms where libtool supports it.
+# Currently this excludes the symbols from gnulib modules.
+LIBFFCALL_EXPORTED_SYMBOLS_REGEX = '^ffcall_|^avcall_|^callback_|_callback$$'
+
+# Before making a release, change this according to the libtool documentation,
+# section "Library interface versions".
+LIBFFCALL_VERSION_INFO = 0:2:0
+
+all : all-subdirs libffcall.la
+
+all-subdirs : ffcall-version.h force
+       cd @subdir@ && $(MAKE) all
+
+ffcall-version.h : $(srcdir)/ffcall-version.in.h
+       cd .. && ./config.status --header=ffcall-version.h:ffcall-version.in.h
+
+ffcall-version.lo : $(srcdir)/ffcall-version.c ffcall-version.h config.h
+       $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/ffcall-version.c
+
+libffcall.la : ffcall-version.lo avcall/avcall.lo avcall/avcall-libapi.lo avcall/avcall-structcpy.lo callback/vacall_r/libvacall.la callback/trampoline_r/libtrampoline.la callback/callback-libapi.lo
+       $(LIBTOOL_LINK) $(CC) -o libffcall.la -rpath $(libdir) -no-undefined -export-symbols-regex $(LIBFFCALL_EXPORTED_SYMBOLS_REGEX) -version-info $(LIBFFCALL_VERSION_INFO) ffcall-version.lo avcall/avcall.lo avcall/avcall-libapi.lo avcall/avcall-structcpy.lo callback/vacall_r/vacall.lo callback/vacall_r/vacall-libapi.lo callback/vacall_r/vacall-structcpy.lo callback/trampoline_r/*.lo callback/callback-libapi.lo gnulib-lib/libgnu.la $(LDFLAGS) $(LTLIBTHREAD)
+
+install : force
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(libdir)
+       $(LIBTOOL_INSTALL) $(INSTALL_DATA) libffcall.la $(DESTDIR)$(libdir)/libffcall.la
+       mkdir -p $(DESTDIR)$(includedir)
+       $(INSTALL_DATA) ffcall-version.h $(DESTDIR)$(includedir)/ffcall-version.h
+       $(INSTALL_DATA) $(srcdir)/ffcall-abi.h $(DESTDIR)$(includedir)/ffcall-abi.h
+       cd @subdir@ && $(MAKE) install
+
+installdirs : force
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(libdir)
+       mkdir -p $(DESTDIR)$(includedir)
+       cd @subdir@ && $(MAKE) installdirs
+
+uninstall : force
+       cd @subdir@ && $(MAKE) uninstall
+       $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libffcall.la
+       $(RM) $(DESTDIR)$(includedir)/ffcall-abi.h
+       $(RM) $(DESTDIR)$(includedir)/ffcall-version.h
+
+check : force
+       cd @subdir@ && $(MAKE) check
+
+extracheck : force
+       cd @subdir@ && $(MAKE) extracheck
+
+MOSTLYCLEANDIRS = .libs _libs
+MOSTLYCLEANFILES = \
+  *.@OBJEXT@ *.lo core \
+  libffcall.*
+
+mostlyclean : force
+       cd @subdir@ && $(MAKE) mostlyclean
+       $(RM) -r $(MOSTLYCLEANDIRS)
+       $(RM) $(MOSTLYCLEANFILES)
+
+clean : force
+       cd @subdir@ && $(MAKE) clean
+       $(RM) -r $(MOSTLYCLEANDIRS)
+       $(RM) $(MOSTLYCLEANFILES)
+
+DISTCLEANFILES = \
+  config.status config.log config.cache Makefile config.h ffcall-version.h libtool \
+  stamp-h1 stamp-h2
+
+distclean : force
+       cd @subdir@; if test -f Makefile; then $(MAKE) distclean; fi
+       $(RM) -r $(MOSTLYCLEANDIRS)
+       $(RM) $(MOSTLYCLEANFILES)
+       $(RM) $(DISTCLEANFILES)
+
+maintainer-clean : force
+       cd @subdir@; if test -f Makefile; then $(MAKE) maintainer-clean; fi
+       $(RM) -r $(MOSTLYCLEANDIRS)
+       $(RM) $(MOSTLYCLEANFILES)
+       $(RM) $(DISTCLEANFILES)
+
+
+# List of source files (committed in version control).
+SOURCE_FILES = \
+  COPYING DEPENDENCIES INSTALL.os2 INSTALL.windows NEWS PLATFORMS README \
+  ChangeLog \
+  VERSION \
+  Makefile.devel \
+  Makefile.maint \
+  Makefile.in \
+  configure.ac \
+  m4/as-underscore.m4 \
+  m4/cc-gcc.m4 \
+  m4/codeexec.m4 \
+  m4/endianness.m4 \
+  m4/general.m4 \
+  m4/getpagesize.m4 \
+  m4/ireg.m4 \
+  m4/ln.m4 \
+  m4/mach-vm.m4 \
+  m4/mmap.m4 \
+  m4/mprotect.m4 \
+  m4/proto.m4 \
+  m4/shm.m4 \
+  m4/smallstruct.m4 \
+  common/asm-alpha.sh \
+  common/asm-arm.sh common/asm-arm.h \
+  common/asm-hppa.sh common/asm-hppa.h \
+  common/asm-hppa64.sh common/asm-hppa64.h \
+  common/asm-i386.sh common/asm-i386.h \
+  common/asm-m68k.sh common/asm-m68k.h \
+  common/asm-mips.sh common/asm-mips.h \
+  common/asm-powerpc.sh \
+  common/asm-riscv.sh \
+  common/asm-s390.sh \
+  common/asm-sparc.sh common/asm-sparc.h \
+  common/asm-x86_64.sh common/asm-x86_64.h \
+  common/noexecstack.h common/noexecstack-arm.h \
+  common/structcpy.c \
+  common/uniq-u.c \
+  ffcall-version.in.h dummy/ffcall-version.h \
+  ffcall-abi.h \
+  ffcall-stdint.h \
+  ffcall-version.c \
+  testcases.c
+# List of distributed files imported from other packages or directories.
+LIBTOOL_IMPORTED_FILES = \
+  build-aux/ltmain.sh \
+  m4/libtool.m4 \
+  m4/lt~obsolete.m4 \
+  m4/ltoptions.m4 \
+  m4/ltsugar.m4 \
+  m4/ltversion.m4
+GNULIB_IMPORTED_FILES = \
+  build-aux/ar-lib \
+  build-aux/compile \
+  build-aux/config.guess \
+  build-aux/config.sub \
+  build-aux/install-sh \
+  gnulib-m4/*.m4
+AUTOMAKE_IMPORTED_FILES = \
+  build-aux/missing
+IMPORTED_FILES = \
+  $(LIBTOOL_IMPORTED_FILES) $(GNULIB_IMPORTED_FILES) $(AUTOMAKE_IMPORTED_FILES)
+# List of files copied by autogen.sh.
+COPIED_FILES = \
+  callback/trampoline_r/PORTING \
+  callback/trampoline_r/cache.c \
+  callback/trampoline_r/cache-alpha.c \
+  callback/trampoline_r/cache-hppa.c
+# List of distributed files generated by Makefile.maint.
+GENERATED_FILES = \
+  aclocal.m4 \
+  configure \
+  config.h.in
+# List of distributed files.
+DISTFILES = $(SOURCE_FILES) $(IMPORTED_FILES) $(COPIED_FILES) $(GENERATED_FILES)
+
+distdir : $(DISTFILES)
+       for file in $(DISTFILES); do \
+         if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \
+         destdir=`echo '$(distdir)'/$$file | sed -e 's|//*[^/]*$$||'`; \
+         test -d "$$destdir" || mkdir -p "$$destdir"; \
+         cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \
+       done
+       test -d '$(distdir)'/@subdir@ || mkdir '$(distdir)'/@subdir@; cd @subdir@ && $(MAKE) distdir distdir='$(distdir)'/@subdir@
+
+
+# Creating a distribution tarball.
+# Example: make dist VERSION=1.13-pre-20161227
+PACKAGE = @PACKAGE_TARNAME@
+VERSION = @VERSION@
+TAR = tar
+GZIP = gzip
+
+dist : force
+       tmpdistdir=$(PACKAGE)-$(VERSION); \
+       abstmpdistdir=`pwd`/$$tmpdistdir; \
+       rm -rf $$tmpdistdir $$tmpdistdir.tar $$tmpdistdir.tar.gz \
+         && mkdir $$tmpdistdir \
+         && $(MAKE) distdir distdir="$$abstmpdistdir" \
+         && $(TAR) chof $$tmpdistdir.tar --owner=root --group=root $$tmpdistdir \
+         && $(GZIP) -9 $$tmpdistdir.tar \
+         && rm -rf $$tmpdistdir
+
+
+force :
+
diff --git a/Makefile.maint b/Makefile.maint
new file mode 100644 (file)
index 0000000..d344ae7
--- /dev/null
@@ -0,0 +1,176 @@
+# maintainer -*-Makefile-*-
+
+SHELL = /bin/sh
+MAKE = make
+
+# You need to use this precise version of GNU Automake.
+# If you want to use a different version of GNU Automake, you are on your own!
+ACLOCAL = aclocal-1.15
+AUTOMAKE = automake-1.15
+
+# You need to use this precise version of GNU Autoconf and create
+# symbolic links
+#   $ ln -s `which autoconf` autoconf-`autoconf --version | sed -e '2,$d' -e 's/^[^0-9]*//'`
+#   $ ln -s `which autoheader` autoheader-`autoheader --version | sed -e '2,$d' -e 's/^[^0-9]*//'`
+# If you want to use a different version of GNU Autoconf, you are on your own!
+AUTOCONF = autoconf-2.69
+AUTOHEADER = autoheader-2.69
+
+CP = cp
+RM = rm -f
+
+# ==================== Easily regeneratable files ====================
+
+.PHONY : all
+all : aclocal.m4 configures check-configures config-h-in Makefile-ins force
+       cd avcall && $(MAKE) -f Makefile.maint all
+       cd vacall && $(MAKE) -f Makefile.maint all
+       cd trampoline && $(MAKE) -f Makefile.maint all
+       cd callback && $(MAKE) -f Makefile.maint all
+
+
+# Files originating from GNU libtool.
+
+# It is important to get ltmain.sh and libtool.m4 from the same version of
+# libtool. Don't rely on what's installed in /usr/share or similar.
+
+.PHONY : libtool-imported-files
+libtool-imported-files : force
+       test -n "$(LIBTOOL_RELEASE)" || { echo "Variable LIBTOOL_RELEASE not set." 1>&2; exit 1; }
+       test -f "$(LIBTOOL_RELEASE)" || { echo "File $(LIBTOOL_RELEASE) does not exist." 1>&2; exit 1; }
+       rm -rf libtool.tmp
+       mkdir libtool.tmp
+       gzip -d -c < "$(LIBTOOL_RELEASE)" | (cd libtool.tmp && tar -xf -)
+       test -d build-aux || mkdir build-aux
+       for destfile in m4/libtool.m4 m4/ltoptions.m4 m4/ltsugar.m4 m4/ltversion.m4 m4/lt~obsolete.m4 build-aux/ltmain.sh; do \
+         name=`echo $$destfile | sed -e 's|^.*/||'`; \
+         srcfile=`find libtool.tmp -name $$name -print | sed 1q`; \
+         if test -n "$$srcfile"; then \
+           if test -f $$destfile && cmp "$$srcfile" $$destfile > /dev/null; then \
+             : ; \
+           else \
+             mv "$$srcfile" $$destfile; \
+           fi; \
+         else \
+           echo "File $(LIBTOOL_RELEASE) does not contain the expected files of a libtool release." 1>&2; \
+           exit 1; \
+         fi; \
+       done
+       rm -rf libtool.tmp
+       : "Allow building statically linked binaries, through LDFLAGS=-static ."
+       wget --execute netrc=off --no-verbose --retry-connrefused --timeout=60 -O libtool-allow-static.diff https://lists.gnu.org/archive/html/bug-libtool/2017-07/txt7Q9LRXv6HS.txt
+       chmod u+w build-aux/ltmain.sh
+       patch build-aux/ltmain.sh < libtool-allow-static.diff
+       rm -f libtool-allow-static.diff
+       : "Fix -export-symbols and -export-symbols-regex support on Solaris 11.3"
+       wget --execute netrc=off --no-verbose --retry-connrefused --timeout=60 -O libtool-solaris11-fix.diff 'https://savannah.gnu.org/patch/download.php?file_id=42205'
+       chmod u+w m4/libtool.m4
+       patch -p1 < libtool-solaris11-fix.diff
+       rm -f libtool-solaris11-fix.diff
+
+.PHONY : libtool-clean
+libtool-clean : force
+       $(RM) m4/libtool.m4 build-aux/ltmain.sh
+
+
+# Files brought in by gnulib-tool.
+
+GNULIB_MODULES = \
+  ansi-c++-opt \
+  host-cpu-c-abi \
+  lock \
+  longlong \
+  nocrash \
+  stdint \
+  stdnoreturn
+
+gnulib-m4/gnulib-cache.m4 :
+       if test -n "$$GNULIB_TOOL"; then \
+         $$GNULIB_TOOL --source-base=gnulib-lib --m4-base=gnulib-m4 --aux-dir=build-aux --libtool --no-changelog \
+           --import $(GNULIB_MODULES); \
+       fi
+
+.PHONY : gnulib-imported-files
+gnulib-imported-files : force
+# Get up-to-date versions of files imported from https://git.savannah.gnu.org/gitweb/?p=automake.git;a=tree;f=lib via gnulib.
+       if test -n "$$GNULIB_TOOL"; then \
+         for file in ar-lib compile install-sh; do \
+           $$GNULIB_TOOL --copy-file build-aux/$$file || exit $$?; \
+           chmod a+x build-aux/$$file || exit $$?; \
+         done; \
+       fi
+# Get up-to-date versions of files imported from https://git.savannah.gnu.org/gitweb/?p=config.git;a=tree via gnulib.
+       if test -n "$$GNULIB_TOOL"; then \
+         for file in config.guess config.sub; do \
+           $$GNULIB_TOOL --copy-file build-aux/$$file || exit $$?; \
+           chmod a+x build-aux/$$file || exit $$?; \
+         done; \
+       fi
+
+.PHONY : gnulib-clean
+gnulib-clean : force
+# Move gnulib-m4/gnulib-cache.m4 away, so that the target 'gnulib-m4/gnulib-cache.m4' will actually do something.
+       if test -f gnulib-m4/gnulib-cache.m4; then \
+         mv gnulib-m4/gnulib-cache.m4 gnulib-m4/gnulib-cache.m4~; \
+       fi
+# No need to remove the stale files. gnulib-tool does this itself, thanks to gnulib-m4/gnulib-comp.m4.
+#      rm -rf gnulib-m4
+
+
+# Files generated by GNU Autoconf and GNU Automake.
+
+AUTOCONF_CACHE = autom4te.cache
+
+ALL_CONFIGURE = configure
+ALL_CONFIGURE_AC = configure.ac
+
+aclocal.m4 : $(ALL_CONFIGURE_AC) $(wildcard m4/*.m4) $(wildcard gnulib-m4/*.m4)
+       $(ACLOCAL) --output=aclocal.m4 -I m4 -I gnulib-m4
+
+.PHONY : configures
+configures : $(ALL_CONFIGURE)
+
+AUTOCONF_FILES = aclocal.m4 $(wildcard m4/*.m4) $(wildcard gnulib-m4/*.m4)
+
+configure : configure.ac $(AUTOCONF_FILES)
+       $(AUTOCONF) && rm -rf autom4te.cache
+
+.PHONY : check-configures
+check-configures : $(ALL_CONFIGURE)
+       set -e; for f in $(ALL_CONFIGURE); do bash -x -n $$f; done
+
+
+ALL_CONFIG_H_IN = config.h.in
+
+.PHONY : config-h-in
+config-h-in : $(ALL_CONFIG_H_IN)
+
+config.h.in : configure.ac $(AUTOCONF_FILES)
+       srcdir=`pwd`; $(AUTOHEADER) --include="$$srcdir" && rm -rf autom4te.cache
+
+
+ALL_MAKEFILE_IN_FROM_AM = gnulib-lib/Makefile.in
+
+.PHONY: Makefile-ins
+Makefile-ins : $(ALL_MAKEFILE_IN_FROM_AM)
+
+gnulib-lib/Makefile.in : gnulib-lib/Makefile.am configure.ac $(AUTOCONF_FILES)
+       : "Make sure we get new versions of files brought in by automake."
+       (cd build-aux && rm -f depcomp missing)
+       $(AUTOMAKE) --add-missing --copy && rm -rf autom4te.cache
+
+
+# ==================== Cleanup ====================
+
+.PHONY : totally-clean
+totally-clean : force
+       cd avcall && $(MAKE) -f Makefile.maint totally-clean
+       cd vacall && $(MAKE) -f Makefile.maint totally-clean
+       cd trampoline && $(MAKE) -f Makefile.maint totally-clean
+       cd callback && $(MAKE) -f Makefile.maint totally-clean
+       rm -f $(ALL_CONFIGURE) $(ALL_CONFIG_H_IN)
+       rm -f aclocal.m4
+       rm -rf `find . -name $(AUTOCONF_CACHE) -print`
+
+
+force :
diff --git a/NEWS b/NEWS
new file mode 100644 (file)
index 0000000..d724008
--- /dev/null
+++ b/NEWS
@@ -0,0 +1,222 @@
+New in 2.2:
+
+* Added support for the following platforms:
+  (Previously, a build on these platforms failed.)
+  - armv6 (Raspberry Pi): Linux.
+  - hppa: Linux 32-bit.
+  - riscv32: Linux with ilp32d ABI.
+  - riscv64: Linux with lp64d ABI.
+
+* The build for the mips 32-bit ABI is now compatible with toolchains for
+  the 'fpxx' ABI variant.  The downside is that the mips1 architecture is
+  no longer supported.
+
+* Fixed a bug regarding passing of more than 8 arguments on the following
+  platforms:
+  - arm64: Linux 64-bit.
+
+* Fixed a stack corruption bug on the following platforms:
+  - hppa: HP-UX 32-bit.
+
+New in 2.1:
+
+* Added support for the following platforms:
+  (Previously, a build on these platforms failed.)
+  - arm: Linux with PIE-enabled gcc.
+  - x86_64: Solaris 11.3.
+  - OpenBSD 6.1.
+  - HardenedBSD 10 and 11.
+
+* Fixed a bug regarding passing of pointers on the following platforms:
+  - x86_64: Linux with x32 ABI: CC="gcc -mx32".
+
+* Fixed a crash in trampoline on the following platforms:
+  - mips: Linux with CC="gcc -mabi=64", little endian.
+
+New in 2.0:
+
+* The package now installs a library libffcall.{a,so}. It contains the
+  'avcall' and 'callback' packages. The libraries libavcall.{a,so} and
+  libcallback.{a,so} are still installed as well, but are deprecated.
+
+* The installed libraries are now installed as shared libraries by default
+  (except for libvacall, which is still a static library only).
+
+* The installed shared libraries are now properly versioned. This means that
+  when installing with --enable-shared, upgrading to a newer version of
+  libffcall will not break existing binaries.
+
+* The installed include files are now platform independent. This means that
+  you can now install libffcall for different ABIs on the same system, using
+  the same --prefix option but different --exec-prefix options for each ABI.
+
+* API changes in <trampoline.h>:
+  - The second argument of alloc_trampoline() is now a 'void**', rather
+    than a 'void*'.
+  - The return value of trampoline_variable() is now a 'void**', rather
+    than a 'void*'.
+  - The argument of trampoline_address(), trampoline_variable(),
+    trampoline_data() is now a function pointer instead of a 'void*'.
+
+* API changes in <callback.h>:
+  - The argument of callback_address(), callback_data() is now a function
+    pointer instead of a 'void*'.
+
+* Fixed a bug regarding floating-point arguments followed by
+  non-floating-point arguments on the following platforms:
+  - arm: Linux 32-bit, with hardware floats.
+  - powerpc: Linux 32-bit.
+  - s390: Linux.
+
+* Fixed a bug regarding structure returns on the following platforms:
+  - i386: FreeBSD.
+  - i386: MinGW.
+  - mips: old 32-bit ABI (Linux, IRIX).
+
+* Added support for the following platforms:
+  (Previously, a build on these platforms failed.)
+  - i386: MSVC 14.
+  - x86_64: Cygwin.
+  - x86_64: MinGW.
+  - x86_64: MSVC 14.
+  - hppa64: HP-UX 11.
+  - m68k: Linux.
+
+* Verified support for the following platforms:
+  (A build on these platforms worked and still works.)
+  - i386: FreeBSD, NetBSD, OpenBSD, DragonFly BSD.
+  - i386: Hurd.
+  - x86_64: FreeBSD, NetBSD, OpenBSD.
+
+New in 1.13:
+
+* The license has been changed from GPLv2 to GPLv2+.
+
+* Added support for the following platforms:
+  (Previously, a build on these platforms failed.)
+  - x86_64: Mac OS X 64-bit.
+  - x86_64: Solaris 64-bit.
+  - x86_64: Linux with x32 ABI: CC="gcc -mx32".
+  - arm: Linux 32-bit, without hardware floats.
+  - arm64: Linux 64-bit.
+  - s390x: Linux 64-bit.
+  - powerpc: AIX 64-bit.
+  - mips: IRIX 6.5 with CC="cc -32".
+  - sparc: Solaris 64-bit.
+
+* Fixed support for the following platforms:
+  (Previously, a build on these platforms appeared to succeed but was buggy.)
+  - x86_64: Linux.
+  - arm: Linux 32-bit, with hardware floats.
+  - powerpc: Linux 64-bit.
+  - mips: Linux with CC="gcc -mabi=32".
+  - mips: Linux with CC="gcc -mabi=n32".
+  - mips: Linux with CC="gcc -mabi=64".
+  - mips: IRIX 6.5 with CC="gcc -mabi=n32".
+  - s390: Linux.
+  - sparc: Linux 64-bit.
+  - ia64: Linux.
+  - hppa: HP-UX 32-bit.
+
+* Verified support for the following platforms:
+  (A build on these platforms worked and still works.)
+  - i386: Linux, Solaris, Mac OS X.
+  - powerpc: Linux 32-bit.
+  - powerpc: AIX 32-bit.
+  - powerpc: MacOS X.
+  - mips: IRIX 6.5 with CC="cc -n32".
+  - sparc: Solaris 32-bit.
+  - sparc: Linux 32-bit: CC="gcc -m32".
+  - alpha: Linux.
+
+* Support for a security feature: On Linux and FreeBSD platforms, linking with
+  the libffcall libraries no longer causes the stack to become executable.
+
+New in 1.12:
+
+* Added ppc64le to the list of supported architectures.
+
+New in 1.11:
+
+* Header now define LIBFFCALL_VERSION (to 0x010B).
+* Better support for IA64 on Linux (kernel 2.6.16+ and gcc 4.1.0+).
+* Added ARM support from Jonathan Olson (debian 1.10-2).
+* Added MIPSel support from Thiemo Seufer (debian 1.10-2).
+* Added ARMel support from Max Lapan.
+
+New in 1.10:
+
+* Added support for PowerPC NetBSD.
+
+New in 1.9:
+
+* Added support for x86_64 (AMD64) Linux.
+* Added support for PowerPC MacOS X.
+
+New in 1.8:
+
+* Added support for IA64 Linux.
+
+New in 1.7:
+
+* Struct types containing elements other than int, long, long long, pointer
+  are not supported any more. Passing them as arguments and results is too
+  hairy.
+* Added support for PowerPC Linux.
+
+New in 1.6:
+
+* The avcall and callback packages are compiled as position-independent code,
+  if CC="gcc -fPIC".
+* The avcall and callback packages are built as shared libraries, if
+  the option "--enable-shared" is passed to configure.
+* The package can now be built with CC="gcc -x c++".
+* Improved RS6000/PowerPC support.
+* Improved support for gcc on Irix6 (-n32 ABI).
+* Added preliminary support for 64-bit SPARC.
+
+New in 1.5:
+
+* Added support for m68k Linux.
+
+New in 1.4:
+
+* Added support for the two new ABIs on Irix6 (-n32, -64).
+* A fix for DEC Alpha.
+
+New in 1.3.1:
+
+* Added support for Mingw32 on Win32.
+* Fixed a compilation problem in trampoline on m68k NetBSD.
+* Fixed an installation problem with clisp: When configured outside the source
+  directory, callback.h would not be copied into the build directory.
+
+New in 1.3:
+
+* Added the callback package, a reentrant combination of vacall and trampoline.
+* The avcall and callback packages are multithread-safe.
+* Fixed bugs in trampoline on hppa and rs6000.
+* On hppa, added support for gcc-2.7.2, although its calling convention is
+  different from gcc-2.6.3.
+
+New in 1.2.1:
+
+* Added support for MSVC5 on Win32.
+
+New in 1.2:
+
+* Support passing/returning values of type ‘long long’ and ‘unsigned long long’
+  on platforms which have these types.
+* Support for "stdcall" calling convention on i386.
+* Added support for Cygwin32 and MSVC4 on Win32.
+* Added support for EMX on OS/2.
+* Added support for m68k AmigaOS (Jörg Höhle).
+* Added support for m68k SunOS 4.0.3.
+* More reliable cache-flushing in trampoline.
+
+New in 1.1:
+
+* Added support for SUNWspro cc on Sparc Solaris.
+* Added support for AIX 4.
+* Added preliminary support for 64-bit MIPS.
+
diff --git a/PLATFORMS b/PLATFORMS
new file mode 100644 (file)
index 0000000..729a200
--- /dev/null
+++ b/PLATFORMS
@@ -0,0 +1,52 @@
+Supported CPUs:  (Put the GNU config.guess values here.)
+     i386       i486-unknown-linux (gcc), i686-unknown-gnu0.9 (gcc),
+                i386-unknown-sysv4.0 (gcc, /usr/bin/cc, /usr/ucb/cc),
+                i386-pc-solaris2.6 (gcc), i386-pc-solaris2.10 (gcc, cc),
+                i486-unknown-sco3.2v4.2 (gcc, cc -Of),
+                i486-unknown-os2emx (gcc), i386-pc-cygwin32 (gcc),
+                i386-w64-mingw32 (gcc, MSVC 14),
+                i586-unknown-freebsd11.0 (cc), i386-unknown-dragonfly3.8 (gcc),
+                i386-unknown-netbsdelf7.0 (gcc), i386-unknown-openbsd6.0 (gcc),
+                i586-pc-haiku (gcc-x86), i386-pc-minix (clang)
+     m68k       m68k-next-nextstep3 (cc), m68k-sun-sunos4.0 (cc),
+                m68k-unknown-linux (gcc)
+     mips       mips-sgi-irix4.0.5 (gcc, cc -ansi, cc -D__STDC__, cc -cckr),
+                mips-sgi-irix5.2 (gcc, cc -ansi, cc -D__STDC__, cc -cckr),
+                mips-sgi-irix5.3 (gcc, cc -ansi, cc -D__STDC__, cc -cckr),
+                mips-sgi-irix6.2 (cc -32),
+                mips-sgi-irix6.4 (cc -32, cc -n32, cc -64),
+                mips-sgi-irix6.5 (cc -32, cc -n32, gcc -mabi=n32),
+                mips-unknown-linux (gcc -mabi=32),
+                mips64-unknown-linux (gcc -mabi=n32, gcc -mabi=64)
+     sparc      sparc-sun-sunos4.1.1 (gcc, cc), sparc-sun-solaris2.3 (gcc)
+                sparc-sun-solaris2.4 (gcc, cc), sparc-sun-solaris2.10 (gcc, cc),
+                sparc64-sun-solaris2.10 (gcc -m64, cc -xarch=generic64),
+                sparc-unknown-linux (gcc), sparc64-unknown-linux (gcc),
+                sparc-unknown-netbsdelf7.1 (gcc),
+                sparc64-unknown-netbsd8.0 (gcc)
+     alpha      alpha-dec-osf3.0 (gcc, cc), alpha-dec-osf4.0 (gcc, cc),
+                alphaev67-unknown-linux (gcc)
+     hppa       hppa1.0-hp-hpux8.00 (gcc, cc), hppa1.1-hp-hpux9.05 (cc),
+                hppa1.1-hp-hpux10.01 (cc), hppa2.0-hp-hpux10.20 (cc +DA1.1),
+                hppa2.0w-hp-hpux11.31 (cc), hppa-unknown-linux (gcc)
+     hppa64     hppa64-hp-hpux11.31 (cc +DD64)
+     arm        armv5tejl-unknown-linux (gcc), armv6l-unknown-linux (gcc),
+                armv7l-unknown-linux (gcc)
+     arm64      aarch64-unknown-linux (gcc)
+     powerpc    powerpc-ibm-aix4.1.4.0 (cc), powerpc-ibm-aix7.1.3.0 (xlc, gcc),
+                powerpc-unknown-linux (gcc), powerpc-apple-darwin6.8 (gcc),
+                powerpc-apple-darwin9.8.0 (gcc)
+     powerpc64  powerpc-ibm-aix7.1.3.0 (gcc -maix64, xlc -q64; AR="ar -X 64"),
+                powerpc64-unknown-linux (gcc -m64),
+                powerpc64le-unknown-linux (gcc)
+     ia64       ia64-unknown-linux (gcc)
+     x86_64     x86_64-suse-linux (gcc), x86_64-unknown-linux (gcc -mx32),
+                x86_64-pc-solaris2.10 (gcc -m64, cc -xarch=generic64),
+                x86_64-pc-cygwin (gcc), x86_64-w64-mingw32 (gcc, MSVC 14),
+                x86_64-unknown-freebsd11.0 (cc), x86_64-unknown-netbsd7.0 (gcc),
+                x86_64-unknown-openbsd6.0 (gcc)
+     s390       s390x-ibm-linux (gcc -m31)
+     s390x      s390x-ibm-linux (gcc)
+     riscv32    riscv32-unknown-linux (gcc -mabi=ilp32d)
+     riscv64    riscv64-unknown-linux (gcc -mabi=lp64d)
+
diff --git a/README b/README
new file mode 100644 (file)
index 0000000..c78f9d8
--- /dev/null
+++ b/README
@@ -0,0 +1,112 @@
+libffcall - foreign function call libraries
+
+This is a library which can be used to build foreign function call interfaces
+in embedded interpreters.
+
+
+Installed libraries and header files:
+
+    It installs a library libffcall.{a,so}; to link with it, use the compiler
+    option '-lffcall'.
+
+    It consists of two parts:
+      * avcall - calling C functions with variable arguments.
+        Its include file is <avcall.h>.
+      * callback - closures with variable arguments as first-class C functions.
+        Its include file is <callback.h>.
+
+    Additionally, you can determine the libffcall version by including
+    <ffcall-version.h>.
+
+    For backward compatibility with versions 1.x, libraries libavcall.{a,so}
+    and libcallback.{a,so} are installed as well. But they are deprecated;
+    use libffcall.{a,so} instead.
+
+
+Installation instructions:
+
+        mkdir builddir
+        cd builddir
+        ../configure --cache-file=config.cache
+        make
+        make check
+        make install
+
+
+Files in this package:
+
+    Documentation:
+
+        README          this text
+        COPYING         free software license
+        PLATFORMS       list of supported platforms
+
+    Source:
+
+        avcall/*        the avcall package
+                        (compiled into libffcall)
+
+        vacall/*        the vacall package
+                        Implements C functions accepting variable argument
+                        prototypes.
+                        This is a non-reentrant variant of part of 'callback'.
+                        *Not* compiled into libffcall.
+
+        trampoline/*    the trampoline package
+                        Implements closures as first-class C functions.
+                        This is a non-reentrant variant of part of 'callback'.
+                        *Not* compiled into libffcall.
+
+        callback/*      the callback package
+                        (compiled into libffcall)
+
+    Building:
+
+        configure       configuration script
+        configure.ac    autoconf source for the configuration script
+        m4/*            auxiliary configuration scripts
+        Makefile.in     Makefile master
+
+
+Copyright notice:
+
+Copyright 1993-1995 Bill Triggs <Bill.Triggs@inrialpes.fr>        (original avcall)
+Copyright 1995-2017 Bruno Haible <bruno@clisp.org>                (everything)
+Copyright 1997      Jörg Höhle <Joerg.Hoehle@gmd.de>              (m68k AmigaOS support)
+Copyright 2000      Adam Fedor <fedor@gnu.org>                    (PowerPC MacOS support)
+Copyright 2001-2012 Sam Steingold <sds@gnu.org>                   (build infrastructure)
+Copyright 2001-2002 Gerhard Tonn <GerhardTonn@swol.de> <gt@debian.org> (s390 support)
+Copyright 2004      Paul Guyot <pguyot@kallisys.net>              (PowerPC MacOS support)
+Copyright 2005      Thiemo Seufer <ths@debian.org>                (MIPS EL support)
+Copyright 2009      Max Lapan <max.lapan@gmail.com>               (ARM EL support)
+Copyright 2010      Valery Ushakov <uwe@netbsd.org>               (SPARC64 improvements)
+
+This program is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+
+Distribution:
+
+git:
+$ git clone git://git.savannah.gnu.org/libffcall.git
+See https://savannah.gnu.org/git/?group=libffcall for more info.
+
+Bug reports:
+
+Report bugs
+  - in the bug tracker at <https://savannah.gnu.org/projects/libffcall>
+  - or by email to <libffcall@gnu.org>.
+
+Homepage:
+
+  https://www.gnu.org/software/libffcall/
diff --git a/VERSION b/VERSION
new file mode 100644 (file)
index 0000000..8bbe6cf
--- /dev/null
+++ b/VERSION
@@ -0,0 +1 @@
+2.2
diff --git a/aclocal.m4 b/aclocal.m4
new file mode 100644 (file)
index 0000000..3380e50
--- /dev/null
@@ -0,0 +1,1194 @@
+# generated automatically by aclocal 1.15.1 -*- Autoconf -*-
+
+# Copyright (C) 1996-2017 Free Software Foundation, Inc.
+
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
+# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
+# PARTICULAR PURPOSE.
+
+m4_ifndef([AC_CONFIG_MACRO_DIRS], [m4_defun([_AM_CONFIG_MACRO_DIRS], [])m4_defun([AC_CONFIG_MACRO_DIRS], [_AM_CONFIG_MACRO_DIRS($@)])])
+m4_ifndef([AC_AUTOCONF_VERSION],
+  [m4_copy([m4_PACKAGE_VERSION], [AC_AUTOCONF_VERSION])])dnl
+m4_if(m4_defn([AC_AUTOCONF_VERSION]), [2.69],,
+[m4_warning([this file was generated for autoconf 2.69.
+You have another version of autoconf.  It may work, but is not guaranteed to.
+If you have problems, you may need to regenerate the build system entirely.
+To do so, use the procedure documented by the package, typically 'autoreconf'.])])
+
+# Copyright (C) 2002-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# AM_AUTOMAKE_VERSION(VERSION)
+# ----------------------------
+# Automake X.Y traces this macro to ensure aclocal.m4 has been
+# generated from the m4 files accompanying Automake X.Y.
+# (This private macro should not be called outside this file.)
+AC_DEFUN([AM_AUTOMAKE_VERSION],
+[am__api_version='1.15'
+dnl Some users find AM_AUTOMAKE_VERSION and mistake it for a way to
+dnl require some minimum version.  Point them to the right macro.
+m4_if([$1], [1.15.1], [],
+      [AC_FATAL([Do not call $0, use AM_INIT_AUTOMAKE([$1]).])])dnl
+])
+
+# _AM_AUTOCONF_VERSION(VERSION)
+# -----------------------------
+# aclocal traces this macro to find the Autoconf version.
+# This is a private macro too.  Using m4_define simplifies
+# the logic in aclocal, which can simply ignore this definition.
+m4_define([_AM_AUTOCONF_VERSION], [])
+
+# AM_SET_CURRENT_AUTOMAKE_VERSION
+# -------------------------------
+# Call AM_AUTOMAKE_VERSION and AM_AUTOMAKE_VERSION so they can be traced.
+# This function is AC_REQUIREd by AM_INIT_AUTOMAKE.
+AC_DEFUN([AM_SET_CURRENT_AUTOMAKE_VERSION],
+[AM_AUTOMAKE_VERSION([1.15.1])dnl
+m4_ifndef([AC_AUTOCONF_VERSION],
+  [m4_copy([m4_PACKAGE_VERSION], [AC_AUTOCONF_VERSION])])dnl
+_AM_AUTOCONF_VERSION(m4_defn([AC_AUTOCONF_VERSION]))])
+
+# AM_AUX_DIR_EXPAND                                         -*- Autoconf -*-
+
+# Copyright (C) 2001-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# For projects using AC_CONFIG_AUX_DIR([foo]), Autoconf sets
+# $ac_aux_dir to '$srcdir/foo'.  In other projects, it is set to
+# '$srcdir', '$srcdir/..', or '$srcdir/../..'.
+#
+# Of course, Automake must honor this variable whenever it calls a
+# tool from the auxiliary directory.  The problem is that $srcdir (and
+# therefore $ac_aux_dir as well) can be either absolute or relative,
+# depending on how configure is run.  This is pretty annoying, since
+# it makes $ac_aux_dir quite unusable in subdirectories: in the top
+# source directory, any form will work fine, but in subdirectories a
+# relative path needs to be adjusted first.
+#
+# $ac_aux_dir/missing
+#    fails when called from a subdirectory if $ac_aux_dir is relative
+# $top_srcdir/$ac_aux_dir/missing
+#    fails if $ac_aux_dir is absolute,
+#    fails when called from a subdirectory in a VPATH build with
+#          a relative $ac_aux_dir
+#
+# The reason of the latter failure is that $top_srcdir and $ac_aux_dir
+# are both prefixed by $srcdir.  In an in-source build this is usually
+# harmless because $srcdir is '.', but things will broke when you
+# start a VPATH build or use an absolute $srcdir.
+#
+# So we could use something similar to $top_srcdir/$ac_aux_dir/missing,
+# iff we strip the leading $srcdir from $ac_aux_dir.  That would be:
+#   am_aux_dir='\$(top_srcdir)/'`expr "$ac_aux_dir" : "$srcdir//*\(.*\)"`
+# and then we would define $MISSING as
+#   MISSING="\${SHELL} $am_aux_dir/missing"
+# This will work as long as MISSING is not called from configure, because
+# unfortunately $(top_srcdir) has no meaning in configure.
+# However there are other variables, like CC, which are often used in
+# configure, and could therefore not use this "fixed" $ac_aux_dir.
+#
+# Another solution, used here, is to always expand $ac_aux_dir to an
+# absolute PATH.  The drawback is that using absolute paths prevent a
+# configured tree to be moved without reconfiguration.
+
+AC_DEFUN([AM_AUX_DIR_EXPAND],
+[AC_REQUIRE([AC_CONFIG_AUX_DIR_DEFAULT])dnl
+# Expand $ac_aux_dir to an absolute path.
+am_aux_dir=`cd "$ac_aux_dir" && pwd`
+])
+
+# AM_CONDITIONAL                                            -*- Autoconf -*-
+
+# Copyright (C) 1997-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# AM_CONDITIONAL(NAME, SHELL-CONDITION)
+# -------------------------------------
+# Define a conditional.
+AC_DEFUN([AM_CONDITIONAL],
+[AC_PREREQ([2.52])dnl
+ m4_if([$1], [TRUE],  [AC_FATAL([$0: invalid condition: $1])],
+       [$1], [FALSE], [AC_FATAL([$0: invalid condition: $1])])dnl
+AC_SUBST([$1_TRUE])dnl
+AC_SUBST([$1_FALSE])dnl
+_AM_SUBST_NOTMAKE([$1_TRUE])dnl
+_AM_SUBST_NOTMAKE([$1_FALSE])dnl
+m4_define([_AM_COND_VALUE_$1], [$2])dnl
+if $2; then
+  $1_TRUE=
+  $1_FALSE='#'
+else
+  $1_TRUE='#'
+  $1_FALSE=
+fi
+AC_CONFIG_COMMANDS_PRE(
+[if test -z "${$1_TRUE}" && test -z "${$1_FALSE}"; then
+  AC_MSG_ERROR([[conditional "$1" was never defined.
+Usually this means the macro was only invoked conditionally.]])
+fi])])
+
+# Copyright (C) 1999-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+
+# There are a few dirty hacks below to avoid letting 'AC_PROG_CC' be
+# written in clear, in which case automake, when reading aclocal.m4,
+# will think it sees a *use*, and therefore will trigger all it's
+# C support machinery.  Also note that it means that autoscan, seeing
+# CC etc. in the Makefile, will ask for an AC_PROG_CC use...
+
+
+# _AM_DEPENDENCIES(NAME)
+# ----------------------
+# See how the compiler implements dependency checking.
+# NAME is "CC", "CXX", "OBJC", "OBJCXX", "UPC", or "GJC".
+# We try a few techniques and use that to set a single cache variable.
+#
+# We don't AC_REQUIRE the corresponding AC_PROG_CC since the latter was
+# modified to invoke _AM_DEPENDENCIES(CC); we would have a circular
+# dependency, and given that the user is not expected to run this macro,
+# just rely on AC_PROG_CC.
+AC_DEFUN([_AM_DEPENDENCIES],
+[AC_REQUIRE([AM_SET_DEPDIR])dnl
+AC_REQUIRE([AM_OUTPUT_DEPENDENCY_COMMANDS])dnl
+AC_REQUIRE([AM_MAKE_INCLUDE])dnl
+AC_REQUIRE([AM_DEP_TRACK])dnl
+
+m4_if([$1], [CC],   [depcc="$CC"   am_compiler_list=],
+      [$1], [CXX],  [depcc="$CXX"  am_compiler_list=],
+      [$1], [OBJC], [depcc="$OBJC" am_compiler_list='gcc3 gcc'],
+      [$1], [OBJCXX], [depcc="$OBJCXX" am_compiler_list='gcc3 gcc'],
+      [$1], [UPC],  [depcc="$UPC"  am_compiler_list=],
+      [$1], [GCJ],  [depcc="$GCJ"  am_compiler_list='gcc3 gcc'],
+                    [depcc="$$1"   am_compiler_list=])
+
+AC_CACHE_CHECK([dependency style of $depcc],
+               [am_cv_$1_dependencies_compiler_type],
+[if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then
+  # We make a subdir and do the tests there.  Otherwise we can end up
+  # making bogus files that we don't know about and never remove.  For
+  # instance it was reported that on HP-UX the gcc test will end up
+  # making a dummy file named 'D' -- because '-MD' means "put the output
+  # in D".
+  rm -rf conftest.dir
+  mkdir conftest.dir
+  # Copy depcomp to subdir because otherwise we won't find it if we're
+  # using a relative directory.
+  cp "$am_depcomp" conftest.dir
+  cd conftest.dir
+  # We will build objects and dependencies in a subdirectory because
+  # it helps to detect inapplicable dependency modes.  For instance
+  # both Tru64's cc and ICC support -MD to output dependencies as a
+  # side effect of compilation, but ICC will put the dependencies in
+  # the current directory while Tru64 will put them in the object
+  # directory.
+  mkdir sub
+
+  am_cv_$1_dependencies_compiler_type=none
+  if test "$am_compiler_list" = ""; then
+     am_compiler_list=`sed -n ['s/^#*\([a-zA-Z0-9]*\))$/\1/p'] < ./depcomp`
+  fi
+  am__universal=false
+  m4_case([$1], [CC],
+    [case " $depcc " in #(
+     *\ -arch\ *\ -arch\ *) am__universal=true ;;
+     esac],
+    [CXX],
+    [case " $depcc " in #(
+     *\ -arch\ *\ -arch\ *) am__universal=true ;;
+     esac])
+
+  for depmode in $am_compiler_list; do
+    # Setup a source with many dependencies, because some compilers
+    # like to wrap large dependency lists on column 80 (with \), and
+    # we should not choose a depcomp mode which is confused by this.
+    #
+    # We need to recreate these files for each test, as the compiler may
+    # overwrite some of them when testing with obscure command lines.
+    # This happens at least with the AIX C compiler.
+    : > sub/conftest.c
+    for i in 1 2 3 4 5 6; do
+      echo '#include "conftst'$i'.h"' >> sub/conftest.c
+      # Using ": > sub/conftst$i.h" creates only sub/conftst1.h with
+      # Solaris 10 /bin/sh.
+      echo '/* dummy */' > sub/conftst$i.h
+    done
+    echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf
+
+    # We check with '-c' and '-o' for the sake of the "dashmstdout"
+    # mode.  It turns out that the SunPro C++ compiler does not properly
+    # handle '-M -o', and we need to detect this.  Also, some Intel
+    # versions had trouble with output in subdirs.
+    am__obj=sub/conftest.${OBJEXT-o}
+    am__minus_obj="-o $am__obj"
+    case $depmode in
+    gcc)
+      # This depmode causes a compiler race in universal mode.
+      test "$am__universal" = false || continue
+      ;;
+    nosideeffect)
+      # After this tag, mechanisms are not by side-effect, so they'll
+      # only be used when explicitly requested.
+      if test "x$enable_dependency_tracking" = xyes; then
+       continue
+      else
+       break
+      fi
+      ;;
+    msvc7 | msvc7msys | msvisualcpp | msvcmsys)
+      # This compiler won't grok '-c -o', but also, the minuso test has
+      # not run yet.  These depmodes are late enough in the game, and
+      # so weak that their functioning should not be impacted.
+      am__obj=conftest.${OBJEXT-o}
+      am__minus_obj=
+      ;;
+    none) break ;;
+    esac
+    if depmode=$depmode \
+       source=sub/conftest.c object=$am__obj \
+       depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \
+       $SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \
+         >/dev/null 2>conftest.err &&
+       grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 &&
+       grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 &&
+       grep $am__obj sub/conftest.Po > /dev/null 2>&1 &&
+       ${MAKE-make} -s -f confmf > /dev/null 2>&1; then
+      # icc doesn't choke on unknown options, it will just issue warnings
+      # or remarks (even with -Werror).  So we grep stderr for any message
+      # that says an option was ignored or not supported.
+      # When given -MP, icc 7.0 and 7.1 complain thusly:
+      #   icc: Command line warning: ignoring option '-M'; no argument required
+      # The diagnosis changed in icc 8.0:
+      #   icc: Command line remark: option '-MP' not supported
+      if (grep 'ignoring option' conftest.err ||
+          grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else
+        am_cv_$1_dependencies_compiler_type=$depmode
+        break
+      fi
+    fi
+  done
+
+  cd ..
+  rm -rf conftest.dir
+else
+  am_cv_$1_dependencies_compiler_type=none
+fi
+])
+AC_SUBST([$1DEPMODE], [depmode=$am_cv_$1_dependencies_compiler_type])
+AM_CONDITIONAL([am__fastdep$1], [
+  test "x$enable_dependency_tracking" != xno \
+  && test "$am_cv_$1_dependencies_compiler_type" = gcc3])
+])
+
+
+# AM_SET_DEPDIR
+# -------------
+# Choose a directory name for dependency files.
+# This macro is AC_REQUIREd in _AM_DEPENDENCIES.
+AC_DEFUN([AM_SET_DEPDIR],
+[AC_REQUIRE([AM_SET_LEADING_DOT])dnl
+AC_SUBST([DEPDIR], ["${am__leading_dot}deps"])dnl
+])
+
+
+# AM_DEP_TRACK
+# ------------
+AC_DEFUN([AM_DEP_TRACK],
+[AC_ARG_ENABLE([dependency-tracking], [dnl
+AS_HELP_STRING(
+  [--enable-dependency-tracking],
+  [do not reject slow dependency extractors])
+AS_HELP_STRING(
+  [--disable-dependency-tracking],
+  [speeds up one-time build])])
+if test "x$enable_dependency_tracking" != xno; then
+  am_depcomp="$ac_aux_dir/depcomp"
+  AMDEPBACKSLASH='\'
+  am__nodep='_no'
+fi
+AM_CONDITIONAL([AMDEP], [test "x$enable_dependency_tracking" != xno])
+AC_SUBST([AMDEPBACKSLASH])dnl
+_AM_SUBST_NOTMAKE([AMDEPBACKSLASH])dnl
+AC_SUBST([am__nodep])dnl
+_AM_SUBST_NOTMAKE([am__nodep])dnl
+])
+
+# Generate code to set up dependency tracking.              -*- Autoconf -*-
+
+# Copyright (C) 1999-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+
+# _AM_OUTPUT_DEPENDENCY_COMMANDS
+# ------------------------------
+AC_DEFUN([_AM_OUTPUT_DEPENDENCY_COMMANDS],
+[{
+  # Older Autoconf quotes --file arguments for eval, but not when files
+  # are listed without --file.  Let's play safe and only enable the eval
+  # if we detect the quoting.
+  case $CONFIG_FILES in
+  *\'*) eval set x "$CONFIG_FILES" ;;
+  *)   set x $CONFIG_FILES ;;
+  esac
+  shift
+  for mf
+  do
+    # Strip MF so we end up with the name of the file.
+    mf=`echo "$mf" | sed -e 's/:.*$//'`
+    # Check whether this is an Automake generated Makefile or not.
+    # We used to match only the files named 'Makefile.in', but
+    # some people rename them; so instead we look at the file content.
+    # Grep'ing the first line is not enough: some people post-process
+    # each Makefile.in and add a new line on top of each file to say so.
+    # Grep'ing the whole file is not good either: AIX grep has a line
+    # limit of 2048, but all sed's we know have understand at least 4000.
+    if sed -n 's,^#.*generated by automake.*,X,p' "$mf" | grep X >/dev/null 2>&1; then
+      dirpart=`AS_DIRNAME("$mf")`
+    else
+      continue
+    fi
+    # Extract the definition of DEPDIR, am__include, and am__quote
+    # from the Makefile without running 'make'.
+    DEPDIR=`sed -n 's/^DEPDIR = //p' < "$mf"`
+    test -z "$DEPDIR" && continue
+    am__include=`sed -n 's/^am__include = //p' < "$mf"`
+    test -z "$am__include" && continue
+    am__quote=`sed -n 's/^am__quote = //p' < "$mf"`
+    # Find all dependency output files, they are included files with
+    # $(DEPDIR) in their names.  We invoke sed twice because it is the
+    # simplest approach to changing $(DEPDIR) to its actual value in the
+    # expansion.
+    for file in `sed -n "
+      s/^$am__include $am__quote\(.*(DEPDIR).*\)$am__quote"'$/\1/p' <"$mf" | \
+        sed -e 's/\$(DEPDIR)/'"$DEPDIR"'/g'`; do
+      # Make sure the directory exists.
+      test -f "$dirpart/$file" && continue
+      fdir=`AS_DIRNAME(["$file"])`
+      AS_MKDIR_P([$dirpart/$fdir])
+      # echo "creating $dirpart/$file"
+      echo '# dummy' > "$dirpart/$file"
+    done
+  done
+}
+])# _AM_OUTPUT_DEPENDENCY_COMMANDS
+
+
+# AM_OUTPUT_DEPENDENCY_COMMANDS
+# -----------------------------
+# This macro should only be invoked once -- use via AC_REQUIRE.
+#
+# This code is only required when automatic dependency tracking
+# is enabled.  FIXME.  This creates each '.P' file that we will
+# need in order to bootstrap the dependency handling code.
+AC_DEFUN([AM_OUTPUT_DEPENDENCY_COMMANDS],
+[AC_CONFIG_COMMANDS([depfiles],
+     [test x"$AMDEP_TRUE" != x"" || _AM_OUTPUT_DEPENDENCY_COMMANDS],
+     [AMDEP_TRUE="$AMDEP_TRUE" ac_aux_dir="$ac_aux_dir"])
+])
+
+# Do all the work for Automake.                             -*- Autoconf -*-
+
+# Copyright (C) 1996-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# This macro actually does too much.  Some checks are only needed if
+# your package does certain things.  But this isn't really a big deal.
+
+dnl Redefine AC_PROG_CC to automatically invoke _AM_PROG_CC_C_O.
+m4_define([AC_PROG_CC],
+m4_defn([AC_PROG_CC])
+[_AM_PROG_CC_C_O
+])
+
+# AM_INIT_AUTOMAKE(PACKAGE, VERSION, [NO-DEFINE])
+# AM_INIT_AUTOMAKE([OPTIONS])
+# -----------------------------------------------
+# The call with PACKAGE and VERSION arguments is the old style
+# call (pre autoconf-2.50), which is being phased out.  PACKAGE
+# and VERSION should now be passed to AC_INIT and removed from
+# the call to AM_INIT_AUTOMAKE.
+# We support both call styles for the transition.  After
+# the next Automake release, Autoconf can make the AC_INIT
+# arguments mandatory, and then we can depend on a new Autoconf
+# release and drop the old call support.
+AC_DEFUN([AM_INIT_AUTOMAKE],
+[AC_PREREQ([2.65])dnl
+dnl Autoconf wants to disallow AM_ names.  We explicitly allow
+dnl the ones we care about.
+m4_pattern_allow([^AM_[A-Z]+FLAGS$])dnl
+AC_REQUIRE([AM_SET_CURRENT_AUTOMAKE_VERSION])dnl
+AC_REQUIRE([AC_PROG_INSTALL])dnl
+if test "`cd $srcdir && pwd`" != "`pwd`"; then
+  # Use -I$(srcdir) only when $(srcdir) != ., so that make's output
+  # is not polluted with repeated "-I."
+  AC_SUBST([am__isrc], [' -I$(srcdir)'])_AM_SUBST_NOTMAKE([am__isrc])dnl
+  # test to see if srcdir already configured
+  if test -f $srcdir/config.status; then
+    AC_MSG_ERROR([source directory already configured; run "make distclean" there first])
+  fi
+fi
+
+# test whether we have cygpath
+if test -z "$CYGPATH_W"; then
+  if (cygpath --version) >/dev/null 2>/dev/null; then
+    CYGPATH_W='cygpath -w'
+  else
+    CYGPATH_W=echo
+  fi
+fi
+AC_SUBST([CYGPATH_W])
+
+# Define the identity of the package.
+dnl Distinguish between old-style and new-style calls.
+m4_ifval([$2],
+[AC_DIAGNOSE([obsolete],
+             [$0: two- and three-arguments forms are deprecated.])
+m4_ifval([$3], [_AM_SET_OPTION([no-define])])dnl
+ AC_SUBST([PACKAGE], [$1])dnl
+ AC_SUBST([VERSION], [$2])],
+[_AM_SET_OPTIONS([$1])dnl
+dnl Diagnose old-style AC_INIT with new-style AM_AUTOMAKE_INIT.
+m4_if(
+  m4_ifdef([AC_PACKAGE_NAME], [ok]):m4_ifdef([AC_PACKAGE_VERSION], [ok]),
+  [ok:ok],,
+  [m4_fatal([AC_INIT should be called with package and version arguments])])dnl
+ AC_SUBST([PACKAGE], ['AC_PACKAGE_TARNAME'])dnl
+ AC_SUBST([VERSION], ['AC_PACKAGE_VERSION'])])dnl
+
+_AM_IF_OPTION([no-define],,
+[AC_DEFINE_UNQUOTED([PACKAGE], ["$PACKAGE"], [Name of package])
+ AC_DEFINE_UNQUOTED([VERSION], ["$VERSION"], [Version number of package])])dnl
+
+# Some tools Automake needs.
+AC_REQUIRE([AM_SANITY_CHECK])dnl
+AC_REQUIRE([AC_ARG_PROGRAM])dnl
+AM_MISSING_PROG([ACLOCAL], [aclocal-${am__api_version}])
+AM_MISSING_PROG([AUTOCONF], [autoconf])
+AM_MISSING_PROG([AUTOMAKE], [automake-${am__api_version}])
+AM_MISSING_PROG([AUTOHEADER], [autoheader])
+AM_MISSING_PROG([MAKEINFO], [makeinfo])
+AC_REQUIRE([AM_PROG_INSTALL_SH])dnl
+AC_REQUIRE([AM_PROG_INSTALL_STRIP])dnl
+AC_REQUIRE([AC_PROG_MKDIR_P])dnl
+# For better backward compatibility.  To be removed once Automake 1.9.x
+# dies out for good.  For more background, see:
+# <http://lists.gnu.org/archive/html/automake/2012-07/msg00001.html>
+# <http://lists.gnu.org/archive/html/automake/2012-07/msg00014.html>
+AC_SUBST([mkdir_p], ['$(MKDIR_P)'])
+# We need awk for the "check" target (and possibly the TAP driver).  The
+# system "awk" is bad on some platforms.
+AC_REQUIRE([AC_PROG_AWK])dnl
+AC_REQUIRE([AC_PROG_MAKE_SET])dnl
+AC_REQUIRE([AM_SET_LEADING_DOT])dnl
+_AM_IF_OPTION([tar-ustar], [_AM_PROG_TAR([ustar])],
+             [_AM_IF_OPTION([tar-pax], [_AM_PROG_TAR([pax])],
+                            [_AM_PROG_TAR([v7])])])
+_AM_IF_OPTION([no-dependencies],,
+[AC_PROVIDE_IFELSE([AC_PROG_CC],
+                 [_AM_DEPENDENCIES([CC])],
+                 [m4_define([AC_PROG_CC],
+                            m4_defn([AC_PROG_CC])[_AM_DEPENDENCIES([CC])])])dnl
+AC_PROVIDE_IFELSE([AC_PROG_CXX],
+                 [_AM_DEPENDENCIES([CXX])],
+                 [m4_define([AC_PROG_CXX],
+                            m4_defn([AC_PROG_CXX])[_AM_DEPENDENCIES([CXX])])])dnl
+AC_PROVIDE_IFELSE([AC_PROG_OBJC],
+                 [_AM_DEPENDENCIES([OBJC])],
+                 [m4_define([AC_PROG_OBJC],
+                            m4_defn([AC_PROG_OBJC])[_AM_DEPENDENCIES([OBJC])])])dnl
+AC_PROVIDE_IFELSE([AC_PROG_OBJCXX],
+                 [_AM_DEPENDENCIES([OBJCXX])],
+                 [m4_define([AC_PROG_OBJCXX],
+                            m4_defn([AC_PROG_OBJCXX])[_AM_DEPENDENCIES([OBJCXX])])])dnl
+])
+AC_REQUIRE([AM_SILENT_RULES])dnl
+dnl The testsuite driver may need to know about EXEEXT, so add the
+dnl 'am__EXEEXT' conditional if _AM_COMPILER_EXEEXT was seen.  This
+dnl macro is hooked onto _AC_COMPILER_EXEEXT early, see below.
+AC_CONFIG_COMMANDS_PRE(dnl
+[m4_provide_if([_AM_COMPILER_EXEEXT],
+  [AM_CONDITIONAL([am__EXEEXT], [test -n "$EXEEXT"])])])dnl
+
+# POSIX will say in a future version that running "rm -f" with no argument
+# is OK; and we want to be able to make that assumption in our Makefile
+# recipes.  So use an aggressive probe to check that the usage we want is
+# actually supported "in the wild" to an acceptable degree.
+# See automake bug#10828.
+# To make any issue more visible, cause the running configure to be aborted
+# by default if the 'rm' program in use doesn't match our expectations; the
+# user can still override this though.
+if rm -f && rm -fr && rm -rf; then : OK; else
+  cat >&2 <<'END'
+Oops!
+
+Your 'rm' program seems unable to run without file operands specified
+on the command line, even when the '-f' option is present.  This is contrary
+to the behaviour of most rm programs out there, and not conforming with
+the upcoming POSIX standard: <http://austingroupbugs.net/view.php?id=542>
+
+Please tell bug-automake@gnu.org about your system, including the value
+of your $PATH and any error possibly output before this message.  This
+can help us improve future automake versions.
+
+END
+  if test x"$ACCEPT_INFERIOR_RM_PROGRAM" = x"yes"; then
+    echo 'Configuration will proceed anyway, since you have set the' >&2
+    echo 'ACCEPT_INFERIOR_RM_PROGRAM variable to "yes"' >&2
+    echo >&2
+  else
+    cat >&2 <<'END'
+Aborting the configuration process, to ensure you take notice of the issue.
+
+You can download and install GNU coreutils to get an 'rm' implementation
+that behaves properly: <http://www.gnu.org/software/coreutils/>.
+
+If you want to complete the configuration process using your problematic
+'rm' anyway, export the environment variable ACCEPT_INFERIOR_RM_PROGRAM
+to "yes", and re-run configure.
+
+END
+    AC_MSG_ERROR([Your 'rm' program is bad, sorry.])
+  fi
+fi
+dnl The trailing newline in this macro's definition is deliberate, for
+dnl backward compatibility and to allow trailing 'dnl'-style comments
+dnl after the AM_INIT_AUTOMAKE invocation. See automake bug#16841.
+])
+
+dnl Hook into '_AC_COMPILER_EXEEXT' early to learn its expansion.  Do not
+dnl add the conditional right here, as _AC_COMPILER_EXEEXT may be further
+dnl mangled by Autoconf and run in a shell conditional statement.
+m4_define([_AC_COMPILER_EXEEXT],
+m4_defn([_AC_COMPILER_EXEEXT])[m4_provide([_AM_COMPILER_EXEEXT])])
+
+# When config.status generates a header, we must update the stamp-h file.
+# This file resides in the same directory as the config header
+# that is generated.  The stamp files are numbered to have different names.
+
+# Autoconf calls _AC_AM_CONFIG_HEADER_HOOK (when defined) in the
+# loop where config.status creates the headers, so we can generate
+# our stamp files there.
+AC_DEFUN([_AC_AM_CONFIG_HEADER_HOOK],
+[# Compute $1's index in $config_headers.
+_am_arg=$1
+_am_stamp_count=1
+for _am_header in $config_headers :; do
+  case $_am_header in
+    $_am_arg | $_am_arg:* )
+      break ;;
+    * )
+      _am_stamp_count=`expr $_am_stamp_count + 1` ;;
+  esac
+done
+echo "timestamp for $_am_arg" >`AS_DIRNAME(["$_am_arg"])`/stamp-h[]$_am_stamp_count])
+
+# Copyright (C) 2001-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# AM_PROG_INSTALL_SH
+# ------------------
+# Define $install_sh.
+AC_DEFUN([AM_PROG_INSTALL_SH],
+[AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl
+if test x"${install_sh+set}" != xset; then
+  case $am_aux_dir in
+  *\ * | *\    *)
+    install_sh="\${SHELL} '$am_aux_dir/install-sh'" ;;
+  *)
+    install_sh="\${SHELL} $am_aux_dir/install-sh"
+  esac
+fi
+AC_SUBST([install_sh])])
+
+# Copyright (C) 2003-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# Check whether the underlying file-system supports filenames
+# with a leading dot.  For instance MS-DOS doesn't.
+AC_DEFUN([AM_SET_LEADING_DOT],
+[rm -rf .tst 2>/dev/null
+mkdir .tst 2>/dev/null
+if test -d .tst; then
+  am__leading_dot=.
+else
+  am__leading_dot=_
+fi
+rmdir .tst 2>/dev/null
+AC_SUBST([am__leading_dot])])
+
+# Check to see how 'make' treats includes.                 -*- Autoconf -*-
+
+# Copyright (C) 2001-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# AM_MAKE_INCLUDE()
+# -----------------
+# Check to see how make treats includes.
+AC_DEFUN([AM_MAKE_INCLUDE],
+[am_make=${MAKE-make}
+cat > confinc << 'END'
+am__doit:
+       @echo this is the am__doit target
+.PHONY: am__doit
+END
+# If we don't find an include directive, just comment out the code.
+AC_MSG_CHECKING([for style of include used by $am_make])
+am__include="#"
+am__quote=
+_am_result=none
+# First try GNU make style include.
+echo "include confinc" > confmf
+# Ignore all kinds of additional output from 'make'.
+case `$am_make -s -f confmf 2> /dev/null` in #(
+*the\ am__doit\ target*)
+  am__include=include
+  am__quote=
+  _am_result=GNU
+  ;;
+esac
+# Now try BSD make style include.
+if test "$am__include" = "#"; then
+   echo '.include "confinc"' > confmf
+   case `$am_make -s -f confmf 2> /dev/null` in #(
+   *the\ am__doit\ target*)
+     am__include=.include
+     am__quote="\""
+     _am_result=BSD
+     ;;
+   esac
+fi
+AC_SUBST([am__include])
+AC_SUBST([am__quote])
+AC_MSG_RESULT([$_am_result])
+rm -f confinc confmf
+])
+
+# Fake the existence of programs that GNU maintainers use.  -*- Autoconf -*-
+
+# Copyright (C) 1997-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# AM_MISSING_PROG(NAME, PROGRAM)
+# ------------------------------
+AC_DEFUN([AM_MISSING_PROG],
+[AC_REQUIRE([AM_MISSING_HAS_RUN])
+$1=${$1-"${am_missing_run}$2"}
+AC_SUBST($1)])
+
+# AM_MISSING_HAS_RUN
+# ------------------
+# Define MISSING if not defined so far and test if it is modern enough.
+# If it is, set am_missing_run to use it, otherwise, to nothing.
+AC_DEFUN([AM_MISSING_HAS_RUN],
+[AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl
+AC_REQUIRE_AUX_FILE([missing])dnl
+if test x"${MISSING+set}" != xset; then
+  case $am_aux_dir in
+  *\ * | *\    *)
+    MISSING="\${SHELL} \"$am_aux_dir/missing\"" ;;
+  *)
+    MISSING="\${SHELL} $am_aux_dir/missing" ;;
+  esac
+fi
+# Use eval to expand $SHELL
+if eval "$MISSING --is-lightweight"; then
+  am_missing_run="$MISSING "
+else
+  am_missing_run=
+  AC_MSG_WARN(['missing' script is too old or missing])
+fi
+])
+
+# Helper functions for option handling.                     -*- Autoconf -*-
+
+# Copyright (C) 2001-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# _AM_MANGLE_OPTION(NAME)
+# -----------------------
+AC_DEFUN([_AM_MANGLE_OPTION],
+[[_AM_OPTION_]m4_bpatsubst($1, [[^a-zA-Z0-9_]], [_])])
+
+# _AM_SET_OPTION(NAME)
+# --------------------
+# Set option NAME.  Presently that only means defining a flag for this option.
+AC_DEFUN([_AM_SET_OPTION],
+[m4_define(_AM_MANGLE_OPTION([$1]), [1])])
+
+# _AM_SET_OPTIONS(OPTIONS)
+# ------------------------
+# OPTIONS is a space-separated list of Automake options.
+AC_DEFUN([_AM_SET_OPTIONS],
+[m4_foreach_w([_AM_Option], [$1], [_AM_SET_OPTION(_AM_Option)])])
+
+# _AM_IF_OPTION(OPTION, IF-SET, [IF-NOT-SET])
+# -------------------------------------------
+# Execute IF-SET if OPTION is set, IF-NOT-SET otherwise.
+AC_DEFUN([_AM_IF_OPTION],
+[m4_ifset(_AM_MANGLE_OPTION([$1]), [$2], [$3])])
+
+# Copyright (C) 1999-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# _AM_PROG_CC_C_O
+# ---------------
+# Like AC_PROG_CC_C_O, but changed for automake.  We rewrite AC_PROG_CC
+# to automatically call this.
+AC_DEFUN([_AM_PROG_CC_C_O],
+[AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl
+AC_REQUIRE_AUX_FILE([compile])dnl
+AC_LANG_PUSH([C])dnl
+AC_CACHE_CHECK(
+  [whether $CC understands -c and -o together],
+  [am_cv_prog_cc_c_o],
+  [AC_LANG_CONFTEST([AC_LANG_PROGRAM([])])
+  # Make sure it works both with $CC and with simple cc.
+  # Following AC_PROG_CC_C_O, we do the test twice because some
+  # compilers refuse to overwrite an existing .o file with -o,
+  # though they will create one.
+  am_cv_prog_cc_c_o=yes
+  for am_i in 1 2; do
+    if AM_RUN_LOG([$CC -c conftest.$ac_ext -o conftest2.$ac_objext]) \
+         && test -f conftest2.$ac_objext; then
+      : OK
+    else
+      am_cv_prog_cc_c_o=no
+      break
+    fi
+  done
+  rm -f core conftest*
+  unset am_i])
+if test "$am_cv_prog_cc_c_o" != yes; then
+   # Losing compiler, so override with the script.
+   # FIXME: It is wrong to rewrite CC.
+   # But if we don't then we get into trouble of one sort or another.
+   # A longer-term fix would be to have automake use am__CC in this case,
+   # and then we could set am__CC="\$(top_srcdir)/compile \$(CC)"
+   CC="$am_aux_dir/compile $CC"
+fi
+AC_LANG_POP([C])])
+
+# For backward compatibility.
+AC_DEFUN_ONCE([AM_PROG_CC_C_O], [AC_REQUIRE([AC_PROG_CC])])
+
+# Copyright (C) 2001-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# AM_RUN_LOG(COMMAND)
+# -------------------
+# Run COMMAND, save the exit status in ac_status, and log it.
+# (This has been adapted from Autoconf's _AC_RUN_LOG macro.)
+AC_DEFUN([AM_RUN_LOG],
+[{ echo "$as_me:$LINENO: $1" >&AS_MESSAGE_LOG_FD
+   ($1) >&AS_MESSAGE_LOG_FD 2>&AS_MESSAGE_LOG_FD
+   ac_status=$?
+   echo "$as_me:$LINENO: \$? = $ac_status" >&AS_MESSAGE_LOG_FD
+   (exit $ac_status); }])
+
+# Check to make sure that the build environment is sane.    -*- Autoconf -*-
+
+# Copyright (C) 1996-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# AM_SANITY_CHECK
+# ---------------
+AC_DEFUN([AM_SANITY_CHECK],
+[AC_MSG_CHECKING([whether build environment is sane])
+# Reject unsafe characters in $srcdir or the absolute working directory
+# name.  Accept space and tab only in the latter.
+am_lf='
+'
+case `pwd` in
+  *[[\\\"\#\$\&\'\`$am_lf]]*)
+    AC_MSG_ERROR([unsafe absolute working directory name]);;
+esac
+case $srcdir in
+  *[[\\\"\#\$\&\'\`$am_lf\ \   ]]*)
+    AC_MSG_ERROR([unsafe srcdir value: '$srcdir']);;
+esac
+
+# Do 'set' in a subshell so we don't clobber the current shell's
+# arguments.  Must try -L first in case configure is actually a
+# symlink; some systems play weird games with the mod time of symlinks
+# (eg FreeBSD returns the mod time of the symlink's containing
+# directory).
+if (
+   am_has_slept=no
+   for am_try in 1 2; do
+     echo "timestamp, slept: $am_has_slept" > conftest.file
+     set X `ls -Lt "$srcdir/configure" conftest.file 2> /dev/null`
+     if test "$[*]" = "X"; then
+       # -L didn't work.
+       set X `ls -t "$srcdir/configure" conftest.file`
+     fi
+     if test "$[*]" != "X $srcdir/configure conftest.file" \
+       && test "$[*]" != "X conftest.file $srcdir/configure"; then
+
+       # If neither matched, then we have a broken ls.  This can happen
+       # if, for instance, CONFIG_SHELL is bash and it inherits a
+       # broken ls alias from the environment.  This has actually
+       # happened.  Such a system could not be considered "sane".
+       AC_MSG_ERROR([ls -t appears to fail.  Make sure there is not a broken
+  alias in your environment])
+     fi
+     if test "$[2]" = conftest.file || test $am_try -eq 2; then
+       break
+     fi
+     # Just in case.
+     sleep 1
+     am_has_slept=yes
+   done
+   test "$[2]" = conftest.file
+   )
+then
+   # Ok.
+   :
+else
+   AC_MSG_ERROR([newly created file is older than distributed files!
+Check your system clock])
+fi
+AC_MSG_RESULT([yes])
+# If we didn't sleep, we still need to ensure time stamps of config.status and
+# generated files are strictly newer.
+am_sleep_pid=
+if grep 'slept: no' conftest.file >/dev/null 2>&1; then
+  ( sleep 1 ) &
+  am_sleep_pid=$!
+fi
+AC_CONFIG_COMMANDS_PRE(
+  [AC_MSG_CHECKING([that generated files are newer than configure])
+   if test -n "$am_sleep_pid"; then
+     # Hide warnings about reused PIDs.
+     wait $am_sleep_pid 2>/dev/null
+   fi
+   AC_MSG_RESULT([done])])
+rm -f conftest.file
+])
+
+# Copyright (C) 2009-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# AM_SILENT_RULES([DEFAULT])
+# --------------------------
+# Enable less verbose build rules; with the default set to DEFAULT
+# ("yes" being less verbose, "no" or empty being verbose).
+AC_DEFUN([AM_SILENT_RULES],
+[AC_ARG_ENABLE([silent-rules], [dnl
+AS_HELP_STRING(
+  [--enable-silent-rules],
+  [less verbose build output (undo: "make V=1")])
+AS_HELP_STRING(
+  [--disable-silent-rules],
+  [verbose build output (undo: "make V=0")])dnl
+])
+case $enable_silent_rules in @%:@ (((
+  yes) AM_DEFAULT_VERBOSITY=0;;
+   no) AM_DEFAULT_VERBOSITY=1;;
+    *) AM_DEFAULT_VERBOSITY=m4_if([$1], [yes], [0], [1]);;
+esac
+dnl
+dnl A few 'make' implementations (e.g., NonStop OS and NextStep)
+dnl do not support nested variable expansions.
+dnl See automake bug#9928 and bug#10237.
+am_make=${MAKE-make}
+AC_CACHE_CHECK([whether $am_make supports nested variables],
+   [am_cv_make_support_nested_variables],
+   [if AS_ECHO([['TRUE=$(BAR$(V))
+BAR0=false
+BAR1=true
+V=1
+am__doit:
+       @$(TRUE)
+.PHONY: am__doit']]) | $am_make -f - >/dev/null 2>&1; then
+  am_cv_make_support_nested_variables=yes
+else
+  am_cv_make_support_nested_variables=no
+fi])
+if test $am_cv_make_support_nested_variables = yes; then
+  dnl Using '$V' instead of '$(V)' breaks IRIX make.
+  AM_V='$(V)'
+  AM_DEFAULT_V='$(AM_DEFAULT_VERBOSITY)'
+else
+  AM_V=$AM_DEFAULT_VERBOSITY
+  AM_DEFAULT_V=$AM_DEFAULT_VERBOSITY
+fi
+AC_SUBST([AM_V])dnl
+AM_SUBST_NOTMAKE([AM_V])dnl
+AC_SUBST([AM_DEFAULT_V])dnl
+AM_SUBST_NOTMAKE([AM_DEFAULT_V])dnl
+AC_SUBST([AM_DEFAULT_VERBOSITY])dnl
+AM_BACKSLASH='\'
+AC_SUBST([AM_BACKSLASH])dnl
+_AM_SUBST_NOTMAKE([AM_BACKSLASH])dnl
+])
+
+# Copyright (C) 2001-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# AM_PROG_INSTALL_STRIP
+# ---------------------
+# One issue with vendor 'install' (even GNU) is that you can't
+# specify the program used to strip binaries.  This is especially
+# annoying in cross-compiling environments, where the build's strip
+# is unlikely to handle the host's binaries.
+# Fortunately install-sh will honor a STRIPPROG variable, so we
+# always use install-sh in "make install-strip", and initialize
+# STRIPPROG with the value of the STRIP variable (set by the user).
+AC_DEFUN([AM_PROG_INSTALL_STRIP],
+[AC_REQUIRE([AM_PROG_INSTALL_SH])dnl
+# Installed binaries are usually stripped using 'strip' when the user
+# run "make install-strip".  However 'strip' might not be the right
+# tool to use in cross-compilation environments, therefore Automake
+# will honor the 'STRIP' environment variable to overrule this program.
+dnl Don't test for $cross_compiling = yes, because it might be 'maybe'.
+if test "$cross_compiling" != no; then
+  AC_CHECK_TOOL([STRIP], [strip], :)
+fi
+INSTALL_STRIP_PROGRAM="\$(install_sh) -c -s"
+AC_SUBST([INSTALL_STRIP_PROGRAM])])
+
+# Copyright (C) 2006-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# _AM_SUBST_NOTMAKE(VARIABLE)
+# ---------------------------
+# Prevent Automake from outputting VARIABLE = @VARIABLE@ in Makefile.in.
+# This macro is traced by Automake.
+AC_DEFUN([_AM_SUBST_NOTMAKE])
+
+# AM_SUBST_NOTMAKE(VARIABLE)
+# --------------------------
+# Public sister of _AM_SUBST_NOTMAKE.
+AC_DEFUN([AM_SUBST_NOTMAKE], [_AM_SUBST_NOTMAKE($@)])
+
+# Check how to create a tarball.                            -*- Autoconf -*-
+
+# Copyright (C) 2004-2017 Free Software Foundation, Inc.
+#
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# _AM_PROG_TAR(FORMAT)
+# --------------------
+# Check how to create a tarball in format FORMAT.
+# FORMAT should be one of 'v7', 'ustar', or 'pax'.
+#
+# Substitute a variable $(am__tar) that is a command
+# writing to stdout a FORMAT-tarball containing the directory
+# $tardir.
+#     tardir=directory && $(am__tar) > result.tar
+#
+# Substitute a variable $(am__untar) that extract such
+# a tarball read from stdin.
+#     $(am__untar) < result.tar
+#
+AC_DEFUN([_AM_PROG_TAR],
+[# Always define AMTAR for backward compatibility.  Yes, it's still used
+# in the wild :-(  We should find a proper way to deprecate it ...
+AC_SUBST([AMTAR], ['$${TAR-tar}'])
+
+# We'll loop over all known methods to create a tar archive until one works.
+_am_tools='gnutar m4_if([$1], [ustar], [plaintar]) pax cpio none'
+
+m4_if([$1], [v7],
+  [am__tar='$${TAR-tar} chof - "$$tardir"' am__untar='$${TAR-tar} xf -'],
+
+  [m4_case([$1],
+    [ustar],
+     [# The POSIX 1988 'ustar' format is defined with fixed-size fields.
+      # There is notably a 21 bits limit for the UID and the GID.  In fact,
+      # the 'pax' utility can hang on bigger UID/GID (see automake bug#8343
+      # and bug#13588).
+      am_max_uid=2097151 # 2^21 - 1
+      am_max_gid=$am_max_uid
+      # The $UID and $GID variables are not portable, so we need to resort
+      # to the POSIX-mandated id(1) utility.  Errors in the 'id' calls
+      # below are definitely unexpected, so allow the users to see them
+      # (that is, avoid stderr redirection).
+      am_uid=`id -u || echo unknown`
+      am_gid=`id -g || echo unknown`
+      AC_MSG_CHECKING([whether UID '$am_uid' is supported by ustar format])
+      if test $am_uid -le $am_max_uid; then
+         AC_MSG_RESULT([yes])
+      else
+         AC_MSG_RESULT([no])
+         _am_tools=none
+      fi
+      AC_MSG_CHECKING([whether GID '$am_gid' is supported by ustar format])
+      if test $am_gid -le $am_max_gid; then
+         AC_MSG_RESULT([yes])
+      else
+        AC_MSG_RESULT([no])
+        _am_tools=none
+      fi],
+
+  [pax],
+    [],
+
+  [m4_fatal([Unknown tar format])])
+
+  AC_MSG_CHECKING([how to create a $1 tar archive])
+
+  # Go ahead even if we have the value already cached.  We do so because we
+  # need to set the values for the 'am__tar' and 'am__untar' variables.
+  _am_tools=${am_cv_prog_tar_$1-$_am_tools}
+
+  for _am_tool in $_am_tools; do
+    case $_am_tool in
+    gnutar)
+      for _am_tar in tar gnutar gtar; do
+        AM_RUN_LOG([$_am_tar --version]) && break
+      done
+      am__tar="$_am_tar --format=m4_if([$1], [pax], [posix], [$1]) -chf - "'"$$tardir"'
+      am__tar_="$_am_tar --format=m4_if([$1], [pax], [posix], [$1]) -chf - "'"$tardir"'
+      am__untar="$_am_tar -xf -"
+      ;;
+    plaintar)
+      # Must skip GNU tar: if it does not support --format= it doesn't create
+      # ustar tarball either.
+      (tar --version) >/dev/null 2>&1 && continue
+      am__tar='tar chf - "$$tardir"'
+      am__tar_='tar chf - "$tardir"'
+      am__untar='tar xf -'
+      ;;
+    pax)
+      am__tar='pax -L -x $1 -w "$$tardir"'
+      am__tar_='pax -L -x $1 -w "$tardir"'
+      am__untar='pax -r'
+      ;;
+    cpio)
+      am__tar='find "$$tardir" -print | cpio -o -H $1 -L'
+      am__tar_='find "$tardir" -print | cpio -o -H $1 -L'
+      am__untar='cpio -i -H $1 -d'
+      ;;
+    none)
+      am__tar=false
+      am__tar_=false
+      am__untar=false
+      ;;
+    esac
+
+    # If the value was cached, stop now.  We just wanted to have am__tar
+    # and am__untar set.
+    test -n "${am_cv_prog_tar_$1}" && break
+
+    # tar/untar a dummy directory, and stop if the command works.
+    rm -rf conftest.dir
+    mkdir conftest.dir
+    echo GrepMe > conftest.dir/file
+    AM_RUN_LOG([tardir=conftest.dir && eval $am__tar_ >conftest.tar])
+    rm -rf conftest.dir
+    if test -s conftest.tar; then
+      AM_RUN_LOG([$am__untar <conftest.tar])
+      AM_RUN_LOG([cat conftest.dir/file])
+      grep GrepMe conftest.dir/file >/dev/null 2>&1 && break
+    fi
+  done
+  rm -rf conftest.dir
+
+  AC_CACHE_VAL([am_cv_prog_tar_$1], [am_cv_prog_tar_$1=$_am_tool])
+  AC_MSG_RESULT([$am_cv_prog_tar_$1])])
+
+AC_SUBST([am__tar])
+AC_SUBST([am__untar])
+]) # _AM_PROG_TAR
+
+m4_include([gnulib-m4/00gnulib.m4])
+m4_include([gnulib-m4/absolute-header.m4])
+m4_include([gnulib-m4/ansi-c++.m4])
+m4_include([gnulib-m4/asm-underscore.m4])
+m4_include([gnulib-m4/extensions.m4])
+m4_include([gnulib-m4/gnulib-common.m4])
+m4_include([gnulib-m4/gnulib-comp.m4])
+m4_include([gnulib-m4/host-cpu-c-abi.m4])
+m4_include([gnulib-m4/include_next.m4])
+m4_include([gnulib-m4/limits-h.m4])
+m4_include([gnulib-m4/lock.m4])
+m4_include([gnulib-m4/longlong.m4])
+m4_include([gnulib-m4/multiarch.m4])
+m4_include([gnulib-m4/nocrash.m4])
+m4_include([gnulib-m4/off_t.m4])
+m4_include([gnulib-m4/onceonly.m4])
+m4_include([gnulib-m4/pthread_rwlock_rdlock.m4])
+m4_include([gnulib-m4/ssize_t.m4])
+m4_include([gnulib-m4/stdint.m4])
+m4_include([gnulib-m4/stdnoreturn.m4])
+m4_include([gnulib-m4/sys_types_h.m4])
+m4_include([gnulib-m4/threadlib.m4])
+m4_include([gnulib-m4/wint_t.m4])
+m4_include([m4/as-underscore.m4])
+m4_include([m4/cc-gcc.m4])
+m4_include([m4/codeexec.m4])
+m4_include([m4/endianness.m4])
+m4_include([m4/general.m4])
+m4_include([m4/getpagesize.m4])
+m4_include([m4/ireg.m4])
+m4_include([m4/libtool.m4])
+m4_include([m4/ln.m4])
+m4_include([m4/ltoptions.m4])
+m4_include([m4/ltsugar.m4])
+m4_include([m4/ltversion.m4])
+m4_include([m4/lt~obsolete.m4])
+m4_include([m4/mach-vm.m4])
+m4_include([m4/mmap.m4])
+m4_include([m4/mprotect.m4])
+m4_include([m4/proto.m4])
+m4_include([m4/shm.m4])
+m4_include([m4/smallstruct.m4])
diff --git a/avcall/COPYING b/avcall/COPYING
new file mode 100644 (file)
index 0000000..a3d1815
--- /dev/null
@@ -0,0 +1,340 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+                          51 Franklin Street, Fifth Floor,
+                          Boston, MA 02110-1301, USA.
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The licenses for most software are designed to take away your
+freedom to share and change it.  By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users.  This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it.  (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.)  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+  To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have.  You must make sure that they, too, receive or can get the
+source code.  And you must show them these terms so they know their
+rights.
+
+  We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+  Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software.  If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+  Finally, any free program is threatened constantly by software
+patents.  We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary.  To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+\f
+                    GNU GENERAL PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License.  The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language.  (Hereinafter, translation is included without limitation in
+the term "modification".)  Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope.  The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+  1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+  2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+    a) You must cause the modified files to carry prominent notices
+    stating that you changed the files and the date of any change.
+
+    b) You must cause any work that you distribute or publish, that in
+    whole or in part contains or is derived from the Program or any
+    part thereof, to be licensed as a whole at no charge to all third
+    parties under the terms of this License.
+
+    c) If the modified program normally reads commands interactively
+    when run, you must cause it, when started running for such
+    interactive use in the most ordinary way, to print or display an
+    announcement including an appropriate copyright notice and a
+    notice that there is no warranty (or else, saying that you provide
+    a warranty) and that users may redistribute the program under
+    these conditions, and telling the user how to view a copy of this
+    License.  (Exception: if the Program itself is interactive but
+    does not normally print such an announcement, your work based on
+    the Program is not required to print an announcement.)
+\f
+These requirements apply to the modified work as a whole.  If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works.  But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+  3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+    a) Accompany it with the complete corresponding machine-readable
+    source code, which must be distributed under the terms of Sections
+    1 and 2 above on a medium customarily used for software interchange; or,
+
+    b) Accompany it with a written offer, valid for at least three
+    years, to give any third party, for a charge no more than your
+    cost of physically performing source distribution, a complete
+    machine-readable copy of the corresponding source code, to be
+    distributed under the terms of Sections 1 and 2 above on a medium
+    customarily used for software interchange; or,
+
+    c) Accompany it with the information you received as to the offer
+    to distribute corresponding source code.  (This alternative is
+    allowed only for noncommercial distribution and only if you
+    received the program in object code or executable form with such
+    an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it.  For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable.  However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+\f
+  4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License.  Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+  5. You are not required to accept this License, since you have not
+signed it.  However, nothing else grants you permission to modify or
+distribute the Program or its derivative works.  These actions are
+prohibited by law if you do not accept this License.  Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+  6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions.  You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+  7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all.  For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices.  Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+\f
+  8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded.  In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+  9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number.  If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation.  If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+  10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission.  For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this.  Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+                            NO WARRANTY
+
+  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+                     END OF TERMS AND CONDITIONS
+\f
+        Appendix: How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software Foundation,
+    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+    Gnomovision version 69, Copyright (C) year  name of author
+    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  Here is a sample; alter the names:
+
+  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+  `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+  <signature of Ty Coon>, 1 April 1989
+  Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs.  If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library.  If this is what you want to do, use the GNU Library General
+Public License instead of this License.
diff --git a/avcall/DOC b/avcall/DOC
new file mode 100644 (file)
index 0000000..255618e
--- /dev/null
@@ -0,0 +1,133 @@
+----------------------------------------------------------------------
+       AVCALL --- a foreign function interface to ANSI-C
+----------------------------------------------------------------------
+
+This library allows arbitrary C functions to be called from embedded
+interpreters, debuggers, RPC calls, etc, by building up a C argument
+list incrementally from explicitly typed arguments. This considerably
+reduces the amount of boilerplate glue code required for such
+applications.
+
+The interface is like stdargs/varargs in reverse and is intended to be as
+portable as possible, however the details of function calling are highly
+machine-dependent so your mileage may vary. At the very least there are
+typically built-in limits on the size of the argument-list. The
+argument-pushing macros all return 0 for success, < 0 for error (eg,
+arg-list overflow).
+
+Installation instructions are in the Makefile.
+
+----------------------------------------------------------------------
+DECLARE ALIST -> OPEN ALIST -> SET FLAGS -> PUSH ARGS -> CALL FUNCTION
+----------------------------------------------------------------------
+
+1) Declare the argument list structure:
+
+       #include "avcall.h"
+       {
+         av_alist alist;
+
+2) Set any special flags. This is architecture and compiler dependent.
+Sometimes, compiler options must be flagged by #defines before the
+#include <avcall.h>. Usually, however, the ‘configure’ script should
+have determined which #defines are needed and put them at the head of
+avcall.h.
+
+3) Initialise the alist with the function address and return type. 
+There is a separate macro for each built-in C type (char, int, float, etc).
+Eg,
+       av_start_int(alist,&func,&return_addr);
+or
+       av_start_double(alist,&func,&return_addr);
+etc.
+Functions returning a structure or pointer take an extra type argument:
+Eg,
+       av_start_struct(alist,&func,STRUCT_OR_UNION_TYPE,SPLITTABLE,&return_addr);
+or
+       av_start_ptr(alist,&func,POINTER_TYPE,&return_addr);
+
+
+4) Push the arguments one by one in order. There is a macro for each
+built-in C type, eg:
+       av_int(alist,value);
+or
+       av_double(alist,value);
+
+Structure and pointer arguments require an extra type argument:
+
+       av_struct(alist,STRUCT_TYPE,value);
+or
+       av_ptr(alist,POINTER_TYPE,value);
+
+5) Call the function, set the return value, and tidy up:
+
+       av_call(alist);
+
+----------------------------------------------------------------------
+                       NOTES
+
+1) Functions declared in K&R style (ie, without a typed arglist) must
+use default K&R expression promotions (char,short-->int; float-->double)
+whether they are compiled by a K&R or an ANSI compiler, because the 
+true arg types may not be known at the call point. Such functions
+back-convert their arguments to the declared types on function entry.
+The only way to pass a true char, short or float (eg, from K&R C to an 
+ANSI or varargs function) is by an explicit cast: foo((char)c,(float)f).
+
+ !! Hence, for args of functions declared in K&R style you should use
+ !! av_int() and av_double() instead of av_{char,short}() and av_float().
+
+If you use a K&R compiler, the avcall header files may detect this and 
+define av_float, etc, appropriately, but with an ANSI compiler there's 
+no way avcall can know how a function was declared, so you have to 
+correct the argument types yourself. Similarly, some K&R compilers (such 
+as Sun cc on the sparc) actually return a float as a double.
+
+2) There are too many possible structure and pointer types to have a
+separate macro for each, so the pointer and structure macros take an
+explicit type argument which may be used (eg) to calculate the size of
+the structure. On most architectures this provides enough information
+for the compiler to make the proper call, but there will always be
+machines with odd alignment requirements or argument passing
+conventions, unusual reprentations for function, char, or void pointers,
+etc, for which this scheme will not suffice.  These machines may define
+additional av_start_TYPE and av_TYPE macros.
+
+3) The current implementations are pretty flakey in places. I'm happy to 
+accept new ports and (properly tested) fixes and enhancements. In
+particular, many of the routines waste a lot of stack space and generally
+do hairy things with stack frames - a bit more assembly code would probably 
+help things along quite a bit, but I don't speak assembler at all well.
+
+4) The macros required for all this are pretty grungy, but it does seem
+to be possible to port avcall to many machines. Some of the grunge is
+usually handled by a C or assembly level glue routine that actually
+pushes the arguments, calls the function and unpacks any return value.
+This is called avcall_call(). A precompiled assembler version for
+people without gcc is also made available. The routine should ideally
+have flags for the passing conventions of other compilers.
+----------------------------------------------------------------------
+               ACKNOWLEDGEMENTS
+
+I was aware of two similar but rather more restricted foreign function 
+interfaces when the initial version of this library was written, although
+(I believe) all of the present code is my own: the C interface in the zelk
+extensions to Oliver Laumann's <net@cs.tu-berlin.de> Elk scheme interpreter
+by J.P.Lewis, NEC C&C Research, <zilla@ccrl.nj.nec.com> (for Sun4 and SGI); 
+and Roy Featherstone's <roy@robots.oxford.ac.uk> personal C interface 
+library for Sun3,4 and SGI. I also looked at the comments and some of the 
+code in the machine-dependent parts of the GCC and GDB distributions, and 
+put the GCC __asm__ extensions to good use. Thanks guys!
+
+This work was partly supported by EC-ESPRIT Basic Research Action SECOND.
+----------------------------------------------------------------------
+
+================================================================================
+Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+This manual is covered by the GNU GPL.  You can redistribute it and/or
+modify it under the terms of the GNU General Public License (GPL), either
+version 2 of the License, or (at your option) any later version published
+by the Free Software Foundation (FSF).
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
diff --git a/avcall/Makefile.devel b/avcall/Makefile.devel
new file mode 100644 (file)
index 0000000..080898b
--- /dev/null
@@ -0,0 +1,266 @@
+# This is the developer's -*-Makefile-*-, not the user's makefile.
+# Do not use it unless you know exactly what you do!
+
+THISFILE = Makefile.devel
+LN = ln -s
+RM = rm -f
+
+# ============ Rules that require cross-compilation tools ============
+
+GCC = gcc
+GCCFLAGS = -I.. -I../dummy -O2 -fno-omit-frame-pointer -fPIC
+SED = sed
+CROSS_TOOL = cross
+
+precompiled : \
+  avcall-i386-macro.S \
+  avcall-m68k.mit.S avcall-m68k.motorola.S \
+  avcall-mipseb-macro.S avcall-mipsel-macro.S avcall-mipsn32eb-macro.S avcall-mipsn32el-macro.S avcall-mips64eb-macro.S avcall-mips64el-macro.S \
+  avcall-sparc-macro.S avcall-sparc64-macro.S \
+  avcall-alpha-macro.S \
+  avcall-hppa-macro.S avcall-hppa64-macro.S \
+  avcall-arm-macro.S avcall-armhf-macro.S \
+  avcall-arm64-macro.S \
+  avcall-powerpc-aix.s avcall-powerpc-linux-macro.S avcall-powerpc-sysv4-macro.S avcall-powerpc-macos.s avcall-powerpc64-aix.s avcall-powerpc64-linux.S avcall-powerpc64-elfv2-linux.S \
+  avcall-ia64-macro.S \
+  avcall-x86_64-macro.S avcall-x86_64-x32-linux.s avcall-x86_64-windows-macro.S \
+  avcall-s390-macro.S avcall-s390x-macro.S \
+  avcall-riscv32-ilp32d-macro.S avcall-riscv64-lp64d-macro.S
+
+
+avcall-i386-linux.s : avcall-i386.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) i386-linux gcc -V 3.1 $(GCCFLAGS) -D__i386__ -fno-omit-frame-pointer -S avcall-i386.c -o avcall-i386-linux.s
+
+avcall-i386-macro.S : avcall-i386-linux.s ../common/asm-i386.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-i386.h"' ; sed -e '/\.align.*,0x90$$/d' < avcall-i386-linux.s | ../common/asm-i386.sh ; cat ../common/noexecstack.h) > avcall-i386-macro.S
+
+
+avcall-m68k-linux.s : avcall-m68k.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) m68k-linux gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S avcall-m68k.c -o avcall-m68k-linux.s
+
+avcall-m68k-sun.s : avcall-m68k.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) m68k-sun gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S avcall-m68k.c -o avcall-m68k-sun.s
+
+avcall-m68k.mit.S : avcall-m68k-sun.s ../common/asm-m68k.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-m68k.h"' ; ../common/asm-m68k.sh mit < avcall-m68k-sun.s ; cat ../common/noexecstack.h) > avcall-m68k.mit.S
+
+avcall-m68k.motorola.S : avcall-m68k-linux.s ../common/asm-m68k.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-m68k.h"' ; ../common/asm-m68k.sh motorola < avcall-m68k-linux.s ; cat ../common/noexecstack.h) > avcall-m68k.motorola.S
+
+
+avcall-mipseb-linux.s : avcall-mips.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -meb $(GCCFLAGS) -D__mips__ -fno-tree-dce -S avcall-mips.c -o avcall-mipseb-linux.s
+
+avcall-mipseb-macro.S : avcall-mipseb-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mipseb-linux.s) > avcall-mipseb-macro.S
+
+avcall-mipsel-linux.s : avcall-mips.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -mel $(GCCFLAGS) -D__mips__ -fno-tree-dce -S avcall-mips.c -o avcall-mipsel-linux.s
+
+avcall-mipsel-macro.S : avcall-mipsel-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mipsel-linux.s) > avcall-mipsel-macro.S
+
+avcall-mipsn32eb-linux.s : avcall-mipsn32.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -meb $(GCCFLAGS) -D__mipsn32__ -S avcall-mipsn32.c -o avcall-mipsn32eb-linux.s
+
+avcall-mipsn32eb-macro.S : avcall-mipsn32eb-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mipsn32eb-linux.s) > avcall-mipsn32eb-macro.S
+
+avcall-mipsn32el-linux.s : avcall-mipsn32.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -mel $(GCCFLAGS) -D__mipsn32__ -S avcall-mipsn32.c -o avcall-mipsn32el-linux.s
+
+avcall-mipsn32el-macro.S : avcall-mipsn32el-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mipsn32el-linux.s) > avcall-mipsn32el-macro.S
+
+avcall-mips64eb-linux.s : avcall-mips64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -meb $(GCCFLAGS) -D__mips64__ -S avcall-mips64.c -o avcall-mips64eb-linux.s
+
+avcall-mips64eb-macro.S : avcall-mips64eb-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mips64eb-linux.s) > avcall-mips64eb-macro.S
+
+avcall-mips64el-linux.s : avcall-mips64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -mel $(GCCFLAGS) -D__mips64__ -S avcall-mips64.c -o avcall-mips64el-linux.s
+
+avcall-mips64el-macro.S : avcall-mips64el-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mips64el-linux.s) > avcall-mips64el-macro.S
+
+
+avcall-sparc-linux.s : avcall-sparc.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -D__sparc__ -S avcall-sparc.c -o avcall-sparc-linux.s
+
+avcall-sparc-macro.S : avcall-sparc-linux.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-sparc.h"' ; ../common/asm-sparc.sh < avcall-sparc-linux.s ; cat ../common/noexecstack.h) > avcall-sparc-macro.S
+
+avcall-sparc64-linux.s : avcall-sparc64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+# This compiler produces useless instructions with -fPIC. The result is PIC even without -fPIC.
+       $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 $(GCCFLAGS) -fno-PIC -D__sparc64__ -S avcall-sparc64.c -o avcall-sparc64-linux.s
+
+avcall-sparc64-macro.S : avcall-sparc64-linux.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-sparc.h"' ; ../common/asm-sparc.sh < avcall-sparc64-linux.s ; cat ../common/noexecstack.h) > avcall-sparc64-macro.S
+
+
+avcall-alpha-linux.s : avcall-alpha.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) alpha-linux gcc -V 4.0.2 $(GCCFLAGS) -D__alpha__ -S avcall-alpha.c -o avcall-alpha-linux.s
+
+avcall-alpha-macro.S : avcall-alpha-linux.s ../common/asm-alpha.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-alpha.sh < avcall-alpha-linux.s ; cat ../common/noexecstack.h) > avcall-alpha-macro.S
+
+
+avcall-hppa-linux.s : avcall-hppa.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) hppa-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa__ -S avcall-hppa.c -o avcall-hppa-linux.s
+
+avcall-hppa-macro.S : avcall-hppa-linux.s ../common/asm-hppa.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-hppa.h"' ; ../common/asm-hppa.sh < avcall-hppa-linux.s ; cat ../common/noexecstack.h) > avcall-hppa-macro.S
+
+avcall-hppa64-linux.s : avcall-hppa64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa64__ -S avcall-hppa64.c -o avcall-hppa64-linux.s
+
+avcall-hppa64-macro.S : avcall-hppa64-linux.s ../common/asm-hppa64.sh ../common/noexecstack.h $(THISFILE)
+# Need to remove the gcc-generated instructions that clobber %r29 right before each of the calls.
+       (echo '#include "asm-hppa64.h"' ; grep -v 'ldo -16(%r30),%r29' < avcall-hppa64-linux.s | ../common/asm-hppa64.sh ; cat ../common/noexecstack.h) > avcall-hppa64-macro.S
+
+
+avcall-arm-macro.S : avcall-arm.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE)
+       $(CROSS_TOOL) arm-linux gcc -V 3.1 -mlittle-endian $(GCCFLAGS) -D__arm__ -S avcall-arm.c -o avcall-armel.s
+       $(CROSS_TOOL) arm-linux gcc -V 3.1 -mbig-endian $(GCCFLAGS) -D__arm__ -S avcall-arm.c -o avcall-armeb.s
+       cmp avcall-armel.s avcall-armeb.s > /dev/null
+       (echo '#include "asm-arm.h"' ; ../common/asm-arm.sh < avcall-armel.s ; cat ../common/noexecstack-arm.h) > avcall-arm-macro.S
+       $(RM) avcall-armel.s avcall-armeb.s
+
+avcall-armhf-macro.S : avcall-armhf.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE)
+# The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer.
+       $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.3.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -mlittle-endian $(GCCFLAGS) -D__armhf__ -S avcall-armhf.c -o avcall-armhfel.s
+       $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.3.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -mbig-endian $(GCCFLAGS) -D__armhf__ -S avcall-armhf.c -o avcall-armhfeb.s
+       cmp avcall-armhfel.s avcall-armhfeb.s > /dev/null
+       (echo '#include "asm-arm.h"' ; ../common/asm-arm.sh < avcall-armhfel.s ; cat ../common/noexecstack-arm.h) > avcall-armhf-macro.S
+       $(RM) avcall-armhfel.s avcall-armhfeb.s
+
+
+avcall-arm64-macro.S : avcall-arm64.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE)
+       $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mlittle-endian $(GCCFLAGS) -D__arm64__ -S avcall-arm64.c -o avcall-arm64el.s
+       $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mbig-endian $(GCCFLAGS) -D__arm64__ -S avcall-arm64.c -o avcall-arm64eb.s
+       cmp avcall-arm64el.s avcall-arm64eb.s > /dev/null
+       (echo '#include "asm-arm.h"' ; ../common/asm-arm.sh < avcall-arm64el.s ; cat ../common/noexecstack-arm.h) > avcall-arm64-macro.S
+       $(RM) avcall-arm64el.s avcall-arm64eb.s
+
+
+avcall-powerpc-aix.s : avcall-powerpc.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) rs6000-aix gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc -mnew-mnemonics $(GCCFLAGS) -D__powerpc__ -S avcall-powerpc.c -o avcall-powerpc-aix.s
+
+avcall-powerpc-linux.s : avcall-powerpc.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S avcall-powerpc.c -o avcall-powerpc-linux.s
+
+avcall-powerpc-linux-macro.S : avcall-powerpc-linux.s ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-powerpc.sh < avcall-powerpc-linux.s ; cat ../common/noexecstack.h) > avcall-powerpc-linux-macro.S
+
+avcall-powerpc-sysv4-macro.S : avcall-powerpc.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE)
+       $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S avcall-powerpc.c -o avcall-powerpc-sysv4.s
+       (../common/asm-powerpc.sh < avcall-powerpc-sysv4.s ; cat ../common/noexecstack.h) > avcall-powerpc-sysv4-macro.S
+       $(RM) avcall-powerpc-sysv4.s
+
+avcall-powerpc-macos.s : avcall-powerpc.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) powerpc-darwin gcc -V 3.3.6 $(GCCFLAGS) -D__powerpc__ -S avcall-powerpc.c -o avcall-powerpc-macos.s
+
+avcall-powerpc64-aix.s : avcall-powerpc64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) rs6000-aix6.1 gcc-5.4.0 -maix64 $(GCCFLAGS) -D__powerpc64__ -S avcall-powerpc64.c -o avcall-powerpc64-aix.s
+
+avcall-powerpc64-linux.S : avcall-powerpc64.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE)
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -S avcall-powerpc64.c -o avcall-powerpc64-linux-le.s
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -S avcall-powerpc64.c -o avcall-powerpc64-linux-be.s
+       cmp avcall-powerpc64-linux-le.s avcall-powerpc64-linux-be.s > /dev/null
+       (../common/asm-powerpc.sh < avcall-powerpc64-linux-be.s ; cat ../common/noexecstack.h) > avcall-powerpc64-linux.S
+       $(RM) avcall-powerpc64-linux-le.s avcall-powerpc64-linux-be.s
+
+avcall-powerpc64-elfv2-linux.S : avcall-powerpc64.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE)
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S avcall-powerpc64.c -o avcall-powerpc64-elfv2-linux-le.s
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S avcall-powerpc64.c -o avcall-powerpc64-elfv2-linux-be.s
+       cmp avcall-powerpc64-elfv2-linux-le.s avcall-powerpc64-elfv2-linux-be.s > /dev/null
+       (../common/asm-powerpc.sh < avcall-powerpc64-elfv2-linux-be.s ; cat ../common/noexecstack.h) > avcall-powerpc64-elfv2-linux.S
+       $(RM) avcall-powerpc64-elfv2-linux-le.s avcall-powerpc64-elfv2-linux-be.s
+
+
+avcall-ia64-linux.s : avcall-ia64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) ia64-linux gcc -V 4.0.1 $(GCCFLAGS) -D__ia64__ -S avcall-ia64.c -o avcall-ia64-linux.s
+
+avcall-ia64-macro.S : avcall-ia64-linux.s ../common/noexecstack.h $(THISFILE)
+       cat avcall-ia64-linux.s ../common/noexecstack.h > avcall-ia64-macro.S
+
+
+avcall-x86_64-linux.s : avcall-x86_64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) x86_64-linux gcc-4.0.2 $(GCCFLAGS) -D__x86_64__ -S avcall-x86_64.c -o avcall-x86_64-linux.s
+
+avcall-x86_64-macro.S : avcall-x86_64-linux.s ../common/asm-x86_64.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-x86_64.h"' ; ../common/asm-x86_64.sh < avcall-x86_64-linux.s ; cat ../common/noexecstack.h) > avcall-x86_64-macro.S
+
+avcall-x86_64-x32-linux.s : avcall-x86_64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mx32 $(GCCFLAGS) -D__x86_64__ -D__x86_64_x32__ -S avcall-x86_64.c -o avcall-x86_64-x32-linux.s
+
+avcall-x86_64-windows.s : avcall-x86_64-windows.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mabi=ms $(GCCFLAGS) -fno-reorder-blocks-and-partition -D__x86_64__ -D_WIN32 -S avcall-x86_64-windows.c -o avcall-x86_64-windows.s
+
+avcall-x86_64-windows-macro.S : avcall-x86_64-windows.s ../common/asm-x86_64.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-x86_64.h"' ; ../common/asm-x86_64.sh < avcall-x86_64-windows.s ; cat ../common/noexecstack.h) > avcall-x86_64-windows-macro.S
+
+
+avcall-s390-linux.s : avcall-s390.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) s390-linux gcc -V 3.1 $(GCCFLAGS) -D__s390__ -S avcall-s390.c -o avcall-s390-linux.s
+
+avcall-s390-macro.S : avcall-s390-linux.s ../common/asm-s390.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-s390.sh < avcall-s390-linux.s ; cat ../common/noexecstack.h) > avcall-s390-macro.S
+
+
+avcall-s390x-linux.s : avcall-s390x.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) s390x-linux gcc-5.4.0 $(GCCFLAGS) -D__s390x__ -S avcall-s390x.c -o avcall-s390x-linux.s
+
+avcall-s390x-macro.S : avcall-s390x-linux.s ../common/asm-s390.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-s390.sh < avcall-s390x-linux.s ; cat ../common/noexecstack.h) > avcall-s390x-macro.S
+
+
+avcall-riscv32-ilp32d-linux.s : avcall-riscv32.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) riscv32-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv32__ -S avcall-riscv32.c -o avcall-riscv32-ilp32d-linux.s
+
+avcall-riscv32-ilp32d-macro.S : avcall-riscv32-ilp32d-linux.s ../common/asm-riscv.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-riscv.sh < avcall-riscv32-ilp32d-linux.s ; cat ../common/noexecstack.h) > avcall-riscv32-ilp32d-macro.S
+
+
+avcall-riscv64-lp64d-linux.s : avcall-riscv64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE)
+       $(CROSS_TOOL) riscv64-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv64__ -S avcall-riscv64.c -o avcall-riscv64-lp64d-linux.s
+
+avcall-riscv64-lp64d-macro.S : avcall-riscv64-lp64d-linux.s ../common/asm-riscv.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-riscv.sh < avcall-riscv64-lp64d-linux.s ; cat ../common/noexecstack.h) > avcall-riscv64-lp64d-macro.S
+
+
+# --------------- Rules for debugging test failures ---------------
+
+tests : tests-i386.s tests-m68k.s tests-mips.s tests-sparc.s tests-alpha.s tests-hppa.s tests-arm.s tests-powerpc.s tests-ia64.s tests-x86_64.s
+       true
+
+tests-i386.s : tests.c avcall.h
+       $(GCC) -V 2.7.2 -b i486-linuxaout $(GCCFLAGS) -I/usr/include -D__i386__ -S tests.c -o tests-i386.s
+
+tests-m68k.s : tests.c avcall.h
+       $(GCC) -V 2.95.2 -b m68k-sun $(GCCFLAGS) -I/usr/include -D__m68k__ -S tests.c -o tests-m68k.s
+
+tests-mips.s : tests.c avcall.h
+       $(GCC) -V 2.95.2 -b mips-sgi $(GCCFLAGS) -I/usr/include -D__mips__ -S tests.c -o tests-mips.s
+
+tests-sparc.s : tests.c avcall.h
+       $(GCC) -V 2.95.2 -b sparc-sun $(GCCFLAGS) -I/usr/include -D__sparc__ -S tests.c -o tests-sparc.s
+
+tests-alpha.s : tests.c avcall.h
+       $(GCC) -V 2.7.2 -b alpha-dec-osf $(GCCFLAGS) -I/usr/include -D__alpha__ -S tests.c -o tests-alpha.s
+
+tests-hppa.s : tests.c avcall.h
+       $(GCC) -V 2.6.3 -b hppa1.0-hpux $(GCCFLAGS) -I/usr/include -D__hppa__ -S tests.c -o tests-hppa.s
+
+tests-arm.s : tests.c avcall.h
+       $(GCC) -V 2.6.3 -b arm-acorn-riscix $(GCCFLAGS) -I/usr/include -D__arm__ -S tests.c -o tests-arm.s
+
+tests-powerpc.s : tests.c avcall.h
+       $(GCC) -V 2.95.2 -b rs6000 $(GCCFLAGS) -I/usr/include -D__powerpc__ -S tests.c -o tests-powerpc.s
+
+tests-ia64.s : tests.c avcall.h
+       $(GCC) -V 2.9-ia64-000216 -b ia64-hp-linux $(GCCFLAGS) -I/usr/include -D__ia64__ -S tests.c -o tests-ia64.s
+
+tests-x86_64.s : tests.c avcall.h
+       $(GCC) -V 3.2.2 -b x86_64-suse-linux $(GCCFLAGS) -I/usr/include -D__x86_64__ -S tests.c -o tests-x86_64.s
diff --git a/avcall/Makefile.in b/avcall/Makefile.in
new file mode 100644 (file)
index 0000000..6c3a334
--- /dev/null
@@ -0,0 +1,410 @@
+# Makefile for avcall
+
+#### Start of system configuration section. ####
+
+HOST = @host@
+CPU = @HOST_CPU_C_ABI@
+OS = @host_os@
+
+# Directories used by "make":
+srcdir = @srcdir@
+
+# Directories used by "make install":
+prefix = @prefix@
+local_prefix = /usr/local
+exec_prefix = @exec_prefix@
+libdir = @libdir@
+includedir = @includedir@
+mandir = @mandir@
+datadir = @datadir@
+datarootdir = @datarootdir@
+htmldir = $(datadir)/html
+
+# Programs used by "make":
+# C compiler
+CC = @CC@
+CFLAGS = @CFLAGS@
+CPP = @CPP@
+# C++ compiler
+CXX = @CXX@
+CXXFLAGS = @CXXFLAGS@
+# Both C and C++ compiler
+CPPFLAGS = @CPPFLAGS@
+INCLUDES = -I. -I$(srcdir) -I.. -I$(srcdir)/..
+ASPFLAGS = `if test @AS_UNDERSCORE@ = true; then echo '-DASM_UNDERSCORE'; fi`
+LDFLAGS = @LDFLAGS@
+LIBTOOL = @LIBTOOL@
+LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile
+LIBTOOL_LINK = $(LIBTOOL) --mode=link
+LIBTOOL_INSTALL = $(LIBTOOL) --mode=install
+LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall
+AR = @AR@
+AR_FLAGS = rc
+RANLIB = @RANLIB@
+MV = mv
+LN = @LN@
+RM = rm -f
+@SET_MAKE@
+
+# Programs used by "make install":
+INSTALL = @INSTALL@
+INSTALL_PROGRAM = @INSTALL_PROGRAM@
+INSTALL_DATA = @INSTALL_DATA@
+
+#### End of system configuration section. ####
+
+SHELL = /bin/sh
+
+# Needed by $(LIBTOOL).
+top_builddir = ..
+
+OBJECTS = avcall.lo avcall-libapi.lo avcall-structcpy.lo avcall-compat.lo
+
+# Limit the set of exported symbols, on those platforms where libtool supports it.
+# Currently this does not exclude any symbol; maybe sometime in the future...
+LIBAVCALL_EXPORTED_SYMBOLS_REGEX = '^avcall_|^__builtin_avcall$$'
+
+# Before making a release, change this according to the libtool documentation,
+# section "Library interface versions".
+LIBAVCALL_VERSION_INFO = 1:2:0
+
+all : $(OBJECTS) libavcall.la $(srcdir)/avcall.3 $(srcdir)/avcall.html
+
+avcall.lo : avcall-$(CPU).lo
+       $(RM) avcall.lo avcall.@OBJEXT@
+       $(LN) avcall-$(CPU).lo avcall.lo
+       if test -f avcall-$(CPU).@OBJEXT@; then $(LN) avcall-$(CPU).@OBJEXT@ avcall.@OBJEXT@; fi
+
+@IFNOT_MSVC@avcall-i386.lo : avcall-i386.s
+@IFNOT_MSVC@   $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-i386.s
+
+@IFNOT_MSVC@avcall-i386.s : $(srcdir)/avcall-i386-macro.S
+@IFNOT_MSVC@   $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/avcall-i386-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > avcall-i386.s
+
+@IF_MSVC@avcall-i386.lo : $(srcdir)/avcall-i386-msvc.c
+@IF_MSVC@      $(LIBTOOL_COMPILE) $(CC) -I$(srcdir)/../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/avcall-i386-msvc.c -o avcall-i386.lo
+
+avcall-sparc.lo : avcall-sparc.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-sparc.s
+
+avcall-sparc.s : $(srcdir)/avcall-sparc-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/avcall-sparc-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > avcall-sparc.s
+
+avcall-sparc64.lo : avcall-sparc64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-sparc64.s
+
+avcall-sparc64.s : $(srcdir)/avcall-sparc64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/avcall-sparc64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > avcall-sparc64.s
+
+avcall-m68k.lo : avcall-m68k.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-m68k.s
+
+avcall-m68k.s : $(srcdir)/avcall-m68k.mit.S $(srcdir)/avcall-m68k.motorola.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-m68k.motorola.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' | if test @AS_UNDERSCORE@ = true; then sed -e 's/\$$//g'; else sed -e 's/\$$/%/g'; fi > avcall-m68k.s
+
+avcall-mips.lo : avcall-mips.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-mips.s
+
+avcall-mips.s : $(srcdir)/avcall-mips@ENDIANNESS@-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-mips@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-mips.s
+
+avcall-mipsn32.lo : avcall-mipsn32.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-mipsn32.s
+
+avcall-mipsn32.s : $(srcdir)/avcall-mipsn32@ENDIANNESS@-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-mipsn32@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-mipsn32.s
+
+avcall-mips64.lo : avcall-mips64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-mips64.s
+
+avcall-mips64.s : $(srcdir)/avcall-mips64@ENDIANNESS@-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-mips64@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-mips64.s
+
+avcall-alpha.lo : avcall-alpha.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-alpha.s
+
+avcall-alpha.s : $(srcdir)/avcall-alpha-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/avcall-alpha-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-alpha.s
+
+avcall-hppa.lo : avcall-hppa.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-hppa.s
+
+avcall-hppa.s : $(srcdir)/avcall-hppa-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > avcall-hppa.s
+
+avcall-hppa64.lo : avcall-hppa64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-hppa64.s
+
+avcall-hppa64.s : $(srcdir)/avcall-hppa64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > avcall-hppa64.s
+
+avcall-arm.lo : avcall-arm.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-arm.s
+
+avcall-arm.s : $(srcdir)/avcall-arm-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-arm-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > avcall-arm.s
+
+avcall-armhf.lo : avcall-armhf.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-armhf.s
+
+avcall-armhf.s : $(srcdir)/avcall-armhf-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-armhf-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > avcall-armhf.s
+
+avcall-arm64.lo : avcall-arm64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-arm64.s
+
+avcall-arm64.s : $(srcdir)/avcall-arm64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-arm64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > avcall-arm64.s
+
+avcall-powerpc.lo : avcall-powerpc.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-powerpc.s
+
+avcall-powerpc.s : $(srcdir)/avcall-powerpc-aix.s $(srcdir)/avcall-powerpc-linux-macro.S $(srcdir)/avcall-powerpc-macos.s $(srcdir)/avcall-powerpc-sysv4-macro.S
+       case "$(OS)" in \
+         aix*) syntax=aix;; \
+         linux* | netbsd* | openbsd*) syntax=linux;; \
+         macos* | darwin*) syntax=macos;; \
+         *) syntax=sysv4;; \
+       esac; \
+       case $${syntax} in \
+         macos) \
+           grep -v '\.machine' $(srcdir)/avcall-powerpc-$${syntax}.s > avcall-powerpc.s || exit 1 ;; \
+         linux | sysv4) \
+           $(CPP) $(ASPFLAGS) $(srcdir)/avcall-powerpc-$${syntax}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-powerpc.s || exit 1 ;; \
+         *) \
+           cp $(srcdir)/avcall-powerpc-$${syntax}.s avcall-powerpc.s || exit 1 ;; \
+       esac
+
+avcall-powerpc64.lo : avcall-powerpc64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-powerpc64.s
+
+avcall-powerpc64.s : $(srcdir)/avcall-powerpc64-aix.s $(srcdir)/avcall-powerpc64-linux.S
+       case "$(OS)" in \
+         aix*) syntax=aix;; \
+         *) syntax=linux;; \
+       esac; \
+       case $${syntax} in \
+         linux) \
+           $(CPP) $(ASPFLAGS) $(srcdir)/avcall-powerpc64-$${syntax}.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-powerpc64.s || exit 1 ;; \
+         *) \
+           cp $(srcdir)/avcall-powerpc64-$${syntax}.s avcall-powerpc64.s || exit 1 ;; \
+       esac
+
+avcall-powerpc64-elfv2.lo : avcall-powerpc64-elfv2.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-powerpc64-elfv2.s
+
+avcall-powerpc64-elfv2.s : $(srcdir)/avcall-powerpc64-elfv2-linux.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/avcall-powerpc64-elfv2-linux.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-powerpc64-elfv2.s
+
+avcall-ia64.lo : avcall-ia64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-ia64.s
+
+avcall-ia64.s : $(srcdir)/avcall-ia64-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/avcall-ia64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-ia64.s
+
+@IFNOT_MSVC@avcall-x86_64.lo : avcall-x86_64.s
+@IFNOT_MSVC@   $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-x86_64.s
+
+@IFNOT_MSVC@avcall-x86_64.s : $(srcdir)/avcall-x86_64-macro.S $(srcdir)/avcall-x86_64-windows-macro.S
+@IFNOT_MSVC@   case "$(OS)" in \
+@IFNOT_MSVC@     cygwin* | mingw*) variant='-windows';; \
+@IFNOT_MSVC@     *) variant='';; \
+@IFNOT_MSVC@   esac; \
+@IFNOT_MSVC@   $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/avcall-x86_64$${variant}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > avcall-x86_64.s
+
+@IF_MSVC@avcall-x86_64.lo : avcall-x86_64.asm
+@IF_MSVC@      $(LIBTOOL_COMPILE) ml64 -c -nologo avcall-x86_64.asm
+@IF_MSVC@      mkdir -p .libs; cp avcall-x86_64.@OBJEXT@ .libs/avcall-x86_64.@OBJEXT@
+
+@IF_MSVC@avcall-x86_64.asm : $(srcdir)/avcall-x86_64-windows-macro.S
+@IF_MSVC@      { $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-x86_64-windows-macro.S | grep -v '^#'; echo 'END'; } > avcall-x86_64.asm
+
+avcall-x86_64-x32.lo : avcall-x86_64-x32.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-x86_64-x32.s
+
+avcall-x86_64-x32.s : $(srcdir)/avcall-x86_64-x32-linux.s
+       cp $(srcdir)/avcall-x86_64-x32-linux.s avcall-x86_64-x32.s
+
+avcall-s390.lo : avcall-s390.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-s390.s
+
+avcall-s390.s : $(srcdir)/avcall-s390-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/avcall-s390-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-s390.s
+
+avcall-s390x.lo : avcall-s390x.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-s390x.s
+
+avcall-s390x.s : $(srcdir)/avcall-s390x-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/avcall-s390x-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-s390x.s
+
+avcall-riscv32-ilp32d.lo : avcall-riscv32-ilp32d.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-riscv32-ilp32d.s
+
+avcall-riscv32-ilp32d.s : $(srcdir)/avcall-riscv32-ilp32d-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/avcall-riscv32-ilp32d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-riscv32-ilp32d.s
+
+avcall-riscv64-lp64d.lo : avcall-riscv64-lp64d.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-riscv64-lp64d.s
+
+avcall-riscv64-lp64d.s : $(srcdir)/avcall-riscv64-lp64d-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/avcall-riscv64-lp64d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-riscv64-lp64d.s
+
+avcall-libapi.lo : $(srcdir)/avcall-libapi.c ../config.h $(srcdir)/avcall-internal.h $(srcdir)/avcall.h $(srcdir)/avcall-alist.h
+       $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) @DISABLE_TYPE_BASED_ALIASING@ -c $(srcdir)/avcall-libapi.c
+
+avcall-structcpy.lo : $(srcdir)/avcall-structcpy.c $(srcdir)/../common/structcpy.c
+       $(LIBTOOL_COMPILE) $(CC) -I$(srcdir)/../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/avcall-structcpy.c
+
+avcall-compat.lo : $(srcdir)/avcall-compat.c ../config.h
+       $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/avcall-compat.c
+
+libavcall.la : $(OBJECTS)
+       $(LIBTOOL_LINK) $(CC) -o libavcall.la -rpath $(libdir) -no-undefined -export-symbols-regex $(LIBAVCALL_EXPORTED_SYMBOLS_REGEX) -version-info $(LIBAVCALL_VERSION_INFO) $(OBJECTS) $(LDFLAGS)
+
+# Installs the library and include files only. Typically called with only
+# $(libdir) and $(includedir) - don't use $(prefix) and $(exec_prefix) here.
+install-lib : all force
+       mkdir -p $(libdir)
+       $(LIBTOOL_INSTALL) $(INSTALL_DATA) libavcall.la $(libdir)/libavcall.la
+       mkdir -p $(includedir)
+       $(INSTALL_DATA) $(srcdir)/avcall.h $(includedir)/avcall.h
+
+install : all force
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(exec_prefix)
+       mkdir -p $(DESTDIR)$(libdir)
+       $(LIBTOOL_INSTALL) $(INSTALL_DATA) libavcall.la $(DESTDIR)$(libdir)/libavcall.la
+       mkdir -p $(DESTDIR)$(includedir)
+       $(INSTALL_DATA) $(srcdir)/avcall.h $(DESTDIR)$(includedir)/avcall.h
+       mkdir -p $(DESTDIR)$(mandir)
+       mkdir -p $(DESTDIR)$(mandir)/man3
+       $(INSTALL_DATA) $(srcdir)/avcall.3 $(DESTDIR)$(mandir)/man3/avcall.3
+       mkdir -p $(DESTDIR)$(datadir)
+       mkdir -p $(DESTDIR)$(htmldir)
+       $(INSTALL_DATA) $(srcdir)/avcall.html $(DESTDIR)$(htmldir)/avcall.html
+
+installdirs : force
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(exec_prefix)
+       mkdir -p $(DESTDIR)$(libdir)
+       mkdir -p $(DESTDIR)$(includedir)
+       mkdir -p $(DESTDIR)$(mandir)
+       mkdir -p $(DESTDIR)$(mandir)/man3
+       mkdir -p $(DESTDIR)$(datadir)
+       mkdir -p $(DESTDIR)$(htmldir)
+
+uninstall : force
+       $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libavcall.la
+       $(RM) $(DESTDIR)$(includedir)/avcall.h
+       $(RM) $(DESTDIR)$(mandir)/man3/avcall.3
+       $(RM) $(DESTDIR)$(htmldir)/avcall.html
+
+minitests.@OBJEXT@ : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/avcall.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/minitests.c
+
+minitests.s : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/avcall.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/minitests.c
+
+minitests : minitests.@OBJEXT@ libavcall.la
+       $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ minitests.@OBJEXT@ libavcall.la $(LDFLAGS) -o minitests
+
+minitests-c++.@OBJEXT@ : $(srcdir)/minitests-c++.cc $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/avcall.h
+       $(CXX) $(INCLUDES) $(CPPFLAGS) $(CXXFLAGS) -c $(srcdir)/minitests-c++.cc
+
+minitests-c++ : minitests-c++.@OBJEXT@ libavcall.la
+       $(LIBTOOL_LINK) $(CXX) $(CXXFLAGS) @GCC_X_NONE@ minitests-c++.@OBJEXT@ libavcall.la $(LDFLAGS) -o minitests-c++
+
+check : all minitests
+       ./minitests > minitests.out
+       LC_ALL=C uniq -u < minitests.out > minitests.output.$(HOST)
+       test '!' -s minitests.output.$(HOST)
+@IF_CXX@# minitests-c++ crashes on HP-UX HPPA 32-bit with aCC, even without "-O".
+@IF_CXX@       test $(CPU) = 'hppa' || { \
+@IF_CXX@         ./minitests-c++ > minitests-c++.out \
+@IF_CXX@         && LC_ALL=C uniq -u < minitests-c++.out > minitests-c++.output.$(HOST) \
+@IF_CXX@         && test '!' -s minitests-c++.output.$(HOST); \
+@IF_CXX@       }
+@IF_CXX@check : minitests-c++
+
+tests.@OBJEXT@ : $(srcdir)/tests.c $(srcdir)/avcall.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/tests.c
+
+tests.s : $(srcdir)/tests.c $(srcdir)/avcall.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/tests.c
+
+tests : tests.@OBJEXT@ libavcall.la
+       $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ tests.@OBJEXT@ libavcall.la $(LDFLAGS) -o tests
+
+extracheck : all tests
+       ./tests > tests.out
+       LC_ALL=C uniq -u < tests.out > tests.output.$(HOST)
+       test '!' -s tests.output.$(HOST)
+
+mostlyclean : clean
+
+clean : force
+       $(RM) *.@OBJEXT@ *.lo *.a libavcall.* core
+       $(RM) avcall-i386.s avcall-sparc.s avcall-sparc64.s avcall-m68k.s avcall-mips.s avcall-mipsn32.s avcall-mips64.s avcall-alpha.s avcall-hppa.s avcall-hppa64.s avcall-arm.s avcall-armhf.s avcall-arm64.s avcall-powerpc.s avcall-powerpc64.s avcall-powerpc64-elfv2.s avcall-ia64.s avcall-x86_64.s avcall-x86_64.asm avcall-x86_64-x32.s avcall-s390.s avcall-s390x.s avcall-riscv32-ilp32d.s avcall-riscv64-lp64d.s
+       $(RM) -r .libs _libs
+       $(RM) minitests.@OBJEXT@ minitests.s minitests minitests.out
+       $(RM) minitests-c++.@OBJEXT@ minitests-c++ minitests-c++.out
+       $(RM) tests.@OBJEXT@ tests.s tests tests.out
+
+distclean : clean
+       $(RM) Makefile minitests.output.* minitests-c++.output.* tests.output.*
+
+maintainer-clean : distclean
+
+
+# List of source files (committed in version control or generated by Makefile.devel).
+SOURCE_FILES = \
+  COPYING \
+  DOC PLATFORMS README avcall.3 avcall.html \
+  Makefile.devel \
+  Makefile.maint \
+  Makefile.in \
+  avcall.h avcall-internal.h avcall-alist.h \
+  avcall-alpha.c avcall-alpha-linux.s avcall-alpha-macro.S \
+  avcall-arm.c avcall-arm-macro.S \
+  avcall-armhf.c avcall-armhf-macro.S \
+  avcall-arm64.c avcall-arm64-macro.S \
+  avcall-hppa.c avcall-hppa-linux.s avcall-hppa-macro.S \
+  avcall-hppa64.c avcall-hppa64-linux.s avcall-hppa64-macro.S \
+  avcall-i386.c avcall-i386-linux.s avcall-i386-macro.S \
+  avcall-ia64.c avcall-ia64-linux.s avcall-ia64-macro.S \
+  avcall-m68k.c avcall-m68k-linux.s avcall-m68k-sun.s avcall-m68k.mit.S avcall-m68k.motorola.S \
+  avcall-mips.c avcall-mipseb-linux.s avcall-mipsel-linux.s avcall-mipseb-macro.S avcall-mipsel-macro.S \
+  avcall-mipsn32.c avcall-mipsn32eb-linux.s avcall-mipsn32el-linux.s avcall-mipsn32eb-macro.S avcall-mipsn32el-macro.S \
+  avcall-mips64.c avcall-mips64eb-linux.s avcall-mips64el-linux.s avcall-mips64eb-macro.S avcall-mips64el-macro.S \
+  avcall-powerpc.c \
+  avcall-powerpc-aix.s \
+  avcall-powerpc-linux.s avcall-powerpc-linux-macro.S avcall-powerpc-macos.s avcall-powerpc-sysv4-macro.S \
+  avcall-powerpc64.c avcall-powerpc64-aix.s avcall-powerpc64-linux.S avcall-powerpc64-elfv2-linux.S \
+  avcall-riscv32.c avcall-riscv32-ilp32d-linux.s avcall-riscv32-ilp32d-macro.S \
+  avcall-riscv64.c avcall-riscv64-lp64d-linux.s avcall-riscv64-lp64d-macro.S \
+  avcall-s390.c avcall-s390-linux.s avcall-s390-macro.S \
+  avcall-s390x.c avcall-s390x-linux.s avcall-s390x-macro.S \
+  avcall-sparc.c avcall-sparc-linux.s avcall-sparc-macro.S \
+  avcall-sparc64.c avcall-sparc64-linux.s avcall-sparc64-macro.S \
+  avcall-x86_64.c avcall-x86_64-linux.s avcall-x86_64-macro.S avcall-x86_64-x32-linux.s \
+  avcall-x86_64-windows.c avcall-x86_64-windows.s avcall-x86_64-windows-macro.S \
+  avcall-libapi.c \
+  avcall-structcpy.c \
+  avcall-compat.c \
+  minitests.c minitests-c++.cc \
+  tests.c
+# List of distributed files generated by Makefile.maint.
+GENERATED_FILES = \
+  avcall.man \
+  avcall-i386-msvc.c
+# List of distributed files.
+DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES)
+
+distdir : $(DISTFILES)
+       for file in $(DISTFILES); do \
+         if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \
+         cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \
+       done
+
+
+force :
diff --git a/avcall/Makefile.maint b/avcall/Makefile.maint
new file mode 100644 (file)
index 0000000..dbfa663
--- /dev/null
@@ -0,0 +1,24 @@
+# maintainer -*-Makefile-*-
+
+LN = ln -s
+RM = rm -f
+
+# ==================== Easily regeneratable files ====================
+
+ROFF_MAN = groff -Tutf8 -mandoc
+
+all : avcall.man \
+      avcall-i386-msvc.c
+
+avcall.man : avcall.3
+       $(ROFF_MAN) avcall.3 > avcall.man
+
+avcall-i386-msvc.c : avcall-i386-macro.S
+       cp -p avcall-i386-macro.S avcall-i386-msvc.c
+
+totally-clean : force
+       $(RM) avcall.man
+       $(RM) avcall-i386-msvc.c
+
+
+force :
diff --git a/avcall/PLATFORMS b/avcall/PLATFORMS
new file mode 100644 (file)
index 0000000..350b581
--- /dev/null
@@ -0,0 +1,80 @@
+Supported CPUs:  (Put the GNU config.guess values here.)
+
+   CPU        GNU config.guess value                 machine       OS
+
+   i386       i486-unknown-linux (gcc)               i386/486/586  Linux
+              i686-unknown-gnu0.9 (gcc)              i686          GNU Hurd
+              i386-unknown-sysv4.0 (gcc,             i386          Consensys
+                  /usr/bin/cc, /usr/ucb/cc)
+              i386-pc-solaris2.6 (gcc)               i386/486/586  Solaris
+              i386-pc-solaris2.10 (gcc, cc)          i386/486/586  Solaris
+              i486-unknown-sco3.2v4.2 (gcc, cc -Of)  i386/486/586  SCO
+              i386-pc-cygwin32 (gcc)                 i386/486/586  Cygwin32
+              i386-w64-mingw32 (gcc, MSVC 14)        i386/486/586  Win32
+              i586-unknown-freebsd11.0 (cc)          i386/486/586  FreeBSD 11
+              i386-unknown-dragonfly3.8 (gcc)        i386/486/586  DragonFly BSD
+              i386-unknown-netbsdelf7.0 (gcc)        i386/486/586  NetBSD 7
+              i386-unknown-openbsd6.0 (gcc)          i386/486/586  OpenBSD 6
+              i586-pc-haiku (gcc-x86)                i586          Haiku 2017
+              i386-pc-minix (clang)                  i386/486/586  Minix 3.3
+   m68k       m68k-sun-sunos4.0 (cc)                 Sun3          SunOS 4.0.3
+              m68k-unknown-linux (gcc)               emulated      Linux
+   mips       mips-sgi-irix4.0.5 (gcc,               SGI mips      Irix 4.0.x
+                  cc -ansi, cc -D__STDC__, cc -cckr)
+              mips-sgi-irix5.2 (gcc, cc -ansi, ...)  SGI mips      Irix 5.2
+              mips-sgi-irix5.3 (gcc, cc -ansi, ...)  SGI mips      Irix 5.3
+              mips-sgi-irix6.2 (cc -32)              SGI mips3     Irix 6.2
+              mips-sgi-irix6.4 (cc -32, -n32, -64)   SGI mips3     Irix 6.4
+              mips-sgi-irix6.5 (cc -32, -n32,        SGI mips3     Irix 6.5
+                  gcc -mabi=n32)
+              mips-unknown-linux (gcc -mabi=32)      emulated      Linux
+              mips64-unknown-linux (gcc -mabi=n32,64)emulated      Linux
+   sparc      sparc-sun-sunos4.1.1 (gcc, cc)         Sun4 Sparc    SunOS 4.x
+              sparc-sun-solaris2.3 (gcc)             Sun4 Sparc    SunOS 5.x
+              sparc-sun-solaris2.4 (gcc, cc)         Sun4 Sparc    SunOS 5.x
+              sparc-sun-solaris2.10 (gcc, cc)        Sun4 Sparc    Solaris 10
+              sparc64-sun-solaris2.10 (gcc -m64,     Sun4 Sparc    Solaris 10
+                  cc -xarch=generic64)
+              sparc-unknown-linux (gcc)              emulated      Linux
+              sparc64-unknown-linux (gcc)            emulated      Linux
+              sparc-unknown-netbsdelf7.1 (gcc)       emulated      NetBSD 7.1
+              sparc64-unknown-netbsd8.0 (gcc)        emulated      NetBSD 8.0
+   alpha      alpha-dec-osf3.0 (gcc, cc)             DEC Alpha     OSF/1 3.0
+              alpha-dec-osf4.0 (gcc, cc)             DEC Alpha     OSF/1 4.0
+              alphaev67-unknown-linux (gcc)          emulated      Linux
+   hppa       hppa1.0-hp-hpux8.00 (gcc,              HP 9000/8xx   HP-UX 8.0x
+                  cc, c89, cc -Aa)
+              hppa1.1-hp-hpux9.05 (cc)               HP 9000/8xx   HP-UX 9.0x
+              hppa1.1-hp-hpux10.01 (cc)              HP 9000/8xx   HP-UX 10.0x
+              hppa2.0-hp-hpux10.20 (cc +DA1.1)       HP 9000/8xx   HP-UX 10.20
+              hppa2.0w-hp-hpux11.31 (cc)             HP 9000/8xx   HP-UX 11.31
+              hppa-unknown-linux (gcc)               emulated      Linux
+   hppa64     hppa64-hp-hpux11.31 (cc +DD64)         HP 9000/8xx   HP-UX 11.31
+   arm        armv5tejl-unknown-linux (gcc)          emulated      Linux
+              armv6l-unknown-linux (gcc)             emulated      Linux
+              armv7l-unknown-linux (gcc)             emulated      Linux
+   arm64      aarch64-unknown-linux (gcc)            APM X-Gene    Linux
+   powerpc    powerpc-ibm-aix4.1.4.0 (cc)            IBM RS/6000   AIX 4.1.4
+              powerpc-ibm-aix7.1.3.0 (xlc, gcc)      IBM POWER     AIX 7.1.3
+              powerpc-unknown-linux (gcc)            Apple PPC     LinuxPPC
+              powerpc-apple-darwin6.8 (gcc)          Apple PPC     MacOS X
+              powerpc-apple-darwin9.8.0 (gcc)        Apple PPC     MacOS X
+   powerpc64  powerpc-ibm-aix7.1.3.0 (gcc -maix64,   IBM POWER     AIX 7.1.3
+                  xlc -q64)
+              powerpc64-unknown-linux (gcc -m64)     IBM POWER     Linux
+              powerpc64le-unknown-linux (gcc)        IBM POWER     Linux
+   ia64       ia64-unknown-linux (gcc)               Intel         Linux
+   x86_64     x86_64-suse-linux (gcc)                AMD64         Linux
+              x86_64-unknown-linux (gcc -mx32)       AMD64         Linux
+              x86_64-pc-solaris2.10 (gcc -m64)       AMD64         Solaris
+              x86_64-pc-solaris2.10 (cc -xarch=generic64)  AMD64   Solaris
+              x86_64-pc-cygwin (gcc)                 AMD64         Windows 10
+              x86_64-w64-mingw32 (gcc, MSVC 14)      AMD64         Windows 10
+              x86_64-unknown-freebsd11.0 (cc)        AMD64         FreeBSD 11
+              x86_64-unknown-netbsd7.0 (gcc)         AMD64         NetBSD 7
+              x86_64-unknown-openbsd6.0 (gcc)        AMD64         OpenBSD 6
+   s390       s390x-ibm-linux (gcc -m31)             emulated      Linux
+   s390x      s390x-ibm-linux (gcc)                  emulated      Linux
+   riscv32    riscv32-unknown-linux (gcc -mabi=ilp32d)  emulated   Linux
+   riscv64    riscv64-unknown-linux (gcc -mabi=lp64d)   emulated   Linux
+
diff --git a/avcall/README b/avcall/README
new file mode 100644 (file)
index 0000000..b85a718
--- /dev/null
@@ -0,0 +1,73 @@
+avcall - calling C functions with variable arguments
+
+This library allows arbitrary C functions to be called from embedded
+interpreters, debuggers, RPC calls, etc, by building up a C
+argument-list incrementally from explicitly typed arguments. This 
+considerably reduces the amount of boilerplate glue code required
+for such applications.
+
+The interface is like stdargs/varargs in reverse and is intended to be as
+portable as possible, however the details of function calling are highly
+machine-dependent so your mileage may vary. At the very least there are
+typically built-in limits on the size of the argument-list. The
+argument-pushing macros all return 0 for success, < 0 for error (eg,
+arg-list overflow).
+
+
+Installation instructions:
+
+    Configure the parent directory. Then:
+        cd avcall
+        make
+        make check
+        make install
+
+
+Files in this package:
+
+    Documentation:
+
+        README          this text
+        COPYING         free software license
+        PLATFORMS       list of supported platforms
+        avcall.3        manual page in Unix man format
+        avcall.man      manual page
+        avcall.html     manual page in HTML format
+        DOC             documentation
+
+    Source:
+
+        avcall.h        main include file
+        avcall-*.c      source for the main interface function
+        avcall-*.[sS]   its translation to assembly language
+        avcall-libapi.c     implementation of other library API
+        avcall-structcpy.c  auxiliary function
+        tests.c         test program
+
+    Building:
+
+        Makefile.in     Makefile master
+
+    Porting:
+
+        Makefile.devel  developer's Makefile
+
+
+Copyright notice:
+
+Copyright 1993-1995 Bill Triggs <Bill.Triggs@imag.fr>
+Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+This program is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
diff --git a/avcall/avcall-alist.h b/avcall/avcall-alist.h
new file mode 100644 (file)
index 0000000..6651879
--- /dev/null
@@ -0,0 +1,209 @@
+/*
+ * Copyright 1993-1995 Bill Triggs <Bill.Triggs@inrialpes.fr>
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#ifndef _AVCALL_INTERNAL_H
+#error "Never use <avcall-alist.h> directly; include <avcall-internal.h> instead."
+#endif
+
+/* The platform indicator symbols (__i386__, etc.) come from
+   - "config.h" when compiling avcall-libapi.c,
+   - the GCC command line options when compiling avcall-$(CPU).c.
+ */
+
+/* These two variants of powerpc ABIs are quite different. */
+#if defined(__powerpc__) && !defined(__powerpc64__)
+#if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__))
+#define __powerpc_aix__ 1
+#else
+#define __powerpc_sysv4__ 1
+#endif
+#endif
+
+/* The Unix and Windows variants of x86_64 ABIs are quite different. */
+#if defined(__x86_64__)
+#if defined(_WIN32) || defined(__CYGWIN__)
+#define __x86_64_ms__ 1
+#else
+#define __x86_64_sysv__ 1
+#endif
+#endif
+
+/*
+ * Definition of the ‘__av_alist’ type.
+ */
+/* Note: This struct must not contain members of type 'long' or 'unsigned long',
+   because in the mingw port we use precompiled code that assumes 'long' is
+   64-bit whereas avcall-libapi.c is then compiled by a compiler that has a
+   32-bit 'long' type. */
+typedef struct
+{
+  /* some av_... macros need these flags */
+  int                  flags;
+  /* function to be called */
+  __avword             (*func)();
+  /* return type, address for the result */
+  void*                        raddr;
+  enum __AVtype                rtype;
+  uintptr_t            rsize;
+  /* current pointer into the args[] array */
+  __avword*            aptr;
+  /* beginning of the args[] array */
+  __avword*            args;
+#if defined(__hppa__) && !defined(__hppa64__)
+  /* end of the args[] array */
+  __avword*            args_end;
+#endif
+  /* limit pointer into the args[] array */
+  __avword*            eptr;
+#if defined(__i386__) && 0
+  /* Filler word, needed if the numbers of words up to now in this structure */
+  /* is odd (because on MSVC, alignof(double) = 8, normally = 4).            */
+  __avword             filler1;
+#endif
+#if defined(__i386__) || defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) || (defined(__hppa__) && !defined(__hppa64__)) || defined(__arm__) || defined(__armhf__) || (defined(__powerpc__) && !defined(__powerpc64__)) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv32__)
+  /* temporary storage, used to split doubles into two words */
+  union {
+    double     _double;
+#if defined(__sparc__) && !defined(__sparc64__)
+    long long  _longlong;
+#endif
+    __avword   words[2];
+  }                    tmp;
+#endif
+#if defined(__x86_64_sysv__)
+#define __AV_IARG_NUM 6
+  /* store the integer arguments in an extra array */
+  unsigned int         ianum;
+  __avword             iargs[__AV_IARG_NUM];
+#endif
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)
+#define __AV_FARG_NUM 2
+  /* store the floating-point arguments in an extra array */
+  unsigned int         anum;
+  unsigned int         fanum;
+  unsigned int         farg_mask;      /* bitmask of those entries in fargs[] which have a float value */
+  unsigned int         darg_mask;      /* bitmask of those entries in dargs[] which have a double value */
+  float                        fargs[__AV_FARG_NUM];
+  double               dargs[__AV_FARG_NUM];
+#endif
+#if defined(__mipsn32__) || defined(__mips64__)
+  /* store the floating-point arguments in an extra array */
+  int                  anum;           /* redundant: (LIST).aptr = &(LIST).args[(LIST).anum] */
+  unsigned int         farg_mask;      /* bitmask of those entries in farg[] which have a value */
+  unsigned int         darg_mask;      /* bitmask of those entries in args[] which have a double value */
+  float                        fargs[8];
+#endif
+#if defined(__sparc64__)
+  /* store the floating-point arguments in an extra array */
+  int                  anum;           /* redundant: (LIST).aptr = &(LIST).args[(LIST).anum] */
+  unsigned int         darg_mask;      /* bitmask of those entries in args[] which have a float or double value */
+#endif
+#if defined(__hppa__) || defined(__hppa64__)
+  unsigned int         farg_mask;      /* bitmask of those entries in args[] which have a float value */
+  unsigned int         darg_mask;      /* bitmask of those entries in args[] which have a double value */
+#endif
+#if defined(__armhf__)
+#define __AV_IARG_NUM 4
+  /* The first __AV_IARG_NUM integer arguments are passed in registers, even if
+     some floating-point arguments have already been allocated on the stack. */
+  unsigned int         ianum;
+  /* store the floating-point arguments in an extra array */
+  unsigned int         fanum;          /* number of fargs[] words that are occupied so far */
+  unsigned int         farg_mask;      /* bitmask of those entries in fargs[] which have a float value */
+  unsigned int         darg_mask;      /* bitmask of those entries in dargs[] which have a double value */
+  float                        fargs[16];
+  double               dargs[8];
+#endif
+#if defined(__arm64__)
+#define __AV_IARG_NUM 8
+  /* store the integer arguments in an extra array */
+  unsigned int         ianum;
+  __avword             iargs[__AV_IARG_NUM];
+#define __AV_FARG_NUM 8
+  /* store the floating-point arguments in an extra array */
+  unsigned int         fanum;          /* number of fargs[] words that are occupied so far */
+  unsigned int         farg_mask;      /* bitmask of those entries in fargs[] which have a float value */
+  unsigned int         darg_mask;      /* bitmask of those entries in dargs[] which have a double value */
+  float                        fargs[__AV_FARG_NUM];
+  double               dargs[__AV_FARG_NUM];
+#endif
+#if defined(__ia64__) || defined(__x86_64_sysv__)
+  /* store the floating-point arguments in an extra array */
+#define __AV_FARG_NUM 8
+  double*              faptr;
+  double               fargs[__AV_FARG_NUM];
+#endif
+#if defined(__powerpc__) || defined(__powerpc64__)
+#if defined(__powerpc_sysv4__)
+#define __AV_IARG_NUM 8
+  /* store the integer arguments in an extra array */
+  unsigned int         ianum;
+  __avword             iargs[__AV_IARG_NUM];
+#define __AV_FARG_NUM 8
+#else
+#define __AV_FARG_NUM 13
+#endif
+  /* store the floating-point arguments in an extra array */
+  double*              faptr;
+  double               fargs[__AV_FARG_NUM];
+#endif
+#if defined(__x86_64_ms__)
+  /* store the floating-point arguments in an extra array */
+  int                  anum;           /* redundant: (LIST).aptr = &(LIST).args[(LIST).anum] */
+#define __AV_FARG_NUM 4
+  unsigned int         farg_mask;      /* bitmask of those entries in fargs[] which have a float value */
+  unsigned int         darg_mask;      /* bitmask of those entries in dargs[] which have a double value */
+  float                        fargs[__AV_FARG_NUM];
+  double               dargs[__AV_FARG_NUM];
+#endif
+#if (defined(__s390__) && !defined(__s390x__))
+#define __AV_IARG_NUM 5
+  /* store the integer arguments in an extra array */
+  unsigned int         ianum;
+  __avword             iargs[__AV_IARG_NUM];
+  /* store the floating-point arguments in an extra array */
+#define __AV_FARG_NUM 2
+  unsigned int         fanum;          /* number of fargs[] words that are occupied so far */
+  unsigned int         farg_mask;      /* bitmask of those entries in fargs[] which have a float value */
+  unsigned int         darg_mask;      /* bitmask of those entries in dargs[] which have a double value */
+  float                        fargs[__AV_FARG_NUM];
+  double               dargs[__AV_FARG_NUM];
+#endif
+#if defined(__s390x__)
+#define __AV_IARG_NUM 5
+  /* store the integer arguments in an extra array */
+  unsigned int         ianum;
+  __avword             iargs[__AV_IARG_NUM];
+#define __AV_FARG_NUM 4
+  /* store the floating-point arguments in an extra array */
+  unsigned int         fanum;          /* number of fargs[] words that are occupied so far */
+  unsigned int         farg_mask;      /* bitmask of those entries in fargs[] which have a float value */
+  unsigned int         darg_mask;      /* bitmask of those entries in dargs[] which have a double value */
+  float                        fargs[__AV_FARG_NUM];
+  double               dargs[__AV_FARG_NUM];
+#endif
+#if defined(__riscv32__) || defined(__riscv64__)
+#define __AV_FARG_NUM 8
+  /* store the floating-point arguments in an extra array */
+  unsigned int         fanum;          /* number of fargs[] words that are occupied so far */
+  unsigned int         farg_mask;      /* bitmask of those entries in fargs[] which have a float value */
+  unsigned int         darg_mask;      /* bitmask of those entries in dargs[] which have a double value */
+  float                        fargs[__AV_FARG_NUM];
+  double               dargs[__AV_FARG_NUM];
+#endif
+} __av_alist;
diff --git a/avcall/avcall-alpha-linux.s b/avcall/avcall-alpha-linux.s
new file mode 100644 (file)
index 0000000..63913e8
--- /dev/null
@@ -0,0 +1,191 @@
+       .set noreorder
+       .set volatile
+       .set noat
+       .set nomacro
+       .text
+       .align 2
+       .align 4
+       .globl avcall_call
+       .ent avcall_call
+avcall_call:
+       .frame $15,32,$26,0
+       .mask 0x4008200,-32
+       ldah $29,0($27)         !gpdisp!1
+       lda $29,0($29)          !gpdisp!1
+$avcall_call..ng:
+       lda $30,-32($30)
+       ldq $1,40($16)
+       ldq $3,48($16)
+       stq $9,8($30)
+       mov $16,$9
+       stq $15,16($30)
+       mov $30,$15
+       subq $1,$3,$1
+       stq $26,0($30)
+       .prologue 1
+       srl $1,3,$1
+       lda $30,-2064($30)
+       addl $31,$1,$7
+       cmple $7,6,$2
+       bne $2,$L2
+       mov $30,$5
+       lda $6,6($31)
+       lda $4,48($3)
+       .align 4
+$L4:
+       lda $6,1($6)
+       ldq $1,0($4)
+       cmpeq $7,$6,$2
+       lda $4,8($4)
+       stq $1,0($5)
+       lda $5,8($5)
+       beq $2,$L4
+$L2:
+       .set    macro
+       ldq $16,0($3)
+       ldt $f16,0($3)
+       .set    nomacro
+       lda $1,8($3)
+       .set    macro
+       ldq $17,0($1)
+       ldt $f17,0($1)
+       .set    nomacro
+       lda $2,16($3)
+       .set    macro
+       ldq $18,0($2)
+       ldt $f18,0($2)
+       .set    nomacro
+       lda $1,24($3)
+       .set    macro
+       ldq $19,0($1)
+       ldt $f19,0($1)
+       .set    nomacro
+       lda $2,32($3)
+       .set    macro
+       ldq $20,0($2)
+       ldt $f20,0($2)
+       .set    nomacro
+       lda $3,40($3)
+       .set    macro
+       ldq $21,0($3)
+       ldt $f21,0($3)
+       .set    nomacro
+       ldq $27,8($9)
+       jsr $26,($27),0
+       ldah $29,0($26)         !gpdisp!2
+       lda $29,0($29)          !gpdisp!2
+       mov $1,$4
+       ldl $2,24($9)
+       zapnot $2,15,$3
+       cmpeq $3,1,$1
+       bne $1,$L5
+       beq $2,$L55
+       cmpeq $3,2,$1
+       bne $1,$L53
+       cmpeq $3,3,$1
+       bne $1,$L53
+       cmpeq $3,4,$1
+       bne $1,$L53
+       cmpeq $3,5,$1
+       bne $1,$L54
+       cmpeq $3,6,$1
+       bne $1,$L54
+       cmpeq $3,7,$1
+       bne $1,$L56
+       cmpeq $3,8,$1
+       bne $1,$L56
+       cmpeq $3,9,$1
+       bne $1,$L55
+       cmpeq $3,10,$1
+       bne $1,$L55
+       cmpeq $3,11,$1
+       bne $1,$L55
+       cmpeq $3,12,$1
+       bne $1,$L55
+       cmpeq $3,13,$1
+       bne $1,$L58
+       cmpeq $3,14,$1
+       bne $1,$L59
+       cmpeq $3,15,$1
+       bne $1,$L55
+       cmpeq $3,16,$1
+       beq $1,$L5
+       .align 3 #realign
+       lda $1,512($31)
+       ldl $2,0($9)
+       and $1,$2,$1
+       beq $1,$L5
+       ldq $2,32($9)
+       cmpeq $2,1,$1
+       bne $1,$L53
+       cmpeq $2,2,$1
+       bne $1,$L54
+       cmpeq $2,4,$1
+       bne $1,$L56
+       cmpeq $2,8,$1
+       bne $1,$L55
+       cmpeq $2,16,$1
+       beq $1,$L5
+       ldq $1,16($9)
+       stq $4,8($1)
+       stq $0,0($1)
+$L5:
+       mov $15,$30
+       mov $31,$0
+       ldq $26,0($30)
+       ldq $9,8($30)
+       ldq $15,16($30)
+       lda $30,32($30)
+       ret $31,($26),1
+       bis $31,$31,$31
+$L55:
+       mov $15,$30
+       ldq $1,16($9)
+       stq $0,0($1)
+       mov $31,$0
+       ldq $26,0($30)
+       ldq $9,8($30)
+       ldq $15,16($30)
+       lda $30,32($30)
+       ret $31,($26),1
+       bis $31,$31,$31
+$L53:
+       mov $15,$30
+       ldq $1,16($9)
+       insbl $0,$1,$3
+       ldq_u $2,0($1)
+       mov $31,$0
+       mskbl $2,$1,$2
+       bis $3,$2,$3
+       stq_u $3,0($1)
+       ldq $26,0($30)
+       ldq $9,8($30)
+       ldq $15,16($30)
+       lda $30,32($30)
+       ret $31,($26),1
+$L54:
+       ldq $1,16($9)
+       inswl $0,$1,$3
+       ldq_u $2,0($1)
+       mskwl $2,$1,$2
+       bis $3,$2,$3
+       stq_u $3,0($1)
+       br $31,$L5
+$L56:
+       ldq $1,16($9)
+       bis $31,$31,$31
+       stl $0,0($1)
+       br $31,$L5
+$L58:
+       cvtts $f0,$f0
+       ldq $1,16($9)
+       sts $f0,0($1)
+       br $31,$L5
+$L59:
+       ldq $1,16($9)
+       bis $31,$31,$31
+       stt $f0,0($1)
+       br $31,$L5
+       .end avcall_call
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/avcall/avcall-alpha-macro.S b/avcall/avcall-alpha-macro.S
new file mode 100644 (file)
index 0000000..e3a897d
--- /dev/null
@@ -0,0 +1,192 @@
+       .set noreorder
+       .set volatile
+       .set noat
+       .set nomacro
+       .text
+       .align 2
+       .align 4
+       .globl avcall_call
+       .ent avcall_call
+avcall_call:
+       .frame $15,32,$26,0
+       .mask 0x4008200,-32
+       ldah $29,0($27)         !gpdisp!1
+       lda $29,0($29)          !gpdisp!1
+$avcall_call..ng:
+       lda $30,-32($30)
+       ldq $1,40($16)
+       ldq $3,48($16)
+       stq $9,8($30)
+       mov $16,$9
+       stq $15,16($30)
+       mov $30,$15
+       subq $1,$3,$1
+       stq $26,0($30)
+       .prologue 1
+       srl $1,3,$1
+       lda $30,-2064($30)
+       addl $31,$1,$7
+       cmple $7,6,$2
+       bne $2,$L2
+       mov $30,$5
+       lda $6,6($31)
+       lda $4,48($3)
+       .align 4
+$L4:
+       lda $6,1($6)
+       ldq $1,0($4)
+       cmpeq $7,$6,$2
+       lda $4,8($4)
+       stq $1,0($5)
+       lda $5,8($5)
+       beq $2,$L4
+$L2:
+       .set    macro
+       ldq $16,0($3)
+       ldt $f16,0($3)
+       .set    nomacro
+       lda $1,8($3)
+       .set    macro
+       ldq $17,0($1)
+       ldt $f17,0($1)
+       .set    nomacro
+       lda $2,16($3)
+       .set    macro
+       ldq $18,0($2)
+       ldt $f18,0($2)
+       .set    nomacro
+       lda $1,24($3)
+       .set    macro
+       ldq $19,0($1)
+       ldt $f19,0($1)
+       .set    nomacro
+       lda $2,32($3)
+       .set    macro
+       ldq $20,0($2)
+       ldt $f20,0($2)
+       .set    nomacro
+       lda $3,40($3)
+       .set    macro
+       ldq $21,0($3)
+       ldt $f21,0($3)
+       .set    nomacro
+       ldq $27,8($9)
+       jsr $26,($27),0
+       ldah $29,0($26)         !gpdisp!2
+       lda $29,0($29)          !gpdisp!2
+       mov $1,$4
+       ldl $2,24($9)
+       zapnot $2,15,$3
+       cmpeq $3,1,$1
+       bne $1,$L5
+       beq $2,$L55
+       cmpeq $3,2,$1
+       bne $1,$L53
+       cmpeq $3,3,$1
+       bne $1,$L53
+       cmpeq $3,4,$1
+       bne $1,$L53
+       cmpeq $3,5,$1
+       bne $1,$L54
+       cmpeq $3,6,$1
+       bne $1,$L54
+       cmpeq $3,7,$1
+       bne $1,$L56
+       cmpeq $3,8,$1
+       bne $1,$L56
+       cmpeq $3,9,$1
+       bne $1,$L55
+       cmpeq $3,10,$1
+       bne $1,$L55
+       cmpeq $3,11,$1
+       bne $1,$L55
+       cmpeq $3,12,$1
+       bne $1,$L55
+       cmpeq $3,13,$1
+       bne $1,$L58
+       cmpeq $3,14,$1
+       bne $1,$L59
+       cmpeq $3,15,$1
+       bne $1,$L55
+       cmpeq $3,16,$1
+       beq $1,$L5
+       .align 3 #realign
+       lda $1,512($31)
+       ldl $2,0($9)
+       and $1,$2,$1
+       beq $1,$L5
+       ldq $2,32($9)
+       cmpeq $2,1,$1
+       bne $1,$L53
+       cmpeq $2,2,$1
+       bne $1,$L54
+       cmpeq $2,4,$1
+       bne $1,$L56
+       cmpeq $2,8,$1
+       bne $1,$L55
+       cmpeq $2,16,$1
+       beq $1,$L5
+       ldq $1,16($9)
+       stq $4,8($1)
+       stq $0,0($1)
+$L5:
+       mov $15,$30
+       mov $31,$0
+       ldq $26,0($30)
+       ldq $9,8($30)
+       ldq $15,16($30)
+       lda $30,32($30)
+       ret $31,($26),1
+       bis $31,$31,$31
+$L55:
+       mov $15,$30
+       ldq $1,16($9)
+       stq $0,0($1)
+       mov $31,$0
+       ldq $26,0($30)
+       ldq $9,8($30)
+       ldq $15,16($30)
+       lda $30,32($30)
+       ret $31,($26),1
+       bis $31,$31,$31
+$L53:
+       mov $15,$30
+       ldq $1,16($9)
+       insbl $0,$1,$3
+       ldq_u $2,0($1)
+       mov $31,$0
+       mskbl $2,$1,$2
+       bis $3,$2,$3
+       stq_u $3,0($1)
+       ldq $26,0($30)
+       ldq $9,8($30)
+       ldq $15,16($30)
+       lda $30,32($30)
+       ret $31,($26),1
+$L54:
+       ldq $1,16($9)
+       inswl $0,$1,$3
+       ldq_u $2,0($1)
+       mskwl $2,$1,$2
+       bis $3,$2,$3
+       stq_u $3,0($1)
+       br $31,$L5
+$L56:
+       ldq $1,16($9)
+       bis $31,$31,$31
+       stl $0,0($1)
+       br $31,$L5
+$L58:
+       cvtts $f0,$f0
+       ldq $1,16($9)
+       sts $f0,0($1)
+       br $31,$L5
+$L59:
+       ldq $1,16($9)
+       bis $31,$31,$31
+       stt $f0,0($1)
+       br $31,$L5
+       .end avcall_call
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-alpha.c b/avcall/avcall-alpha.c
new file mode 100644 (file)
index 0000000..6f05888
--- /dev/null
@@ -0,0 +1,168 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for a DEC Alpha with gcc.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  Alpha Argument Passing Conventions
+
+  The first 6 arguments are passed in registers $16-$21 for integers,
+  in registers $f16-$f21 for floats. From then on, everything is passed
+  on the stack.
+
+  Everything on the stack is word-aligned.
+
+  Integers and pointers are returned in $0, floats and doubles in $f0.
+  To return a structure, the called function copies the value to space
+  pointed to by its first argument, and all other arguments are shifted
+  down by one.
+
+  Compile this routine with gcc for the __asm__ extensions and with
+  optimisation on (-O or -O2 or -g -O) so that argframe is set to the
+  correct offset.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("$30");  /* C names for registers */
+  register long                arg1    __asm__("$16");
+  register long                arg2    __asm__("$17");
+  register long                arg3    __asm__("$18");
+  register long                arg4    __asm__("$19");
+  register long                arg5    __asm__("$20");
+  register long                arg6    __asm__("$21");
+  register double      fret    __asm__("$f0");
+  register double      farg1   __asm__("$f16");
+  register double      farg2   __asm__("$f17");
+  register double      farg3   __asm__("$f18");
+  register double      farg4   __asm__("$f19");
+  register double      farg5   __asm__("$f20");
+  register double      farg6   __asm__("$f21");
+/*register __avword    iret    __asm__("$0"); */
+  register __avword    iret2   __asm__("$1");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = ((unsigned long) l->aptr - (unsigned long) l->args) / sizeof (__avword);
+  __avword i, i2;
+
+  for (i = 6; i < arglen; i++)         /* push excess function args */
+    argframe[i-6] = l->args[i];
+
+                                       /* call function with 1st 6 args */
+  /* we pass the args both in the integer registers and the floating point
+     registers, so we don't have to store the argument types. */
+  __asm__ __volatile__ ("ldq $16,%0" : : "m" (l->args[0])); /* arg1 = l->args[0]; */
+  __asm__ __volatile__ ("ldt $f16,%0" : : "m" (l->args[0])); /* farg1 = *(double*) &l->args[0]; */
+  __asm__ __volatile__ ("ldq $17,%0" : : "m" (l->args[1])); /* arg2 = l->args[1]; */
+  __asm__ __volatile__ ("ldt $f17,%0" : : "m" (l->args[1])); /* farg2 = *(double*) &l->args[1]; */
+  __asm__ __volatile__ ("ldq $18,%0" : : "m" (l->args[2])); /* arg3 = l->args[2]; */
+  __asm__ __volatile__ ("ldt $f18,%0" : : "m" (l->args[2])); /* farg3 = *(double*) &l->args[2]; */
+  __asm__ __volatile__ ("ldq $19,%0" : : "m" (l->args[3])); /* arg4 = l->args[3]; */
+  __asm__ __volatile__ ("ldt $f19,%0" : : "m" (l->args[3])); /* farg4 = *(double*) &l->args[3]; */
+  __asm__ __volatile__ ("ldq $20,%0" : : "m" (l->args[4])); /* arg5 = l->args[4]; */
+  __asm__ __volatile__ ("ldt $f20,%0" : : "m" (l->args[4])); /* farg5 = *(double*) &l->args[4]; */
+  __asm__ __volatile__ ("ldq $21,%0" : : "m" (l->args[5])); /* arg6 = l->args[5]; */
+  __asm__ __volatile__ ("ldt $f21,%0" : : "m" (l->args[5])); /* farg6 = *(double*) &l->args[5]; */
+  i = (*l->func)();
+  i2 = iret2;
+  /* this is apparently not needed, but better safe than sorry... */
+  __asm__ __volatile__ ("" : : :
+                       /* clobber */ "$16", "$17", "$18", "$19", "$20", "$21",
+                                    "$f16","$f17","$f18","$f19","$f20","$f21");
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, i);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, i);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, i);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, i);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, i);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, i);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, i);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, i);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, i);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, i);
+  } else
+  if (l->rtype == __AVlonglong) {
+    RETURN(long long, i);
+  } else
+  if (l->rtype == __AVulonglong) {
+    RETURN(unsigned long long, i);
+  } else
+  if (l->rtype == __AVfloat) {
+    RETURN(float, fret);
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, fret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, i);
+  } else
+  if (l->rtype == __AVstruct) {
+    if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+      if (l->rsize == sizeof(char)) {
+        RETURN(char, i);
+      } else
+      if (l->rsize == sizeof(short)) {
+        RETURN(short, i);
+      } else
+      if (l->rsize == sizeof(int)) {
+        RETURN(int, i);
+      } else
+      if (l->rsize == sizeof(long)) {
+        RETURN(long, i);
+      } else
+      if (l->rsize == 2*sizeof(__avword)) {
+        void* raddr = l->raddr;
+        ((__avword*)raddr)[0] = i;
+        ((__avword*)raddr)[1] = i2;
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-arm-macro.S b/avcall/avcall-arm-macro.S
new file mode 100644 (file)
index 0000000..da8fc5f
--- /dev/null
@@ -0,0 +1,112 @@
+#include "asm-arm.h"
+       .text
+       .align  2
+       .global C(avcall_call)
+       DECLARE_FUNCTION(avcall_call)
+FUNBEGIN(avcall_call)
+       // args = 0, pretend = 0, frame = 1024
+       // frame_needed = 1, uses_anonymous_args = 0
+       mov     ip, sp
+       stmfd   sp!, {r4, r5, fp, ip, lr, pc}
+       sub     fp, ip, $4
+       sub     sp, sp, $1024
+       add     r2, r0, $20
+       ldmia   r2, {r2, r3}
+       sub     r3, r2, r3
+       mov     ip, $4
+       mov     r1, r3, asr $2
+       cmp     ip, r1
+       mov     r5, r0
+       bic     sp, sp, $7
+       ldr     r4, [r0, $24]
+       bge     L(47)
+       add     r2, sp, $16
+L(6):
+       ldr     r3, [r4, ip, asl $2]
+       add     ip, ip, $1
+       cmp     ip, r1
+       str     r3, [r2, $-16]
+       add     r2, r2, $4
+       blt     L(6)
+L(47):
+       ldmia   r4, {r0, r1, r2, r3}    // phole ldm
+       mov     lr, pc
+       ldr     pc, [r5, $4]
+       ldr     r2, [r5, $12]
+       cmp     r2, $1
+       mov     ip, r0
+       beq     L(8)
+       cmp     r2, $0
+       beq     L(57)
+       cmp     r2, $2
+       beq     L(50)
+       cmp     r2, $3
+       beq     L(50)
+       cmp     r2, $4
+       beq     L(50)
+       cmp     r2, $5
+       beq     L(49)
+       cmp     r2, $6
+       beq     L(49)
+       cmp     r2, $7
+       beq     L(57)
+       cmp     r2, $8
+       beq     L(57)
+       cmp     r2, $9
+       beq     L(57)
+       cmp     r2, $10
+       beq     L(57)
+       sub     r3, r2, $11
+       cmp     r3, $1
+       bls     L(56)
+       cmp     r2, $13
+       ldreq   r3, [r5, $8]
+       streq   r0, [r3, $0]    // float
+       beq     L(8)
+       cmp     r2, $14
+       ldreq   r3, [r5, $8]
+       stmeqia r3, {r0-r1}     // double
+       beq     L(8)
+       cmp     r2, $15
+       beq     L(57)
+       cmp     r2, $16
+       beq     L(58)
+L(8):
+       mov     r0, $0
+       ldmea   fp, {r4, r5, fp, sp, pc}
+L(58):
+       ldr     r3, [r5, $0]
+       tst     r3, $512
+       beq     L(8)
+       ldr     r3, [r5, $16]
+       cmp     r3, $1
+       beq     L(50)
+       cmp     r3, $2
+       beq     L(49)
+       cmp     r3, $4
+       bhi     L(43)
+L(57):
+       ldr     r3, [r5, $8]
+L(48):
+       str     ip, [r3, $0]
+       b       L(8)
+L(43):
+       cmp     r3, $8
+       bne     L(8)
+L(56):
+       ldr     r3, [r5, $8]
+       str     r1, [r3, $4]
+       b       L(48)
+L(49):
+       ldr     r3, [r5, $8]
+       strh    ip, [r3, $0]    // movhi 
+       b       L(8)
+L(50):
+       ldr     r3, [r5, $8]
+       strb    ip, [r3, $0]
+       b       L(8)
+L(fe1):
+       FUNEND(avcall_call)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",%progbits
+#endif
diff --git a/avcall/avcall-arm.c b/avcall/avcall-arm.c
new file mode 100644 (file)
index 0000000..787d95b
--- /dev/null
@@ -0,0 +1,148 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for an Acorn Risc Maschine with gcc.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  ARM Argument Passing Conventions:
+
+  All arguments, except the first 4 words which are passed in the registers
+  r0, r1, r2, r3, are passed on the stack with word alignment. Doubles take
+  two words.
+  In ABIs where 'double' and 'long long' have alignment 4, they are passed
+  entirely in registers or entirely on the stack (i.e. not the first half
+  in r3 and the second half on the stack).
+  In ABIs where 'double' and 'long long' have alignment 8, they are passed
+  with 2-word alignment in this word sequence (e.g. a 'double' after an
+  'int' in r0 gets passed in (r2,r3), not in (r1,r2)). This implies that
+  they are passed entirely in registers or entirely on the stack.
+  Structure args are passed as true structures embedded in the argument stack.
+  A structure arg may be allocated partially in registers (r0,...,r3) and
+  partially on the stack, if no previous args already consume stack space.
+  To return a structure, the called function copies the return value to the
+  address supplied in register r0.
+
+  Compile this routine with gcc -O (or -O2 or -g -O) to get the right
+  register variables, or use the assembler version.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+int
+avcall_call(av_alist* list)
+{
+  register unsigned long sp    __asm__("r13");  /* C names for registers */
+/*register __avword    iret    __asm__("r0"); */
+  register __avword    iret2   __asm__("r1");
+  register float       fret    __asm__("r0");  /* r0 */
+  register double      dret    __asm__("r0");  /* r0,r1 */
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword space[__AV_ALIST_WORDS];    /* space for callee's stack frame */
+
+  /* Enforce 8-bytes-alignment of the stack pointer.
+     We need to do it this way because the old GCC that we use to compile
+     this file does not support the option '-mabi=aapcs'. */
+  sp &= -8;
+
+  __avword* argframe = (__avword*) sp; /* stack offset for argument list */
+  int arglen = l->aptr - l->args;
+  __avword i;
+
+  for (i = 4; i < arglen; i++)         /* push function args onto stack */
+    argframe[i-4] = l->args[i];
+
+                               /* call function, pass 4 args in registers */
+  i = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3]);
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, i);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, i);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, i);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, i);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, i);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, i);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, i);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, i);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, i);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, i);
+  } else
+  if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) {
+    void* raddr = l->raddr;
+    ((__avword*)raddr)[0] = i;
+    ((__avword*)raddr)[1] = iret2;
+  } else
+  if (l->rtype == __AVfloat) {
+    RETURN(float, fret);
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, dret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, i);
+  } else
+  if (l->rtype == __AVstruct) {
+    /* PCS for ARM (http://infocenter.arm.com/help/topic/com.arm.doc.ihi0042b/IHI0042B_aapcs.pdf):
+       page 19: "A Composite Type not larger than 4 bytes is returned in r0."
+       sizeof({char a[3];}) = 3, so we have to use <= sizeof below */
+    if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+      if (l->rsize == sizeof(char)) { /* can't occur */
+        RETURN(char, i);
+      } else
+      if (l->rsize == sizeof(short)) { /* can't occur */
+        RETURN(short, i);
+      } else
+      if (l->rsize <= sizeof(int)) {
+        RETURN(int, i);
+      } else
+      if (l->rsize == 2*sizeof(__avword)) {
+        void* raddr = l->raddr;
+        ((__avword*)raddr)[0] = i;
+        ((__avword*)raddr)[1] = iret2;
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-arm64-macro.S b/avcall/avcall-arm64-macro.S
new file mode 100644 (file)
index 0000000..c59d0f4
--- /dev/null
@@ -0,0 +1,329 @@
+#include "asm-arm.h"
+       .cpu generic+fp+simd
+       .text
+       .align  2
+       .p2align 3,,7
+       .global C(avcall_call)
+       .type   avcall_call, %function
+FUNBEGIN(avcall_call)
+       stp     x29, x30, [sp, -48]!
+       add     x29, sp, 0
+       ldp     x11, x12, [x0, 40]
+       stp     x19, x20, [sp, 16]
+       sub     x11, x11, x12
+       ldr     w15, [x0, 64]
+       asr     x10, x11, 3
+       ldr     w14, [x0, 136]
+       cmp     w10, wzr
+       mov     x19, x0
+       str     d8, [sp, 32]
+       sub     sp, sp, $2064
+       ble     L(6)
+       mov     x13, sp
+       mov     x9, 0
+       mov     w11, w10
+       .p2align 2
+L(87):
+       ldr     x10, [x12, x9, lsl 3]
+       str     x10, [x13, x9, lsl 3]
+       add     x9, x9, 1
+       cmp     w11, w9
+       bgt     L(87)
+L(6):
+       cbz     w15, L(7)
+       cmp     w15, 1
+       ldr     x0, [x19, 72]
+       bls     L(7)
+       cmp     w15, 2
+       ldr     x1, [x19, 80]
+       beq     L(7)
+       cmp     w15, 3
+       ldr     x2, [x19, 88]
+       beq     L(7)
+       cmp     w15, 4
+       ldr     x3, [x19, 96]
+       beq     L(7)
+       cmp     w15, 5
+       ldr     x4, [x19, 104]
+       beq     L(7)
+       cmp     w15, 6
+       ldr     x5, [x19, 112]
+       beq     L(7)
+       cmp     w15, 7
+       ldr     x6, [x19, 120]
+       beq     L(7)
+       ldr     x7, [x19, 128]
+       .p2align 2
+L(7):
+       cbz     w14, L(9)
+       ldr     w9, [x19, 144]
+       tbz     x9, 0, L(10)
+       ldr     d0, [x19, 184]
+L(11):
+       cmp     w14, 1
+       bls     L(9)
+       tbnz    x9, 1, L(121)
+       ldr     w10, [x19, 140]
+       tbz     x10, 1, L(14)
+       ldr     s1, [x19, 152]
+L(14):
+       cmp     w14, 2
+       beq     L(9)
+       tbz     x9, 2, L(15)
+       ldr     d2, [x19, 200]
+L(16):
+       cmp     w14, 3
+       beq     L(9)
+       tbnz    x9, 3, L(122)
+       ldr     w10, [x19, 140]
+       tbz     x10, 3, L(18)
+       ldr     s3, [x19, 160]
+L(18):
+       cmp     w14, 4
+       beq     L(9)
+       tbz     x9, 4, L(19)
+       ldr     d4, [x19, 216]
+L(20):
+       cmp     w14, 5
+       beq     L(9)
+       tbz     x9, 5, L(21)
+       ldr     d5, [x19, 224]
+L(22):
+       cmp     w14, 6
+       beq     L(9)
+       tbz     x9, 6, L(23)
+       ldr     d6, [x19, 232]
+L(24):
+       cmp     w14, 7
+       beq     L(9)
+       tbz     x9, 7, L(25)
+       ldr     d7, [x19, 240]
+       .p2align 2
+L(9):
+       ldr     w9, [x19, 24]
+       cmp     w9, 13
+       beq     L(123)
+       cmp     w9, 14
+       beq     L(124)
+       ldr     x9, [x19, 8]
+       blr     x9
+       mov     x16, x0
+       ldr     w9, [x19, 24]
+       cmp     w9, 1
+       beq     L(27)
+       cbz     w9, L(119)
+       cmp     w9, 2
+       beq     L(115)
+       cmp     w9, 3
+       beq     L(115)
+       cmp     w9, 4
+       beq     L(115)
+       cmp     w9, 5
+       beq     L(116)
+       cmp     w9, 6
+       beq     L(116)
+       cmp     w9, 7
+       beq     L(117)
+       cmp     w9, 8
+       beq     L(117)
+       and     w12, w9, -3
+       cmp     w12, 9
+       beq     L(119)
+       sub     w12, w9, $10
+       tst     w12, -3
+       beq     L(119)
+       cmp     w9, 15
+       beq     L(119)
+       cmp     w9, 16
+       bne     L(27)
+       ldr     w9, [x19]
+       tbz     x9, 9, L(27)
+       ldr     x12, [x19, 32]
+       sub     x9, x12, $1
+       cmp     x9, 15
+       bhi     L(27)
+       ldr     x13, [x19, 16]
+       cmp     x12, 8
+       and     x9, x13, 7
+       and     x13, x13, -8
+       add     x12, x12, x9
+       bhi     L(40)
+       cmp     x12, 8
+       lsl     w11, w12, 3
+       bhi     L(41)
+       lsl     w9, w9, 3
+       mov     x12, 2
+       mov     x14, 1
+       sub     w11, w11, $1
+       lsl     x14, x14, x9
+       lsl     x11, x12, x11
+       lsl     x9, x0, x9
+       sub     x10, x11, x14
+       ldr     d17, [x13]
+       fmov    d16, x10
+       fmov    d8, x9
+       bif     v8.8b, v17.8b, v16.8b
+       str     d8, [x13]
+L(27):
+       add     sp, x29, 0
+       ldr     d8, [sp, 32]
+       mov     w0, 0
+       ldp     x19, x20, [sp, 16]
+       ldp     x29, x30, [sp], 48
+       ret
+       .p2align 3
+L(10):
+       ldr     w10, [x19, 140]
+       tbz     x10, 0, L(11)
+       ldr     s0, [x19, 148]
+       b       L(11)
+       .p2align 3
+L(119):
+       ldr     x9, [x19, 16]
+       mov     w0, 0
+       str     x16, [x9]
+       ldr     d8, [x29, 32]
+       add     sp, x29, 0
+       ldp     x19, x20, [sp, 16]
+       ldp     x29, x30, [sp], 48
+       ret
+       .p2align 3
+L(121):
+       ldr     d1, [x19, 192]
+       b       L(14)
+       .p2align 3
+L(115):
+       ldr     x9, [x19, 16]
+       mov     w0, 0
+       strb    w16, [x9]
+       ldr     d8, [x29, 32]
+       add     sp, x29, 0
+       ldp     x19, x20, [sp, 16]
+       ldp     x29, x30, [sp], 48
+       ret
+       .p2align 3
+L(124):
+       ldp     x9, x20, [x19, 8]
+       blr     x9
+       str     d0, [x20]
+       mov     w0, 0
+       ldr     d8, [x29, 32]
+       add     sp, x29, 0
+       ldp     x19, x20, [sp, 16]
+       ldp     x29, x30, [sp], 48
+       ret
+L(123):
+       ldp     x9, x20, [x19, 8]
+       blr     x9
+       str     s0, [x20]
+       b       L(27)
+L(15):
+       ldr     w10, [x19, 140]
+       tbz     x10, 2, L(16)
+       ldr     s2, [x19, 156]
+       b       L(16)
+L(116):
+       ldr     x9, [x19, 16]
+       strh    w16, [x9]
+       b       L(27)
+L(122):
+       ldr     d3, [x19, 208]
+       b       L(18)
+L(117):
+       ldr     x9, [x19, 16]
+       str     w16, [x9]
+       b       L(27)
+L(19):
+       ldr     w10, [x19, 140]
+       tbz     x10, 4, L(20)
+       ldr     s4, [x19, 164]
+       b       L(20)
+L(21):
+       ldr     w10, [x19, 140]
+       tbz     x10, 5, L(22)
+       ldr     s5, [x19, 168]
+       b       L(22)
+L(23):
+       ldr     w10, [x19, 140]
+       tbz     x10, 6, L(24)
+       ldr     s6, [x19, 172]
+       b       L(24)
+L(25):
+       ldr     w9, [x19, 140]
+       tbz     x9, 7, L(9)
+       ldr     s7, [x19, 176]
+       b       L(9)
+L(41):
+       lsl     w14, w9, 3
+       neg     w9, w9, lsl 3
+       movi    d16, -1
+       add     w10, w9, 64
+       dup     v8.8b, w14
+       lsl     x9, x0, x14
+       ldp     d17, d18, [x13]
+       mov     x12, 2
+       sub     w11, w11, $65
+       lsl     x11, x12, x11
+       ushl    d16, d16, d8
+       fmov    d8, x9
+       asr     x9, x0, x10
+       sub     x10, x11, $1
+       bsl     v16.8b, v8.8b, v17.8b
+       fmov    d8, x10
+       fmov    d17, x9
+       str     d16, [x13]
+       bif     v17.8b, v18.8b, v8.8b
+       str     d17, [x13, 8]
+       b       L(27)
+L(40):
+       lsl     w14, w9, 3
+       cmp     x12, 16
+       movi    d16, -1
+       lsl     x15, x0, x14
+       dup     v8.8b, w14
+       fmov    d17, x15
+       ushl    d16, d16, d8
+       ldr     d8, [x13]
+       bsl     v16.8b, v17.8b, v8.8b
+       str     d16, [x13]
+       bls     L(125)
+       lsl     w12, w12, 3
+       mov     x15, 2
+       neg     w9, w9, lsl 3
+       sub     w12, w12, $129
+       add     w9, w9, 64
+       lsl     x12, x15, x12
+       asr     x11, x1, x9
+       asr     x10, x0, x9
+       sub     x9, x12, $1
+       ldr     d17, [x13, 16]
+       fmov    d16, x11
+       lsl     x14, x1, x14
+       fmov    d8, x9
+       orr     x10, x10, x14
+       bif     v16.8b, v17.8b, v8.8b
+       fmov    x11, d16
+       stp     x10, x11, [x13, 8]
+       b       L(27)
+L(125):
+       neg     w9, w9, lsl 2
+       lsl     w12, w12, 3
+       add     w9, w9, 32
+       mov     x15, 2
+       sub     w12, w12, $65
+       lsl     x11, x1, x14
+       lsl     x12, x15, x12
+       asr     x14, x0, x9
+       asr     x10, x14, x9
+       sub     x9, x12, $1
+       ldr     d17, [x13, 8]
+       fmov    d8, x9
+       orr     x9, x10, x11
+       fmov    d16, x9
+       bif     v16.8b, v17.8b, v8.8b
+       str     d16, [x13, 8]
+       b       L(27)
+       FUNEND(avcall_call)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",%progbits
+#endif
diff --git a/avcall/avcall-arm64.c b/avcall/avcall-arm64.c
new file mode 100644 (file)
index 0000000..d1385d1
--- /dev/null
@@ -0,0 +1,362 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O -fno-omit-frame-pointer !!!
+
+  Foreign function interface for a Linux arm64 (a.k.a. aarch64) with gcc.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  ARM64 Argument Passing Conventions are documented in
+  http://infocenter.arm.com/help/topic/com.arm.doc.ihi0055b/IHI0055B_aapcs64.pdf.
+
+  Up to 8 words are passed in integer registers (x0, ..., x7).
+  Up to 8 float/double arguments are passed in floating point / SIMD
+  registers (v0/q0/d0/s0, ..., v7/q7/d7/s7).
+  Arguments passed on the stack have word alignment.
+  Structure args larger than 16 bytes are passed as pointers to caller-made
+  local copies. (§ 5.4.2 rule B.3)
+  Structure args <= 16 bytes are passed as up to two words in registers
+  (§ 5.4.2 rule C.10) or otherwise on the stack (§ 5.4.2 rule C.13).
+
+  Integers are returned in x0, x1.
+  Float/double values are returned in d0/s0, d1/s1.
+  Structures <= 16 bytes are returned in registers. To return a structure
+  larger than 16 bytes, the called function copies the value to space
+  pointed to by x8.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+register __avword* sret __asm__("x8");  /* structure return pointer */
+
+register __avword iarg1 __asm__("x0");
+register __avword iarg2 __asm__("x1");
+register __avword iarg3 __asm__("x2");
+register __avword iarg4 __asm__("x3");
+register __avword iarg5 __asm__("x4");
+register __avword iarg6 __asm__("x5");
+register __avword iarg7 __asm__("x6");
+register __avword iarg8 __asm__("x7");
+
+register float farg1 __asm__("s0");
+register float farg2 __asm__("s1");
+register float farg3 __asm__("s2");
+register float farg4 __asm__("s3");
+register float farg5 __asm__("s4");
+register float farg6 __asm__("s5");
+register float farg7 __asm__("s6");
+register float farg8 __asm__("s7");
+
+register double darg1 __asm__("d0");
+register double darg2 __asm__("d1");
+register double darg3 __asm__("d2");
+register double darg4 __asm__("d3");
+register double darg5 __asm__("d4");
+register double darg6 __asm__("d5");
+register double darg7 __asm__("d6");
+register double darg8 __asm__("d7");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("sp");  /* C names for registers */
+  register __avword    iretreg  __asm__("x0");
+  register __avword    iret2reg __asm__("x1");
+  register double      dret    __asm__("d0");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  unsigned int ianum = l->ianum;
+  unsigned int fanum = l->fanum;
+  __avword iret, iret2;
+
+  {
+    int i;
+    for (i = 0; i < arglen; i++)       /* push function args onto stack */
+      argframe[i] = l->args[i];
+  }
+
+  /* Put up to 8 integer args into registers. */
+  if (ianum >= 1) {
+    iarg1 = l->iargs[0];
+    if (ianum >= 2) {
+      iarg2 = l->iargs[1];
+      if (ianum >= 3) {
+        iarg3 = l->iargs[2];
+        if (ianum >= 4) {
+          iarg4 = l->iargs[3];
+          if (ianum >= 5) {
+            iarg5 = l->iargs[4];
+            if (ianum >= 6) {
+              iarg6 = l->iargs[5];
+              if (ianum >= 7) {
+                iarg7 = l->iargs[6];
+                if (ianum >= 8) {
+                  iarg8 = l->iargs[7];
+                }
+              }
+            }
+          }
+        }
+      }
+    }
+  }
+
+  /* Put upto 8 floating-point args into registers. */
+  if (fanum >= 1) {
+    if (l->darg_mask & (1 << 0)) darg1 = l->dargs[0];
+    else if (l->farg_mask & (1 << 0)) farg1 = l->fargs[0];
+    if (fanum >= 2) {
+      if (l->darg_mask & (1 << 1)) darg2 = l->dargs[1];
+      else if (l->farg_mask & (1 << 1)) farg2 = l->fargs[1];
+      if (fanum >= 3) {
+        if (l->darg_mask & (1 << 2)) darg3 = l->dargs[2];
+        else if (l->farg_mask & (1 << 2)) farg3 = l->fargs[2];
+        if (fanum >= 4) {
+          if (l->darg_mask & (1 << 3)) darg4 = l->dargs[3];
+          else if (l->farg_mask & (1 << 3)) farg4 = l->fargs[3];
+          if (fanum >= 5) {
+            if (l->darg_mask & (1 << 4)) darg5 = l->dargs[4];
+            else if (l->farg_mask & (1 << 4)) farg5 = l->fargs[4];
+            if (fanum >= 6) {
+              if (l->darg_mask & (1 << 5)) darg6 = l->dargs[5];
+              else if (l->farg_mask & (1 << 5)) farg6 = l->fargs[5];
+              if (fanum >= 7) {
+                if (l->darg_mask & (1 << 6)) darg7 = l->dargs[6];
+                else if (l->farg_mask & (1 << 6)) farg7 = l->fargs[6];
+                if (fanum >= 8) {
+                  if (l->darg_mask & (1 << 7)) darg8 = l->dargs[7];
+                  else if (l->farg_mask & (1 << 7)) farg8 = l->fargs[7];
+                }
+              }
+            }
+          }
+        }
+      }
+    }
+  }
+        
+  /* Call function. */
+  if (l->rtype == __AVfloat) {
+    *(float*)l->raddr = (*(float(*)())l->func)();
+  } else
+  if (l->rtype == __AVdouble) {
+    *(double*)l->raddr = (*(double(*)())l->func)();
+  } else {
+    iret = (*l->func)();
+    iret2 = iret2reg;
+
+    /* save return value */
+    if (l->rtype == __AVvoid) {
+    } else
+    if (l->rtype == __AVword) {
+      RETURN(__avword, iret);
+    } else
+    if (l->rtype == __AVchar) {
+      RETURN(char, iret);
+    } else
+    if (l->rtype == __AVschar) {
+      RETURN(signed char, iret);
+    } else
+    if (l->rtype == __AVuchar) {
+      RETURN(unsigned char, iret);
+    } else
+    if (l->rtype == __AVshort) {
+      RETURN(short, iret);
+    } else
+    if (l->rtype == __AVushort) {
+      RETURN(unsigned short, iret);
+    } else
+    if (l->rtype == __AVint) {
+      RETURN(int, iret);
+    } else
+    if (l->rtype == __AVuint) {
+      RETURN(unsigned int, iret);
+    } else
+    if (l->rtype == __AVlong || l->rtype == __AVlonglong) {
+      RETURN(long, iret);
+    } else
+    if (l->rtype == __AVulong || l->rtype == __AVulonglong) {
+      RETURN(unsigned long, iret);
+    } else
+  /* see above
+    if (l->rtype == __AVfloat) {
+    } else
+    if (l->rtype == __AVdouble) {
+    } else
+  */
+    if (l->rtype == __AVvoidp) {
+      RETURN(void*, iret);
+    } else
+    if (l->rtype == __AVstruct) {
+      if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+        /* Return structs of size <= 16 in registers. */
+        if (l->rsize > 0 && l->rsize <= 16) {
+          void* raddr = l->raddr;
+          #if 0 /* Unoptimized */
+          if (l->rsize == 1) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          } else
+          if (l->rsize == 2) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          } else
+          if (l->rsize == 3) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          } else
+          if (l->rsize == 4) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+          } else
+          if (l->rsize == 5) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+          } else
+          if (l->rsize == 6) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+          } else
+          if (l->rsize == 7) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+          } else
+          if (l->rsize >= 8 && l->rsize <= 16) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56);
+            if (l->rsize == 8) {
+            } else
+            if (l->rsize == 9) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+            } else
+            if (l->rsize == 10) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+            } else
+            if (l->rsize == 11) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+            } else
+            if (l->rsize == 12) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+            } else
+            if (l->rsize == 13) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+            } else
+            if (l->rsize == 14) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+            } else
+            if (l->rsize == 15) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+            } else
+            if (l->rsize == 16) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56);
+            }
+          }
+          #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+          uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avword) */
+          __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+          uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+          uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avword) */
+          if (count <= sizeof(__avword)) {
+            /* Use iret. */
+            if (end_offset <= sizeof(__avword)) {
+              /* 0 < end_offset ≤ sizeof(__avword) */
+              __avword mask0 = ((__avword)2 << (end_offset*8-1)) - ((__avword)1 << (start_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            } else {
+              /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+              __avword mask0 = - ((__avword)1 << (start_offset*8));
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+              wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avword)*8-start_offset*8))) & mask1;
+            }
+          } else {
+            /* Use iret, iret2. */
+            __avword mask0 = - ((__avword)1 << (start_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            if (end_offset <= 2*sizeof(__avword)) {
+              /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1;
+            } else {
+              /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+              __avword mask2 = ((__avword)2 << (end_offset*8-2*sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] = (iret >> (sizeof(__avword)*8-start_offset*8)) | (iret2 << (start_offset*8));
+              wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avword)*8-start_offset*8))) & mask2;
+            }
+          }
+          #endif
+        }
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-armhf-macro.S b/avcall/avcall-armhf-macro.S
new file mode 100644 (file)
index 0000000..142839f
--- /dev/null
@@ -0,0 +1,346 @@
+#include "asm-arm.h"
+       .arch armv6
+       .eabi_attribute 28, 1
+       .eabi_attribute 20, 1
+       .eabi_attribute 21, 1
+       .eabi_attribute 23, 3
+       .eabi_attribute 24, 1
+       .eabi_attribute 25, 1
+       .eabi_attribute 26, 1
+       .eabi_attribute 30, 2
+       .eabi_attribute 34, 1
+       .eabi_attribute 18, 4
+       .text
+       .align  2
+       .global C(avcall_call)
+       .syntax unified
+       .arm
+       .fpu vfpv3-d16
+       .type   avcall_call, %function
+FUNBEGIN(avcall_call)
+       // args = 0, pretend = 0, frame = 0
+       // frame_needed = 1, uses_anonymous_args = 0
+       push    {r4, r5, fp, lr}
+       mov     r4, r0
+       ldr     r0, [r0, $20]
+       ldr     ip, [r4, $24]
+       sub     r3, sp, $1024
+       add     fp, sp, $12
+       sub     sp, r3, $8
+       sub     r3, r0, ip
+       cmp     r3, $19
+       movgt   r2, sp
+       subgt   r2, r2, $4
+       addgt   r3, ip, $16
+       ble     L(6)
+L(5):
+       ldr     r1, [r3], $4
+       cmp     r0, r3
+       str     r1, [r2, $4]!
+       bne     L(5)
+L(6):
+       ldr     r3, [r4, $48]
+       tst     r3, $1
+       beq     L(4)
+       .syntax divided
+// 87 "avcall-armhf.c" 1
+       vldr.32 s0,[r4, $56]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(4):
+       tst     r3, $2
+       beq     L(7)
+       .syntax divided
+// 89 "avcall-armhf.c" 1
+       vldr.32 s1,[r4, $60]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(7):
+       tst     r3, $4
+       beq     L(8)
+       .syntax divided
+// 91 "avcall-armhf.c" 1
+       vldr.32 s2,[r4, $64]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(8):
+       tst     r3, $8
+       beq     L(9)
+       .syntax divided
+// 93 "avcall-armhf.c" 1
+       vldr.32 s3,[r4, $68]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(9):
+       tst     r3, $16
+       beq     L(10)
+       .syntax divided
+// 95 "avcall-armhf.c" 1
+       vldr.32 s4,[r4, $72]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(10):
+       tst     r3, $32
+       beq     L(11)
+       .syntax divided
+// 97 "avcall-armhf.c" 1
+       vldr.32 s5,[r4, $76]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(11):
+       tst     r3, $64
+       beq     L(12)
+       .syntax divided
+// 99 "avcall-armhf.c" 1
+       vldr.32 s6,[r4, $80]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(12):
+       tst     r3, $128
+       beq     L(13)
+       .syntax divided
+// 101 "avcall-armhf.c" 1
+       vldr.32 s7,[r4, $84]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(13):
+       tst     r3, $256
+       beq     L(14)
+       .syntax divided
+// 103 "avcall-armhf.c" 1
+       vldr.32 s8,[r4, $88]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(14):
+       tst     r3, $512
+       beq     L(15)
+       .syntax divided
+// 105 "avcall-armhf.c" 1
+       vldr.32 s9,[r4, $92]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(15):
+       tst     r3, $1024
+       beq     L(16)
+       .syntax divided
+// 107 "avcall-armhf.c" 1
+       vldr.32 s10,[r4, $96]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(16):
+       tst     r3, $2048
+       beq     L(17)
+       .syntax divided
+// 109 "avcall-armhf.c" 1
+       vldr.32 s11,[r4, $100]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(17):
+       tst     r3, $4096
+       beq     L(18)
+       .syntax divided
+// 111 "avcall-armhf.c" 1
+       vldr.32 s12,[r4, $104]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(18):
+       tst     r3, $8192
+       beq     L(19)
+       .syntax divided
+// 113 "avcall-armhf.c" 1
+       vldr.32 s13,[r4, $108]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(19):
+       tst     r3, $16384
+       beq     L(20)
+       .syntax divided
+// 115 "avcall-armhf.c" 1
+       vldr.32 s14,[r4, $112]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(20):
+       tst     r3, $32768
+       beq     L(21)
+       .syntax divided
+// 117 "avcall-armhf.c" 1
+       vldr.32 s15,[r4, $116]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(21):
+       ldr     r3, [r4, $52]
+       tst     r3, $1
+       beq     L(22)
+       .syntax divided
+// 121 "avcall-armhf.c" 1
+       vldr.64 d0,[r4, $120]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(22):
+       tst     r3, $2
+       beq     L(23)
+       .syntax divided
+// 123 "avcall-armhf.c" 1
+       vldr.64 d1,[r4, $128]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(23):
+       tst     r3, $4
+       beq     L(24)
+       .syntax divided
+// 125 "avcall-armhf.c" 1
+       vldr.64 d2,[r4, $136]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(24):
+       tst     r3, $8
+       beq     L(25)
+       .syntax divided
+// 127 "avcall-armhf.c" 1
+       vldr.64 d3,[r4, $144]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(25):
+       tst     r3, $16
+       beq     L(26)
+       .syntax divided
+// 129 "avcall-armhf.c" 1
+       vldr.64 d4,[r4, $152]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(26):
+       tst     r3, $32
+       beq     L(27)
+       .syntax divided
+// 131 "avcall-armhf.c" 1
+       vldr.64 d5,[r4, $160]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(27):
+       tst     r3, $64
+       beq     L(28)
+       .syntax divided
+// 133 "avcall-armhf.c" 1
+       vldr.64 d6,[r4, $168]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(28):
+       tst     r3, $128
+       beq     L(29)
+       .syntax divided
+// 135 "avcall-armhf.c" 1
+       vldr.64 d7,[r4, $176]
+// 0 "" 2
+       .arm
+       .syntax unified
+L(29):
+       ldm     ip, {r0, r1, r2, r3}
+       ldr     r5, [r4, $4]
+       blx     r5
+       ldrb    r3, [r4, $12]   // zero_extendqisi2
+       cmp     r3, $1
+       beq     L(30)
+       cmp     r3, $0
+       beq     L(130)
+       cmp     r3, $2
+       beq     L(128)
+       cmp     r3, $3
+       beq     L(128)
+       cmp     r3, $4
+       beq     L(128)
+       cmp     r3, $5
+       beq     L(131)
+       cmp     r3, $6
+       beq     L(131)
+       cmp     r3, $7
+       beq     L(130)
+       cmp     r3, $8
+       beq     L(130)
+       cmp     r3, $9
+       beq     L(130)
+       cmp     r3, $10
+       beq     L(130)
+       sub     r2, r3, $11
+       cmp     r2, $1
+       bls     L(132)
+       cmp     r3, $13
+       beq     L(134)
+       cmp     r3, $14
+       beq     L(135)
+       cmp     r3, $15
+       beq     L(130)
+       cmp     r3, $16
+       bne     L(30)
+       ldr     r3, [r4]
+       tst     r3, $512
+       beq     L(30)
+       ldr     r3, [r4, $16]
+       cmp     r3, $1
+       beq     L(128)
+       cmp     r3, $2
+       beq     L(131)
+       cmp     r3, $4
+       bls     L(130)
+       cmp     r3, $8
+       bne     L(30)
+L(132):
+       ldr     r3, [r4, $8]
+       stm     r3, {r0, r1}
+L(30):
+       mov     r0, $0
+       sub     sp, fp, $12
+       // sp needed
+       pop     {r4, r5, fp, pc}
+L(130):
+       ldr     r3, [r4, $8]
+       str     r0, [r3]
+       mov     r0, $0
+       sub     sp, fp, $12
+       // sp needed
+       pop     {r4, r5, fp, pc}
+L(128):
+       ldr     r3, [r4, $8]
+       strb    r0, [r3]
+       mov     r0, $0
+       sub     sp, fp, $12
+       // sp needed
+       pop     {r4, r5, fp, pc}
+L(131):
+       ldr     r3, [r4, $8]
+       strh    r0, [r3]        // movhi
+       b       L(30)
+L(134):
+       ldr     r3, [r4, $8]
+       vstr.32 s0, [r3]
+       b       L(30)
+L(135):
+       ldr     r3, [r4, $8]
+       vstr.64 d0, [r3]
+       b       L(30)
+       FUNEND(avcall_call)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",%progbits
+#endif
diff --git a/avcall/avcall-armhf.c b/avcall/avcall-armhf.c
new file mode 100644 (file)
index 0000000..68c1e7a
--- /dev/null
@@ -0,0 +1,209 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for an ARM with -mfloat-abi=hard with gcc.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  ARM Argument Passing Conventions:
+
+  All arguments, except the first 4 words which are passed in the registers
+  r0, r1, r2, r3, are passed on the stack with word alignment. Doubles take
+  two words.
+  In ABIs where 'double' and 'long long' have alignment 4, they are passed
+  entirely in registers or entirely on the stack (i.e. not the first half
+  in r3 and the second half on the stack).
+  In ABIs where 'double' and 'long long' have alignment 8, they are passed
+  with 2-word alignment in this word sequence (e.g. a 'double' after an
+  'int' in r0 gets passed in (r2,r3), not in (r1,r2)). This implies that
+  they are passed entirely in registers or entirely on the stack.
+  Structure args are passed as true structures embedded in the argument stack.
+  A structure arg may be allocated partially in registers (r0,...,r3) and
+  partially on the stack, if no previous args already consume stack space.
+  To return a structure, the called function copies the return value to the
+  address supplied in register r0.
+
+  In hard-float configurations (armhf): Up to 16 floats get passed in the
+  single-float registers s0, s1, ..., s15. A float gets returned in s0.
+  Up to 8 doubles gets passed in the double-float registers d0, ..., d7
+  (= {s0,s1}, {s2,s3}, ..., {s14,s15}). A double gets returned in d0.
+
+  The 4 integer args registers and the 16 float args slots are allocated
+  independently: 1) After more than 16 float args, integer args can still
+  be allocated in registers. 2) After more than 4 integer args, float args
+  can still be allocated in registers.
+
+  Compile this routine with gcc -O (or -O2 or -g -O) to get the right
+  register variables, or use the assembler version.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+int
+avcall_call(av_alist* list)
+{
+  register unsigned long sp    __asm__("r13");  /* C names for registers */
+/*register __avword    iret    __asm__("r0"); */
+  register __avword    iret2   __asm__("r1");
+  register float       fret    __asm__("s0");
+  register double      dret    __asm__("d0");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+
+  /* Enforce 8-bytes-alignment of the stack pointer.
+     We need to do it this way because the old GCC that we use to compile
+     this file does not support the option '-mabi=aapcs'. */
+  sp &= -8;
+
+  int arglen = l->aptr - l->args;
+  __avword i;
+
+  for (i = 4; i < arglen; i++)         /* push function args onto stack */
+    argframe[i-4] = l->args[i];
+
+  /* load float values into floating-point registers */
+  if ((l->farg_mask >> 0) & 1)
+    __asm__ __volatile__ ("vldr.32 s0,%0" : : "m" (l->fargs[0]));
+  if ((l->farg_mask >> 1) & 1)
+    __asm__ __volatile__ ("vldr.32 s1,%0" : : "m" (l->fargs[1]));
+  if ((l->farg_mask >> 2) & 1)
+    __asm__ __volatile__ ("vldr.32 s2,%0" : : "m" (l->fargs[2]));
+  if ((l->farg_mask >> 3) & 1)
+    __asm__ __volatile__ ("vldr.32 s3,%0" : : "m" (l->fargs[3]));
+  if ((l->farg_mask >> 4) & 1)
+    __asm__ __volatile__ ("vldr.32 s4,%0" : : "m" (l->fargs[4]));
+  if ((l->farg_mask >> 5) & 1)
+    __asm__ __volatile__ ("vldr.32 s5,%0" : : "m" (l->fargs[5]));
+  if ((l->farg_mask >> 6) & 1)
+    __asm__ __volatile__ ("vldr.32 s6,%0" : : "m" (l->fargs[6]));
+  if ((l->farg_mask >> 7) & 1)
+    __asm__ __volatile__ ("vldr.32 s7,%0" : : "m" (l->fargs[7]));
+  if ((l->farg_mask >> 8) & 1)
+    __asm__ __volatile__ ("vldr.32 s8,%0" : : "m" (l->fargs[8]));
+  if ((l->farg_mask >> 9) & 1)
+    __asm__ __volatile__ ("vldr.32 s9,%0" : : "m" (l->fargs[9]));
+  if ((l->farg_mask >> 10) & 1)
+    __asm__ __volatile__ ("vldr.32 s10,%0" : : "m" (l->fargs[10]));
+  if ((l->farg_mask >> 11) & 1)
+    __asm__ __volatile__ ("vldr.32 s11,%0" : : "m" (l->fargs[11]));
+  if ((l->farg_mask >> 12) & 1)
+    __asm__ __volatile__ ("vldr.32 s12,%0" : : "m" (l->fargs[12]));
+  if ((l->farg_mask >> 13) & 1)
+    __asm__ __volatile__ ("vldr.32 s13,%0" : : "m" (l->fargs[13]));
+  if ((l->farg_mask >> 14) & 1)
+    __asm__ __volatile__ ("vldr.32 s14,%0" : : "m" (l->fargs[14]));
+  if ((l->farg_mask >> 15) & 1)
+    __asm__ __volatile__ ("vldr.32 s15,%0" : : "m" (l->fargs[15]));
+
+  /* load double values into floating-point registers */
+  if ((l->darg_mask >> 0) & 1)
+    __asm__ __volatile__ ("vldr.64 d0,%0" : : "m" (l->dargs[0]));
+  if ((l->darg_mask >> 1) & 1)
+    __asm__ __volatile__ ("vldr.64 d1,%0" : : "m" (l->dargs[1]));
+  if ((l->darg_mask >> 2) & 1)
+    __asm__ __volatile__ ("vldr.64 d2,%0" : : "m" (l->dargs[2]));
+  if ((l->darg_mask >> 3) & 1)
+    __asm__ __volatile__ ("vldr.64 d3,%0" : : "m" (l->dargs[3]));
+  if ((l->darg_mask >> 4) & 1)
+    __asm__ __volatile__ ("vldr.64 d4,%0" : : "m" (l->dargs[4]));
+  if ((l->darg_mask >> 5) & 1)
+    __asm__ __volatile__ ("vldr.64 d5,%0" : : "m" (l->dargs[5]));
+  if ((l->darg_mask >> 6) & 1)
+    __asm__ __volatile__ ("vldr.64 d6,%0" : : "m" (l->dargs[6]));
+  if ((l->darg_mask >> 7) & 1)
+    __asm__ __volatile__ ("vldr.64 d7,%0" : : "m" (l->dargs[7]));
+
+                               /* call function, pass 4 integer args in registers */
+  i = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3]);
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, i);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, i);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, i);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, i);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, i);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, i);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, i);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, i);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, i);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, i);
+  } else
+  if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) {
+    void* raddr = l->raddr;
+    ((__avword*)raddr)[0] = i;
+    ((__avword*)raddr)[1] = iret2;
+  } else
+  if (l->rtype == __AVfloat) {
+    RETURN(float, fret);
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, dret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, i);
+  } else
+  if (l->rtype == __AVstruct) {
+    /* PCS for ARM (http://infocenter.arm.com/help/topic/com.arm.doc.ihi0042b/IHI0042B_aapcs.pdf):
+       page 19: "A Composite Type not larger than 4 bytes is returned in r0."
+       sizeof({char a[3];}) = 3, so we have to use <= sizeof below */
+    if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+      if (l->rsize == sizeof(char)) { /* can't occur */
+        RETURN(char, i);
+      } else
+      if (l->rsize == sizeof(short)) { /* can't occur */
+        RETURN(short, i);
+      } else
+      if (l->rsize <= sizeof(int)) {
+        RETURN(int, i);
+      } else
+      if (l->rsize == 2*sizeof(__avword)) {
+        void* raddr = l->raddr;
+        ((__avword*)raddr)[0] = i;
+        ((__avword*)raddr)[1] = iret2;
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-compat.c b/avcall/avcall-compat.c
new file mode 100644 (file)
index 0000000..a1bdf92
--- /dev/null
@@ -0,0 +1,24 @@
+/*
+ * Copyright 2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "config.h"
+
+#include <stdlib.h>
+
+/* A dummy symbol, so that GNU clisp's autoconfiguration recognizes this
+   library. */
+void __builtin_avcall (void) { abort(); }
diff --git a/avcall/avcall-hppa-linux.s b/avcall/avcall-hppa-linux.s
new file mode 100644 (file)
index 0000000..340466e
--- /dev/null
@@ -0,0 +1,258 @@
+       .LEVEL 1.1
+       .text
+       .align 4
+.globl avcall_call
+               .type            avcall_call,@function
+avcall_call:
+       .PROC
+       .CALLINFO FRAME=128,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=5
+       .ENTRY
+       copy %r3,%r1
+       stw %r2,-20(%r30)
+       copy %r30,%r3
+       stwm %r1,128(%r30)
+       stw %r5,8(%r3)
+       ldo -48(%r30),%r24
+       ldo 15(%r24),%r21
+       copy %r19,%r5
+       stw %r4,12(%r3)
+       copy %r21,%r24
+       depi 0,31,4,%r24
+       copy %r26,%r4
+       stw %r19,-32(%r30)
+       ldo 1104(%r24),%r24
+       ldw 28(%r26),%r22
+       ldw 20(%r26),%r20
+       sub %r22,%r20,%r20
+       extrs %r20,29,30,%r25
+       sub %r0,%r25,%r23
+       comib,<= -4,%r23,.L59
+       ldo 1088(%r30),%r30
+       copy %r22,%r29
+.L6:
+       zdep %r23,29,30,%r20
+       ldo 1(%r23),%r23
+       addl %r20,%r29,%r22
+       addl %r20,%r24,%r20
+       ldw 0(%r22),%r21
+       comib,> -4,%r23,.L6
+       stw %r21,0(%r20)
+.L58:
+       ldw 12(%r4),%r21
+       ldi 16,%r20
+       comb,=,n %r20,%r21,.L64
+.L7:
+       comib,>=,n 0,%r25,.L8
+       ldw 48(%r4),%r21
+       extrs,>= %r21,31,1,%r0
+       fldws -4(%r29),%fr4L
+.L9:
+       comib,>=,n 1,%r25,.L8
+       extrs,>= %r21,30,1,%r0
+       fldws -8(%r29),%fr5L
+.L11:
+       ldw 52(%r4),%r22
+       ldi 2,%r20
+       and %r22,%r20,%r20
+       comiclr,= 0,%r20,%r0
+       fldds -8(%r29),%fr5
+.L12:
+       comib,>=,n 2,%r25,.L8
+       extrs,>= %r21,29,1,%r0
+       fldws -12(%r29),%fr6L
+.L14:
+       comib,>=,n 3,%r25,.L8
+       extrs,>= %r21,28,1,%r0
+       fldws -16(%r29),%fr7L
+.L16:
+       ldi 8,%r20
+       and %r22,%r20,%r20
+       comiclr,= 0,%r20,%r0
+       fldds -16(%r29),%fr7
+.L8:
+       ldw -16(%r29),%r23
+       ldw -4(%r29),%r26
+       ldw -8(%r29),%r25
+       ldw -12(%r29),%r24
+       ldw 4(%r4),%r22
+       .CALL   ARGW0=GR
+       bl $$dyncall,%r31
+       copy %r31,%r2
+       ldw 12(%r4),%r21
+       copy %r5,%r19
+       comib,= 1,%r21,.L19
+       copy %r28,%r2
+       comib,=,n 0,%r21,.L63
+       comib,=,n 2,%r21,.L62
+       comib,=,n 3,%r21,.L62
+       comib,=,n 4,%r21,.L62
+       comib,=,n 5,%r21,.L61
+       comib,=,n 6,%r21,.L61
+       comib,=,n 7,%r21,.L63
+       comib,=,n 8,%r21,.L63
+       comib,=,n 9,%r21,.L63
+       comib,=,n 10,%r21,.L63
+       ldo -11(%r21),%r20
+       comib,<<,n 1,%r20,.L40
+       ldw 8(%r4),%r20
+       stw %r29,4(%r20)
+.L60:
+       stw %r2,0(%r20)
+.L19:
+       ldw -20(%r3),%r2
+.L67:
+       ldi 0,%r28
+       ldw 8(%r3),%r5
+       ldw 12(%r3),%r4
+       ldo 64(%r3),%r30
+       bv %r0(%r2)
+       ldwm -64(%r30),%r3
+.L40:
+       comib,=,n 13,%r21,.L65
+       comib,=,n 14,%r21,.L66
+       comib,=,n 15,%r21,.L63
+       ldi 16,%r20
+       comb,<>,n %r20,%r21,.L67
+       ldw -20(%r3),%r2
+       ldw 0(%r4),%r20
+       bb,>=,n %r20,30,.L67
+       ldw -20(%r3),%r2
+       ldw 16(%r4),%r22
+       ldo -1(%r22),%r20
+       comib,<<,n 7,%r20,.L67
+       ldw -20(%r3),%r2
+       ldw 8(%r4),%r20
+       extru %r20,31,2,%r26
+       copy %r20,%r4
+       depi 0,31,2,%r4
+       comib,<< 4,%r22,.L51
+       addl %r26,%r22,%r21
+       comib,<< 4,%r21,.L52
+       zdep %r21,28,29,%r20
+       ldo -1(%r20),%r25
+       zdep %r26,28,29,%r21
+       mtsar %r25
+       ldw 0(%r4),%r23
+       zvdep %r28,32,%r20
+       mtsar %r21
+       zvdepi 2,32,%r21
+       xor %r23,%r20,%r20
+       mtsar %r25
+       zvdepi 1,32,%r22
+       sub %r21,%r22,%r21
+       and %r20,%r21,%r20
+       xor %r23,%r20,%r23
+       b .L19
+       stw %r23,0(%r4)
+.L52:
+       subi 63,%r20,%r31
+       zdep %r26,28,29,%r26
+       ldo -33(%r20),%r20
+       ldw 0(%r4),%r25
+       mtsar %r20
+       ldw 4(%r4),%r24
+       zvdep %r28,32,%r23
+       mtsar %r26
+       zvdepi 2,32,%r22
+       xor %r24,%r23,%r23
+       mtsar %r31
+       ldo -1(%r22),%r22
+       vextrs %r28,32,%r21
+       mtsar %r20
+       zvdepi 1,32,%r20
+       xor %r25,%r21,%r21
+       sub %r0,%r20,%r20
+       and %r21,%r22,%r21
+       and %r23,%r20,%r23
+       xor %r25,%r21,%r25
+       xor %r24,%r23,%r24
+       stw %r25,0(%r4)
+       b .L19
+       stw %r24,4(%r4)
+.L51:
+       zdep %r26,28,29,%r26
+       mtsar %r26
+       zvdepi 2,32,%r20
+       comib,<< 8,%r21,.L55
+       ldo -1(%r20),%r25
+       zdep %r21,29,30,%r20
+       subi 47,%r20,%r24
+       zdep %r21,28,29,%r21
+       mtsar %r24
+       ldo -33(%r21),%r26
+       vextrs %r29,32,%r22
+       vextrs %r22,32,%r22
+       mtsar %r26
+       ldw 0(%r4),%r24
+       ldw 4(%r4),%r23
+       zvdep %r28,32,%r20
+       or %r20,%r22,%r20
+       zvdep %r29,32,%r29
+       zvdepi 1,32,%r21
+       xor %r24,%r20,%r20
+       xor %r23,%r29,%r29
+       sub %r0,%r21,%r21
+       and %r20,%r25,%r20
+       and %r29,%r21,%r29
+       xor %r24,%r20,%r24
+       xor %r23,%r29,%r23
+       stw %r24,0(%r4)
+       b .L19
+       stw %r23,4(%r4)
+.L55:
+       zdep %r21,28,29,%r20
+       ldo -65(%r20),%r31
+       subi 95,%r20,%r26
+       ldw 8(%r4),%r23
+       mtsar %r31
+       ldw 0(%r4),%r24
+       zvdep %r29,32,%r22
+       zvdepi 1,32,%r21
+       xor %r23,%r22,%r22
+       mtsar %r26
+       sub %r0,%r21,%r21
+       vextrs %r28,32,%r20
+       and %r22,%r21,%r22
+       mtsar %r31
+       xor %r24,%r20,%r20
+       zvdep %r28,32,%r21
+       and %r20,%r25,%r20
+       mtsar %r26
+       xor %r24,%r20,%r24
+       vextrs %r29,32,%r29
+       xor %r23,%r22,%r23
+       or %r21,%r29,%r21
+       stw %r23,8(%r4)
+       stw %r24,0(%r4)
+       b .L19
+       stw %r21,4(%r4)
+.L63:
+       b .L60
+       ldw 8(%r4),%r20
+.L66:
+       ldw 8(%r4),%r20
+       b .L19
+       fstds %fr4,0(%r20)
+.L65:
+       ldw 8(%r4),%r20
+       b .L19
+       fstws %fr4L,0(%r20)
+.L61:
+       ldw 8(%r4),%r20
+       b .L19
+       sth %r2,0(%r20)
+.L62:
+       ldw 8(%r4),%r20
+       b .L19
+       stb %r2,0(%r20)
+.L64:
+       b .L7
+       ldw 8(%r4),%r28
+.L59:
+       b .L58
+       ldw 28(%r26),%r29
+       .EXIT
+       .PROCEND
+.Lfe1:
+       .size   avcall_call,.Lfe1-avcall_call
+       .ident  "GCC: (GNU) 3.1"
diff --git a/avcall/avcall-hppa-macro.S b/avcall/avcall-hppa-macro.S
new file mode 100644 (file)
index 0000000..94c7b38
--- /dev/null
@@ -0,0 +1,263 @@
+#include "asm-hppa.h"
+       .LEVEL 1.1
+       IMPORT_MILLICODE($$dyncall)
+       TEXT1()
+       TEXT2()
+       .align 4
+GLOBL(avcall_call)
+               DECLARE_FUNCTION(avcall_call)
+DEF(avcall_call)
+       .PROC
+       .CALLINFO FRAME=128,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=5
+       .ENTRY
+       copy %r3,%r1
+       stw %r2,-20(%r30)
+       copy %r30,%r3
+       stwm %r1,128(%r30)
+       stw %r5,8(%r3)
+       ldo -48(%r30),%r24
+       ldo 15(%r24),%r21
+       copy %r19,%r5
+       stw %r4,12(%r3)
+       copy %r21,%r24
+       depi 0,31,4,%r24
+       copy %r26,%r4
+       stw %r19,-32(%r30)
+       ldo 1104(%r24),%r24
+       ldw 28(%r26),%r22
+       ldw 20(%r26),%r20
+       sub %r22,%r20,%r20
+       extrs %r20,29,30,%r25
+       sub %r0,%r25,%r23
+       comib,<= -4,%r23,L(59)
+       ldo 1088(%r30),%r30
+       copy %r22,%r29
+DEF(L(6))
+       zdep %r23,29,30,%r20
+       ldo 1(%r23),%r23
+       addl %r20,%r29,%r22
+       addl %r20,%r24,%r20
+       ldw 0(%r22),%r21
+       comib,> -4,%r23,L(6)
+       stw %r21,0(%r20)
+DEF(L(58))
+       ldw 12(%r4),%r21
+       ldi 16,%r20
+       comb,=,n %r20,%r21,L(64)
+DEF(L(7))
+       comib,>=,n 0,%r25,L(8)
+       ldw 48(%r4),%r21
+       extrs,>= %r21,31,1,%r0
+       fldws -4(%r29),%fr4L
+DEF(L(9))
+       comib,>=,n 1,%r25,L(8)
+       extrs,>= %r21,30,1,%r0
+       fldws -8(%r29),%fr5L
+DEF(L(11))
+       ldw 52(%r4),%r22
+       ldi 2,%r20
+       and %r22,%r20,%r20
+       comiclr,= 0,%r20,%r0
+       fldds -8(%r29),%fr5
+DEF(L(12))
+       comib,>=,n 2,%r25,L(8)
+       extrs,>= %r21,29,1,%r0
+       fldws -12(%r29),%fr6L
+DEF(L(14))
+       comib,>=,n 3,%r25,L(8)
+       extrs,>= %r21,28,1,%r0
+       fldws -16(%r29),%fr7L
+DEF(L(16))
+       ldi 8,%r20
+       and %r22,%r20,%r20
+       comiclr,= 0,%r20,%r0
+       fldds -16(%r29),%fr7
+DEF(L(8))
+       ldw -16(%r29),%r23
+       ldw -4(%r29),%r26
+       ldw -8(%r29),%r25
+       ldw -12(%r29),%r24
+       ldw 4(%r4),%r22
+       .CALL   ARGW0=GR
+       bl $$dyncall,%r31
+       copy %r31,%r2
+       ldw 12(%r4),%r21
+       copy %r5,%r19
+       comib,= 1,%r21,L(19)
+       copy %r28,%r2
+       comib,=,n 0,%r21,L(63)
+       comib,=,n 2,%r21,L(62)
+       comib,=,n 3,%r21,L(62)
+       comib,=,n 4,%r21,L(62)
+       comib,=,n 5,%r21,L(61)
+       comib,=,n 6,%r21,L(61)
+       comib,=,n 7,%r21,L(63)
+       comib,=,n 8,%r21,L(63)
+       comib,=,n 9,%r21,L(63)
+       comib,=,n 10,%r21,L(63)
+       ldo -11(%r21),%r20
+       comib,<<,n 1,%r20,L(40)
+       ldw 8(%r4),%r20
+       stw %r29,4(%r20)
+DEF(L(60))
+       stw %r2,0(%r20)
+DEF(L(19))
+       ldw -20(%r3),%r2
+DEF(L(67))
+       ldi 0,%r28
+       ldw 8(%r3),%r5
+       ldw 12(%r3),%r4
+       ldo 64(%r3),%r30
+       bv %r0(%r2)
+       ldwm -64(%r30),%r3
+DEF(L(40))
+       comib,=,n 13,%r21,L(65)
+       comib,=,n 14,%r21,L(66)
+       comib,=,n 15,%r21,L(63)
+       ldi 16,%r20
+       comb,<>,n %r20,%r21,L(67)
+       ldw -20(%r3),%r2
+       ldw 0(%r4),%r20
+       bb,>=,n %r20,30,L(67)
+       ldw -20(%r3),%r2
+       ldw 16(%r4),%r22
+       ldo -1(%r22),%r20
+       comib,<<,n 7,%r20,L(67)
+       ldw -20(%r3),%r2
+       ldw 8(%r4),%r20
+       extru %r20,31,2,%r26
+       copy %r20,%r4
+       depi 0,31,2,%r4
+       comib,<< 4,%r22,L(51)
+       addl %r26,%r22,%r21
+       comib,<< 4,%r21,L(52)
+       zdep %r21,28,29,%r20
+       ldo -1(%r20),%r25
+       zdep %r26,28,29,%r21
+       mtsar %r25
+       ldw 0(%r4),%r23
+       zvdep %r28,32,%r20
+       mtsar %r21
+       zvdepi 2,32,%r21
+       xor %r23,%r20,%r20
+       mtsar %r25
+       zvdepi 1,32,%r22
+       sub %r21,%r22,%r21
+       and %r20,%r21,%r20
+       xor %r23,%r20,%r23
+       b L(19)
+       stw %r23,0(%r4)
+DEF(L(52))
+       subi 63,%r20,%r31
+       zdep %r26,28,29,%r26
+       ldo -33(%r20),%r20
+       ldw 0(%r4),%r25
+       mtsar %r20
+       ldw 4(%r4),%r24
+       zvdep %r28,32,%r23
+       mtsar %r26
+       zvdepi 2,32,%r22
+       xor %r24,%r23,%r23
+       mtsar %r31
+       ldo -1(%r22),%r22
+       vextrs %r28,32,%r21
+       mtsar %r20
+       zvdepi 1,32,%r20
+       xor %r25,%r21,%r21
+       sub %r0,%r20,%r20
+       and %r21,%r22,%r21
+       and %r23,%r20,%r23
+       xor %r25,%r21,%r25
+       xor %r24,%r23,%r24
+       stw %r25,0(%r4)
+       b L(19)
+       stw %r24,4(%r4)
+DEF(L(51))
+       zdep %r26,28,29,%r26
+       mtsar %r26
+       zvdepi 2,32,%r20
+       comib,<< 8,%r21,L(55)
+       ldo -1(%r20),%r25
+       zdep %r21,29,30,%r20
+       subi 47,%r20,%r24
+       zdep %r21,28,29,%r21
+       mtsar %r24
+       ldo -33(%r21),%r26
+       vextrs %r29,32,%r22
+       vextrs %r22,32,%r22
+       mtsar %r26
+       ldw 0(%r4),%r24
+       ldw 4(%r4),%r23
+       zvdep %r28,32,%r20
+       or %r20,%r22,%r20
+       zvdep %r29,32,%r29
+       zvdepi 1,32,%r21
+       xor %r24,%r20,%r20
+       xor %r23,%r29,%r29
+       sub %r0,%r21,%r21
+       and %r20,%r25,%r20
+       and %r29,%r21,%r29
+       xor %r24,%r20,%r24
+       xor %r23,%r29,%r23
+       stw %r24,0(%r4)
+       b L(19)
+       stw %r23,4(%r4)
+DEF(L(55))
+       zdep %r21,28,29,%r20
+       ldo -65(%r20),%r31
+       subi 95,%r20,%r26
+       ldw 8(%r4),%r23
+       mtsar %r31
+       ldw 0(%r4),%r24
+       zvdep %r29,32,%r22
+       zvdepi 1,32,%r21
+       xor %r23,%r22,%r22
+       mtsar %r26
+       sub %r0,%r21,%r21
+       vextrs %r28,32,%r20
+       and %r22,%r21,%r22
+       mtsar %r31
+       xor %r24,%r20,%r20
+       zvdep %r28,32,%r21
+       and %r20,%r25,%r20
+       mtsar %r26
+       xor %r24,%r20,%r24
+       vextrs %r29,32,%r29
+       xor %r23,%r22,%r23
+       or %r21,%r29,%r21
+       stw %r23,8(%r4)
+       stw %r24,0(%r4)
+       b L(19)
+       stw %r21,4(%r4)
+DEF(L(63))
+       b L(60)
+       ldw 8(%r4),%r20
+DEF(L(66))
+       ldw 8(%r4),%r20
+       b L(19)
+       fstds %fr4,0(%r20)
+DEF(L(65))
+       ldw 8(%r4),%r20
+       b L(19)
+       fstws %fr4L,0(%r20)
+DEF(L(61))
+       ldw 8(%r4),%r20
+       b L(19)
+       sth %r2,0(%r20)
+DEF(L(62))
+       ldw 8(%r4),%r20
+       b L(19)
+       stb %r2,0(%r20)
+DEF(L(64))
+       b L(7)
+       ldw 8(%r4),%r28
+DEF(L(59))
+       b L(58)
+       ldw 28(%r26),%r29
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(avcall_call)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-hppa.c b/avcall/avcall-hppa.c
new file mode 100644 (file)
index 0000000..382b992
--- /dev/null
@@ -0,0 +1,273 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for a HP Precision Architecture 1.0 with gcc
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  HPPA Argument Passing Conventions:
+
+  All arguments, except the first 4 words, are passed on the stack
+  - growing down! - with word alignment. Doubles take two words and force
+  double alignment. Small structures args are passed as true structures
+  embedded in the argument stack. They force double alignment and - if they
+  don't fit entirely in the 4 register words - are passed in memory.
+  The first 2 words are passed like this:
+    %r26 = first integer arg, %r25 = second integer arg, or
+    %r26 = high word of double arg, %r25 = low word of double arg.
+  Similarly for the next 2 words, passed in %r24 and %r23.
+  Note that other calling conventions would be in effect if we would call
+  an explicitly named function!
+
+  Structures larger than 8 bytes are passed as a pointer.  In GCC >= 8
+  it's a caller-made copy; with GCC < 8 and with HP cc it's the callee's
+  responsibility to make a copy of the structure, so that side effects
+  made by the callee are not visible to the caller.
+
+  To return a structure of more than 8 bytes, the called function copies
+  the return value to the address supplied in register "%r28". Smaller
+  structures are returned in the registers %r28 (first 4 bytes) and %r29
+  (next 4 bytes, if present).
+
+  It is forbidden to modify the stack pointer.
+
+  Compile this routine with gcc -O2 -fomit-frame-pointer to get the right
+  register variables.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+/* This declaration tells gcc not to modify %r28. */
+register __avword*     sret    __asm__("%r28");  /* structure return pointer */
+
+register float  farg1  __asm__("%fr4"); /* fr4L */
+register float  farg2  __asm__("%fr5"); /* fr5L */
+register float  farg3  __asm__("%fr6"); /* fr6L */
+register float  farg4  __asm__("%fr7"); /* fr7L */
+register double darg1  __asm__("%fr5");
+register double darg2  __asm__("%fr7");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("%r30");  /* C names for registers */
+  register float       fret    __asm__("%fr4");
+  register double      dret    __asm__("%fr4");
+/*register __avword    iret1   __asm__("%r28"); */
+  register __avword    iret2   __asm__("%r29");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  argframe += __AV_ALIST_WORDS + 20;
+  int arglen = l->args_end - l->aptr;
+  __avword iret;
+
+  {
+    int i;
+    for (i = -arglen; i < -4; i++)     /* push function args onto stack */
+      argframe[i] = l->args_end[i];
+  }
+
+  if (l->rtype == __AVstruct)          /* push struct return address */
+    sret = l->raddr;
+
+  /* The floats and doubles among the first 4 argument words are passed
+   * - in both general registers and floating-point registers when the
+   *   function call is a variadic one, which means:
+   *     - for HP cc: the call is done through a function pointer or
+   *       directly to a function declared with a varargs prototype,
+   *     - for GCC: the function's type is a varargs function.
+   * - in floating-point registers otherwise.
+   * To cover both cases, put these floating-point values into the general
+   * registers and the floating-point registers always.
+   */
+  if (arglen >= 1) {
+    if (l->farg_mask & (1 << 0))
+      /*__asm__ __volatile__ ("fldw %0,%%fr4R" : : "m" (*(float*)&l->args_end[-1]));*/ farg1 = *((float*)&l->args_end[-1]);
+    if (arglen >= 2) {
+      if (l->farg_mask & (1 << 1))
+        /* __asm__ __volatile__ ("fldw %0,%%fr5R" : : "m" (*(float*)&l->args_end[-2])); */ farg2 = *((float*)&l->args_end[-2]);
+      if (l->darg_mask & (1 << 1))
+        darg1 = *((double*)&l->args_end[-2]);
+      if (arglen >= 3) {
+        if (l->farg_mask & (1 << 2))
+          /* __asm__ __volatile__ ("fldw %0,%%fr6R" : : "m" (*(float*)&l->args_end[-3])); */ farg3 = *((float*)&l->args_end[-3]);
+        if (arglen >= 4) {
+          if (l->farg_mask & (1 << 3))
+            /* __asm__ __volatile__ ("fldw %0,%%fr7R" : : "m" (*(float*)&l->args_end[-4])); */ farg4 = *((float*)&l->args_end[-4]);
+          if (l->darg_mask & (1 << 3))
+            darg2 = *((double*)&l->args_end[-4]);
+        }
+      }
+    }
+  }
+  /* call function, pass first 4 arg words in general registers */
+  iret = (*l->func)(l->args_end[-1], l->args_end[-2],
+                   l->args_end[-3], l->args_end[-4]);
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, iret);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, iret);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, iret);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, iret);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, iret);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, iret);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, iret);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, iret);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, iret);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, iret);
+  } else
+  if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) {
+    void* raddr = l->raddr;
+    ((__avword*)raddr)[0] = iret;
+    ((__avword*)raddr)[1] = iret2;
+  } else
+  if (l->rtype == __AVfloat) {
+    RETURN(float, fret);
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, dret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, iret);
+  } else
+  if (l->rtype == __AVstruct) {
+    if (l->flags & __AV_SMALL_STRUCT_RETURN) {
+      /* cc, c89 and gcc >= 2.7 return structs of size <= 8 in registers. */
+      if (l->rsize > 0 && l->rsize <= 8) {
+        /* This is really weird code, unlike all other big-endian platforms. */
+        void* raddr = l->raddr;
+        #if 0 /* Unoptimized */
+        if (l->rsize == 1) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+        } else
+        if (l->rsize == 2) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret);
+        } else
+        if (l->rsize == 3) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret);
+        } else
+        if (l->rsize == 4) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>24);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret);
+        } else
+        if (l->rsize == 5) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret2>>24);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret2>>16);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret2>>8);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret2);
+        } else
+        if (l->rsize == 6) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret2>>24);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret2>>16);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret2>>8);
+          ((unsigned char *)raddr)[5] = (unsigned char)(iret2);
+        } else
+        if (l->rsize == 7) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret2>>24);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret2>>16);
+          ((unsigned char *)raddr)[5] = (unsigned char)(iret2>>8);
+          ((unsigned char *)raddr)[6] = (unsigned char)(iret2);
+        } else
+        if (l->rsize == 8) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>24);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret2>>24);
+          ((unsigned char *)raddr)[5] = (unsigned char)(iret2>>16);
+          ((unsigned char *)raddr)[6] = (unsigned char)(iret2>>8);
+          ((unsigned char *)raddr)[7] = (unsigned char)(iret2);
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avword) */
+        __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+        uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avword) */
+        if (count <= sizeof(__avword)) {
+          /* Use iret. */
+          if (end_offset <= sizeof(__avword)) {
+            /* 0 < end_offset ≤ sizeof(__avword) */
+            __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - ((__avword)1 << (sizeof(__avword)*8-end_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (sizeof(__avword)*8-end_offset*8))) & mask0;
+          } else {
+            /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+            __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+            __avword mask1 = - ((__avword)1 << (2*sizeof(__avword)*8-end_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret >> (end_offset*8-sizeof(__avword)*8))) & mask0;
+            wordaddr[1] ^= (wordaddr[1] ^ (iret << (2*sizeof(__avword)*8-end_offset*8))) & mask1;
+          }
+        } else {
+          /* Use iret, iret2. */
+          __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+          if (end_offset <= 2*sizeof(__avword)) {
+            /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+            __avword mask1 = - ((__avword)1 << (2*sizeof(__avword)*8-end_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ ((iret << (2*sizeof(__avword)*8-end_offset*8)) | (iret2 >> (end_offset*4-sizeof(__avword)*4) >> (end_offset*4-sizeof(__avword)*4)))) & mask0;
+            wordaddr[1] ^= (wordaddr[1] ^ (iret2 << (2*sizeof(__avword)*8-end_offset*8))) & mask1;
+          } else {
+            /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+            __avword mask2 = - ((__avword)1 << (3*sizeof(__avword)*8-end_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret >> (end_offset*8-2*sizeof(__avword)*8))) & mask0;
+            wordaddr[1] = (iret << (3*sizeof(__avword)*8-end_offset*8)) | (iret2 >> (end_offset*8-2*sizeof(__avword)*8));
+            wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (3*sizeof(__avword)*8-end_offset*8))) & mask2;
+          }
+        }
+        #endif
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-hppa64-linux.s b/avcall/avcall-hppa64-linux.s
new file mode 100644 (file)
index 0000000..9e18dac
--- /dev/null
@@ -0,0 +1,532 @@
+       .LEVEL 2.0w
+       .text
+       .align 8
+.globl avcall_call
+               .type            avcall_call,@function
+avcall_call:
+       .PROC
+       .CALLINFO FRAME=256,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=9
+       .ENTRY
+       copy %r3,%r1
+       std %r2,-16(%r30)
+       copy %r30,%r3
+       std,ma %r1,256(%r30)
+       ldi 8,%r31
+       std %r9,16(%r3)
+       copy %r27,%r9
+       std %r8,24(%r3)
+       copy %r26,%r8
+       std %r7,32(%r3)
+       ldo -80(%r30),%r7
+       std %r6,40(%r3)
+       std %r5,48(%r3)
+       std %r4,56(%r3)
+       ldd 40(%r26),%r29
+       ldd 48(%r26),%r5
+       sub %r29,%r5,%r29
+       extrd,s %r29,29+32-1,32,%r6
+       cmpb,<= %r6,%r31,.L115
+       ldo 2112(%r30),%r30
+.L6:
+       depd,z %r31,60,61,%r29
+       ldo 1(%r31),%r31
+       add,l %r29,%r5,%r2
+       extrd,s %r31,63,32,%r31
+       ldd 0(%r2),%r4
+       add,l %r29,%r7,%r29
+       cmpb,> %r6,%r31,.L6
+       std %r4,0(%r29)
+.L115:
+       ldw 24(%r8),%r31
+       ldi 16,%r29
+       cmpb,= %r29,%r31,.L120
+       copy %r31,%r4
+.L7:
+       cmpib,>=,n 0,%r6,.L8
+       ldw 68(%r8),%r2
+       extrw,u %r2,31,1,%r29
+       cmpib,=,n 0,%r29,.L9
+       fldd 0(%r5),%fr4
+.L10:
+       cmpib,>=,n 1,%r6,.L8
+       ldi 2,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,.L14
+       fldd 8(%r5),%fr5
+.L15:
+       cmpib,>=,n 2,%r6,.L8
+       ldi 4,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,.L19
+       fldd 16(%r5),%fr6
+.L20:
+       cmpib,>=,n 3,%r6,.L8
+       ldi 8,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,.L24
+       fldd 24(%r5),%fr7
+.L25:
+       cmpib,>=,n 4,%r6,.L8
+       ldi 16,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,.L29
+       fldd 32(%r5),%fr8
+.L30:
+       cmpib,>=,n 5,%r6,.L8
+       ldi 32,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,.L34
+       fldd 40(%r5),%fr9
+.L35:
+       cmpib,>=,n 6,%r6,.L8
+       ldi 64,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,.L39
+       fldd 48(%r5),%fr10
+.L40:
+       cmpib,>=,n 7,%r6,.L8
+       ldi 128,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,.L44
+       fldd 56(%r5),%fr11
+.L45:
+       cmpiclr,>= 8,%r6,%r0
+       ldo 64(%r7),%r1
+.L8:
+       cmpib,=,n 13,%r4,.L121
+       cmpib,=,n 14,%r4,.L122
+#APP
+       copy %r1,%r29
+#NO_APP
+       ldd 8(%r8),%r31
+       ldo -16(%r30),%r29
+       ldd 16(%r31),%r2
+       ldd 24(%r31),%r27
+       bve,l (%r2),%r2
+       nop
+       ldw 24(%r8),%r2
+       copy %r9,%r27
+       cmpib,= 1,%r2,.L50
+       copy %r28,%r1
+       cmpib,=,n 0,%r2,.L116
+       cmpib,=,n 2,%r2,.L119
+       cmpib,=,n 3,%r2,.L119
+       cmpib,=,n 4,%r2,.L119
+       cmpib,=,n 5,%r2,.L118
+       cmpib,=,n 6,%r2,.L118
+       cmpib,=,n 7,%r2,.L117
+       cmpib,=,n 8,%r2,.L117
+       cmpib,=,n 9,%r2,.L116
+       cmpib,=,n 11,%r2,.L116
+       cmpib,=,n 10,%r2,.L116
+       cmpib,=,n 12,%r2,.L116
+       cmpib,= 15,%r2,.L116
+       ldi 16,%r31
+       cmpb,=,n %r31,%r2,.L123
+.L50:
+       ldd -16(%r3),%r2
+.L138:
+       ldi 0,%r28
+       ldd 16(%r3),%r9
+       ldd 24(%r3),%r8
+       ldd 32(%r3),%r7
+       ldd 40(%r3),%r6
+       ldd 48(%r3),%r5
+       ldd 56(%r3),%r4
+       ldo 64(%r3),%r30
+       bve (%r2)
+       ldd,mb -64(%r30),%r3
+.L123:
+       ldw 0(%r8),%r31
+       extrd,u %r31,54+1-1,1,%r31
+       cmpib,= 0,%r31,.L138
+       ldd -16(%r3),%r2
+       ldd 32(%r8),%r2
+       ldo -1(%r2),%r31
+       cmpib,*<<,n 15,%r31,.L138
+       ldd -16(%r3),%r2
+       cmpib,*=,n 1,%r2,.L124
+       cmpib,*=,n 2,%r2,.L125
+       cmpib,*= 3,%r2,.L126
+       extrd,s %r28,23,24,%r4
+       cmpib,*= 4,%r2,.L127
+       extrd,s %r28,31,32,%r5
+       cmpib,*=,n 5,%r2,.L128
+       cmpib,*=,n 6,%r2,.L129
+       cmpib,*= 7,%r2,.L130
+       ldo -8(%r2),%r31
+       cmpib,*<< 8,%r31,.L50
+       extrd,s %r28,7,8,%r31
+       ldd 16(%r8),%r2
+       stb %r31,0(%r2)
+       extrd,s %r28,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r28,23,24,%r2
+       stb %r4,1(%r31)
+       extrd,s %r28,31,32,%r5
+       ldd 16(%r8),%r31
+       extrd,s %r28,39,40,%r4
+       stb %r2,2(%r31)
+       extrd,s %r28,47,48,%r6
+       ldd 16(%r8),%r2
+       extrd,s %r28,55,56,%r7
+       stb %r5,3(%r2)
+       ldd 16(%r8),%r31
+       stb %r4,4(%r31)
+       ldd 16(%r8),%r2
+       stb %r6,5(%r2)
+       ldd 16(%r8),%r31
+       stb %r7,6(%r31)
+       ldd 16(%r8),%r2
+       stb %r28,7(%r2)
+       ldd 32(%r8),%r2
+       cmpib,*=,n 8,%r2,.L138
+       ldd -16(%r3),%r2
+       cmpib,*=,n 9,%r2,.L131
+       cmpib,*=,n 10,%r2,.L132
+       cmpib,*=,n 11,%r2,.L133
+       cmpib,*=,n 12,%r2,.L134
+       cmpib,*= 13,%r2,.L135
+       extrd,s %r29,7,8,%r31
+       cmpib,*=,n 14,%r2,.L136
+       cmpib,*= 15,%r2,.L137
+       ldi 16,%r31
+       cmpb,*<> %r31,%r2,.L138
+       ldd -16(%r3),%r2
+       ldd 16(%r8),%r2
+       extrd,s %r29,7,8,%r31
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r29,23,24,%r2
+       stb %r4,9(%r31)
+       extrd,s %r29,31,32,%r5
+       ldd 16(%r8),%r31
+       extrd,s %r29,39,40,%r4
+       stb %r2,10(%r31)
+       extrd,s %r29,47,48,%r6
+       ldd 16(%r8),%r2
+       extrd,s %r29,55,56,%r7
+       stb %r5,11(%r2)
+       ldd 16(%r8),%r31
+       stb %r4,12(%r31)
+       ldd 16(%r8),%r2
+       stb %r6,13(%r2)
+       ldd 16(%r8),%r31
+       stb %r7,14(%r31)
+       ldd 16(%r8),%r2
+       b .L50
+       stb %r29,15(%r2)
+.L137:
+       ldd 16(%r8),%r2
+       extrd,s %r29,7,8,%r31
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r29,23,24,%r2
+       stb %r4,9(%r31)
+       extrd,s %r29,31,32,%r5
+       ldd 16(%r8),%r31
+       extrd,s %r29,39,40,%r4
+       stb %r2,10(%r31)
+       extrd,s %r29,47,48,%r6
+       ldd 16(%r8),%r2
+       extrd,s %r29,55,56,%r29
+       stb %r5,11(%r2)
+       ldd 16(%r8),%r31
+       stb %r4,12(%r31)
+       ldd 16(%r8),%r2
+       stb %r6,13(%r2)
+       ldd 16(%r8),%r31
+       b .L50
+       stb %r29,14(%r31)
+.L136:
+       ldd 16(%r8),%r2
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r29,23,24,%r2
+       stb %r4,9(%r31)
+       extrd,s %r29,31,32,%r5
+       ldd 16(%r8),%r31
+       extrd,s %r29,39,40,%r4
+       stb %r2,10(%r31)
+       extrd,s %r29,47,48,%r29
+       ldd 16(%r8),%r31
+       stb %r5,11(%r31)
+       ldd 16(%r8),%r2
+       stb %r4,12(%r2)
+       ldd 16(%r8),%r31
+       b .L50
+       stb %r29,13(%r31)
+.L135:
+       ldd 16(%r8),%r2
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r29,23,24,%r5
+       stb %r4,9(%r31)
+       extrd,s %r29,31,32,%r6
+       ldd 16(%r8),%r2
+       extrd,s %r29,39,40,%r29
+       stb %r5,10(%r2)
+       ldd 16(%r8),%r31
+       stb %r6,11(%r31)
+       ldd 16(%r8),%r2
+       b .L50
+       stb %r29,12(%r2)
+.L134:
+       ldd 16(%r8),%r2
+       extrd,s %r29,7,8,%r31
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r29,23,24,%r5
+       stb %r4,9(%r31)
+       extrd,s %r29,31,32,%r29
+       ldd 16(%r8),%r31
+       stb %r5,10(%r31)
+       ldd 16(%r8),%r2
+       b .L50
+       stb %r29,11(%r2)
+.L133:
+       ldd 16(%r8),%r2
+       extrd,s %r29,7,8,%r31
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r2
+       extrd,s %r29,23,24,%r29
+       stb %r4,9(%r2)
+       ldd 16(%r8),%r31
+       b .L50
+       stb %r29,10(%r31)
+.L132:
+       ldd 16(%r8),%r2
+       extrd,s %r29,7,8,%r31
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r29
+       ldd 16(%r8),%r31
+       b .L50
+       stb %r29,9(%r31)
+.L131:
+       ldd 16(%r8),%r31
+       extrd,s %r29,7,8,%r29
+       b .L50
+       stb %r29,8(%r31)
+.L130:
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r29
+       extrd,s %r28,23,24,%r31
+       stb %r2,1(%r29)
+       extrd,s %r28,31,32,%r4
+       ldd 16(%r8),%r29
+       extrd,s %r28,39,40,%r2
+       stb %r31,2(%r29)
+       extrd,s %r28,47,48,%r5
+       ldd 16(%r8),%r31
+       extrd,s %r28,55,56,%r6
+       stb %r4,3(%r31)
+       ldd 16(%r8),%r29
+       stb %r2,4(%r29)
+       ldd 16(%r8),%r31
+       stb %r5,5(%r31)
+       ldd 16(%r8),%r29
+       b .L50
+       stb %r6,6(%r29)
+.L129:
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r29
+       extrd,s %r28,23,24,%r31
+       stb %r2,1(%r29)
+       extrd,s %r28,31,32,%r4
+       ldd 16(%r8),%r29
+       extrd,s %r28,39,40,%r2
+       stb %r31,2(%r29)
+       extrd,s %r28,47,48,%r5
+       ldd 16(%r8),%r29
+       stb %r4,3(%r29)
+       ldd 16(%r8),%r31
+       stb %r2,4(%r31)
+       ldd 16(%r8),%r29
+       b .L50
+       stb %r5,5(%r29)
+.L128:
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r29
+       stb %r2,1(%r29)
+       ldd 16(%r8),%r31
+       extrd,s %r28,39,40,%r2
+       stb %r4,2(%r31)
+       ldd 16(%r8),%r29
+       stb %r5,3(%r29)
+       ldd 16(%r8),%r31
+       b .L50
+       stb %r2,4(%r31)
+.L127:
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r29
+       stb %r2,1(%r29)
+       ldd 16(%r8),%r29
+       stb %r4,2(%r29)
+       ldd 16(%r8),%r31
+       b .L50
+       stb %r5,3(%r31)
+.L126:
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r31
+       stb %r2,1(%r31)
+       ldd 16(%r8),%r29
+       b .L50
+       stb %r4,2(%r29)
+.L125:
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r29
+       b .L50
+       stb %r2,1(%r29)
+.L124:
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       b .L50
+       stb %r29,0(%r31)
+.L116:
+       ldd 16(%r8),%r29
+       b .L50
+       std %r1,0(%r29)
+.L117:
+       ldd 16(%r8),%r29
+       b .L50
+       stw %r1,0(%r29)
+.L118:
+       ldd 16(%r8),%r29
+       b .L50
+       sth %r1,0(%r29)
+.L119:
+       ldd 16(%r8),%r29
+       b .L50
+       stb %r1,0(%r29)
+.L122:
+#APP
+       copy %r1,%r29
+#NO_APP
+       ldd 8(%r8),%r31
+       ldo -16(%r30),%r29
+       ldd 16(%r31),%r2
+       ldd 24(%r31),%r27
+       bve,l (%r2),%r2
+       nop
+       ldd 16(%r8),%r29
+       copy %r9,%r27
+       b .L50
+       fstd %fr4,0(%r29)
+.L121:
+#APP
+       copy %r1,%r29
+#NO_APP
+       ldd 8(%r8),%r31
+       ldo -16(%r30),%r29
+       ldd 16(%r31),%r2
+       ldd 24(%r31),%r27
+       bve,l (%r2),%r2
+       nop
+       ldd 16(%r8),%r29
+       copy %r9,%r27
+       b .L50
+       fstw %fr4R,0(%r29)
+.L44:
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,.L45
+       ldd 56(%r5),%r19
+#APP
+       fldw 60(%r5),%fr11R
+#NO_APP
+       b,n .L45
+.L39:
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,.L40
+       ldd 48(%r5),%r20
+#APP
+       fldw 52(%r5),%fr10R
+#NO_APP
+       b,n .L40
+.L34:
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,.L35
+       ldd 40(%r5),%r21
+#APP
+       fldw 44(%r5),%fr9R
+#NO_APP
+       b,n .L35
+.L29:
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,.L30
+       ldd 32(%r5),%r22
+#APP
+       fldw 36(%r5),%fr8R
+#NO_APP
+       b,n .L30
+.L24:
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,.L25
+       ldd 24(%r5),%r23
+#APP
+       fldw 28(%r5),%fr7R
+#NO_APP
+       b,n .L25
+.L19:
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,.L20
+       ldd 16(%r5),%r24
+#APP
+       fldw 20(%r5),%fr6R
+#NO_APP
+       b,n .L20
+.L14:
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,.L15
+       ldd 8(%r5),%r25
+#APP
+       fldw 12(%r5),%fr5R
+#NO_APP
+       b,n .L15
+.L9:
+       ldw 64(%r8),%r29
+       extrw,u %r29,31,1,%r29
+       cmpib,=,n 0,%r29,.L10
+       ldd 0(%r5),%r26
+#APP
+       fldw 4(%r5),%fr4R
+#NO_APP
+       b,n .L10
+.L120:
+       b .L7
+       ldd 16(%r8),%r28
+       .EXIT
+       .PROCEND
+.Lfe1:
+       .size   avcall_call,.Lfe1-avcall_call
+       .ident  "GCC: (GNU) 3.1"
diff --git a/avcall/avcall-hppa64-macro.S b/avcall/avcall-hppa64-macro.S
new file mode 100644 (file)
index 0000000..0484da3
--- /dev/null
@@ -0,0 +1,511 @@
+#include "asm-hppa64.h"
+       .LEVEL 2.0w
+       TEXT1()
+       TEXT2()
+       .align 8
+GLOBL(avcall_call)
+               DECLARE_FUNCTION(avcall_call)
+DEF(avcall_call)
+       .PROC
+       .CALLINFO FRAME=256,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=9
+       .ENTRY
+       copy %r3,%r1
+       std %r2,-16(%r30)
+       copy %r30,%r3
+       std,ma %r1,256(%r30)
+       ldi 8,%r31
+       std %r9,16(%r3)
+       copy %r27,%r9
+       std %r8,24(%r3)
+       copy %r26,%r8
+       std %r7,32(%r3)
+       ldo -80(%r30),%r7
+       std %r6,40(%r3)
+       std %r5,48(%r3)
+       std %r4,56(%r3)
+       ldd 40(%r26),%r29
+       ldd 48(%r26),%r5
+       sub %r29,%r5,%r29
+       extrd,s %r29,29+32-1,32,%r6
+       cmpb,<= %r6,%r31,L(115)
+       ldo 2112(%r30),%r30
+DEF(L(6))
+       depd,z %r31,60,61,%r29
+       ldo 1(%r31),%r31
+       add,l %r29,%r5,%r2
+       extrd,s %r31,63,32,%r31
+       ldd 0(%r2),%r4
+       add,l %r29,%r7,%r29
+       cmpb,> %r6,%r31,L(6)
+       std %r4,0(%r29)
+DEF(L(115))
+       ldw 24(%r8),%r31
+       ldi 16,%r29
+       cmpb,= %r29,%r31,L(120)
+       copy %r31,%r4
+DEF(L(7))
+       cmpib,>=,n 0,%r6,L(8)
+       ldw 68(%r8),%r2
+       extrw,u %r2,31,1,%r29
+       cmpib,=,n 0,%r29,L(9)
+       fldd 0(%r5),%fr4
+DEF(L(10))
+       cmpib,>=,n 1,%r6,L(8)
+       ldi 2,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,L(14)
+       fldd 8(%r5),%fr5
+DEF(L(15))
+       cmpib,>=,n 2,%r6,L(8)
+       ldi 4,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,L(19)
+       fldd 16(%r5),%fr6
+DEF(L(20))
+       cmpib,>=,n 3,%r6,L(8)
+       ldi 8,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,L(24)
+       fldd 24(%r5),%fr7
+DEF(L(25))
+       cmpib,>=,n 4,%r6,L(8)
+       ldi 16,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,L(29)
+       fldd 32(%r5),%fr8
+DEF(L(30))
+       cmpib,>=,n 5,%r6,L(8)
+       ldi 32,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,L(34)
+       fldd 40(%r5),%fr9
+DEF(L(35))
+       cmpib,>=,n 6,%r6,L(8)
+       ldi 64,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,L(39)
+       fldd 48(%r5),%fr10
+DEF(L(40))
+       cmpib,>=,n 7,%r6,L(8)
+       ldi 128,%r31
+       and %r2,%r31,%r29
+       cmpib,=,n 0,%r29,L(44)
+       fldd 56(%r5),%fr11
+DEF(L(45))
+       cmpiclr,>= 8,%r6,%r0
+       ldo 64(%r7),%r1
+DEF(L(8))
+       cmpib,=,n 13,%r4,L(121)
+       cmpib,=,n 14,%r4,L(122)
+       copy %r1,%r29
+       ldd 8(%r8),%r31
+       ldd 16(%r31),%r2
+       ldd 24(%r31),%r27
+       bve,l (%r2),%r2
+       nop
+       ldw 24(%r8),%r2
+       copy %r9,%r27
+       cmpib,= 1,%r2,L(50)
+       copy %r28,%r1
+       cmpib,=,n 0,%r2,L(116)
+       cmpib,=,n 2,%r2,L(119)
+       cmpib,=,n 3,%r2,L(119)
+       cmpib,=,n 4,%r2,L(119)
+       cmpib,=,n 5,%r2,L(118)
+       cmpib,=,n 6,%r2,L(118)
+       cmpib,=,n 7,%r2,L(117)
+       cmpib,=,n 8,%r2,L(117)
+       cmpib,=,n 9,%r2,L(116)
+       cmpib,=,n 11,%r2,L(116)
+       cmpib,=,n 10,%r2,L(116)
+       cmpib,=,n 12,%r2,L(116)
+       cmpib,= 15,%r2,L(116)
+       ldi 16,%r31
+       cmpb,=,n %r31,%r2,L(123)
+DEF(L(50))
+       ldd -16(%r3),%r2
+DEF(L(138))
+       ldi 0,%r28
+       ldd 16(%r3),%r9
+       ldd 24(%r3),%r8
+       ldd 32(%r3),%r7
+       ldd 40(%r3),%r6
+       ldd 48(%r3),%r5
+       ldd 56(%r3),%r4
+       ldo 64(%r3),%r30
+       bve (%r2)
+       ldd,mb -64(%r30),%r3
+DEF(L(123))
+       ldw 0(%r8),%r31
+       extrd,u %r31,54+1-1,1,%r31
+       cmpib,= 0,%r31,L(138)
+       ldd -16(%r3),%r2
+       ldd 32(%r8),%r2
+       ldo -1(%r2),%r31
+       cmpib,*<<,n 15,%r31,L(138)
+       ldd -16(%r3),%r2
+       cmpib,*=,n 1,%r2,L(124)
+       cmpib,*=,n 2,%r2,L(125)
+       cmpib,*= 3,%r2,L(126)
+       extrd,s %r28,23,24,%r4
+       cmpib,*= 4,%r2,L(127)
+       extrd,s %r28,31,32,%r5
+       cmpib,*=,n 5,%r2,L(128)
+       cmpib,*=,n 6,%r2,L(129)
+       cmpib,*= 7,%r2,L(130)
+       ldo -8(%r2),%r31
+       cmpib,*<< 8,%r31,L(50)
+       extrd,s %r28,7,8,%r31
+       ldd 16(%r8),%r2
+       stb %r31,0(%r2)
+       extrd,s %r28,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r28,23,24,%r2
+       stb %r4,1(%r31)
+       extrd,s %r28,31,32,%r5
+       ldd 16(%r8),%r31
+       extrd,s %r28,39,40,%r4
+       stb %r2,2(%r31)
+       extrd,s %r28,47,48,%r6
+       ldd 16(%r8),%r2
+       extrd,s %r28,55,56,%r7
+       stb %r5,3(%r2)
+       ldd 16(%r8),%r31
+       stb %r4,4(%r31)
+       ldd 16(%r8),%r2
+       stb %r6,5(%r2)
+       ldd 16(%r8),%r31
+       stb %r7,6(%r31)
+       ldd 16(%r8),%r2
+       stb %r28,7(%r2)
+       ldd 32(%r8),%r2
+       cmpib,*=,n 8,%r2,L(138)
+       ldd -16(%r3),%r2
+       cmpib,*=,n 9,%r2,L(131)
+       cmpib,*=,n 10,%r2,L(132)
+       cmpib,*=,n 11,%r2,L(133)
+       cmpib,*=,n 12,%r2,L(134)
+       cmpib,*= 13,%r2,L(135)
+       extrd,s %r29,7,8,%r31
+       cmpib,*=,n 14,%r2,L(136)
+       cmpib,*= 15,%r2,L(137)
+       ldi 16,%r31
+       cmpb,*<> %r31,%r2,L(138)
+       ldd -16(%r3),%r2
+       ldd 16(%r8),%r2
+       extrd,s %r29,7,8,%r31
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r29,23,24,%r2
+       stb %r4,9(%r31)
+       extrd,s %r29,31,32,%r5
+       ldd 16(%r8),%r31
+       extrd,s %r29,39,40,%r4
+       stb %r2,10(%r31)
+       extrd,s %r29,47,48,%r6
+       ldd 16(%r8),%r2
+       extrd,s %r29,55,56,%r7
+       stb %r5,11(%r2)
+       ldd 16(%r8),%r31
+       stb %r4,12(%r31)
+       ldd 16(%r8),%r2
+       stb %r6,13(%r2)
+       ldd 16(%r8),%r31
+       stb %r7,14(%r31)
+       ldd 16(%r8),%r2
+       b L(50)
+       stb %r29,15(%r2)
+DEF(L(137))
+       ldd 16(%r8),%r2
+       extrd,s %r29,7,8,%r31
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r29,23,24,%r2
+       stb %r4,9(%r31)
+       extrd,s %r29,31,32,%r5
+       ldd 16(%r8),%r31
+       extrd,s %r29,39,40,%r4
+       stb %r2,10(%r31)
+       extrd,s %r29,47,48,%r6
+       ldd 16(%r8),%r2
+       extrd,s %r29,55,56,%r29
+       stb %r5,11(%r2)
+       ldd 16(%r8),%r31
+       stb %r4,12(%r31)
+       ldd 16(%r8),%r2
+       stb %r6,13(%r2)
+       ldd 16(%r8),%r31
+       b L(50)
+       stb %r29,14(%r31)
+DEF(L(136))
+       ldd 16(%r8),%r2
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r29,23,24,%r2
+       stb %r4,9(%r31)
+       extrd,s %r29,31,32,%r5
+       ldd 16(%r8),%r31
+       extrd,s %r29,39,40,%r4
+       stb %r2,10(%r31)
+       extrd,s %r29,47,48,%r29
+       ldd 16(%r8),%r31
+       stb %r5,11(%r31)
+       ldd 16(%r8),%r2
+       stb %r4,12(%r2)
+       ldd 16(%r8),%r31
+       b L(50)
+       stb %r29,13(%r31)
+DEF(L(135))
+       ldd 16(%r8),%r2
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r29,23,24,%r5
+       stb %r4,9(%r31)
+       extrd,s %r29,31,32,%r6
+       ldd 16(%r8),%r2
+       extrd,s %r29,39,40,%r29
+       stb %r5,10(%r2)
+       ldd 16(%r8),%r31
+       stb %r6,11(%r31)
+       ldd 16(%r8),%r2
+       b L(50)
+       stb %r29,12(%r2)
+DEF(L(134))
+       ldd 16(%r8),%r2
+       extrd,s %r29,7,8,%r31
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r31
+       extrd,s %r29,23,24,%r5
+       stb %r4,9(%r31)
+       extrd,s %r29,31,32,%r29
+       ldd 16(%r8),%r31
+       stb %r5,10(%r31)
+       ldd 16(%r8),%r2
+       b L(50)
+       stb %r29,11(%r2)
+DEF(L(133))
+       ldd 16(%r8),%r2
+       extrd,s %r29,7,8,%r31
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r4
+       ldd 16(%r8),%r2
+       extrd,s %r29,23,24,%r29
+       stb %r4,9(%r2)
+       ldd 16(%r8),%r31
+       b L(50)
+       stb %r29,10(%r31)
+DEF(L(132))
+       ldd 16(%r8),%r2
+       extrd,s %r29,7,8,%r31
+       stb %r31,8(%r2)
+       extrd,s %r29,15,16,%r29
+       ldd 16(%r8),%r31
+       b L(50)
+       stb %r29,9(%r31)
+DEF(L(131))
+       ldd 16(%r8),%r31
+       extrd,s %r29,7,8,%r29
+       b L(50)
+       stb %r29,8(%r31)
+DEF(L(130))
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r29
+       extrd,s %r28,23,24,%r31
+       stb %r2,1(%r29)
+       extrd,s %r28,31,32,%r4
+       ldd 16(%r8),%r29
+       extrd,s %r28,39,40,%r2
+       stb %r31,2(%r29)
+       extrd,s %r28,47,48,%r5
+       ldd 16(%r8),%r31
+       extrd,s %r28,55,56,%r6
+       stb %r4,3(%r31)
+       ldd 16(%r8),%r29
+       stb %r2,4(%r29)
+       ldd 16(%r8),%r31
+       stb %r5,5(%r31)
+       ldd 16(%r8),%r29
+       b L(50)
+       stb %r6,6(%r29)
+DEF(L(129))
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r29
+       extrd,s %r28,23,24,%r31
+       stb %r2,1(%r29)
+       extrd,s %r28,31,32,%r4
+       ldd 16(%r8),%r29
+       extrd,s %r28,39,40,%r2
+       stb %r31,2(%r29)
+       extrd,s %r28,47,48,%r5
+       ldd 16(%r8),%r29
+       stb %r4,3(%r29)
+       ldd 16(%r8),%r31
+       stb %r2,4(%r31)
+       ldd 16(%r8),%r29
+       b L(50)
+       stb %r5,5(%r29)
+DEF(L(128))
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r29
+       stb %r2,1(%r29)
+       ldd 16(%r8),%r31
+       extrd,s %r28,39,40,%r2
+       stb %r4,2(%r31)
+       ldd 16(%r8),%r29
+       stb %r5,3(%r29)
+       ldd 16(%r8),%r31
+       b L(50)
+       stb %r2,4(%r31)
+DEF(L(127))
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r29
+       stb %r2,1(%r29)
+       ldd 16(%r8),%r29
+       stb %r4,2(%r29)
+       ldd 16(%r8),%r31
+       b L(50)
+       stb %r5,3(%r31)
+DEF(L(126))
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r31
+       stb %r2,1(%r31)
+       ldd 16(%r8),%r29
+       b L(50)
+       stb %r4,2(%r29)
+DEF(L(125))
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       stb %r29,0(%r31)
+       extrd,s %r28,15,16,%r2
+       ldd 16(%r8),%r29
+       b L(50)
+       stb %r2,1(%r29)
+DEF(L(124))
+       ldd 16(%r8),%r31
+       extrd,s %r28,7,8,%r29
+       b L(50)
+       stb %r29,0(%r31)
+DEF(L(116))
+       ldd 16(%r8),%r29
+       b L(50)
+       std %r1,0(%r29)
+DEF(L(117))
+       ldd 16(%r8),%r29
+       b L(50)
+       stw %r1,0(%r29)
+DEF(L(118))
+       ldd 16(%r8),%r29
+       b L(50)
+       sth %r1,0(%r29)
+DEF(L(119))
+       ldd 16(%r8),%r29
+       b L(50)
+       stb %r1,0(%r29)
+DEF(L(122))
+       copy %r1,%r29
+       ldd 8(%r8),%r31
+       ldd 16(%r31),%r2
+       ldd 24(%r31),%r27
+       bve,l (%r2),%r2
+       nop
+       ldd 16(%r8),%r29
+       copy %r9,%r27
+       b L(50)
+       fstd %fr4,0(%r29)
+DEF(L(121))
+       copy %r1,%r29
+       ldd 8(%r8),%r31
+       ldd 16(%r31),%r2
+       ldd 24(%r31),%r27
+       bve,l (%r2),%r2
+       nop
+       ldd 16(%r8),%r29
+       copy %r9,%r27
+       b L(50)
+       fstw %fr4R,0(%r29)
+DEF(L(44))
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,L(45)
+       ldd 56(%r5),%r19
+       fldw 60(%r5),%fr11R
+       b,n L(45)
+DEF(L(39))
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,L(40)
+       ldd 48(%r5),%r20
+       fldw 52(%r5),%fr10R
+       b,n L(40)
+DEF(L(34))
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,L(35)
+       ldd 40(%r5),%r21
+       fldw 44(%r5),%fr9R
+       b,n L(35)
+DEF(L(29))
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,L(30)
+       ldd 32(%r5),%r22
+       fldw 36(%r5),%fr8R
+       b,n L(30)
+DEF(L(24))
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,L(25)
+       ldd 24(%r5),%r23
+       fldw 28(%r5),%fr7R
+       b,n L(25)
+DEF(L(19))
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,L(20)
+       ldd 16(%r5),%r24
+       fldw 20(%r5),%fr6R
+       b,n L(20)
+DEF(L(14))
+       ldw 64(%r8),%r29
+       and %r29,%r31,%r29
+       cmpib,=,n 0,%r29,L(15)
+       ldd 8(%r5),%r25
+       fldw 12(%r5),%fr5R
+       b,n L(15)
+DEF(L(9))
+       ldw 64(%r8),%r29
+       extrw,u %r29,31,1,%r29
+       cmpib,=,n 0,%r29,L(10)
+       ldd 0(%r5),%r26
+       fldw 4(%r5),%fr4R
+       b,n L(10)
+DEF(L(120))
+       b L(7)
+       ldd 16(%r8),%r28
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(avcall_call)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-hppa64.c b/avcall/avcall-hppa64.c
new file mode 100644 (file)
index 0000000..e4c0d78
--- /dev/null
@@ -0,0 +1,402 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for a HP-PA 2.0w in 64-bit mode with cc
+  (NB: gcc-7.1.0/gcc/config/pa/pa64-regs.h is quite incorrect. Ignore it.)
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  hppa64 Argument Passing Conventions:
+
+  Up to 8 words are passed in registers:
+            integer/pointer    float      double
+     1.          %r26          %fr4R       %fr4
+     2.          %r25          %fr5R       %fr5
+     3.          %r24          %fr6R       %fr6
+     4.          %r23          %fr7R       %fr7
+     5.          %r22          %fr8R       %fr8
+     6.          %r21          %fr9R       %fr9
+     7.          %r20          %fr10R      %fr10
+     8.          %r19          %fr11R      %fr11
+  The remaining arguments are passed on the stack - growing up, unlike
+  in 32-bit mode! -, and %r29 is the base address of this stack area.
+  Room is preallocated for 8 words, i.e. from address %r29-64 to %r29-1.
+  Among these stack arguments:
+    - integer/pointer occupies 1 word (right-adjusted, since big-endian),
+    - float occupies 1 word and is stored in the upper 4 bytes of the word,
+    - double occupies 1 word.
+
+  Structs of any size are passed in the argument sequence, e.g. in integer
+  registers (first byte being at bits 63..56). Note that a {long,long}
+  struct has 2*(8 bytes) alignment.
+
+  The return value is returned in register %r28.
+  Float return values are also returned in %fr4R.
+  Double return values are also returned in %fr4.
+  (How silly! Who designed this ABI?!)
+
+  To return a structure of more than 16 bytes, the called function copies
+  the return value to the address supplied in register %r28. The function
+  also returns the pointer.
+  Smaller structures are returned in the registers %r28 (first 8 bytes)
+  and %r29 (next 8 bytes, if present).
+
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+/* This declaration tells gcc not to modify %r28. */
+register __avword*     sret    __asm__("%r28");  /* structure return pointer */
+
+register __avword arg1 __asm__("r26");
+register __avword arg2 __asm__("r25");
+register __avword arg3 __asm__("r24");
+register __avword arg4 __asm__("r23");
+register __avword arg5 __asm__("r22");
+register __avword arg6 __asm__("r21");
+register __avword arg7 __asm__("r20");
+register __avword arg8 __asm__("r19");
+
+/*register float farg1 __asm__("fr4R");*/
+/*register float farg2 __asm__("fr5R");*/
+/*register float farg3 __asm__("fr6R");*/
+/*register float farg4 __asm__("fr7R");*/
+/*register float farg5 __asm__("fr8R");*/
+/*register float farg6 __asm__("fr9R");*/
+/*register float farg7 __asm__("fr10R");*/
+/*register float farg8 __asm__("fr11R");*/
+
+register double darg1 __asm__("fr4");
+register double darg2 __asm__("fr5");
+register double darg3 __asm__("fr6");
+register double darg4 __asm__("fr7");
+register double darg5 __asm__("fr8");
+register double darg6 __asm__("fr9");
+register double darg7 __asm__("fr10");
+register double darg8 __asm__("fr11");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("%r30");  /* C names for registers */
+/*register __avword    iret1   __asm__("%r28"); */
+  register __avword    iret2   __asm__("%r29");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  __avword* memargptr;
+  int arglen = l->aptr - l->args;
+  __avword iret;
+
+  {
+    int i;
+    for (i = 8; i < arglen; i++)       /* push function args onto stack */
+      argframe[i] = l->args[i];
+  }
+
+  if (l->rtype == __AVstruct)          /* push struct return address */
+    sret = l->raddr;
+
+  /* Put args in registers */
+  if (arglen >= 1) {
+    if (l->darg_mask & (1 << 0))
+      darg1 = ((double*)&l->args[1])[-1];
+    else if (l->farg_mask & (1 << 0))
+      __asm__ __volatile__ ("fldw %0,%%fr4R" : : "m" (((float*)&l->args[1])[-1])); /* farg1 = ((float*)&l->args[1])[-1]; */
+    else
+      arg1 = l->args[0];
+    if (arglen >= 2) {
+      if (l->darg_mask & (1 << 1))
+        darg2 = ((double*)&l->args[2])[-1];
+      else if (l->farg_mask & (1 << 1))
+        __asm__ __volatile__ ("fldw %0,%%fr5R" : : "m" (((float*)&l->args[2])[-1])); /* farg2 = ((float*)&l->args[2])[-1]; */
+      else
+        arg2 = l->args[1];
+      if (arglen >= 3) {
+        if (l->darg_mask & (1 << 2))
+          darg3 = ((double*)&l->args[3])[-1];
+        else if (l->farg_mask & (1 << 2))
+          __asm__ __volatile__ ("fldw %0,%%fr6R" : : "m" (((float*)&l->args[3])[-1])); /* farg3 = ((float*)&l->args[3])[-1]; */
+        else
+          arg3 = l->args[2];
+        if (arglen >= 4) {
+          if (l->darg_mask & (1 << 3))
+            darg4 = ((double*)&l->args[4])[-1];
+          else if (l->farg_mask & (1 << 3))
+            __asm__ __volatile__ ("fldw %0,%%fr7R" : : "m" (((float*)&l->args[4])[-1])); /* farg4 = ((float*)&l->args[4])[-1]; */
+          else
+            arg4 = l->args[3];
+          if (arglen >= 5) {
+            if (l->darg_mask & (1 << 4))
+              darg5 = ((double*)&l->args[5])[-1];
+            else if (l->farg_mask & (1 << 4))
+              __asm__ __volatile__ ("fldw %0,%%fr8R" : : "m" (((float*)&l->args[5])[-1])); /* farg5 = ((float*)&l->args[5])[-1]; */
+            else
+              arg5 = l->args[4];
+            if (arglen >= 6) {
+              if (l->darg_mask & (1 << 5))
+                darg6 = ((double*)&l->args[6])[-1];
+              else if (l->farg_mask & (1 << 5))
+                __asm__ __volatile__ ("fldw %0,%%fr9R" : : "m" (((float*)&l->args[6])[-1])); /* farg6 = ((float*)&l->args[6])[-1]; */
+              else
+                arg6 = l->args[5];
+              if (arglen >= 7) {
+                if (l->darg_mask & (1 << 6))
+                  darg7 = ((double*)&l->args[7])[-1];
+                else if (l->farg_mask & (1 << 6))
+                  __asm__ __volatile__ ("fldw %0,%%fr10R" : : "m" (((float*)&l->args[7])[-1])); /* farg7 = ((float*)&l->args[7])[-1]; */
+                else
+                  arg7 = l->args[6];
+                if (arglen >= 8) {
+                  if (l->darg_mask & (1 << 7))
+                    darg8 = ((double*)&l->args[8])[-1];
+                  else if (l->farg_mask & (1 << 7))
+                    __asm__ __volatile__ ("fldw %0,%%fr11R" : : "m" (((float*)&l->args[8])[-1])); /* farg8 = ((float*)&l->args[8])[-1]; */
+                  else
+                    arg8 = l->args[7];
+                  if (arglen > 8) {
+                    memargptr = &argframe[8];
+                  }
+                }
+              }
+            }
+          }
+        }
+      }
+    }
+  }
+  if (l->rtype == __AVfloat) {
+    __asm__ __volatile__ ("copy %0,%%r29" : : "r" (memargptr));
+    /* GCC generates an 'ldo -16(%r30),%r29' instruction as part of this
+       function call. We eliminate it through post-processing. */
+    *(float*)l->raddr = (*(float(*)())l->func)();
+  } else
+  if (l->rtype == __AVdouble) {
+    __asm__ __volatile__ ("copy %0,%%r29" : : "r" (memargptr));
+    /* GCC generates an 'ldo -16(%r30),%r29' instruction as part of this
+       function call. We eliminate it through post-processing. */
+    *(double*)l->raddr = (*(double(*)())l->func)();
+  } else {
+    __asm__ __volatile__ ("copy %0,%%r29" : : "r" (memargptr));
+    /* GCC generates an 'ldo -16(%r30),%r29' instruction as part of this
+       function call. We eliminate it through post-processing. */
+    iret = (*l->func)();
+
+    /* save return value */
+    if (l->rtype == __AVvoid) {
+    } else
+    if (l->rtype == __AVword) {
+      RETURN(__avword, iret);
+    } else
+    if (l->rtype == __AVchar) {
+      RETURN(char, iret);
+    } else
+    if (l->rtype == __AVschar) {
+      RETURN(signed char, iret);
+    } else
+    if (l->rtype == __AVuchar) {
+      RETURN(unsigned char, iret);
+    } else
+    if (l->rtype == __AVshort) {
+      RETURN(short, iret);
+    } else
+    if (l->rtype == __AVushort) {
+      RETURN(unsigned short, iret);
+    } else
+    if (l->rtype == __AVint) {
+      RETURN(int, iret);
+    } else
+    if (l->rtype == __AVuint) {
+      RETURN(unsigned int, iret);
+    } else
+    if (l->rtype == __AVlong || l->rtype == __AVlonglong) {
+      RETURN(long, iret);
+    } else
+    if (l->rtype == __AVulong || l->rtype == __AVulonglong) {
+      RETURN(unsigned long, iret);
+    } else
+  /* see above
+    if (l->rtype == __AVfloat) {
+    } else
+    if (l->rtype == __AVdouble) {
+    } else
+  */
+    if (l->rtype == __AVvoidp) {
+      RETURN(void*, iret);
+    } else
+    if (l->rtype == __AVstruct) {
+      if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+        /* cc returns structs of size <= 16 in registers. */
+        if (l->rsize > 0 && l->rsize <= 16) {
+          #if 0
+          void* raddr = l->raddr;
+          #else
+          #define raddr l->raddr
+          #endif
+          #if 1 /* Unoptimized */
+          if (l->rsize == 1) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+          } else
+          if (l->rsize == 2) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+          } else
+          if (l->rsize == 3) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+          } else
+          if (l->rsize == 4) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+          } else
+          if (l->rsize == 5) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+          } else
+          if (l->rsize == 6) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+          } else
+          if (l->rsize == 7) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8);
+          } else
+          if (l->rsize >= 8 && l->rsize <= 16) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[7] = (unsigned char)(iret);
+            if (l->rsize == 8) {
+            } else
+            if (l->rsize == 9) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+            } else
+            if (l->rsize == 10) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+            } else
+            if (l->rsize == 11) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+            } else
+            if (l->rsize == 12) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+            } else
+            if (l->rsize == 13) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+            } else
+            if (l->rsize == 14) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+            } else
+            if (l->rsize == 15) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8);
+            } else
+            if (l->rsize == 16) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2);
+            }
+          }
+          #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+          uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avword) */
+          __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+          uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+          uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avword) */
+          if (count <= sizeof(__avword)) {
+            /* Use iret. */
+            if (end_offset <= sizeof(__avword)) {
+              /* 0 < end_offset ≤ sizeof(__avword) */
+              __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - ((__avword)1 << (sizeof(__avword)*8-end_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+            } else {
+              /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+              __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+              __avword mask1 = - ((__avword)1 << (2*sizeof(__avword)*8-end_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+              wordaddr[1] ^= (wordaddr[1] ^ (iret << (sizeof(__avword)*8-start_offset*8))) & mask1;
+            }
+          } else {
+            /* Use iret, iret2. */
+            __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+            wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+            if (end_offset <= 2*sizeof(__avword)) {
+              /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+              __avword mask1 = - ((__avword)1 << (2*sizeof(__avword)*8-end_offset*8));
+              wordaddr[1] ^= (wordaddr[1] ^ ((iret << (sizeof(__avword)*4-start_offset*4) << (sizeof(__avword)*4-start_offset*4)) | (iret2 >> (start_offset*8)))) & mask1;
+            } else {
+              /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+              __avword mask2 = - ((__avword)1 << (3*sizeof(__avword)*8-end_offset*8));
+              wordaddr[1] = (iret << (sizeof(__avword)*8-start_offset*8)) | (iret2 >> (start_offset*8));
+              wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (sizeof(__avword)*8-start_offset*8))) & mask2;
+            }
+          }
+          #endif
+        }
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-i386-linux.s b/avcall/avcall-i386-linux.s
new file mode 100644 (file)
index 0000000..7c0e4f1
--- /dev/null
@@ -0,0 +1,145 @@
+       .file   "avcall-i386.c"
+       .text
+       .align 2
+       .p2align 2,,3
+.globl avcall_call
+       .type   avcall_call,@function
+avcall_call:
+       pushl   %ebp
+       movl    %esp, %ebp
+       pushl   %edi
+       pushl   %esi
+       movl    8(%ebp), %eax
+       movl    20(%eax), %edx
+       movl    24(%eax), %eax
+       subl    %eax, %edx
+       sarl    $2, %edx
+       xorl    %esi, %esi
+       subl    $1024, %esp
+       cmpl    %edx, %esi
+       movl    %esp, %edi
+       jge     .L47
+       movl    %eax, %ecx
+       .p2align 2,,3
+.L6:
+       movl    (%ecx,%esi,4), %eax
+       movl    %eax, (%edi,%esi,4)
+       incl    %esi
+       cmpl    %edx, %esi
+       jl      .L6
+.L47:
+       movl    8(%ebp), %edx
+       movl    12(%edx), %eax
+       cmpl    $13, %eax
+       je      .L55
+       cmpl    $14, %eax
+       je      .L56
+       movl    8(%ebp), %ecx
+       call    *4(%ecx)
+       movl    %eax, %esi
+       movl    8(%ebp), %eax
+       movl    12(%eax), %ecx
+       cmpl    $1, %ecx
+       je      .L8
+       testl   %ecx, %ecx
+       jne     .L13
+       movl    8(%eax), %eax
+.L50:
+       movl    %esi, (%eax)
+.L8:
+       leal    -8(%ebp), %esp
+       popl    %esi
+       xorl    %eax, %eax
+       popl    %edi
+       leave
+       ret
+.L13:
+       cmpl    $2, %ecx
+       je      .L53
+       cmpl    $3, %ecx
+       je      .L53
+       cmpl    $4, %ecx
+       je      .L53
+       cmpl    $5, %ecx
+       je      .L57
+       cmpl    $6, %ecx
+       je      .L51
+       cmpl    $7, %ecx
+       je      .L48
+       cmpl    $8, %ecx
+       je      .L54
+       cmpl    $9, %ecx
+       je      .L48
+       cmpl    $10, %ecx
+       je      .L54
+       leal    -11(%ecx), %eax
+       cmpl    $1, %eax
+       jbe     .L49
+       cmpl    $15, %ecx
+       je      .L48
+       cmpl    $16, %ecx
+       jne     .L8
+       movl    8(%ebp), %ecx
+       testb   $2, 1(%ecx)
+       je      .L8
+       movl    16(%ecx), %eax
+       cmpl    $1, %eax
+       je      .L58
+       cmpl    $2, %eax
+       je      .L51
+       cmpl    $4, %eax
+       je      .L48
+       cmpl    $8, %eax
+       jne     .L8
+.L49:
+       movl    8(%ebp), %ecx
+       movl    8(%ecx), %eax
+       movl    %esi, (%eax)
+       movl    %edx, 4(%eax)
+       jmp     .L8
+.L48:
+       movl    8(%ebp), %edx
+       movl    8(%edx), %eax
+       jmp     .L50
+.L51:
+       movl    8(%ebp), %ecx
+       movl    8(%ecx), %eax
+.L52:
+       movw    %si, (%eax)
+       jmp     .L8
+.L58:
+       movl    8(%ecx), %eax
+       movl    %esi, %edx
+       movb    %dl, (%eax)
+       jmp     .L8
+       .p2align 2,,3
+.L54:
+       movl    8(%ebp), %ecx
+       movl    8(%ecx), %eax
+       jmp     .L50
+.L57:
+       movl    8(%ebp), %edx
+       movl    8(%edx), %eax
+       jmp     .L52
+.L53:
+       movl    8(%ebp), %edx
+       movl    8(%edx), %eax
+       movl    %esi, %ecx
+       movb    %cl, (%eax)
+       jmp     .L8
+.L56:
+       movl    8(%ebp), %eax
+       call    *4(%eax)
+       movl    8(%ebp), %edx
+       movl    8(%edx), %eax
+       fstpl   (%eax)
+       jmp     .L8
+.L55:
+       call    *4(%edx)
+       movl    8(%ebp), %ecx
+       movl    8(%ecx), %eax
+       fstps   (%eax)
+       jmp     .L8
+.Lfe1:
+       .size   avcall_call,.Lfe1-avcall_call
+       .ident  "GCC: (GNU) 3.1"
diff --git a/avcall/avcall-i386-macro.S b/avcall/avcall-i386-macro.S
new file mode 100644 (file)
index 0000000..59b898c
--- /dev/null
@@ -0,0 +1,148 @@
+#include "asm-i386.h"
+       TEXT()
+       ALIGN(2)
+       P2ALIGN(2,3)
+GLOBL(C(avcall_call))
+       DECLARE_FUNCTION(avcall_call)
+FUNBEGIN(avcall_call)
+       INSN1(push,l    ,R(ebp))
+       INSN2(mov,l     ,R(esp), R(ebp))
+       INSN1(push,l    ,R(edi))
+       INSN1(push,l    ,R(esi))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(eax,20), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(eax,24), R(eax))
+       INSN2(sub,l     ,R(eax), R(edx))
+       INSN2(sar,l     ,NUM(2), R(edx))
+       INSN2(xor,l     ,R(esi), R(esi))
+       INSN2(sub,l     ,NUM(1024), R(esp))
+       INSN2(cmp,l     ,R(edx), R(esi))
+       INSN2(mov,l     ,R(esp), R(edi))
+       INSN1(jge,_     ,L(47))
+       INSN2(mov,l     ,R(eax), R(ecx))
+       P2ALIGN(2,3)
+L(6):
+       INSN2(mov,l     ,X4 MEM_SHINDEX(ecx,esi,4), R(eax))
+       INSN2(mov,l     ,R(eax),X4 MEM_SHINDEX(edi,esi,4))
+       INSN1(inc,l     ,R(esi))
+       INSN2(cmp,l     ,R(edx), R(esi))
+       INSN1(jl,_      ,L(6))
+L(47):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,12), R(eax))
+       INSN2(cmp,l     ,NUM(13), R(eax))
+       INSN1(je,_      ,L(55))
+       INSN2(cmp,l     ,NUM(14), R(eax))
+       INSN1(je,_      ,L(56))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN1(call,_    ,INDIR(X4 MEM_DISP(ecx,4)))
+       INSN2(mov,l     ,R(eax), R(esi))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(eax,12), R(ecx))
+       INSN2(cmp,l     ,NUM(1), R(ecx))
+       INSN1(je,_      ,L(8))
+       INSN2(test,l    ,R(ecx), R(ecx))
+       INSN1(jne,_     ,L(13))
+       INSN2(mov,l     ,X4 MEM_DISP(eax,8), R(eax))
+L(50):
+       INSN2(mov,l     ,R(esi),X4 MEM(eax))
+L(8):
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-8), R(esp))
+       INSN1(pop,l     ,R(esi))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN1(pop,l     ,R(edi))
+       leave
+       ret
+L(13):
+       INSN2(cmp,l     ,NUM(2), R(ecx))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(3), R(ecx))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(4), R(ecx))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(5), R(ecx))
+       INSN1(je,_      ,L(57))
+       INSN2(cmp,l     ,NUM(6), R(ecx))
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(7), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(8), R(ecx))
+       INSN1(je,_      ,L(54))
+       INSN2(cmp,l     ,NUM(9), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(10), R(ecx))
+       INSN1(je,_      ,L(54))
+       INSN2(lea,l     ,X4 MEM_DISP(ecx,-11), R(eax))
+       INSN2(cmp,l     ,NUM(1), R(eax))
+       INSN1(jbe,_     ,L(49))
+       INSN2(cmp,l     ,NUM(15), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(16), R(ecx))
+       INSN1(jne,_     ,L(8))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN2(test,b    ,NUM(2),X1 MEM_DISP(ecx,1))
+       INSN1(je,_      ,L(8))
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,16), R(eax))
+       INSN2(cmp,l     ,NUM(1), R(eax))
+       INSN1(je,_      ,L(58))
+       INSN2(cmp,l     ,NUM(2), R(eax))
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(4), R(eax))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(8), R(eax))
+       INSN1(jne,_     ,L(8))
+L(49):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,8), R(eax))
+       INSN2(mov,l     ,R(esi),X4 MEM(eax))
+       INSN2(mov,l     ,R(edx),X4 MEM_DISP(eax,4))
+       INSN1(jmp,_     ,L(8))
+L(48):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,8), R(eax))
+       INSN1(jmp,_     ,L(50))
+L(51):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,8), R(eax))
+L(52):
+       INSN2(mov,w     ,R(si),X2 MEM(eax))
+       INSN1(jmp,_     ,L(8))
+L(58):
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,8), R(eax))
+       INSN2(mov,l     ,R(esi), R(edx))
+       INSN2(mov,b     ,R(dl),X1 MEM(eax))
+       INSN1(jmp,_     ,L(8))
+       P2ALIGN(2,3)
+L(54):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,8), R(eax))
+       INSN1(jmp,_     ,L(50))
+L(57):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,8), R(eax))
+       INSN1(jmp,_     ,L(52))
+L(53):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,8), R(eax))
+       INSN2(mov,l     ,R(esi), R(ecx))
+       INSN2(mov,b     ,R(cl),X1 MEM(eax))
+       INSN1(jmp,_     ,L(8))
+L(56):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(eax))
+       INSN1(call,_    ,INDIR(X4 MEM_DISP(eax,4)))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,8), R(eax))
+       INSN1(fstp,l    ,X8 MEM(eax))
+       INSN1(jmp,_     ,L(8))
+L(55):
+       INSN1(call,_    ,INDIR(X4 MEM_DISP(edx,4)))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,8), R(eax))
+       INSN1(fstp,s    ,X4 MEM(eax))
+       INSN1(jmp,_     ,L(8))
+L(fe1):
+       FUNEND(avcall_call,L(fe1)-avcall_call)
+
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-i386-msvc.c b/avcall/avcall-i386-msvc.c
new file mode 100644 (file)
index 0000000..59b898c
--- /dev/null
@@ -0,0 +1,148 @@
+#include "asm-i386.h"
+       TEXT()
+       ALIGN(2)
+       P2ALIGN(2,3)
+GLOBL(C(avcall_call))
+       DECLARE_FUNCTION(avcall_call)
+FUNBEGIN(avcall_call)
+       INSN1(push,l    ,R(ebp))
+       INSN2(mov,l     ,R(esp), R(ebp))
+       INSN1(push,l    ,R(edi))
+       INSN1(push,l    ,R(esi))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(eax,20), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(eax,24), R(eax))
+       INSN2(sub,l     ,R(eax), R(edx))
+       INSN2(sar,l     ,NUM(2), R(edx))
+       INSN2(xor,l     ,R(esi), R(esi))
+       INSN2(sub,l     ,NUM(1024), R(esp))
+       INSN2(cmp,l     ,R(edx), R(esi))
+       INSN2(mov,l     ,R(esp), R(edi))
+       INSN1(jge,_     ,L(47))
+       INSN2(mov,l     ,R(eax), R(ecx))
+       P2ALIGN(2,3)
+L(6):
+       INSN2(mov,l     ,X4 MEM_SHINDEX(ecx,esi,4), R(eax))
+       INSN2(mov,l     ,R(eax),X4 MEM_SHINDEX(edi,esi,4))
+       INSN1(inc,l     ,R(esi))
+       INSN2(cmp,l     ,R(edx), R(esi))
+       INSN1(jl,_      ,L(6))
+L(47):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,12), R(eax))
+       INSN2(cmp,l     ,NUM(13), R(eax))
+       INSN1(je,_      ,L(55))
+       INSN2(cmp,l     ,NUM(14), R(eax))
+       INSN1(je,_      ,L(56))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN1(call,_    ,INDIR(X4 MEM_DISP(ecx,4)))
+       INSN2(mov,l     ,R(eax), R(esi))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(eax,12), R(ecx))
+       INSN2(cmp,l     ,NUM(1), R(ecx))
+       INSN1(je,_      ,L(8))
+       INSN2(test,l    ,R(ecx), R(ecx))
+       INSN1(jne,_     ,L(13))
+       INSN2(mov,l     ,X4 MEM_DISP(eax,8), R(eax))
+L(50):
+       INSN2(mov,l     ,R(esi),X4 MEM(eax))
+L(8):
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-8), R(esp))
+       INSN1(pop,l     ,R(esi))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN1(pop,l     ,R(edi))
+       leave
+       ret
+L(13):
+       INSN2(cmp,l     ,NUM(2), R(ecx))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(3), R(ecx))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(4), R(ecx))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(5), R(ecx))
+       INSN1(je,_      ,L(57))
+       INSN2(cmp,l     ,NUM(6), R(ecx))
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(7), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(8), R(ecx))
+       INSN1(je,_      ,L(54))
+       INSN2(cmp,l     ,NUM(9), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(10), R(ecx))
+       INSN1(je,_      ,L(54))
+       INSN2(lea,l     ,X4 MEM_DISP(ecx,-11), R(eax))
+       INSN2(cmp,l     ,NUM(1), R(eax))
+       INSN1(jbe,_     ,L(49))
+       INSN2(cmp,l     ,NUM(15), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(16), R(ecx))
+       INSN1(jne,_     ,L(8))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN2(test,b    ,NUM(2),X1 MEM_DISP(ecx,1))
+       INSN1(je,_      ,L(8))
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,16), R(eax))
+       INSN2(cmp,l     ,NUM(1), R(eax))
+       INSN1(je,_      ,L(58))
+       INSN2(cmp,l     ,NUM(2), R(eax))
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(4), R(eax))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(8), R(eax))
+       INSN1(jne,_     ,L(8))
+L(49):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,8), R(eax))
+       INSN2(mov,l     ,R(esi),X4 MEM(eax))
+       INSN2(mov,l     ,R(edx),X4 MEM_DISP(eax,4))
+       INSN1(jmp,_     ,L(8))
+L(48):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,8), R(eax))
+       INSN1(jmp,_     ,L(50))
+L(51):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,8), R(eax))
+L(52):
+       INSN2(mov,w     ,R(si),X2 MEM(eax))
+       INSN1(jmp,_     ,L(8))
+L(58):
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,8), R(eax))
+       INSN2(mov,l     ,R(esi), R(edx))
+       INSN2(mov,b     ,R(dl),X1 MEM(eax))
+       INSN1(jmp,_     ,L(8))
+       P2ALIGN(2,3)
+L(54):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,8), R(eax))
+       INSN1(jmp,_     ,L(50))
+L(57):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,8), R(eax))
+       INSN1(jmp,_     ,L(52))
+L(53):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,8), R(eax))
+       INSN2(mov,l     ,R(esi), R(ecx))
+       INSN2(mov,b     ,R(cl),X1 MEM(eax))
+       INSN1(jmp,_     ,L(8))
+L(56):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(eax))
+       INSN1(call,_    ,INDIR(X4 MEM_DISP(eax,4)))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,8), R(eax))
+       INSN1(fstp,l    ,X8 MEM(eax))
+       INSN1(jmp,_     ,L(8))
+L(55):
+       INSN1(call,_    ,INDIR(X4 MEM_DISP(edx,4)))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,8), R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ecx,8), R(eax))
+       INSN1(fstp,s    ,X4 MEM(eax))
+       INSN1(jmp,_     ,L(8))
+L(fe1):
+       FUNEND(avcall_call,L(fe1)-avcall_call)
+
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-i386.c b/avcall/avcall-i386.c
new file mode 100644 (file)
index 0000000..63d3af9
--- /dev/null
@@ -0,0 +1,147 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O -fno-omit-frame-pointer !!!
+
+  Foreign function interface for a Linux i386/486 with gcc.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  i386 Argument Passing Conventions:
+
+  All arguments are passed on the stack with word alignment. Doubles take
+  two words. Structure args are passed as true structures embedded in the
+  argument stack. Float and double returns often come from FPU registers.
+
+  To return a structure, the called function copies the value to space
+  pointed to by its first argument, and all other arguments are shifted
+  down by one. At least on FreeBSD, the function also returns the pointer.
+  GCC returns structures of size 1, 2, 4, 8 like integers.
+
+  Compile this routine with gcc -O (or -O2 -fno-omit-frame-pointer or -g -O)
+  to get the right register variables. For other compilers use the
+  pre-compiled assembler version.
+
+  -fomit-frame-pointer is forbidden because when calling structure returning
+  functions (the "i = (*l->func)();" line below) the called functions pops
+  the return value container pointer from the stack: "ret $4" instead of
+  "ret". (See gcc-2.6.3 macro RETURN_POPS_ARGS.) From our point of view, %esp
+  gets magically incremented. A workaround would be to push the return value
+  container pointer using an __asm__("pushl %0" : : : ...) instruction.
+  Similarly, when calling functions with ‘stdcall’ linkage, %esp also gets
+  incremented: all arguments (including the return value container pointer)
+  are popped from the stack.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("sp");  /* C names for registers */
+/*register __avword    iret    __asm__("eax"); */
+  register __avword    iret2   __asm__("edx");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  __avword i;
+
+  for (i = 0; i < arglen; i++)         /* push function args onto stack */
+    argframe[i] = l->args[i];
+
+  /* call function */
+  if (l->rtype == __AVfloat) {
+    *(float*)l->raddr = (*(float(*)())l->func)();
+  } else
+  if (l->rtype == __AVdouble) {
+    *(double*)l->raddr = (*(double(*)())l->func)();
+  } else {
+    i = (*l->func)();
+
+    /* save return value */
+    if (l->rtype == __AVvoid) {
+    } else
+    if (l->rtype == __AVword) {
+      RETURN(__avword, i);
+    } else
+    if (l->rtype == __AVchar) {
+      RETURN(char, i);
+    } else
+    if (l->rtype == __AVschar) {
+      RETURN(signed char, i);
+    } else
+    if (l->rtype == __AVuchar) {
+      RETURN(unsigned char, i);
+    } else
+    if (l->rtype == __AVshort) {
+      RETURN(short, i);
+    } else
+    if (l->rtype == __AVushort) {
+      RETURN(unsigned short, i);
+    } else
+    if (l->rtype == __AVint) {
+      RETURN(int, i);
+    } else
+    if (l->rtype == __AVuint) {
+      RETURN(unsigned int, i);
+    } else
+    if (l->rtype == __AVlong) {
+      RETURN(long, i);
+    } else
+    if (l->rtype == __AVulong) {
+      RETURN(unsigned long, i);
+    } else
+    if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) {
+      void* raddr = l->raddr;
+      ((__avword*)raddr)[0] = i;
+      ((__avword*)raddr)[1] = iret2;
+    } else
+  /* see above
+    if (l->rtype == __AVfloat) {
+    } else
+    if (l->rtype == __AVdouble) {
+    } else
+  */
+    if (l->rtype == __AVvoidp) {
+      RETURN(void*, i);
+    } else
+    if (l->rtype == __AVstruct) {
+      if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+        if (l->rsize == sizeof(char)) {
+          RETURN(char, i);
+        } else
+        if (l->rsize == sizeof(short)) {
+          RETURN(short, i);
+        } else
+        if (l->rsize == sizeof(int)) {
+          RETURN(int, i);
+        } else
+        if (l->rsize == 2*sizeof(__avword)) {
+          void* raddr = l->raddr;
+          ((__avword*)raddr)[0] = i;
+          ((__avword*)raddr)[1] = iret2;
+        }
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-ia64-linux.s b/avcall/avcall-ia64-linux.s
new file mode 100644 (file)
index 0000000..93df523
--- /dev/null
@@ -0,0 +1,1174 @@
+       .file   "avcall-ia64.c"
+       .pred.safe_across_calls p1-p5,p16-p63
+       .text
+       .align 16
+       .global avcall_call#
+       .proc avcall_call#
+avcall_call:
+       .prologue 14, 34
+       .mmi
+       .save ar.pfs, r35
+       alloc r35 = ar.pfs, 1, 6, 8, 0
+       adds r14 = 40, r32
+       adds r20 = 48, r32
+       .mmi
+       adds r16 = 64, r32
+       adds r21 = 72, r32
+       adds r19 = -2032, r12
+       ;;
+       .mmb
+       ld8 r15 = [r14]
+       ld8 r17 = [r20]
+       nop 0
+       .mii
+       .vframe r36
+       mov r36 = r12
+       .save ar.lc, r38
+       mov r38 = ar.lc
+       mov r37 = r1
+       ;;
+       .mmi
+       sub r15 = r15, r17
+       ld8 r14 = [r16]
+       .save rp, r34
+       mov r34 = b0
+       .body
+       .mmi
+       nop 0
+       ;;
+       nop 0
+       shr.u r15 = r15, 3
+       .mmi
+       sub r14 = r14, r21
+       ;;
+       nop 0
+       shr.u r18 = r14, 3
+       .mmb
+       nop 0
+       cmp4.ge p6, p7 = 8, r15
+       (p6) br.cond.dptk .L2
+       .mii
+       sub r14 = 8, r15
+       addl r16 = 8, r0
+       ;;
+       andcm r14 = -1, r14
+       ;;
+       .mii
+       nop 0
+       addp4 r14 = r14, r0
+       ;;
+       mov ar.lc = r14
+.L4:
+       .mii
+       nop 0
+       sxt4 r14 = r16
+       adds r16 = 1, r16
+       ;;
+       .mmi
+       shladd r14 = r14, 3, r0
+       ;;
+       add r15 = r17, r14
+       add r14 = r19, r14
+       ;;
+       .mmb
+       adds r14 = -64, r14
+       ld8 r15 = [r15]
+       nop 0
+       ;;
+       .mfb
+       st8 [r14] = r15
+       nop 0
+       br.cloop.sptk.few .L4
+.L2:
+       .mmi
+       adds r33 = 24, r32
+       ;;
+       ld4 r15 = [r33]
+       nop 0
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 16, r15
+       ;;
+       (p7) adds r14 = 16, r32
+       ;;
+       .mfi
+       (p7) ld8 r8 = [r14]
+       nop 0
+       cmp4.ge p6, p7 = 0, r18
+       .mfb
+       adds r14 = 80, r32
+       nop 0
+       (p6) br.cond.dpnt .L7
+       ;;
+       .mmb
+       nop 0
+       cmp4.ge p6, p7 = 1, r18
+       nop 0
+       .mfb
+       ldfd f8 = [r21]
+       nop 0
+       (p6) br.cond.dpnt .L7
+       ;;
+       .mmb
+       nop 0
+       cmp4.ge p6, p7 = 2, r18
+       nop 0
+       .mfb
+       ldfd f9 = [r14]
+       nop 0
+       (p7) br.cond.dptk .L71
+       ;;
+.L7:
+       .mib
+       nop 0
+       cmp4.ne p6, p7 = 13, r15
+       (p7) br.cond.dpnt .L72
+       ;;
+.L16:
+       .mib
+       cmp4.ne p6, p7 = 14, r15
+       adds r15 = 8, r32
+       (p7) br.cond.dpnt .L73
+       .mmb
+       nop 0
+       ld8 r14 = [r20]
+       nop 0
+       ;;
+       .mmi
+       ld8 r15 = [r15]
+       adds r16 = 8, r14
+       adds r17 = 16, r14
+       .mmi
+       adds r18 = 24, r14
+       adds r19 = 32, r14
+       adds r20 = 40, r14
+       .mmi
+       nop 0
+       adds r21 = 48, r14
+       adds r22 = 56, r14
+       .mmi
+       ld8 r39 = [r14]
+       ;;
+       ld8 r14 = [r15], 8
+       nop 0
+       .mii
+       ld8 r40 = [r16]
+       nop 0
+       ;;
+       mov b6 = r14
+       .mmb
+       ld8 r1 = [r15]
+       ld8 r41 = [r17]
+       nop 0
+       .mmb
+       ld8 r42 = [r18]
+       ld8 r43 = [r19]
+       nop 0
+       .mmb
+       ld8 r44 = [r20]
+       ld8 r45 = [r21]
+       nop 0
+       .mbb
+       ld8 r46 = [r22]
+       nop 0
+       br.call.sptk.many b0 = b6
+       ;;
+       .mmi
+       mov r1 = r37
+       ld4 r14 = [r33]
+       mov r28 = r8
+       ;;
+       .mfb
+       cmp4.eq p6, p7 = 1, r14
+       nop 0
+       (p6) br.cond.dpnt .L18
+       ;;
+       .mib
+       nop 0
+       cmp4.ne p6, p7 = 0, r14
+       (p7) br.cond.dptk .L69
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 2, r14
+       nop 0
+       (p7) br.cond.dpnt .L65
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 3, r14
+       nop 0
+       (p7) br.cond.dpnt .L65
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 4, r14
+       nop 0
+       (p7) br.cond.dpnt .L65
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 5, r14
+       nop 0
+       (p7) br.cond.dpnt .L66
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 6, r14
+       nop 0
+       (p7) br.cond.dpnt .L66
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 7, r14
+       nop 0
+       (p7) br.cond.dpnt .L67
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 8, r14
+       nop 0
+       (p7) br.cond.dpnt .L67
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 9, r14
+       ;;
+       nop 0
+       .mfb
+       cmp4.ne.and.orcm p6, p7 = 11, r14
+       nop 0
+       (p7) br.cond.dptk .L69
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 10, r14
+       ;;
+       nop 0
+       .mfb
+       cmp4.ne.and.orcm p6, p7 = 12, r14
+       nop 0
+       (p7) br.cond.dptk .L69
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 15, r14
+       nop 0
+       (p7) br.cond.dpnt .L69
+       ;;
+       .mib
+       nop 0
+       cmp4.ne p6, p7 = 16, r14
+       (p6) br.cond.dptk .L18
+       .mmi
+       ld4 r14 = [r32]
+       ;;
+       nop 0
+       tbit.z p6, p7 = r14, 9
+       .mfb
+       adds r14 = 32, r32
+       nop 0
+       (p6) br.cond.dpnt .L18
+       ;;
+       .mmi
+       ld8 r19 = [r14]
+       ;;
+       adds r14 = -1, r19
+       nop 0
+       ;;
+       .mib
+       cmp.ltu p6, p7 = 31, r14
+       adds r14 = 16, r32
+       (p6) br.cond.dpnt .L18
+       ;;
+       .mii
+       ld8 r14 = [r14]
+       cmp.ltu p6, p7 = 8, r19
+       ;;
+       and r17 = 7, r14
+       .mii
+       nop 0
+       and r27 = -8, r14
+       ;;
+       nop 0
+       .mfb
+       add r23 = r19, r17
+       nop 0
+       (p6) br.cond.dptk .L47
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 8, r23
+       (p6) br.cond.dptk .L49
+       .mmi
+       shladd r15 = r23, 3, r0
+       addl r14 = 2, r0
+       shladd r18 = r17, 3, r0
+       .mmi
+       ld8 r17 = [r27]
+       ;;
+       adds r15 = -1, r15
+       nop 0
+       ;;
+       .mii
+       nop 0
+       sxt4 r15 = r15
+       ;;
+       shl r14 = r14, r15
+       .mii
+       addl r15 = 1, r0
+       shl r16 = r8, r18
+       ;;
+       shl r15 = r15, r18
+       .mii
+       nop 0
+       xor r16 = r16, r17
+       ;;
+       sub r14 = r14, r15
+       ;;
+       .mmi
+       and r14 = r16, r14
+       ;;
+       xor r17 = r14, r17
+       nop 0
+       ;;
+       .mfb
+       st8 [r27] = r17
+       nop 0
+       nop 0
+.L18:
+       .mfi
+       mov r8 = r0
+       nop 0
+       mov b0 = r34
+       .mmi
+       nop 0
+       .label_state 1
+       .restore sp
+       mov r12 = r36
+       mov ar.pfs = r35
+       .mib
+       nop 0
+       mov ar.lc = r38
+       br.ret.sptk.many b0
+.L71:
+       .body
+       .copy_state 1
+       .mfi
+       adds r14 = 88, r32
+       nop 0
+       cmp4.ge p6, p7 = 3, r18
+       ;;
+       .mfb
+       ldfd f10 = [r14]
+       nop 0
+       (p6) br.cond.dptk .L7
+       .mfi
+       adds r14 = 96, r32
+       nop 0
+       cmp4.ge p6, p7 = 4, r18
+       ;;
+       .mfb
+       ldfd f11 = [r14]
+       nop 0
+       (p6) br.cond.dptk .L7
+       .mfi
+       adds r14 = 104, r32
+       nop 0
+       cmp4.ge p6, p7 = 5, r18
+       ;;
+       .mfb
+       ldfd f12 = [r14]
+       nop 0
+       (p6) br.cond.dptk .L7
+       .mfi
+       adds r14 = 112, r32
+       nop 0
+       cmp4.ge p6, p7 = 6, r18
+       ;;
+       .mfb
+       ldfd f13 = [r14]
+       nop 0
+       (p6) br.cond.dptk .L7
+       .mii
+       adds r14 = 120, r32
+       cmp4.ge p6, p7 = 7, r18
+       ;;
+       nop 0
+       .mii
+       ldfd f14 = [r14]
+       (p7) adds r14 = 128, r32
+       ;;
+       nop 0
+       .mmb
+       (p7) ldfd f15 = [r14]
+       cmp4.ne p6, p7 = 13, r15
+       (p6) br.cond.dptk .L16
+.L72:
+       .mmb
+       adds r16 = 8, r32
+       adds r15 = 16, r32
+       nop 0
+       .mfi
+       ld8 r14 = [r20]
+       nop 0
+       mov ar.lc = r38
+       ;;
+       .mmi
+       ld8 r33 = [r15]
+       ld8 r15 = [r16]
+       adds r17 = 8, r14
+       .mmi
+       adds r18 = 16, r14
+       adds r19 = 24, r14
+       adds r20 = 32, r14
+       .mmi
+       adds r21 = 40, r14
+       adds r22 = 48, r14
+       adds r23 = 56, r14
+       .mii
+       ld8 r39 = [r14]
+       nop 0
+       ;;
+       nop 0
+       .mmb
+       ld8 r14 = [r15], 8
+       ld8 r40 = [r17]
+       nop 0
+       ;;
+       .mmi
+       ld8 r1 = [r15]
+       ld8 r41 = [r18]
+       mov b6 = r14
+       .mmb
+       ld8 r42 = [r19]
+       ld8 r43 = [r20]
+       nop 0
+       .mmb
+       ld8 r44 = [r21]
+       ld8 r45 = [r22]
+       nop 0
+       .mbb
+       ld8 r46 = [r23]
+       nop 0
+       br.call.sptk.many b0 = b6
+       ;;
+       .mmb
+       .label_state 2
+       .restore sp
+       mov r12 = r36
+       mov r8 = r0
+       nop 0
+       .mmi
+       mov r1 = r37
+       stfs [r33] = f8
+       mov b0 = r34
+       .mib
+       nop 0
+       mov ar.pfs = r35
+       br.ret.sptk.many b0
+       ;;
+.L69:
+       .body
+       .copy_state 2
+       .mmi
+       adds r14 = 16, r32
+       mov r8 = r0
+       mov b0 = r34
+       .mmi
+       .label_state 3
+       .restore sp
+       mov r12 = r36
+       ;;
+       ld8 r14 = [r14]
+       mov ar.pfs = r35
+       .mii
+       nop 0
+       mov ar.lc = r38
+       ;;
+       nop 0
+       .mfb
+       st8 [r14] = r28
+       nop 0
+       br.ret.sptk.many b0
+.L73:
+       .body
+       .copy_state 3
+       .mmb
+       adds r16 = 8, r32
+       adds r15 = 16, r32
+       nop 0
+       .mfi
+       ld8 r14 = [r20]
+       nop 0
+       mov ar.lc = r38
+       ;;
+       .mmi
+       ld8 r33 = [r15]
+       ld8 r15 = [r16]
+       adds r17 = 8, r14
+       .mmi
+       adds r18 = 16, r14
+       adds r19 = 24, r14
+       adds r20 = 32, r14
+       .mmi
+       adds r21 = 40, r14
+       adds r22 = 48, r14
+       adds r23 = 56, r14
+       .mii
+       ld8 r39 = [r14]
+       nop 0
+       ;;
+       nop 0
+       .mmb
+       ld8 r14 = [r15], 8
+       ld8 r40 = [r17]
+       nop 0
+       ;;
+       .mmi
+       ld8 r1 = [r15]
+       ld8 r41 = [r18]
+       mov b6 = r14
+       .mmb
+       ld8 r42 = [r19]
+       ld8 r43 = [r20]
+       nop 0
+       .mmb
+       ld8 r44 = [r21]
+       ld8 r45 = [r22]
+       nop 0
+       .mbb
+       ld8 r46 = [r23]
+       nop 0
+       br.call.sptk.many b0 = b6
+       ;;
+       .mmb
+       .label_state 4
+       .restore sp
+       mov r12 = r36
+       mov r8 = r0
+       nop 0
+       .mmi
+       mov r1 = r37
+       stfd [r33] = f8
+       mov b0 = r34
+       .mib
+       nop 0
+       mov ar.pfs = r35
+       br.ret.sptk.many b0
+       ;;
+.L65:
+       .body
+       .copy_state 4
+       .mmi
+       adds r14 = 16, r32
+       mov r8 = r0
+       mov b0 = r34
+       .mmi
+       .label_state 5
+       .restore sp
+       mov r12 = r36
+       ;;
+       ld8 r14 = [r14]
+       mov ar.pfs = r35
+       .mii
+       nop 0
+       mov ar.lc = r38
+       ;;
+       nop 0
+       .mfb
+       st1 [r14] = r28
+       nop 0
+       br.ret.sptk.many b0
+.L66:
+       .body
+       .copy_state 5
+       .mmi
+       adds r14 = 16, r32
+       mov r8 = r0
+       mov b0 = r34
+       .mmi
+       .label_state 6
+       .restore sp
+       mov r12 = r36
+       ;;
+       ld8 r14 = [r14]
+       mov ar.pfs = r35
+       .mii
+       nop 0
+       mov ar.lc = r38
+       ;;
+       nop 0
+       .mfb
+       st2 [r14] = r28
+       nop 0
+       br.ret.sptk.many b0
+.L67:
+       .body
+       .copy_state 6
+       .mmi
+       adds r14 = 16, r32
+       mov r8 = r0
+       mov b0 = r34
+       .mmi
+       .label_state 7
+       .restore sp
+       mov r12 = r36
+       ;;
+       ld8 r14 = [r14]
+       mov ar.pfs = r35
+       .mii
+       nop 0
+       mov ar.lc = r38
+       ;;
+       nop 0
+       .mfb
+       st4 [r14] = r28
+       nop 0
+       br.ret.sptk.many b0
+.L47:
+       .body
+       .copy_state 7
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 16, r19
+       (p6) br.cond.dptk .L51
+       ;;
+       .mfi
+       shladd r20 = r17, 3, r0
+       nop 0
+       addl r14 = -1, r0
+       .mii
+       ld8 r16 = [r27]
+       cmp.ltu p6, p7 = 16, r23
+       ;;
+       nop 0
+       .mii
+       mov r19 = r20
+       shl r15 = r8, r20
+       shl r14 = r14, r20
+       ;;
+       .mmi
+       xor r15 = r15, r16
+       ;;
+       and r14 = r15, r14
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r16 = r14, r16
+       ;;
+       nop 0
+       .mfb
+       st8 [r27] = r16
+       nop 0
+       (p6) br.cond.dptk .L53
+       .mmi
+       shladd r17 = r17, 2, r0
+       shladd r16 = r23, 3, r0
+       addl r15 = 2, r0
+       .mmi
+       adds r19 = 8, r27
+       .label_state 8
+       .restore sp
+       mov r12 = r36
+       shl r20 = r9, r20
+       ;;
+       .mmb
+       sub r17 = 32, r17
+       adds r16 = -65, r16
+       nop 0
+       .mii
+       ld8 r18 = [r19]
+       mov b0 = r34
+       mov ar.pfs = r35
+       ;;
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       sxt4 r17 = r17
+       .mib
+       nop 0
+       mov ar.lc = r38
+       nop 0
+       ;;
+       .mii
+       nop 0
+       shr r14 = r8, r17
+       shl r15 = r15, r16
+       .mmi
+       mov r8 = r0
+       ;;
+       nop 0
+       shr r14 = r14, r17
+       .mii
+       nop 0
+       adds r15 = -1, r15
+       ;;
+       or r14 = r20, r14
+       ;;
+       .mii
+       nop 0
+       xor r14 = r14, r18
+       ;;
+       and r15 = r14, r15
+       ;;
+       .mii
+       nop 0
+       xor r18 = r15, r18
+       ;;
+       nop 0
+       .mfb
+       st8 [r19] = r18
+       nop 0
+       br.ret.sptk.many b0
+.L49:
+       .body
+       .copy_state 8
+       .mmi
+       shladd r14 = r23, 3, r0
+       addl r15 = 2, r0
+       mov b0 = r34
+       .mmi
+       shladd r18 = r17, 3, r0
+       ld8 r19 = [r27]
+       .label_state 9
+       .restore sp
+       mov r12 = r36
+       ;;
+       .mmi
+       adds r14 = -65, r14
+       sub r16 = 64, r18
+       mov ar.pfs = r35
+       .mii
+       nop 0
+       mov ar.lc = r38
+       ;;
+       sxt4 r14 = r14
+       .mii
+       nop 0
+       shl r17 = r8, r18
+       ;;
+       shl r15 = r15, r14
+       .mii
+       addl r14 = -1, r0
+       sxt4 r16 = r16
+       ;;
+       shr r16 = r8, r16
+       .mii
+       mov r8 = r0
+       xor r17 = r17, r19
+       shl r14 = r14, r18
+       .mii
+       nop 0
+       adds r15 = -1, r15
+       ;;
+       and r14 = r17, r14
+       ;;
+       .mmi
+       xor r19 = r14, r19
+       ;;
+       st8 [r27] = r19, 8
+       nop 0
+       ;;
+       .mmi
+       ld8 r14 = [r27]
+       ;;
+       xor r16 = r16, r14
+       nop 0
+       ;;
+       .mmi
+       and r15 = r16, r15
+       ;;
+       xor r14 = r15, r14
+       nop 0
+       ;;
+       .mfb
+       st8 [r27] = r14
+       nop 0
+       br.ret.sptk.many b0
+.L53:
+       .body
+       .copy_state 9
+       .mmi
+       shladd r15 = r23, 3, r0
+       addl r14 = 2, r0
+       sub r17 = 64, r20
+       .mmi
+       adds r21 = 16, r27
+       adds r20 = 8, r27
+       shl r19 = r9, r19
+       ;;
+       .mii
+       adds r15 = -129, r15
+       mov b0 = r34
+       sxt4 r17 = r17
+       .mmi
+       .label_state 10
+       .restore sp
+       mov r12 = r36
+       nop 0
+       mov ar.pfs = r35
+       ;;
+       .mii
+       nop 0
+       shr r18 = r9, r17
+       sxt4 r15 = r15
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r15
+       shr r16 = r8, r17
+       .mmi
+       ld8 r15 = [r21]
+       mov r8 = r0
+       mov ar.lc = r38
+       ;;
+       .mii
+       xor r18 = r18, r15
+       adds r14 = -1, r14
+       or r16 = r19, r16
+       ;;
+       .mmb
+       and r14 = r18, r14
+       st8 [r20] = r16
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r15 = r14, r15
+       ;;
+       nop 0
+       .mfb
+       st8 [r21] = r15
+       nop 0
+       br.ret.sptk.many b0
+.L51:
+       .body
+       .copy_state 10
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 24, r19
+       (p6) br.cond.dptk .L55
+       ;;
+       .mfi
+       shladd r19 = r17, 3, r0
+       nop 0
+       addl r14 = -1, r0
+       .mii
+       ld8 r16 = [r27]
+       cmp.ltu p6, p7 = 24, r23
+       ;;
+       nop 0
+       .mii
+       mov r29 = r19
+       shl r15 = r8, r19
+       shl r14 = r14, r19
+       ;;
+       .mmi
+       xor r15 = r15, r16
+       ;;
+       and r14 = r15, r14
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r16 = r14, r16
+       ;;
+       nop 0
+       .mfb
+       st8 [r27] = r16
+       nop 0
+       (p6) br.cond.dptk .L57
+       .mmi
+       shladd r14 = r17, 2, r0
+       shladd r18 = r23, 3, r0
+       addl r16 = 2, r0
+       .mmi
+       adds r22 = 16, r27
+       adds r20 = 8, r27
+       shl r21 = r10, r29
+       ;;
+       .mmi
+       sub r14 = 32, r14
+       adds r18 = -65, r18
+       mov b0 = r34
+       .mii
+       .label_state 11
+       .restore sp
+       mov r12 = r36
+       shl r19 = r9, r29
+       mov ar.pfs = r35
+       ;;
+       .mii
+       nop 0
+       sxt4 r18 = r18
+       sxt4 r14 = r14
+       .mib
+       nop 0
+       mov ar.lc = r38
+       nop 0
+       ;;
+       .mii
+       nop 0
+       shr r15 = r9, r14
+       shr r17 = r8, r14
+       .mii
+       mov r8 = r0
+       nop 0
+       shl r16 = r16, r18
+       ;;
+       .mii
+       nop 0
+       shr r15 = r15, r14
+       shr r17 = r17, r14
+       .mii
+       ld8 r14 = [r22]
+       nop 0
+       adds r16 = -1, r16
+       ;;
+       .mii
+       or r15 = r21, r15
+       or r17 = r19, r17
+       ;;
+       xor r15 = r15, r14
+       .mmi
+       st8 [r20] = r17
+       ;;
+       and r16 = r15, r16
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r14 = r16, r14
+       ;;
+       nop 0
+       .mfb
+       st8 [r22] = r14
+       nop 0
+       br.ret.sptk.many b0
+.L55:
+       .body
+       .copy_state 11
+       .mfi
+       shladd r18 = r17, 3, r0
+       nop 0
+       addl r14 = -1, r0
+       .mii
+       ld8 r16 = [r27]
+       cmp.ltu p6, p7 = 32, r23
+       ;;
+       nop 0
+       .mii
+       mov r29 = r18
+       shl r15 = r8, r18
+       shl r14 = r14, r18
+       ;;
+       .mmi
+       xor r15 = r15, r16
+       ;;
+       and r14 = r15, r14
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r16 = r14, r16
+       ;;
+       nop 0
+       .mfb
+       st8 [r27] = r16
+       nop 0
+       (p6) br.cond.dptk .L59
+       .mmi
+       shladd r14 = r17, 2, r0
+       addl r15 = 2, r0
+       shl r20 = r10, r18
+       .mmi
+       shladd r18 = r23, 3, r0
+       adds r23 = 24, r27
+       shl r19 = r9, r29
+       ;;
+       .mmi
+       sub r14 = 32, r14
+       adds r18 = -65, r18
+       mov b0 = r34
+       .mmi
+       adds r21 = 8, r27
+       adds r22 = 16, r27
+       .label_state 12
+       .restore sp
+       mov r12 = r36
+       .mii
+       nop 0
+       mov ar.pfs = r35
+       ;;
+       sxt4 r18 = r18
+       .mii
+       nop 0
+       sxt4 r14 = r14
+       mov ar.lc = r38
+       ;;
+       .mii
+       nop 0
+       shr r16 = r8, r14
+       shr r17 = r9, r14
+       .mii
+       mov r8 = r0
+       nop 0
+       shl r15 = r15, r18
+       ;;
+       .mii
+       nop 0
+       shr r16 = r16, r14
+       shr r17 = r17, r14
+       .mii
+       ld8 r14 = [r23]
+       adds r15 = -1, r15
+       ;;
+       or r16 = r19, r16
+       .mmi
+       or r17 = r20, r17
+       ;;
+       st8 [r21] = r16
+       xor r16 = r14, r16
+       .mmi
+       st8 [r22] = r17
+       ;;
+       and r15 = r16, r15
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r14 = r15, r14
+       ;;
+       nop 0
+       .mfb
+       st8 [r23] = r14
+       nop 0
+       br.ret.sptk.many b0
+.L57:
+       .body
+       .copy_state 12
+       .mmi
+       shladd r14 = r23, 3, r0
+       addl r15 = 2, r0
+       sub r16 = 64, r19
+       .mmi
+       adds r24 = 24, r27
+       adds r22 = 8, r27
+       shl r21 = r10, r29
+       ;;
+       .mii
+       adds r14 = -129, r14
+       sxt4 r16 = r16
+       shl r20 = r9, r29
+       .mmi
+       adds r23 = 16, r27
+       .label_state 13
+       .restore sp
+       mov r12 = r36
+       mov b0 = r34
+       ;;
+       .mii
+       nop 0
+       shr r18 = r10, r16
+       sxt4 r14 = r14
+       ;;
+       .mii
+       nop 0
+       shl r15 = r15, r14
+       shr r19 = r8, r16
+       .mmi
+       ld8 r14 = [r24]
+       mov r8 = r0
+       mov ar.pfs = r35
+       .mib
+       nop 0
+       shr r17 = r9, r16
+       nop 0
+       ;;
+       .mii
+       xor r18 = r18, r14
+       mov ar.lc = r38
+       adds r15 = -1, r15
+       .mmi
+       or r19 = r20, r19
+       ;;
+       and r15 = r18, r15
+       or r17 = r21, r17
+       .mii
+       st8 [r22] = r19
+       nop 0
+       ;;
+       xor r14 = r15, r14
+       .mmb
+       nop 0
+       st8 [r23] = r17
+       nop 0
+       ;;
+       .mfb
+       st8 [r24] = r14
+       nop 0
+       br.ret.sptk.many b0
+.L59:
+       .body
+       .copy_state 13
+       .mmi
+       shladd r16 = r23, 3, r0
+       addl r15 = 2, r0
+       sub r14 = 64, r18
+       .mmi
+       adds r24 = 8, r27
+       adds r25 = 16, r27
+       adds r26 = 24, r27
+       ;;
+       .mmi
+       nop 0
+       adds r16 = -129, r16
+       sxt4 r14 = r14
+       .mmi
+       adds r27 = 32, r27
+       .restore sp
+       mov r12 = r36
+       shl r23 = r11, r29
+       ;;
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       shr r22 = r11, r14
+       ;;
+       .mii
+       nop 0
+       shl r15 = r15, r16
+       shr r17 = r8, r14
+       .mii
+       mov r8 = r0
+       shr r18 = r9, r14
+       shr r19 = r10, r14
+       .mii
+       ld8 r14 = [r27]
+       shl r20 = r9, r29
+       shl r21 = r10, r29
+       ;;
+       .mmi
+       xor r22 = r22, r14
+       adds r15 = -1, r15
+       mov b0 = r34
+       ;;
+       .mmi
+       and r15 = r22, r15
+       or r19 = r23, r19
+       mov ar.pfs = r35
+       .mmi
+       or r17 = r20, r17
+       or r18 = r21, r18
+       mov ar.lc = r38
+       ;;
+       .mmb
+       xor r14 = r15, r14
+       st8 [r24] = r17
+       nop 0
+       .mmb
+       st8 [r25] = r18
+       st8 [r26] = r19
+       nop 0
+       ;;
+       .mfb
+       st8 [r27] = r14
+       nop 0
+       br.ret.sptk.many b0
+       .endp avcall_call#
+       .ident  "GCC: (GNU) 4.0.1"
diff --git a/avcall/avcall-ia64-macro.S b/avcall/avcall-ia64-macro.S
new file mode 100644 (file)
index 0000000..e0da01a
--- /dev/null
@@ -0,0 +1,1177 @@
+       .file   "avcall-ia64.c"
+       .pred.safe_across_calls p1-p5,p16-p63
+       .text
+       .align 16
+       .global avcall_call#
+       .proc avcall_call#
+avcall_call:
+       .prologue 14, 34
+       .mmi
+       .save ar.pfs, r35
+       alloc r35 = ar.pfs, 1, 6, 8, 0
+       adds r14 = 40, r32
+       adds r20 = 48, r32
+       .mmi
+       adds r16 = 64, r32
+       adds r21 = 72, r32
+       adds r19 = -2032, r12
+       ;;
+       .mmb
+       ld8 r15 = [r14]
+       ld8 r17 = [r20]
+       nop 0
+       .mii
+       .vframe r36
+       mov r36 = r12
+       .save ar.lc, r38
+       mov r38 = ar.lc
+       mov r37 = r1
+       ;;
+       .mmi
+       sub r15 = r15, r17
+       ld8 r14 = [r16]
+       .save rp, r34
+       mov r34 = b0
+       .body
+       .mmi
+       nop 0
+       ;;
+       nop 0
+       shr.u r15 = r15, 3
+       .mmi
+       sub r14 = r14, r21
+       ;;
+       nop 0
+       shr.u r18 = r14, 3
+       .mmb
+       nop 0
+       cmp4.ge p6, p7 = 8, r15
+       (p6) br.cond.dptk .L2
+       .mii
+       sub r14 = 8, r15
+       addl r16 = 8, r0
+       ;;
+       andcm r14 = -1, r14
+       ;;
+       .mii
+       nop 0
+       addp4 r14 = r14, r0
+       ;;
+       mov ar.lc = r14
+.L4:
+       .mii
+       nop 0
+       sxt4 r14 = r16
+       adds r16 = 1, r16
+       ;;
+       .mmi
+       shladd r14 = r14, 3, r0
+       ;;
+       add r15 = r17, r14
+       add r14 = r19, r14
+       ;;
+       .mmb
+       adds r14 = -64, r14
+       ld8 r15 = [r15]
+       nop 0
+       ;;
+       .mfb
+       st8 [r14] = r15
+       nop 0
+       br.cloop.sptk.few .L4
+.L2:
+       .mmi
+       adds r33 = 24, r32
+       ;;
+       ld4 r15 = [r33]
+       nop 0
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 16, r15
+       ;;
+       (p7) adds r14 = 16, r32
+       ;;
+       .mfi
+       (p7) ld8 r8 = [r14]
+       nop 0
+       cmp4.ge p6, p7 = 0, r18
+       .mfb
+       adds r14 = 80, r32
+       nop 0
+       (p6) br.cond.dpnt .L7
+       ;;
+       .mmb
+       nop 0
+       cmp4.ge p6, p7 = 1, r18
+       nop 0
+       .mfb
+       ldfd f8 = [r21]
+       nop 0
+       (p6) br.cond.dpnt .L7
+       ;;
+       .mmb
+       nop 0
+       cmp4.ge p6, p7 = 2, r18
+       nop 0
+       .mfb
+       ldfd f9 = [r14]
+       nop 0
+       (p7) br.cond.dptk .L71
+       ;;
+.L7:
+       .mib
+       nop 0
+       cmp4.ne p6, p7 = 13, r15
+       (p7) br.cond.dpnt .L72
+       ;;
+.L16:
+       .mib
+       cmp4.ne p6, p7 = 14, r15
+       adds r15 = 8, r32
+       (p7) br.cond.dpnt .L73
+       .mmb
+       nop 0
+       ld8 r14 = [r20]
+       nop 0
+       ;;
+       .mmi
+       ld8 r15 = [r15]
+       adds r16 = 8, r14
+       adds r17 = 16, r14
+       .mmi
+       adds r18 = 24, r14
+       adds r19 = 32, r14
+       adds r20 = 40, r14
+       .mmi
+       nop 0
+       adds r21 = 48, r14
+       adds r22 = 56, r14
+       .mmi
+       ld8 r39 = [r14]
+       ;;
+       ld8 r14 = [r15], 8
+       nop 0
+       .mii
+       ld8 r40 = [r16]
+       nop 0
+       ;;
+       mov b6 = r14
+       .mmb
+       ld8 r1 = [r15]
+       ld8 r41 = [r17]
+       nop 0
+       .mmb
+       ld8 r42 = [r18]
+       ld8 r43 = [r19]
+       nop 0
+       .mmb
+       ld8 r44 = [r20]
+       ld8 r45 = [r21]
+       nop 0
+       .mbb
+       ld8 r46 = [r22]
+       nop 0
+       br.call.sptk.many b0 = b6
+       ;;
+       .mmi
+       mov r1 = r37
+       ld4 r14 = [r33]
+       mov r28 = r8
+       ;;
+       .mfb
+       cmp4.eq p6, p7 = 1, r14
+       nop 0
+       (p6) br.cond.dpnt .L18
+       ;;
+       .mib
+       nop 0
+       cmp4.ne p6, p7 = 0, r14
+       (p7) br.cond.dptk .L69
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 2, r14
+       nop 0
+       (p7) br.cond.dpnt .L65
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 3, r14
+       nop 0
+       (p7) br.cond.dpnt .L65
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 4, r14
+       nop 0
+       (p7) br.cond.dpnt .L65
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 5, r14
+       nop 0
+       (p7) br.cond.dpnt .L66
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 6, r14
+       nop 0
+       (p7) br.cond.dpnt .L66
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 7, r14
+       nop 0
+       (p7) br.cond.dpnt .L67
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 8, r14
+       nop 0
+       (p7) br.cond.dpnt .L67
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 9, r14
+       ;;
+       nop 0
+       .mfb
+       cmp4.ne.and.orcm p6, p7 = 11, r14
+       nop 0
+       (p7) br.cond.dptk .L69
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 10, r14
+       ;;
+       nop 0
+       .mfb
+       cmp4.ne.and.orcm p6, p7 = 12, r14
+       nop 0
+       (p7) br.cond.dptk .L69
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 15, r14
+       nop 0
+       (p7) br.cond.dpnt .L69
+       ;;
+       .mib
+       nop 0
+       cmp4.ne p6, p7 = 16, r14
+       (p6) br.cond.dptk .L18
+       .mmi
+       ld4 r14 = [r32]
+       ;;
+       nop 0
+       tbit.z p6, p7 = r14, 9
+       .mfb
+       adds r14 = 32, r32
+       nop 0
+       (p6) br.cond.dpnt .L18
+       ;;
+       .mmi
+       ld8 r19 = [r14]
+       ;;
+       adds r14 = -1, r19
+       nop 0
+       ;;
+       .mib
+       cmp.ltu p6, p7 = 31, r14
+       adds r14 = 16, r32
+       (p6) br.cond.dpnt .L18
+       ;;
+       .mii
+       ld8 r14 = [r14]
+       cmp.ltu p6, p7 = 8, r19
+       ;;
+       and r17 = 7, r14
+       .mii
+       nop 0
+       and r27 = -8, r14
+       ;;
+       nop 0
+       .mfb
+       add r23 = r19, r17
+       nop 0
+       (p6) br.cond.dptk .L47
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 8, r23
+       (p6) br.cond.dptk .L49
+       .mmi
+       shladd r15 = r23, 3, r0
+       addl r14 = 2, r0
+       shladd r18 = r17, 3, r0
+       .mmi
+       ld8 r17 = [r27]
+       ;;
+       adds r15 = -1, r15
+       nop 0
+       ;;
+       .mii
+       nop 0
+       sxt4 r15 = r15
+       ;;
+       shl r14 = r14, r15
+       .mii
+       addl r15 = 1, r0
+       shl r16 = r8, r18
+       ;;
+       shl r15 = r15, r18
+       .mii
+       nop 0
+       xor r16 = r16, r17
+       ;;
+       sub r14 = r14, r15
+       ;;
+       .mmi
+       and r14 = r16, r14
+       ;;
+       xor r17 = r14, r17
+       nop 0
+       ;;
+       .mfb
+       st8 [r27] = r17
+       nop 0
+       nop 0
+.L18:
+       .mfi
+       mov r8 = r0
+       nop 0
+       mov b0 = r34
+       .mmi
+       nop 0
+       .label_state 1
+       .restore sp
+       mov r12 = r36
+       mov ar.pfs = r35
+       .mib
+       nop 0
+       mov ar.lc = r38
+       br.ret.sptk.many b0
+.L71:
+       .body
+       .copy_state 1
+       .mfi
+       adds r14 = 88, r32
+       nop 0
+       cmp4.ge p6, p7 = 3, r18
+       ;;
+       .mfb
+       ldfd f10 = [r14]
+       nop 0
+       (p6) br.cond.dptk .L7
+       .mfi
+       adds r14 = 96, r32
+       nop 0
+       cmp4.ge p6, p7 = 4, r18
+       ;;
+       .mfb
+       ldfd f11 = [r14]
+       nop 0
+       (p6) br.cond.dptk .L7
+       .mfi
+       adds r14 = 104, r32
+       nop 0
+       cmp4.ge p6, p7 = 5, r18
+       ;;
+       .mfb
+       ldfd f12 = [r14]
+       nop 0
+       (p6) br.cond.dptk .L7
+       .mfi
+       adds r14 = 112, r32
+       nop 0
+       cmp4.ge p6, p7 = 6, r18
+       ;;
+       .mfb
+       ldfd f13 = [r14]
+       nop 0
+       (p6) br.cond.dptk .L7
+       .mii
+       adds r14 = 120, r32
+       cmp4.ge p6, p7 = 7, r18
+       ;;
+       nop 0
+       .mii
+       ldfd f14 = [r14]
+       (p7) adds r14 = 128, r32
+       ;;
+       nop 0
+       .mmb
+       (p7) ldfd f15 = [r14]
+       cmp4.ne p6, p7 = 13, r15
+       (p6) br.cond.dptk .L16
+.L72:
+       .mmb
+       adds r16 = 8, r32
+       adds r15 = 16, r32
+       nop 0
+       .mfi
+       ld8 r14 = [r20]
+       nop 0
+       mov ar.lc = r38
+       ;;
+       .mmi
+       ld8 r33 = [r15]
+       ld8 r15 = [r16]
+       adds r17 = 8, r14
+       .mmi
+       adds r18 = 16, r14
+       adds r19 = 24, r14
+       adds r20 = 32, r14
+       .mmi
+       adds r21 = 40, r14
+       adds r22 = 48, r14
+       adds r23 = 56, r14
+       .mii
+       ld8 r39 = [r14]
+       nop 0
+       ;;
+       nop 0
+       .mmb
+       ld8 r14 = [r15], 8
+       ld8 r40 = [r17]
+       nop 0
+       ;;
+       .mmi
+       ld8 r1 = [r15]
+       ld8 r41 = [r18]
+       mov b6 = r14
+       .mmb
+       ld8 r42 = [r19]
+       ld8 r43 = [r20]
+       nop 0
+       .mmb
+       ld8 r44 = [r21]
+       ld8 r45 = [r22]
+       nop 0
+       .mbb
+       ld8 r46 = [r23]
+       nop 0
+       br.call.sptk.many b0 = b6
+       ;;
+       .mmb
+       .label_state 2
+       .restore sp
+       mov r12 = r36
+       mov r8 = r0
+       nop 0
+       .mmi
+       mov r1 = r37
+       stfs [r33] = f8
+       mov b0 = r34
+       .mib
+       nop 0
+       mov ar.pfs = r35
+       br.ret.sptk.many b0
+       ;;
+.L69:
+       .body
+       .copy_state 2
+       .mmi
+       adds r14 = 16, r32
+       mov r8 = r0
+       mov b0 = r34
+       .mmi
+       .label_state 3
+       .restore sp
+       mov r12 = r36
+       ;;
+       ld8 r14 = [r14]
+       mov ar.pfs = r35
+       .mii
+       nop 0
+       mov ar.lc = r38
+       ;;
+       nop 0
+       .mfb
+       st8 [r14] = r28
+       nop 0
+       br.ret.sptk.many b0
+.L73:
+       .body
+       .copy_state 3
+       .mmb
+       adds r16 = 8, r32
+       adds r15 = 16, r32
+       nop 0
+       .mfi
+       ld8 r14 = [r20]
+       nop 0
+       mov ar.lc = r38
+       ;;
+       .mmi
+       ld8 r33 = [r15]
+       ld8 r15 = [r16]
+       adds r17 = 8, r14
+       .mmi
+       adds r18 = 16, r14
+       adds r19 = 24, r14
+       adds r20 = 32, r14
+       .mmi
+       adds r21 = 40, r14
+       adds r22 = 48, r14
+       adds r23 = 56, r14
+       .mii
+       ld8 r39 = [r14]
+       nop 0
+       ;;
+       nop 0
+       .mmb
+       ld8 r14 = [r15], 8
+       ld8 r40 = [r17]
+       nop 0
+       ;;
+       .mmi
+       ld8 r1 = [r15]
+       ld8 r41 = [r18]
+       mov b6 = r14
+       .mmb
+       ld8 r42 = [r19]
+       ld8 r43 = [r20]
+       nop 0
+       .mmb
+       ld8 r44 = [r21]
+       ld8 r45 = [r22]
+       nop 0
+       .mbb
+       ld8 r46 = [r23]
+       nop 0
+       br.call.sptk.many b0 = b6
+       ;;
+       .mmb
+       .label_state 4
+       .restore sp
+       mov r12 = r36
+       mov r8 = r0
+       nop 0
+       .mmi
+       mov r1 = r37
+       stfd [r33] = f8
+       mov b0 = r34
+       .mib
+       nop 0
+       mov ar.pfs = r35
+       br.ret.sptk.many b0
+       ;;
+.L65:
+       .body
+       .copy_state 4
+       .mmi
+       adds r14 = 16, r32
+       mov r8 = r0
+       mov b0 = r34
+       .mmi
+       .label_state 5
+       .restore sp
+       mov r12 = r36
+       ;;
+       ld8 r14 = [r14]
+       mov ar.pfs = r35
+       .mii
+       nop 0
+       mov ar.lc = r38
+       ;;
+       nop 0
+       .mfb
+       st1 [r14] = r28
+       nop 0
+       br.ret.sptk.many b0
+.L66:
+       .body
+       .copy_state 5
+       .mmi
+       adds r14 = 16, r32
+       mov r8 = r0
+       mov b0 = r34
+       .mmi
+       .label_state 6
+       .restore sp
+       mov r12 = r36
+       ;;
+       ld8 r14 = [r14]
+       mov ar.pfs = r35
+       .mii
+       nop 0
+       mov ar.lc = r38
+       ;;
+       nop 0
+       .mfb
+       st2 [r14] = r28
+       nop 0
+       br.ret.sptk.many b0
+.L67:
+       .body
+       .copy_state 6
+       .mmi
+       adds r14 = 16, r32
+       mov r8 = r0
+       mov b0 = r34
+       .mmi
+       .label_state 7
+       .restore sp
+       mov r12 = r36
+       ;;
+       ld8 r14 = [r14]
+       mov ar.pfs = r35
+       .mii
+       nop 0
+       mov ar.lc = r38
+       ;;
+       nop 0
+       .mfb
+       st4 [r14] = r28
+       nop 0
+       br.ret.sptk.many b0
+.L47:
+       .body
+       .copy_state 7
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 16, r19
+       (p6) br.cond.dptk .L51
+       ;;
+       .mfi
+       shladd r20 = r17, 3, r0
+       nop 0
+       addl r14 = -1, r0
+       .mii
+       ld8 r16 = [r27]
+       cmp.ltu p6, p7 = 16, r23
+       ;;
+       nop 0
+       .mii
+       mov r19 = r20
+       shl r15 = r8, r20
+       shl r14 = r14, r20
+       ;;
+       .mmi
+       xor r15 = r15, r16
+       ;;
+       and r14 = r15, r14
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r16 = r14, r16
+       ;;
+       nop 0
+       .mfb
+       st8 [r27] = r16
+       nop 0
+       (p6) br.cond.dptk .L53
+       .mmi
+       shladd r17 = r17, 2, r0
+       shladd r16 = r23, 3, r0
+       addl r15 = 2, r0
+       .mmi
+       adds r19 = 8, r27
+       .label_state 8
+       .restore sp
+       mov r12 = r36
+       shl r20 = r9, r20
+       ;;
+       .mmb
+       sub r17 = 32, r17
+       adds r16 = -65, r16
+       nop 0
+       .mii
+       ld8 r18 = [r19]
+       mov b0 = r34
+       mov ar.pfs = r35
+       ;;
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       sxt4 r17 = r17
+       .mib
+       nop 0
+       mov ar.lc = r38
+       nop 0
+       ;;
+       .mii
+       nop 0
+       shr r14 = r8, r17
+       shl r15 = r15, r16
+       .mmi
+       mov r8 = r0
+       ;;
+       nop 0
+       shr r14 = r14, r17
+       .mii
+       nop 0
+       adds r15 = -1, r15
+       ;;
+       or r14 = r20, r14
+       ;;
+       .mii
+       nop 0
+       xor r14 = r14, r18
+       ;;
+       and r15 = r14, r15
+       ;;
+       .mii
+       nop 0
+       xor r18 = r15, r18
+       ;;
+       nop 0
+       .mfb
+       st8 [r19] = r18
+       nop 0
+       br.ret.sptk.many b0
+.L49:
+       .body
+       .copy_state 8
+       .mmi
+       shladd r14 = r23, 3, r0
+       addl r15 = 2, r0
+       mov b0 = r34
+       .mmi
+       shladd r18 = r17, 3, r0
+       ld8 r19 = [r27]
+       .label_state 9
+       .restore sp
+       mov r12 = r36
+       ;;
+       .mmi
+       adds r14 = -65, r14
+       sub r16 = 64, r18
+       mov ar.pfs = r35
+       .mii
+       nop 0
+       mov ar.lc = r38
+       ;;
+       sxt4 r14 = r14
+       .mii
+       nop 0
+       shl r17 = r8, r18
+       ;;
+       shl r15 = r15, r14
+       .mii
+       addl r14 = -1, r0
+       sxt4 r16 = r16
+       ;;
+       shr r16 = r8, r16
+       .mii
+       mov r8 = r0
+       xor r17 = r17, r19
+       shl r14 = r14, r18
+       .mii
+       nop 0
+       adds r15 = -1, r15
+       ;;
+       and r14 = r17, r14
+       ;;
+       .mmi
+       xor r19 = r14, r19
+       ;;
+       st8 [r27] = r19, 8
+       nop 0
+       ;;
+       .mmi
+       ld8 r14 = [r27]
+       ;;
+       xor r16 = r16, r14
+       nop 0
+       ;;
+       .mmi
+       and r15 = r16, r15
+       ;;
+       xor r14 = r15, r14
+       nop 0
+       ;;
+       .mfb
+       st8 [r27] = r14
+       nop 0
+       br.ret.sptk.many b0
+.L53:
+       .body
+       .copy_state 9
+       .mmi
+       shladd r15 = r23, 3, r0
+       addl r14 = 2, r0
+       sub r17 = 64, r20
+       .mmi
+       adds r21 = 16, r27
+       adds r20 = 8, r27
+       shl r19 = r9, r19
+       ;;
+       .mii
+       adds r15 = -129, r15
+       mov b0 = r34
+       sxt4 r17 = r17
+       .mmi
+       .label_state 10
+       .restore sp
+       mov r12 = r36
+       nop 0
+       mov ar.pfs = r35
+       ;;
+       .mii
+       nop 0
+       shr r18 = r9, r17
+       sxt4 r15 = r15
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r15
+       shr r16 = r8, r17
+       .mmi
+       ld8 r15 = [r21]
+       mov r8 = r0
+       mov ar.lc = r38
+       ;;
+       .mii
+       xor r18 = r18, r15
+       adds r14 = -1, r14
+       or r16 = r19, r16
+       ;;
+       .mmb
+       and r14 = r18, r14
+       st8 [r20] = r16
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r15 = r14, r15
+       ;;
+       nop 0
+       .mfb
+       st8 [r21] = r15
+       nop 0
+       br.ret.sptk.many b0
+.L51:
+       .body
+       .copy_state 10
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 24, r19
+       (p6) br.cond.dptk .L55
+       ;;
+       .mfi
+       shladd r19 = r17, 3, r0
+       nop 0
+       addl r14 = -1, r0
+       .mii
+       ld8 r16 = [r27]
+       cmp.ltu p6, p7 = 24, r23
+       ;;
+       nop 0
+       .mii
+       mov r29 = r19
+       shl r15 = r8, r19
+       shl r14 = r14, r19
+       ;;
+       .mmi
+       xor r15 = r15, r16
+       ;;
+       and r14 = r15, r14
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r16 = r14, r16
+       ;;
+       nop 0
+       .mfb
+       st8 [r27] = r16
+       nop 0
+       (p6) br.cond.dptk .L57
+       .mmi
+       shladd r14 = r17, 2, r0
+       shladd r18 = r23, 3, r0
+       addl r16 = 2, r0
+       .mmi
+       adds r22 = 16, r27
+       adds r20 = 8, r27
+       shl r21 = r10, r29
+       ;;
+       .mmi
+       sub r14 = 32, r14
+       adds r18 = -65, r18
+       mov b0 = r34
+       .mii
+       .label_state 11
+       .restore sp
+       mov r12 = r36
+       shl r19 = r9, r29
+       mov ar.pfs = r35
+       ;;
+       .mii
+       nop 0
+       sxt4 r18 = r18
+       sxt4 r14 = r14
+       .mib
+       nop 0
+       mov ar.lc = r38
+       nop 0
+       ;;
+       .mii
+       nop 0
+       shr r15 = r9, r14
+       shr r17 = r8, r14
+       .mii
+       mov r8 = r0
+       nop 0
+       shl r16 = r16, r18
+       ;;
+       .mii
+       nop 0
+       shr r15 = r15, r14
+       shr r17 = r17, r14
+       .mii
+       ld8 r14 = [r22]
+       nop 0
+       adds r16 = -1, r16
+       ;;
+       .mii
+       or r15 = r21, r15
+       or r17 = r19, r17
+       ;;
+       xor r15 = r15, r14
+       .mmi
+       st8 [r20] = r17
+       ;;
+       and r16 = r15, r16
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r14 = r16, r14
+       ;;
+       nop 0
+       .mfb
+       st8 [r22] = r14
+       nop 0
+       br.ret.sptk.many b0
+.L55:
+       .body
+       .copy_state 11
+       .mfi
+       shladd r18 = r17, 3, r0
+       nop 0
+       addl r14 = -1, r0
+       .mii
+       ld8 r16 = [r27]
+       cmp.ltu p6, p7 = 32, r23
+       ;;
+       nop 0
+       .mii
+       mov r29 = r18
+       shl r15 = r8, r18
+       shl r14 = r14, r18
+       ;;
+       .mmi
+       xor r15 = r15, r16
+       ;;
+       and r14 = r15, r14
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r16 = r14, r16
+       ;;
+       nop 0
+       .mfb
+       st8 [r27] = r16
+       nop 0
+       (p6) br.cond.dptk .L59
+       .mmi
+       shladd r14 = r17, 2, r0
+       addl r15 = 2, r0
+       shl r20 = r10, r18
+       .mmi
+       shladd r18 = r23, 3, r0
+       adds r23 = 24, r27
+       shl r19 = r9, r29
+       ;;
+       .mmi
+       sub r14 = 32, r14
+       adds r18 = -65, r18
+       mov b0 = r34
+       .mmi
+       adds r21 = 8, r27
+       adds r22 = 16, r27
+       .label_state 12
+       .restore sp
+       mov r12 = r36
+       .mii
+       nop 0
+       mov ar.pfs = r35
+       ;;
+       sxt4 r18 = r18
+       .mii
+       nop 0
+       sxt4 r14 = r14
+       mov ar.lc = r38
+       ;;
+       .mii
+       nop 0
+       shr r16 = r8, r14
+       shr r17 = r9, r14
+       .mii
+       mov r8 = r0
+       nop 0
+       shl r15 = r15, r18
+       ;;
+       .mii
+       nop 0
+       shr r16 = r16, r14
+       shr r17 = r17, r14
+       .mii
+       ld8 r14 = [r23]
+       adds r15 = -1, r15
+       ;;
+       or r16 = r19, r16
+       .mmi
+       or r17 = r20, r17
+       ;;
+       st8 [r21] = r16
+       xor r16 = r14, r16
+       .mmi
+       st8 [r22] = r17
+       ;;
+       and r15 = r16, r15
+       nop 0
+       ;;
+       .mii
+       nop 0
+       xor r14 = r15, r14
+       ;;
+       nop 0
+       .mfb
+       st8 [r23] = r14
+       nop 0
+       br.ret.sptk.many b0
+.L57:
+       .body
+       .copy_state 12
+       .mmi
+       shladd r14 = r23, 3, r0
+       addl r15 = 2, r0
+       sub r16 = 64, r19
+       .mmi
+       adds r24 = 24, r27
+       adds r22 = 8, r27
+       shl r21 = r10, r29
+       ;;
+       .mii
+       adds r14 = -129, r14
+       sxt4 r16 = r16
+       shl r20 = r9, r29
+       .mmi
+       adds r23 = 16, r27
+       .label_state 13
+       .restore sp
+       mov r12 = r36
+       mov b0 = r34
+       ;;
+       .mii
+       nop 0
+       shr r18 = r10, r16
+       sxt4 r14 = r14
+       ;;
+       .mii
+       nop 0
+       shl r15 = r15, r14
+       shr r19 = r8, r16
+       .mmi
+       ld8 r14 = [r24]
+       mov r8 = r0
+       mov ar.pfs = r35
+       .mib
+       nop 0
+       shr r17 = r9, r16
+       nop 0
+       ;;
+       .mii
+       xor r18 = r18, r14
+       mov ar.lc = r38
+       adds r15 = -1, r15
+       .mmi
+       or r19 = r20, r19
+       ;;
+       and r15 = r18, r15
+       or r17 = r21, r17
+       .mii
+       st8 [r22] = r19
+       nop 0
+       ;;
+       xor r14 = r15, r14
+       .mmb
+       nop 0
+       st8 [r23] = r17
+       nop 0
+       ;;
+       .mfb
+       st8 [r24] = r14
+       nop 0
+       br.ret.sptk.many b0
+.L59:
+       .body
+       .copy_state 13
+       .mmi
+       shladd r16 = r23, 3, r0
+       addl r15 = 2, r0
+       sub r14 = 64, r18
+       .mmi
+       adds r24 = 8, r27
+       adds r25 = 16, r27
+       adds r26 = 24, r27
+       ;;
+       .mmi
+       nop 0
+       adds r16 = -129, r16
+       sxt4 r14 = r14
+       .mmi
+       adds r27 = 32, r27
+       .restore sp
+       mov r12 = r36
+       shl r23 = r11, r29
+       ;;
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       shr r22 = r11, r14
+       ;;
+       .mii
+       nop 0
+       shl r15 = r15, r16
+       shr r17 = r8, r14
+       .mii
+       mov r8 = r0
+       shr r18 = r9, r14
+       shr r19 = r10, r14
+       .mii
+       ld8 r14 = [r27]
+       shl r20 = r9, r29
+       shl r21 = r10, r29
+       ;;
+       .mmi
+       xor r22 = r22, r14
+       adds r15 = -1, r15
+       mov b0 = r34
+       ;;
+       .mmi
+       and r15 = r22, r15
+       or r19 = r23, r19
+       mov ar.pfs = r35
+       .mmi
+       or r17 = r20, r17
+       or r18 = r21, r18
+       mov ar.lc = r38
+       ;;
+       .mmb
+       xor r14 = r15, r14
+       st8 [r24] = r17
+       nop 0
+       .mmb
+       st8 [r25] = r18
+       st8 [r26] = r19
+       nop 0
+       ;;
+       .mfb
+       st8 [r27] = r14
+       nop 0
+       br.ret.sptk.many b0
+       .endp avcall_call#
+       .ident  "GCC: (GNU) 4.0.1"
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-ia64.c b/avcall/avcall-ia64.c
new file mode 100644 (file)
index 0000000..e49b2b8
--- /dev/null
@@ -0,0 +1,317 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for a Intel IA-64 in little-endian mode with gcc.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  IA-64 64-bit Argument Passing Conventions:
+
+  The argument sequence is mapped linearly on the registers r32,...,r39,
+  and continued on the stack, in [r12+16], [r12+24], ...
+  Items in this sequence are word-aligned. In gcc < 3.0, structures larger
+  than a single word are even two-word-aligned.
+  Integer/pointer arguments are passed in the allocated slots (registers
+  or stack slots). The first 8 float/double arguments are passed in
+  registers f8,...,f15 instead, but their slots are kept allocated.
+  Structure args are passed like multiple integer arguments; except that
+  structures consisting only of floats or only of doubles are passed like
+  multiple float arguments or multiple double arguments, respectively.
+
+  Integers and pointers are returned in r8, floats and doubles in f8.
+  Structures consisting only of at most 8 floats or only of at most 8 doubles
+  are returned in f8,...,f15. Other than that, structures of size <= 32 bytes
+  are returned in r8,...,r11, as if these were 4 contiguous words in memory.
+  Larger structures are returned in memory; the caller passes the address
+  of the target memory area in r8, and it is returned unmodified in r8.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+register __avword*     sret    __asm__("r8");  /* structure return pointer */
+/*register __avword    iret    __asm__("r8");*/
+register __avword      iret2   __asm__("r9");
+register __avword      iret3   __asm__("r10");
+register __avword      iret4   __asm__("r11");
+/*register float       fret    __asm__("f8");*/
+/*register double      dret    __asm__("f8");*/
+register double                farg1   __asm__("f8");
+register double                farg2   __asm__("f9");
+register double                farg3   __asm__("f10");
+register double                farg4   __asm__("f11");
+register double                farg5   __asm__("f12");
+register double                farg6   __asm__("f13");
+register double                farg7   __asm__("f14");
+register double                farg8   __asm__("f15");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("r12"); /* C names for registers */
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = (sp -= __AV_ALIST_WORDS) + 2; /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  int farglen = l->faptr - l->fargs;
+  __avword iret;
+
+  {
+    int i;
+    for (i = 8; i < arglen; i++)       /* push function args onto stack */
+      argframe[i-8] = l->args[i];
+  }
+
+  /* struct return address */
+  if (l->rtype == __AVstruct)
+    sret = l->raddr;
+
+  /* put max. 8 double args in registers */
+  if (farglen > 0) {
+    farg1 = l->fargs[0];
+    if (farglen > 1) {
+      farg2 = l->fargs[1];
+      if (farglen > 2) {
+        farg3 = l->fargs[2];
+        if (farglen > 3) {
+          farg4 = l->fargs[3];
+          if (farglen > 4) {
+            farg5 = l->fargs[4];
+            if (farglen > 5) {
+              farg6 = l->fargs[5];
+              if (farglen > 6) {
+                farg7 = l->fargs[6];
+                if (farglen > 7)
+                  farg8 = l->fargs[7];
+              }
+            }
+          }
+        }
+      }
+    }
+  }
+
+  /* call function, pass 8 integer and 8 double args in registers */
+  if (l->rtype == __AVfloat) {
+    *(float*)l->raddr = (*(float(*)())l->func)(l->args[0], l->args[1],
+                                              l->args[2], l->args[3],
+                                              l->args[4], l->args[5],
+                                              l->args[6], l->args[7]);
+  } else
+  if (l->rtype == __AVdouble) {
+    *(double*)l->raddr = (*(double(*)())l->func)(l->args[0], l->args[1],
+                                                l->args[2], l->args[3],
+                                                l->args[4], l->args[5],
+                                                l->args[6], l->args[7]);
+  } else {
+    iret = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3],
+                     l->args[4], l->args[5], l->args[6], l->args[7]);
+
+    /* save return value */
+    if (l->rtype == __AVvoid) {
+    } else
+    if (l->rtype == __AVword) {
+      RETURN(__avword, iret);
+    } else
+    if (l->rtype == __AVchar) {
+      RETURN(char, iret);
+    } else
+    if (l->rtype == __AVschar) {
+      RETURN(signed char, iret);
+    } else
+    if (l->rtype == __AVuchar) {
+      RETURN(unsigned char, iret);
+    } else
+    if (l->rtype == __AVshort) {
+      RETURN(short, iret);
+    } else
+    if (l->rtype == __AVushort) {
+      RETURN(unsigned short, iret);
+    } else
+    if (l->rtype == __AVint) {
+      RETURN(int, iret);
+    } else
+    if (l->rtype == __AVuint) {
+      RETURN(unsigned int, iret);
+    } else
+    if (l->rtype == __AVlong || l->rtype == __AVlonglong) {
+      RETURN(long, iret);
+    } else
+    if (l->rtype == __AVulong || l->rtype == __AVulonglong) {
+      RETURN(unsigned long, iret);
+    } else
+  /* see above
+    if (l->rtype == __AVfloat) {
+    } else
+    if (l->rtype == __AVdouble) {
+    } else
+  */
+    if (l->rtype == __AVvoidp) {
+      RETURN(void*, iret);
+    } else
+    if (l->rtype == __AVstruct) {
+      if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+        /* Return structs of size <= 32 in registers. */
+        if (l->rsize > 0 && l->rsize <= 32) {
+          void* raddr = l->raddr;
+          #if 0 /* Unoptimized */
+          if (l->rsize >= 1)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          if (l->rsize >= 2)
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          if (l->rsize >= 3)
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          if (l->rsize >= 4)
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+          if (l->rsize >= 5)
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+          if (l->rsize >= 6)
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+          if (l->rsize >= 7)
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+          if (l->rsize >= 8)
+            ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56);
+          if (l->rsize >= 9) {
+            ((unsigned char *)raddr)[8] = (unsigned char)(iret2);
+            if (l->rsize >= 10)
+              ((unsigned char *)raddr)[9] = (unsigned char)(iret2>>8);
+            if (l->rsize >= 11)
+              ((unsigned char *)raddr)[10] = (unsigned char)(iret2>>16);
+            if (l->rsize >= 12)
+              ((unsigned char *)raddr)[11] = (unsigned char)(iret2>>24);
+            if (l->rsize >= 13)
+              ((unsigned char *)raddr)[12] = (unsigned char)(iret2>>32);
+            if (l->rsize >= 14)
+              ((unsigned char *)raddr)[13] = (unsigned char)(iret2>>40);
+            if (l->rsize >= 15)
+              ((unsigned char *)raddr)[14] = (unsigned char)(iret2>>48);
+            if (l->rsize >= 16)
+              ((unsigned char *)raddr)[15] = (unsigned char)(iret2>>56);
+            if (l->rsize >= 17) {
+              ((unsigned char *)raddr)[16] = (unsigned char)(iret3);
+              if (l->rsize >= 18)
+                ((unsigned char *)raddr)[17] = (unsigned char)(iret3>>8);
+              if (l->rsize >= 19)
+                ((unsigned char *)raddr)[18] = (unsigned char)(iret3>>16);
+              if (l->rsize >= 20)
+                ((unsigned char *)raddr)[19] = (unsigned char)(iret3>>24);
+              if (l->rsize >= 21)
+                ((unsigned char *)raddr)[20] = (unsigned char)(iret3>>32);
+              if (l->rsize >= 22)
+                ((unsigned char *)raddr)[21] = (unsigned char)(iret3>>40);
+              if (l->rsize >= 23)
+                ((unsigned char *)raddr)[22] = (unsigned char)(iret3>>48);
+              if (l->rsize >= 24)
+                ((unsigned char *)raddr)[23] = (unsigned char)(iret3>>56);
+              if (l->rsize >= 25) {
+                ((unsigned char *)raddr)[24] = (unsigned char)(iret4);
+                if (l->rsize >= 26)
+                  ((unsigned char *)raddr)[25] = (unsigned char)(iret4>>8);
+                if (l->rsize >= 27)
+                  ((unsigned char *)raddr)[26] = (unsigned char)(iret4>>16);
+                if (l->rsize >= 28)
+                  ((unsigned char *)raddr)[27] = (unsigned char)(iret4>>24);
+                if (l->rsize >= 29)
+                  ((unsigned char *)raddr)[28] = (unsigned char)(iret4>>32);
+                if (l->rsize >= 30)
+                  ((unsigned char *)raddr)[29] = (unsigned char)(iret4>>40);
+                if (l->rsize >= 31)
+                  ((unsigned char *)raddr)[30] = (unsigned char)(iret4>>48);
+                if (l->rsize >= 32)
+                  ((unsigned char *)raddr)[31] = (unsigned char)(iret4>>56);
+              }
+            }
+          }
+          #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+          uintptr_t count = l->rsize; /* > 0, ≤ 4*sizeof(__avword) */
+          __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+          uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+          uintptr_t end_offset = start_offset + count; /* > 0, < 5*sizeof(__avword) */
+          if (count <= sizeof(__avword)) {
+            /* Use iret. */
+            if (end_offset <= sizeof(__avword)) {
+              /* 0 < end_offset ≤ sizeof(__avword) */
+              __avword mask0 = ((__avword)2 << (end_offset*8-1)) - ((__avword)1 << (start_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            } else {
+              /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+              __avword mask0 = - ((__avword)1 << (start_offset*8));
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+              wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avword)*8-start_offset*8))) & mask1;
+            }
+          } else if (count <= 2*sizeof(__avword)) {
+            /* Use iret, iret2. */
+            __avword mask0 = - ((__avword)1 << (start_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            if (end_offset <= 2*sizeof(__avword)) {
+              /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1;
+            } else {
+              /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+              __avword mask2 = ((__avword)2 << (end_offset*8-2*sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] = (iret >> (sizeof(__avword)*8-start_offset*8)) | (iret2 << (start_offset*8));
+              wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avword)*8-start_offset*8))) & mask2;
+            }
+          } else if (count <= 3*sizeof(__avword)) {
+            /* Use iret, iret2, iret3. */
+            __avword mask0 = - ((__avword)1 << (start_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            if (end_offset <= 3*sizeof(__avword)) {
+              /* 2*sizeof(__avword) < end_offset ≤ 3*sizeof(__avword) */
+              __avword mask2 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] = (iret >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret2 << (start_offset*8));
+              wordaddr[2] ^= (wordaddr[2] ^ ((iret2 >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret3 << (start_offset*8)))) & mask2;
+            } else {
+              /* 3*sizeof(__avword) < end_offset < 4*sizeof(__avword), start_offset > 0 */
+              __avword mask3 = ((__avword)2 << (end_offset*8-2*sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] = (iret >> (sizeof(__avword)*8-start_offset*8)) | (iret2 << (start_offset*8));
+              wordaddr[2] = (iret2 >> (sizeof(__avword)*8-start_offset*8)) | (iret3 << (start_offset*8));
+              wordaddr[3] ^= (wordaddr[3] ^ (iret3 >> (sizeof(__avword)*8-start_offset*8))) & mask3;
+            }
+          } else {
+            /* Use iret, iret2, iret3, iret4. */
+            __avword mask0 = - ((__avword)1 << (start_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            if (end_offset <= 4*sizeof(__avword)) {
+              /* 3*sizeof(__avword) < end_offset ≤ 4*sizeof(__avword) */
+              __avword mask3 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] = (iret >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret2 << (start_offset*8));
+              wordaddr[2] = (iret2 >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret3 << (start_offset*8));
+              wordaddr[3] ^= (wordaddr[3] ^ ((iret >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask3;
+            } else {
+              /* 4*sizeof(__avword) < end_offset < 5*sizeof(__avword), start_offset > 0 */
+              __avword mask4 = ((__avword)2 << (end_offset*8-2*sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] = (iret >> (sizeof(__avword)*8-start_offset*8)) | (iret2 << (start_offset*8));
+              wordaddr[2] = (iret2 >> (sizeof(__avword)*8-start_offset*8)) | (iret3 << (start_offset*8));
+              wordaddr[3] = (iret3 >> (sizeof(__avword)*8-start_offset*8)) | (iret4 << (start_offset*8));
+              wordaddr[4] ^= (wordaddr[4] ^ (iret4 >> (sizeof(__avword)*8-start_offset*8))) & mask4;
+            }
+          }
+          #endif
+        }
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-internal.h b/avcall/avcall-internal.h
new file mode 100644 (file)
index 0000000..0357a77
--- /dev/null
@@ -0,0 +1,1508 @@
+/*
+ * Copyright 1993-1995 Bill Triggs <Bill.Triggs@inrialpes.fr>
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#ifndef _AVCALL_INTERNAL_H
+#define _AVCALL_INTERNAL_H
+
+/* Get intptr_t, uintptr_t. */
+#include "ffcall-stdint.h"
+
+/* Include the public definitions and "avcall-alist.h",  */
+#include "avcall.h"
+
+
+/* Verify at compile time that sizeof(__av_alist) <= __AV_ALIST_SIZE_BOUND. */
+typedef int __av_alist_verify[2*(__AV_ALIST_SIZE_BOUND - (int)sizeof(__av_alist))+1];
+
+/* Conversion from the public, mostly opaque, 'av_alist*' to '__av_alist*'. */
+#define AV_LIST_INNER(list) ((list)->_av_alist_head._av_m_alist)
+
+
+/* Delayed overflow detection */
+#if defined(__hppa__) && !defined(__hppa64__)
+#define _av_overflown(LIST) ((LIST).aptr < (LIST).eptr)
+#else
+#define _av_overflown(LIST) ((LIST).aptr > (LIST).eptr)
+#endif
+
+
+/*
+ * Initialization of an __av_alist
+ */
+
+#define __av_start(LIST,LIST_ARGS,LIST_ARGS_END,FUNC,RADDR,RETTYPE,FLAGS) \
+  ((LIST).func = (FUNC),                                               \
+   (LIST).raddr = (RADDR),                                             \
+   (LIST).rtype = (RETTYPE),                                           \
+   (LIST).args = (LIST_ARGS),                                          \
+   __av_start1(LIST,LIST_ARGS_END)                                     \
+   __av_start_init_eptr(LIST,LIST_ARGS_END)                            \
+   (LIST).flags = (FLAGS))
+
+#if defined(__i386__) || defined(__m68k__) || defined(__alpha__) || (defined(__arm__) && !defined(__armhf__))
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).aptr = &(LIST).args[0],
+#endif
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).anum = 0,                                                    \
+   (LIST).fanum = 0,                                                   \
+   (LIST).farg_mask = 0,                                               \
+   (LIST).darg_mask = 0,                                               \
+   (LIST).aptr = &(LIST).args[0],
+#endif
+#if defined(__mipsn32__) || defined(__mips64__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).anum = 0,                                                    \
+   (LIST).farg_mask = 0,                                               \
+   (LIST).darg_mask = 0,                                               \
+   (LIST).aptr = &(LIST).args[0],
+#endif
+#if defined(__sparc__) && !defined(__sparc64__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).aptr = &(LIST).args[0],
+#endif
+#if defined(__sparc64__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).anum = 0,                                                    \
+   (LIST).darg_mask = 0,                                               \
+   (LIST).aptr = &(LIST).args[0],
+#endif
+#if defined(__hppa__) && !defined(__hppa64__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).farg_mask = 0,                                               \
+   (LIST).darg_mask = 0,                                               \
+   (LIST).aptr = (LIST).args_end = (LIST_ARGS_END),
+#endif
+#if defined(__hppa64__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).farg_mask = 0,                                               \
+   (LIST).darg_mask = 0,                                               \
+   (LIST).aptr = &(LIST).args[0],
+#endif
+#if defined(__armhf__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).aptr = &(LIST).args[__AV_IARG_NUM],                          \
+   (LIST).ianum = 0,                                                   \
+   (LIST).fanum = 0,                                                   \
+   (LIST).farg_mask = 0,                                               \
+   (LIST).darg_mask = 0,
+#endif
+#if defined(__arm64__) || defined(__s390__) || defined(__s390x__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).aptr = &(LIST).args[0],                                      \
+   (LIST).ianum = 0,                                                   \
+   (LIST).fanum = 0,                                                   \
+   (LIST).farg_mask = 0,                                               \
+   (LIST).darg_mask = 0,
+#endif
+#if defined(__riscv32__) || defined(__riscv64__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).aptr = &(LIST).args[0],                                      \
+   (LIST).fanum = 0,                                                   \
+   (LIST).farg_mask = 0,                                               \
+   (LIST).darg_mask = 0,
+#endif
+#if defined(__powerpc_aix__) || defined(__powerpc64__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).aptr = &(LIST).args[0],                                      \
+   (LIST).faptr = &(LIST).fargs[0],
+#endif
+#if defined(__powerpc_sysv4__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).aptr = &(LIST).args[0],                                      \
+   (LIST).ianum = 0,                                                   \
+   (LIST).faptr = &(LIST).fargs[0],
+#endif
+#if defined(__ia64__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).aptr = &(LIST).args[0],                                      \
+   (LIST).faptr = &(LIST).fargs[0],
+#endif
+#if defined(__x86_64_sysv__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).aptr = &(LIST).args[0],                                      \
+   (LIST).ianum = 0,                                                   \
+   (LIST).faptr = &(LIST).fargs[0],
+#endif
+#if defined(__x86_64_ms__)
+#define __av_start1(LIST,LIST_ARGS_END)                                        \
+   (LIST).aptr = &(LIST).args[0],                                      \
+   (LIST).anum = 0,                                                    \
+   (LIST).farg_mask = 0,                                               \
+   (LIST).darg_mask = 0,
+#endif
+
+#if defined(__hppa__) && !defined(__hppa64__)
+#define __av_start_init_eptr(LIST,LIST_ARGS_END)                       \
+   (LIST).eptr = &(LIST).args[0],
+#else
+#define __av_start_init_eptr(LIST,LIST_ARGS_END)                       \
+   (LIST).eptr = (LIST_ARGS_END),
+#endif
+
+#define __av_start_struct(LIST,LIST_ARGS,LIST_ARGS_END,FUNC,TYPE_SIZE,TYPE_SPLITTABLE,RADDR,FLAGS) \
+  (__av_start(LIST,LIST_ARGS,LIST_ARGS_END,FUNC,RADDR,__AVstruct,FLAGS), \
+   (LIST).rsize = (TYPE_SIZE),                                         \
+   __av_start_struct2(LIST,TYPE_SIZE,TYPE_SPLITTABLE),                 \
+   0)
+
+#if (defined(__sparc__) && !defined(__sparc64__))
+/* Return structure pointer is passed in a special register.
+ */
+#define __av_start_struct2(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  0
+#else
+#define __av_start_struct2(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  (((LIST).flags & __AV_SMALL_STRUCT_RETURN)                           \
+   && __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)           \
+   ? /* <= Word-sized structures are returned in a register. */                \
+     __av_start_struct3(LIST)                                          \
+   : __av_start_struct4(LIST,TYPE_SIZE)                                        \
+  )
+/* Determines whether a structure is returned in registers,
+ * depending on its size and its word-splittable flag.
+ */
+#if (defined(__i386__) && defined(_WIN32))
+#define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4            \
+   || ((TYPE_SIZE) == 8                                                        \
+       && (((LIST).flags & __AV_MSVC_STRUCT_RETURN)                    \
+           || ((TYPE_SPLITTABLE)                                       \
+               && ((LIST).flags & __AV_GCC_STRUCT_RETURN)              \
+  )   )   )   )
+/* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __av_start_struct3(LIST)  \
+  ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if (defined(__i386__) && !defined(_WIN32)) || defined(__m68k__) || (defined(__powerpc__) && !defined(__powerpc64__)) || (defined(__s390__) && !defined(__s390x__))
+#define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4            \
+   || ((TYPE_SIZE) == 8 && (TYPE_SPLITTABLE)                           \
+       && ((LIST).flags & __AV_GCC_STRUCT_RETURN)                      \
+  )   )
+/* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __av_start_struct3(LIST)  \
+  ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if defined(__arm__) || defined(__armhf__)
+#define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) <= 4)
+#define __av_start_struct3(LIST)  \
+  ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if defined(__alpha__)
+#define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8        \
+   || ((TYPE_SIZE) == 16 && (TYPE_SPLITTABLE)                          \
+       && ((LIST).flags & __AV_GCC_STRUCT_RETURN)                      \
+  )   )
+/* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __av_start_struct3(LIST)  \
+  ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if (defined(__hppa__) && !defined(__hppa64__)) || defined(__riscv32__)
+#define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) <= 8)
+/* Test __AV_SMALL_STRUCT_RETURN at run time. */
+#define __av_start_struct3(LIST)  \
+  0
+#endif
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)
+#define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4)
+/* Test __AV_SMALL_STRUCT_RETURN instead of __AV_REGISTER_STRUCT_RETURN. */
+#define __av_start_struct3(LIST)  \
+  0
+#endif
+#if defined(__mipsn32__) || defined(__mips64__)
+#define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((LIST).flags & __AV_GCC_STRUCT_RETURN                               \
+   ? ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8) \
+   : ((TYPE_SIZE) <= 16)                                               \
+  )
+/* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __av_start_struct3(LIST)  \
+  ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if (defined(__powerpc64__) && !defined(__powerpc64_elfv2__)) || defined(__s390x__)
+#define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  0
+#define __av_start_struct3(LIST)  \
+  0
+#endif
+#if defined(__sparc64__) || defined(__ia64__)
+#define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) <= 32)
+/* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __av_start_struct3(LIST)  \
+  ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if defined(__hppa64__) || defined(__arm64__) || (defined(__powerpc64__) && defined(__powerpc64_elfv2__)) || defined(__x86_64_sysv__) || defined(__riscv64__)
+#define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) <= 16)
+/* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __av_start_struct3(LIST)  \
+  ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if defined(__x86_64_ms__)
+#define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8)
+/* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __av_start_struct3(LIST)  \
+  ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if defined(__m68k__) || defined(__hppa__) || defined(__hppa64__) || defined(__arm64__) || defined(__ia64__)
+/* Return structure pointer is passed in a special register.
+ */
+#define __av_start_struct4(LIST,TYPE_SIZE)  0
+#endif
+/* Return structure pointer is passed as first arg.
+ */
+#if defined(__i386__) || defined(__alpha__) || (defined(__arm__) && !defined(__armhf__)) || defined(__powerpc_aix__) || defined(__powerpc64__) || defined(__riscv32__) || defined(__riscv64__)
+#define __av_start_struct4(LIST,TYPE_SIZE)                             \
+  (*(LIST).aptr++ = (__avword)((LIST).raddr), 0)
+#endif
+#if defined(__armhf__)
+#define __av_start_struct4(LIST,TYPE_SIZE)                             \
+  ((LIST).args[(LIST).ianum++] = (__avword)((LIST).raddr), 0)
+#endif
+#if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__x86_64_ms__)
+#define __av_start_struct4(LIST,TYPE_SIZE)                             \
+  (*(LIST).aptr++ = (__avword)((LIST).raddr),                          \
+   (LIST).anum++,                                                      \
+   0                                                                   \
+  )
+#endif
+#if defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__)
+#if defined(__x86_64_x32__)
+/* The x86_64 ABI, section 10.1, specifies that pointers are zero-extended
+   from 32 bits to 64 bits. */
+#define __av_start_struct4(LIST,TYPE_SIZE)                             \
+  ((LIST).iargs[(LIST).ianum++] = (unsigned long long)(unsigned long)((LIST).raddr), 0)
+#else
+#define __av_start_struct4(LIST,TYPE_SIZE)                             \
+  ((LIST).iargs[(LIST).ianum++] = (__avword)((LIST).raddr), 0)
+#endif
+#endif
+#endif
+
+
+/*
+ * av_<type> macros which specify the argument and its type
+ * In these macro definitions,
+ * 1. check the new value of (LIST).aptr against (LIST).eptr, then
+ * 2. modify (LIST).aptr (considering the alignment needed for the argument
+ *    type), then store the argument. On little-endian machines and when
+ *    there are no alignment considerations, it's also OK to store the
+ *    argument and then modify (LIST).aptr.
+ */
+
+/*
+ * scalar argument types
+ */
+
+#if defined(__i386__) || defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) || defined(__alpha__) || defined(__hppa64__) || (defined(__arm__) && !defined(__armhf__)) || defined(__arm64__) || defined(__powerpc__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) || defined(__riscv32__) || defined(__riscv64__)
+/* Floats and all integer types are passed as words,
+ * doubles as two words (on 32-bit platforms) or one word (on 64-bit platforms).
+ */
+#define __av_word(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((LIST).aptr)[-1] = (__avword)(VAL),                               \
+    0))
+#endif
+#if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__x86_64_ms__)
+/* Most things are passed as integers:
+ */
+#define __av_word(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((LIST).aptr)[-1] = (__avword)(VAL),                               \
+    (LIST).anum++,                                                     \
+    0))
+#endif
+#if defined(__hppa__) && !defined(__hppa64__)
+/* Floats and all integer types are passed as words,
+ * doubles as two words.
+ */
+#define __av_word(LIST,VAL)                                            \
+  ((LIST).aptr <= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr--,                                                     \
+    *(LIST).aptr = (__avword)(VAL),                                    \
+    0))
+#endif
+#if defined(__armhf__)
+#define __av_word(LIST,VAL)                                            \
+  ((LIST).ianum < __AV_IARG_NUM                                                \
+   ? ((LIST).args[(LIST).ianum++] = (__avword)(VAL), 0)                        \
+   : ((LIST).aptr >= (LIST).eptr                                       \
+      ? -1 :                                                           \
+      ((LIST).aptr++,                                                  \
+       ((LIST).aptr)[-1] = (__avword)(VAL),                            \
+       0)))
+#endif
+
+/* integer argument types */
+
+#if defined(__arm64__) || defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__)
+/* The first __AV_IARG_NUM integer arguments are passed in registers. */
+#define __av_long(LIST,VAL)                                            \
+  ((LIST).ianum < __AV_IARG_NUM                                                \
+   ? ((LIST).iargs[(LIST).ianum++] = (long)(VAL), 0)                   \
+   : __av_word(LIST,(long)(VAL)))
+#else
+#define __av_long(LIST,VAL)    __av_word(LIST,(long)(VAL))
+#endif
+
+#if defined(__arm64__) || defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__)
+/* The first __AV_IARG_NUM integer arguments are passed in registers. */
+#define __av_ulong(LIST,VAL)                                           \
+  ((LIST).ianum < __AV_IARG_NUM                                                \
+   ? ((LIST).iargs[(LIST).ianum++] = (unsigned long)(VAL), 0)          \
+   : __av_word(LIST,(unsigned long)(VAL)))
+#else
+#define __av_ulong(LIST,VAL)   __av_word(LIST,(unsigned long)(VAL))
+#endif
+
+#if defined(__arm64__) || defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__)
+/* The first __AV_IARG_NUM integer arguments are passed in registers. */
+#if defined(__x86_64_x32__)
+/* The x86_64 ABI, section 10.1, specifies that pointers are zero-extended
+   from 32 bits to 64 bits. */
+#define __av_ptr(LIST,VAL)                                             \
+  ((LIST).ianum < __AV_IARG_NUM                                                \
+   ? ((LIST).iargs[(LIST).ianum++] = (unsigned long long)(unsigned long)(VAL), 0) \
+   : __av_word(LIST,(unsigned long long)(unsigned long)(VAL)))
+#else
+#define __av_ptr(LIST,VAL)                                             \
+  ((LIST).ianum < __AV_IARG_NUM                                                \
+   ? ((LIST).iargs[(LIST).ianum++] = (__avword)(VAL), 0)               \
+   : __av_word(LIST,VAL))
+#endif
+#else
+#define __av_ptr(LIST,VAL)     __av_word(LIST,VAL)
+#endif
+
+#if defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm64__) || defined(__powerpc64__) || defined(__ia64__) || (defined(__x86_64__) && !defined(__x86_64_x32__) && !defined(__AV_LLP64)) || defined(__s390x__) || defined(__riscv64__)
+/* ‘long long’ and ‘long’ are identical. */
+#define __av_longlong          __av_long
+#define __av_ulonglong         __av_ulong
+#elif defined(__mipsn32__) || (defined(__x86_64__) && defined(__AV_LLP64))
+/* ‘long long’ fits in __avword. */
+#define __av_longlong                  __av_word
+#define __av_ulonglong(LIST,VAL)       __av_word(LIST,(unsigned long long)(VAL))
+#elif defined(__i386__) || defined(__m68k__) || (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) || (defined(__sparc__) && !defined(__sparc64__)) || (defined(__hppa__) && !defined(__hppa64__)) || defined(__arm__) || defined(__armhf__) || defined(__powerpc__) || defined(__x86_64_x32__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv32__)
+/* ‘long long’s are passed embedded on the arg stack. */
+#define __av_longlong(LIST,VAL)                __av_arg_longlong(LIST,long long,VAL)
+#define __av_ulonglong(LIST,VAL)       __av_arg_longlong(LIST,unsigned long long,VAL)
+#if defined(__i386__) || defined(__m68k__) || defined(__powerpc_aix__)
+/* ‘long long’s are (at most) word-aligned. */
+#define __av_arg_longlong(LIST,TYPE,VAL)                               \
+  ((LIST).aptr + sizeof(TYPE)/sizeof(__avword) > (LIST).eptr           \
+   ? -1 :                                                              \
+   ((LIST).aptr += sizeof(TYPE)/sizeof(__avword),                      \
+    ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL),                            \
+    0))
+#endif
+#if defined(__mips__) || (defined(__sparc__) && !defined(__sparc64__)) || (defined(__hppa__) && !defined(__hppa64__)) || defined(__arm__) || defined(__armhf__) || defined(__powerpc_sysv4__) || defined(__x86_64_x32__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv32__)
+/* ‘long long’s have alignment 4 or 8. */
+#if defined(__mips__)
+#define __av_arg_longlong(LIST,TYPE,VAL)                               \
+  ((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)) > (LIST).eptr \
+   ? -1 :                                                              \
+   (((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE))), \
+    ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL),                            \
+    (LIST).anum++,                                                     \
+    0))
+#endif
+#if defined(__sparc__) && !defined(__sparc64__)
+/* Within the arg stack, the alignment is only 4, not 8. */
+/* This assumes sizeof(long long) == 2*sizeof(__avword). */
+#define __av_arg_longlong(LIST,TYPE,VAL)                               \
+  ((LIST).aptr + sizeof(TYPE)/sizeof(__avword) > (LIST).eptr           \
+   ? -1 :                                                              \
+   ((LIST).aptr += sizeof(TYPE)/sizeof(__avword),                      \
+    (LIST).tmp._longlong = (TYPE)(VAL),                                        \
+    (LIST).aptr[-2] = (LIST).tmp.words[0],                             \
+    (LIST).aptr[-1] = (LIST).tmp.words[1],                             \
+    0))
+#endif
+#if (defined(__hppa__) && !defined(__hppa64__))
+#define __av_arg_longlong(LIST,TYPE,VAL)                               \
+  ((__avword*)(((uintptr_t)(LIST).aptr & -(intptr_t)__AV_alignof(TYPE)) - sizeof(TYPE)) < (LIST).eptr \
+   ? -1 :                                                              \
+   ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr & -(intptr_t)__AV_alignof(TYPE)) - sizeof(TYPE)), \
+    *(TYPE*)(LIST).aptr = (TYPE)(VAL),                                 \
+    0))
+#endif
+#if defined(__arm__) && !defined(__armhf__)
+#define __av_arg_longlong(LIST,TYPE,VAL)                               \
+  ((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)) > (LIST).eptr \
+   ? -1 :                                                              \
+   ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)), \
+    ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL),                            \
+    0))
+#endif
+#if defined(__armhf__)
+#define __av_arg_longlong(LIST,TYPE,VAL)                               \
+  ((((LIST).ianum + sizeof(TYPE)/sizeof(__avword)+__AV_alignof(TYPE)/sizeof(__avword)-1) & -(intptr_t)(__AV_alignof(TYPE)/sizeof(__avword))) <= __AV_IARG_NUM \
+   ? ((LIST).ianum = (((LIST).ianum + sizeof(TYPE)/sizeof(__avword)+__AV_alignof(TYPE)/sizeof(__avword)-1) & -(intptr_t)(__AV_alignof(TYPE)/sizeof(__avword))), \
+      ((TYPE*)&(LIST).args[(LIST).ianum])[-1] = (TYPE)(VAL),           \
+      0)                                                               \
+   : ((LIST).aptr == &(LIST).args[__AV_IARG_NUM]                       \
+      ? /* split case */                                               \
+        ((__avword*)(((uintptr_t)&(LIST).args[(LIST).ianum]+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)) > (LIST).eptr \
+         ? -1 :                                                                \
+         ((LIST).aptr = (__avword*)(((uintptr_t)&(LIST).args[(LIST).ianum]+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)), \
+          ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL),                      \
+          (LIST).ianum = __AV_IARG_NUM,                                        \
+          0))                                                          \
+      : ((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)) > (LIST).eptr \
+         ? -1 :                                                                \
+         ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)), \
+          ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL),                      \
+          (LIST).ianum = __AV_IARG_NUM,                                        \
+          0))))
+#endif
+#if defined(__powerpc_sysv4__)
+#define __av_arg_longlong(LIST,TYPE,VAL)                               \
+  ((((LIST).ianum + sizeof(TYPE)/sizeof(__avword)+__AV_alignof(TYPE)/sizeof(__avword)-1) & -(intptr_t)(__AV_alignof(TYPE)/sizeof(__avword))) <= __AV_IARG_NUM \
+   ? ((LIST).ianum = (((LIST).ianum + sizeof(TYPE)/sizeof(__avword)+__AV_alignof(TYPE)/sizeof(__avword)-1) & -(intptr_t)(__AV_alignof(TYPE)/sizeof(__avword))), \
+      ((TYPE*)&(LIST).iargs[(LIST).ianum])[-1] = (TYPE)(VAL),          \
+      0)                                                               \
+   : ((LIST).ianum = __AV_IARG_NUM,                                    \
+      ((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)) > (LIST).eptr \
+       ? -1 :                                                          \
+       ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)), \
+        ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL),                                \
+        0))))
+#endif
+#if defined(__x86_64_x32__)
+#define __av_arg_longlong(LIST,TYPE,VAL)                               \
+  ((LIST).ianum < __AV_IARG_NUM                                                \
+   ? ((LIST).iargs[(LIST).ianum++] = (__avword)(TYPE)(VAL), 0)         \
+   : __av_word(LIST,(TYPE)(VAL)))
+#endif
+#if (defined(__s390__) && !defined(__s390x__))
+/* Within the arg stack, the alignment is only 4, not 8. */
+#define __av_arg_longlong(LIST,TYPE,VAL)                               \
+  ((LIST).ianum + (sizeof(TYPE)+sizeof(__avword)-1)/sizeof(__avword) <= __AV_IARG_NUM \
+   ? ((LIST).ianum += (sizeof(TYPE)+sizeof(__avword)-1)/sizeof(__avword), \
+      ((TYPE*)&(LIST).iargs[(LIST).ianum])[-1] = (TYPE)(VAL),          \
+      0)                                                               \
+   : ((LIST).ianum = __AV_IARG_NUM,                                    \
+      ((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \
+       ? -1 :                                                          \
+       ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+        ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL),                                \
+        0))))
+#endif
+#if defined(__riscv32__)
+/* Within the arg stack, the alignment is only 4, not 8. Also, the argument
+   may be put into one word in registers and one word on the stack. */
+#define __av_arg_longlong(LIST,TYPE,VAL)                               \
+  (((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \
+    ? -1 :                                                             \
+    ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+     ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL),                           \
+     0)))
+#endif
+#endif
+#endif
+
+/* floating-point argument types */
+
+#if defined(__i386__) || defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__))
+
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((float*)(LIST).aptr)[-1] = (float)(VAL),                          \
+    0))
+
+/* This assumes sizeof(double) == 2*sizeof(__avword). */
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).aptr + 2 > (LIST).eptr                                       \
+   ? -1 :                                                              \
+   ((LIST).aptr += 2,                                                  \
+    (LIST).tmp._double = (double)(VAL),                                        \
+    (LIST).aptr[-2] = (LIST).tmp.words[0],                             \
+    (LIST).aptr[-1] = (LIST).tmp.words[1],                             \
+    0))
+
+#endif
+
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)
+
+/* Up to 2 leading float or double non-varargs args can be passed in
+ * float registers, but we also push them into the corresponding int
+ * registers in case of varargs. For doubles we need to align the aptr
+ * to an even boundary.
+ */
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((LIST).anum == (LIST).fanum && (LIST).fanum < __AV_FARG_NUM       \
+     ? /* only floating-point arguments so far */                      \
+       ((LIST).farg_mask |= (unsigned int) 1 << (LIST).fanum,          \
+        (LIST).fargs[(LIST).fanum] = ((float*)(LIST).aptr)[-1] = (float)(VAL), \
+        (LIST).fanum++,                                                        \
+        0)                                                             \
+     : (((float*)(LIST).aptr)[-1] = (float)(VAL),                      \
+        0)),                                                           \
+    (LIST).anum++,                                                     \
+    0))
+
+#define _av_double(LIST,VAL)                                           \
+  ((__avword*)(((uintptr_t)(LIST).aptr+15)&-8) > (LIST).eptr           \
+   ? -1 :                                                              \
+   ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+15)&-8),         \
+    ((LIST).anum == (LIST).fanum && (LIST).fanum < __AV_FARG_NUM       \
+     ? /* only floating-point arguments so far */                      \
+       ((LIST).darg_mask |= (unsigned int) 1 << (LIST).fanum,          \
+        (LIST).dargs[(LIST).fanum] = ((double*)(LIST).aptr)[-1] = (double)(VAL), \
+        (LIST).fanum++,                                                        \
+        0)                                                             \
+     : (((double*)(LIST).aptr)[-1] = (double)(VAL),                    \
+        0)),                                                           \
+    (LIST).anum++,                                                     \
+    0))
+
+#endif
+
+#if defined(__mipsn32__) || defined(__mips64__)
+
+/* Up to 8 leading float or double non-varargs args can be passed in
+ * float registers, but we also push them into the corresponding int
+ * registers in case of varargs.
+ */
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   (((LIST).anum < 8                                                   \
+     ? ((LIST).farg_mask |= (1 << (LIST).anum),                                \
+        (LIST).fargs[(LIST).anum] = *(float*)(LIST).aptr = (float)(VAL)) \
+     : (*(float*)(LIST).aptr = (float)(VAL))),                         \
+    (LIST).anum++,                                                     \
+    (LIST).aptr++,                                                     \
+    0))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   (((LIST).anum < 8 && ((LIST).darg_mask |= (1 << (LIST).anum))),     \
+    *(double*)(LIST).aptr = (double)(VAL),                             \
+    (LIST).anum++,                                                     \
+    (LIST).aptr++,                                                     \
+    0))
+
+#endif
+
+#if defined(__sparc64__)
+
+/* Up to 16 leading float or double non-varargs args can be passed in
+ * float registers, but we also push them into the corresponding int
+ * registers in case of varargs.
+ */
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((LIST).anum < 16 && ((LIST).darg_mask |= (1 << (LIST).anum))),    \
+    (((float*)(LIST).aptr)[-1] = (float)(VAL)),                                \
+    (LIST).anum++,                                                     \
+    0))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((LIST).anum < 16 && ((LIST).darg_mask |= (1 << (LIST).anum))),    \
+    ((double*)(LIST).aptr)[-1] = (double)(VAL),                                \
+    (LIST).anum++,                                                     \
+    0))
+
+#endif
+
+#if defined(__alpha__)
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((double*)(LIST).aptr)[-1] = (double)(VAL),                                \
+    0))
+
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1                                                                        \
+   : ((LIST).aptr++,                                                   \
+      ((LIST).aptr > &(LIST).args[6]                                   \
+       ? /* These args will be fetched from memory using "lds" instructions */ \
+         /* therefore store them as floats */                          \
+         (*(float*)((LIST).aptr-1) = (float)(VAL))                     \
+       : /* The first 6 args will be put into registers by "ldt" instructions */ \
+         /* (see avcall-alpha.c!). Therefore store them as doubles. */ \
+         /* When viewed as floats, the value will be the correct one. */\
+         (*(double*)((LIST).aptr-1) = (double)(float)(VAL))),          \
+      0))
+
+#endif
+
+#if defined(__hppa__) && !defined(__hppa64__)
+
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr <= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr--,                                                     \
+    ((LIST).aptr >= &(LIST).args_end[-4]                               \
+     ? ((LIST).farg_mask |= (unsigned int)1 << ((LIST).args_end - (LIST).aptr - 1), 0) \
+     : 0),                                                             \
+    *(float*)(LIST).aptr = (float)(VAL),                               \
+    0))
+
+#define _av_double(LIST,VAL)                                           \
+  ((__avword*)(((uintptr_t)(LIST).aptr-sizeof(double)) & -(intptr_t)sizeof(double)) < (LIST).eptr \
+   ? -1 :                                                              \
+   ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr-sizeof(double)) & -(intptr_t)sizeof(double)), \
+    ((LIST).aptr >= &(LIST).args_end[-4]                               \
+     ? ((LIST).darg_mask |= (unsigned int)1 << ((LIST).args_end - (LIST).aptr - 1), 0) \
+     : 0),                                                             \
+    *(double*)(LIST).aptr = (double)(VAL),                             \
+    0))
+
+#endif
+
+#if defined(__hppa64__)
+
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   (((LIST).aptr < &(LIST).args[8]                                     \
+     ? ((LIST).farg_mask |= (unsigned int)1 << ((LIST).aptr - (LIST).args), 0) \
+     : 0),                                                             \
+    (LIST).aptr++,                                                     \
+    ((float*)(LIST).aptr)[-1] = (float)(VAL),                          \
+    0))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   (((LIST).aptr < &(LIST).args[8]                                     \
+     ? ((LIST).darg_mask |= (unsigned int)1 << ((LIST).aptr - (LIST).args), 0) \
+     : 0),                                                             \
+    (LIST).aptr++,                                                     \
+    ((double*)(LIST).aptr)[-1] = (double)(VAL),                                \
+    0))
+
+#endif
+
+#if defined(__arm__) && !defined(__armhf__)
+
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((float*)(LIST).aptr)[-1] = (float)(VAL),                          \
+    0))
+
+#define _av_double(LIST,VAL)                                           \
+  ((__avword*)(((uintptr_t)(LIST).aptr + 15) & -8) > (LIST).eptr       \
+   ? -1 :                                                              \
+   ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr + 15) & -8),     \
+    (LIST).tmp._double = (double)(VAL),                                        \
+    (LIST).aptr[-2] = (LIST).tmp.words[0],                             \
+    (LIST).aptr[-1] = (LIST).tmp.words[1],                             \
+    0))
+
+#endif
+
+#if defined(__armhf__)
+
+/* Up to 16 float or up to 8 double args can be passed in float registers.
+ * But they overlap: {s0,s1} = d0, {s2,s3} = d1, and so on.
+ */
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).fanum <= 15                                                  \
+   ? ((LIST).fargs[(LIST).fanum] = (float)(VAL),                       \
+      (LIST).farg_mask |= ((unsigned int) 1) << (LIST).fanum,          \
+      (LIST).fanum++,                                                  \
+      0)                                                               \
+   : ((LIST).aptr >= (LIST).eptr                                       \
+      ? -1 :                                                           \
+      ((*(float*)(LIST).aptr = (float)(VAL)),                          \
+       (LIST).aptr++,                                                  \
+       0)))
+
+#define _av_double(LIST,VAL)                                           \
+  (((LIST).fanum % 2 ? ((LIST).fanum++, 0) : 0),                       \
+   ((LIST).fanum <= 14                                                 \
+    ? ((LIST).dargs[(LIST).fanum / 2] = (double)(VAL),                 \
+       (LIST).darg_mask |= ((unsigned int) 1) << ((LIST).fanum / 2),   \
+       (LIST).fanum += 2,                                              \
+       0)                                                              \
+    : ((LIST).aptr + 2 > (LIST).eptr                                   \
+       ? -1 :                                                          \
+       ((*(double*)(LIST).aptr = (double)(VAL)),                       \
+        (LIST).aptr += 2,                                              \
+        0))))
+
+#endif
+
+#if defined(__arm64__) || defined(__riscv64__)
+
+/* Up to __AV_FARG_NUM float or double args can be passed in float registers.
+   The remaining float or double args are passed in the general-purpose
+   argument sequence (first the integer registers, then the stack.) */
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).fanum < __AV_FARG_NUM                                                \
+   ? ((LIST).fargs[(LIST).fanum] = (float)(VAL),                       \
+      (LIST).farg_mask |= ((unsigned int) 1) << (LIST).fanum,          \
+      (LIST).fanum++,                                                  \
+      0)                                                               \
+   : ((LIST).aptr >= (LIST).eptr                                       \
+      ? -1 :                                                           \
+      ((*(float*)(LIST).aptr = (float)(VAL)),                          \
+       (LIST).aptr++,                                                  \
+       0)))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).fanum < __AV_FARG_NUM                                                \
+   ? ((LIST).dargs[(LIST).fanum] = (double)(VAL),                      \
+      (LIST).darg_mask |= ((unsigned int) 1) << (LIST).fanum,          \
+      (LIST).fanum++,                                                  \
+      0)                                                               \
+   : ((LIST).aptr >= (LIST).eptr                                       \
+      ? -1 :                                                           \
+      ((*(double*)(LIST).aptr = (double)(VAL)),                                \
+       (LIST).aptr++,                                                  \
+       0)))
+
+#endif
+
+#if defined(__powerpc_aix__)
+
+/* Up to __AV_FARG_NUM float or double non-varargs args can be passed in
+ * float registers, but we also push them into the corresponding int
+ * registers in case of varargs.
+ */
+
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((float*)(LIST).aptr)[-1] = (float)(VAL),                          \
+    (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (double)(float)(VAL)), \
+    0))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).aptr + 2 > (LIST).eptr                                       \
+   ? -1 :                                                              \
+   ((LIST).aptr += 2,                                                  \
+    (LIST).tmp._double = (double)(VAL),                                        \
+    (LIST).aptr[-2] = (LIST).tmp.words[0],                             \
+    (LIST).aptr[-1] = (LIST).tmp.words[1],                             \
+    (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (LIST).tmp._double), \
+    0))
+
+#endif
+
+#if defined(__powerpc_sysv4__)
+
+/* Up to __AV_FARG_NUM float or double non-varargs args can be passed in
+ * float registers, without occupying space in the general registers.
+ */
+
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM]                         \
+   ? ((*(LIST).faptr++ = (double)(float)(VAL)), 0)                     \
+   : ((LIST).aptr >= (LIST).eptr                                       \
+      ? -1 :                                                           \
+      ((LIST).aptr++,                                                  \
+       ((float*)(LIST).aptr)[-1] = (float)(VAL),                       \
+       0)))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM]                         \
+   ? ((*(LIST).faptr++ = (double)(VAL)), 0)                            \
+   : ((LIST).aptr + 2 > (LIST).eptr                                    \
+      ? -1 :                                                           \
+      ((LIST).aptr += 2,                                               \
+       (LIST).tmp._double = (double)(VAL),                             \
+       (LIST).aptr[-2] = (LIST).tmp.words[0],                          \
+       (LIST).aptr[-1] = (LIST).tmp.words[1],                          \
+       0)))
+
+#endif
+
+#if defined(__powerpc64__)
+
+/* Up to __AV_FARG_NUM float or double non-varargs args can be passed in
+ * float registers, but we also push them into the corresponding int
+ * registers in case of varargs.
+ */
+
+#if defined(_AIX)
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((float*)(LIST).aptr)[(LIST).flags & __AV_AIXCC_FLOAT_ARGS ? -2 : -1] = (float)(VAL), \
+    (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (double)(float)(VAL)), \
+    0))
+#elif defined(_LITTLE_ENDIAN)
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((float*)(LIST).aptr)[-2] = (float)(VAL),                          \
+    (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (double)(float)(VAL)), \
+    0))
+#else /* _BIG_ENDIAN */
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((float*)(LIST).aptr)[-1] = (float)(VAL),                          \
+    (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (double)(float)(VAL)), \
+    0))
+#endif
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((LIST).aptr++,                                                     \
+    ((double*)(LIST).aptr)[-1] = (double)(VAL),                                \
+    (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (double)(VAL)), \
+    0))
+
+#endif
+
+#if defined(__ia64__)
+
+/* Up to 8 leading float or double non-varargs args can be passed in
+ * float registers, but we also push them into the corresponding int
+ * registers in case of varargs.
+ */
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   ((*(float*)(LIST).aptr = (float)(VAL)),                             \
+    ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr = *(float*)(LIST).aptr, (LIST).faptr++)), \
+    (LIST).aptr++,                                                     \
+    0))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   (*(double*)(LIST).aptr = (double)(VAL),                             \
+    ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr = *(double*)(LIST).aptr, (LIST).faptr++)), \
+    (LIST).aptr++,                                                     \
+    0))
+
+#endif
+
+#if defined(__x86_64_sysv__)
+
+/* Up to 8 leading float or double args can be passed in float registers.
+ */
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM]                         \
+   ? (*(LIST).faptr = 0.0, *(float*)(LIST).faptr = (float)(VAL),       \
+      (LIST).faptr++,                                                  \
+      0)                                                               \
+   : ((LIST).aptr >= (LIST).eptr                                       \
+      ? -1 :                                                           \
+      ((*(float*)(LIST).aptr = (float)(VAL)),                          \
+       (LIST).aptr++,                                                  \
+       0)))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM]                         \
+   ? (*(LIST).faptr = (double)(VAL),                                   \
+      (LIST).faptr++,                                                  \
+      0)                                                               \
+   : ((LIST).aptr >= (LIST).eptr                                       \
+      ? -1 :                                                           \
+      ((*(double*)(LIST).aptr = (double)(VAL)),                                \
+       (LIST).aptr++,                                                  \
+       0)))
+
+#endif
+
+#if defined(__x86_64_ms__)
+
+/* The float or double args among the first 4 argument words are passed
+ * in floating-point registers, but we also push them into the
+ * corresponding integer registers in case of varargs.
+ */
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   (((LIST).anum < 4                                                   \
+     ? ((LIST).farg_mask |= (1 << (LIST).anum),                                \
+        (LIST).fargs[(LIST).anum] = *(float*)(LIST).aptr = (float)(VAL)) \
+     : (*(float*)(LIST).aptr = (float)(VAL))),                         \
+    (LIST).anum++,                                                     \
+    (LIST).aptr++,                                                     \
+    0))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).aptr >= (LIST).eptr                                          \
+   ? -1 :                                                              \
+   (((LIST).anum < 4                                                   \
+     ? ((LIST).darg_mask |= (1 << (LIST).anum),                                \
+        (LIST).dargs[(LIST).anum] = *(double*)(LIST).aptr = (double)(VAL)) \
+     : (*(double*)(LIST).aptr = (double)(VAL))),                       \
+    (LIST).anum++,                                                     \
+    (LIST).aptr++,                                                     \
+    0))
+
+#endif
+
+#if defined(__s390__) && !defined(__s390x__)
+
+/* Up to 2 float or double non-varargs args can be passed in
+ * float registers, without occupying space in the general registers.
+ */
+
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).fanum < __AV_FARG_NUM                                                \
+   ? ((LIST).fargs[(LIST).fanum] = (float)(VAL),                       \
+      (LIST).farg_mask |= ((unsigned int) 1) << (LIST).fanum,          \
+      (LIST).fanum++,                                                  \
+      0)                                                               \
+   : ((LIST).aptr >= (LIST).eptr                                       \
+      ? -1 :                                                           \
+      ((LIST).aptr++,                                                  \
+       ((float*)(LIST).aptr)[-1] = (float)(VAL),                       \
+       0)))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).fanum < __AV_FARG_NUM                                                \
+   ? ((LIST).dargs[(LIST).fanum] = (double)(VAL),                      \
+       (LIST).darg_mask |= ((unsigned int) 1) << (LIST).fanum,         \
+       (LIST).fanum++,                                                 \
+       0)                                                              \
+   : ((LIST).aptr + 2 > (LIST).eptr                                    \
+      ? -1 :                                                           \
+      ((LIST).aptr += 2,                                               \
+       (LIST).tmp._double = (double)(VAL),                             \
+       (LIST).aptr[-2] = (LIST).tmp.words[0],                          \
+       (LIST).aptr[-1] = (LIST).tmp.words[1],                          \
+       0)))
+
+#endif
+
+#if defined(__s390x__)
+
+/* Up to __AV_FARG_NUM float or double args can be passed in float registers. */
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).fanum < __AV_FARG_NUM                                                \
+   ? ((LIST).fargs[(LIST).fanum] = (float)(VAL),                       \
+      (LIST).farg_mask |= ((unsigned int) 1) << (LIST).fanum,          \
+      (LIST).fanum++,                                                  \
+      0)                                                               \
+   : ((LIST).aptr >= (LIST).eptr                                       \
+      ? -1 :                                                           \
+      ((LIST).aptr++,                                                  \
+       ((float*)(LIST).aptr)[-1] = (float)(VAL),                       \
+       0)))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).fanum < __AV_FARG_NUM                                                \
+   ? ((LIST).dargs[(LIST).fanum] = (double)(VAL),                      \
+      (LIST).darg_mask |= ((unsigned int) 1) << (LIST).fanum,          \
+      (LIST).fanum++,                                                  \
+      0)                                                               \
+   : ((LIST).aptr >= (LIST).eptr                                       \
+      ? -1 :                                                           \
+      ((*(double*)(LIST).aptr = (double)(VAL)),                                \
+       (LIST).aptr++,                                                  \
+       0)))
+
+#endif
+
+#if defined(__riscv32__)
+
+/* Up to __AV_FARG_NUM float or double args can be passed in float registers.
+   The remaining float or double args are passed in the general-purpose
+   argument sequence (first the integer registers, then the stack.) */
+#define _av_float(LIST,VAL)                                            \
+  ((LIST).fanum < __AV_FARG_NUM                                                \
+   ? ((LIST).fargs[(LIST).fanum] = (float)(VAL),                       \
+      (LIST).farg_mask |= ((unsigned int) 1) << (LIST).fanum,          \
+      (LIST).fanum++,                                                  \
+      0)                                                               \
+   : ((LIST).aptr >= (LIST).eptr                                       \
+      ? -1 :                                                           \
+      ((*(float*)(LIST).aptr) = (float)(VAL),                          \
+       (LIST).aptr++,                                                  \
+       0)))
+
+#define _av_double(LIST,VAL)                                           \
+  ((LIST).fanum < __AV_FARG_NUM                                                \
+   ? ((LIST).dargs[(LIST).fanum] = (double)(VAL),                      \
+      (LIST).darg_mask |= ((unsigned int) 1) << (LIST).fanum,          \
+      (LIST).fanum++,                                                  \
+      0)                                                               \
+   : ((LIST).aptr + 2 > (LIST).eptr                                    \
+      ? -1 :                                                           \
+      ((LIST).aptr += 2,                                               \
+       (LIST).tmp._double = (double)(VAL),                             \
+       (LIST).aptr[-2] = (LIST).tmp.words[0],                          \
+       (LIST).aptr[-1] = (LIST).tmp.words[1],                          \
+       0)))
+
+#endif
+
+/*
+ * structure argument types
+ */
+
+extern void avcall_structcpy (void* dest, const void* src, unsigned long size, unsigned long alignment);
+
+#define __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,PLACE,VAL_ADDR)          \
+  avcall_structcpy(PLACE,VAL_ADDR,TYPE_SIZE,TYPE_ALIGN)
+
+/* Structure argument alignment. */
+#if defined(__i386__) && defined(_MSC_VER)
+/* In MSVC, doubles inside structures have alignment 8, i.e.
+ * __AV_alignof(double) = 8, but doubles (and also structures containing
+ * doubles) are passed on the stack with alignment 4. Looks really weird.
+ */
+#define __av_struct_alignment(TYPE_ALIGN)  \
+  ((TYPE_ALIGN) <= 4 ? (TYPE_ALIGN) : 4)
+#else
+#define __av_struct_alignment(TYPE_ALIGN)  \
+  (TYPE_ALIGN)
+#endif
+#if defined(__i386__) || defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__powerpc_aix__) || defined(__powerpc64__) || defined(__ia64__)
+/* Structures are passed as fully aligned structures on the arg stack.
+ * We align the aptr, store the structure, then fill to word alignment.
+ * Single-small-integer structures are NOT promoted to integers and have
+ * different alignment.
+ */
+/* little endian -> small structures < 1 word are adjusted to the left (i.e. occupy the low bits of the word) */
+#if defined(__i386__) || defined(__alpha__) || (defined(__arm__) && !defined(__armhf__) && defined(__ARMEL__))
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) > (LIST).eptr \
+   ? -1 :                                                              \
+   (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+    (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+    0))
+#endif
+#if defined(__ia64__)
+/* With GCC < 3, types larger than a word have 2-word alignment. */
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  (((LIST).flags & __AV_OLDGCC_STRUCT_ARGS)                            \
+   ? ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)), \
+      ((TYPE_SIZE) > sizeof(__avword) && (((LIST).aptr - &(LIST).args[0]) & 1) ? ++(LIST).aptr : 0), \
+      ((LIST).aptr > (LIST).eptr                                       \
+       ? -1 :                                                          \
+       (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \
+        (LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+        0)))                                                           \
+   : ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) > (LIST).eptr \
+      ? -1 :                                                           \
+      (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+       (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+       0)))
+#endif
+/* small structures < 1 word are adjusted depending on compiler */
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)
+#define __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                \
+  ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \
+   ? -1 :                                                              \
+   (++(LIST).anum,                                                     \
+    __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+    (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+    0))
+#define __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)       \
+  ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \
+   ? -1 :                                                              \
+   ((LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+    ++(LIST).anum,                                             \
+    __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL),\
+    0))
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((LIST).flags & __AV_SGICC_STRUCT_ARGS                               \
+   ? /* SGI MIPS cc passes small structures left-adjusted, although big-endian! */\
+     __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)           \
+   : /* SGI MIPS gcc passes small structures within the first four words left-   \
+      * adjusted, for compatibility with cc. But structures in memory are passed  \
+      * right-adjusted!! See gcc-2.6.3/config/mips/mips.c:function_arg().        \
+      */                                                                         \
+     ((LIST).aptr < &(LIST).args[4]                                    \
+      ? __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                \
+      : __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)))
+#endif
+#if defined(__mipsn32__) || defined(__mips64__)
+/* When a structure is passed (partially) in registers, it is passed in the
+ * integer registers, except that doubles within the structure are passed in
+ * the floating point registers. Instead of distinguishing these cases, we
+ * always pass the structure in both the integer and the floating point
+ * registers.
+ */
+#define __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                \
+  ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \
+   ? -1 :                                                              \
+   (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+    (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+    ((LIST).anum < 8 && ((LIST).darg_mask |= (-1 << (LIST).anum))),    \
+    (LIST).anum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \
+    (LIST).darg_mask &= (1 << ((LIST).anum < 8 ? (LIST).anum : 8)) - 1, \
+    0))
+#define __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)       \
+  ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \
+   ? -1 :                                                              \
+   ((LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+    __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \
+    ((LIST).anum < 8 && ((LIST).darg_mask |= (-1 << (LIST).anum))),    \
+    (LIST).anum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \
+    (LIST).darg_mask &= (1 << ((LIST).anum < 8 ? (LIST).anum : 8)) - 1, \
+    0))
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((LIST).flags & __AV_SGICC_STRUCT_ARGS                               \
+   ? /* SGI MIPS cc and gcc >= 3.4 passes small structures left-adjusted, although big-endian! */\
+     __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)           \
+   : /* SGI MIPS gcc < 3.4 passes small structures right-adjusted. */  \
+     __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL))
+#endif
+#if (defined(__armhf__) && defined(__ARMEL__))
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((((LIST).ianum*sizeof(__avword)+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) <= __AV_IARG_NUM*sizeof(__avword) \
+   ? ((LIST).ianum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \
+      __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)&(LIST).args[(LIST).ianum]-(TYPE_SIZE)),VAL), \
+      0)                                                               \
+   : ((LIST).aptr == &(LIST).args[__AV_IARG_NUM]                       \
+      ? /* split case */                                               \
+        ((__avword*)(((((uintptr_t)&(LIST).args[(LIST).ianum]+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \
+         ? -1 :                                                                \
+         (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)&(LIST).args[(LIST).ianum]+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+          (LIST).aptr = (__avword*)(((((uintptr_t)&(LIST).args[(LIST).ianum]+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+          (LIST).ianum = __AV_IARG_NUM,                                        \
+          0))                                                          \
+      : ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \
+         ? -1 :                                                                \
+         (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+          (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+          (LIST).ianum = __AV_IARG_NUM,                                        \
+          0))))
+#endif
+#if defined(__powerpc__) || defined(__powerpc64__)
+#define __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                \
+  ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \
+   ? -1 :                                                              \
+   (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+    (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+    0))
+#define __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)       \
+  ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \
+   ? -1 :                                                              \
+   ((LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+    __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \
+    0))
+#if (defined(__powerpc__) && !defined(__powerpc64__)) || (defined(__powerpc64__) && defined(_BIG_ENDIAN))
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((LIST).flags & __AV_AIXCC_STRUCT_ARGS                               \
+   ? /* AIX cc and xlc pass small structures left-adjusted, although big-endian! */\
+     __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)           \
+   : /* gcc passes small structures right-adjusted. */                 \
+     __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL))
+#endif
+#if (defined(__powerpc64__) && defined(_LITTLE_ENDIAN))
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)
+#endif
+#endif
+/* big endian -> small structures < 1 word are adjusted to the right (i.e. occupy the high bits of the word) */
+#if (defined(__arm__) && !defined(__armhf__) && !defined(__ARMEL__))
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \
+   ? -1 :                                                              \
+   ((LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+    __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \
+    0))
+#endif
+#if (defined(__armhf__) && !defined(__ARMEL__))
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((((LIST).ianum*sizeof(__avword)+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) <= __AV_IARG_NUM*sizeof(__avword) \
+   ? ((LIST).ianum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \
+      __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)&(LIST).args[(LIST).ianum]-(TYPE_SIZE)),VAL), \
+      0)                                                               \
+   : ((LIST).aptr == &(LIST).args[__AV_IARG_NUM]                       \
+      ? /* split case */                                               \
+        ((__avword*)(((((uintptr_t)&(LIST).args[(LIST).ianum]+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \
+         ? -1 :                                                                \
+         ((LIST).aptr = (__avword*)(((((uintptr_t)&(LIST).args[(LIST).ianum]+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+          __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \
+          (LIST).ianum = __AV_IARG_NUM,                                        \
+          0))                                                          \
+      : ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \
+         ? -1 :                                                                \
+         ((LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+          __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \
+          (LIST).ianum = __AV_IARG_NUM,                                        \
+          0))))
+#endif
+#if defined(__hppa64__)
+/* Structures are passed left-adjusted (although big-endian!). */
+#define __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                \
+  ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \
+   ? -1 :                                                              \
+   (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+    (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+    0))
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  __av_struct_leftadjusted(LIST,TYPE_SIZE,(TYPE_SIZE)>sizeof(__avword)?2*sizeof(__avword):(TYPE_ALIGN),VAL)
+#endif
+#endif
+#if defined(__m68k__)
+/* Structures are passed as embedded copies on the arg stack.
+ */
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \
+    ? -1 :                                                             \
+    ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+     __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL),\
+     0))
+#endif
+#if (defined(__sparc__) && !defined(__sparc64__))
+/* Structures are passed as pointers to caller-made local copies. We
+ * grab space for the copies from the end of the argument list space
+ * and always use maximal (double) alignment.
+ */
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+   (++(LIST).aptr                                                      \
+    > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\
+    ? -1 :                                                             \
+    (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL),    \
+     (LIST).aptr[-1] = (__avword)(LIST).eptr,                          \
+     0))
+#endif
+#if defined(__sparc64__)
+/* Structures <= 16 bytes are passed as embedded copies on the arg stack,
+ * left-adjusted (although big-endian!).
+ * When a structure is passed (partially) in registers, it is passed in the
+ * integer registers, except that floats and doubles within the structure
+ * are passed in the floating point registers. Instead of distinguishing
+ * these cases, we always pass the structure in both the integer and the
+ * floating point registers.
+ * Big structures are passed as pointers to caller-made local copies.
+ * FIXME: Shouldn't (LIST).anum be incremented in sync with (LIST).aptr ?
+ */
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((TYPE_SIZE) > 16                                                    \
+   ? (++(LIST).aptr                                                    \
+      > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\
+      ? -1 :                                                           \
+      (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL),  \
+       (LIST).aptr[-1] = (__avword)(LIST).eptr,                                \
+       0))                                                             \
+   : ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \
+      ? -1 :                                                           \
+      (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+       (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+       ((LIST).anum < 16 && ((LIST).darg_mask |= (-1 << (LIST).anum))),        \
+       (LIST).anum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \
+       (LIST).darg_mask &= (1 << ((LIST).anum < 16 ? (LIST).anum : 16)) - 1, \
+       0)))
+#endif
+#if defined(__hppa__) && !defined(__hppa64__)
+/* Structures <= 8 bytes are passed as embedded copies on the arg stack.
+ * Big structures are passed as pointers (to caller-made local copies
+ * with GCC >= 8, without copy otherwise).
+ */
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((TYPE_SIZE) > 8                                                     \
+   ? (--(LIST).aptr                                                    \
+      < ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr + (((TYPE_SIZE) + 7) & -8))) \
+      ? -1                                                             \
+      : (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE) + 7) & -8)), VAL), \
+         *(LIST).aptr = (__avword)((uintptr_t)(LIST).eptr - (((TYPE_SIZE) + 7) & -8)), \
+         0))                                                           \
+   : ((TYPE_SIZE) > 4                                                  \
+      ? ((__avword*)((((uintptr_t)(LIST).aptr & -8) - (intptr_t)(TYPE_SIZE)) & -8) < (LIST).eptr \
+         ? -1 :                                                                \
+         ((LIST).aptr = (__avword*)((((uintptr_t)(LIST).aptr & -8) - (intptr_t)(TYPE_SIZE)) & -8), \
+          __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).aptr,VAL), \
+          0))                                                          \
+      : /* FIXME: gcc-2.6.3 passes structures <= 4 bytes in memory left-adjusted! ?? */\
+        ((__avword*)(((uintptr_t)(LIST).aptr & -4) - (intptr_t)(TYPE_SIZE)) < (LIST).eptr \
+         ? -1 :                                                                \
+         (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(((uintptr_t)(LIST).aptr & -4) - (intptr_t)(TYPE_SIZE)),VAL), \
+          (LIST).aptr = (__avword*)((((uintptr_t)(LIST).aptr & -4) - (intptr_t)(TYPE_SIZE)) & -4),     \
+          0))))
+#endif
+#if defined(__arm64__)
+/* Structures <= 16 bytes are passed as embedded copies on the arg stack.
+ * Big structures are passed as pointers to caller-made local copies.
+ */
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((TYPE_SIZE) <= 16                                                   \
+   ? ((((LIST).ianum*sizeof(__avword)+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) <= __AV_IARG_NUM*sizeof(__avword) \
+      ? (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)&(LIST).iargs[(LIST).ianum],VAL), \
+         (LIST).ianum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \
+         0)                                                            \
+      : ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \
+         ? -1 :                                                                \
+         ((LIST).ianum = __AV_IARG_NUM,                                        \
+          __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+          (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+          0)))                                                         \
+   : ((LIST).ianum < __AV_IARG_NUM                                     \
+      ? ((LIST).aptr                                                   \
+         > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\
+         ? -1 :                                                                \
+         (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \
+          (LIST).iargs[(LIST).ianum++] = (__avword)(LIST).eptr,                \
+          0))                                                          \
+      : (++(LIST).aptr                                                 \
+         > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\
+         ? -1 :                                                                \
+         (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \
+          (LIST).aptr[-1] = (__avword)(LIST).eptr,                     \
+          0))))
+#endif
+#if defined(__powerpc_sysv4__)
+/* Structures are passed as pointers to caller-made local copies. We
+ * grab space for the copies from the end of the argument list space
+ * and always use maximal (double) alignment.
+ */
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+   ((LIST).ianum < __AV_IARG_NUM                                       \
+    ? ((LIST).aptr                                                     \
+       > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\
+       ? -1 :                                                          \
+       (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \
+        (LIST).iargs[(LIST).ianum++] = (__avword)(LIST).eptr,          \
+        0))                                                            \
+    : (++(LIST).aptr                                                   \
+       > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\
+       ? -1 :                                                          \
+       (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \
+        (LIST).aptr[-1] = (__avword)(LIST).eptr,                       \
+        0)))
+#endif
+#if defined(__x86_64_sysv__)
+/* Structures <= 16 bytes can be passed in integer or floating-point registers
+   if there is enough room for the whole number of words needed by the structure
+   in the corresponding iargs/fargs block. We can't distinguish the two cases
+   and support only passing in integer registers. Other structures are passed
+   on the arg stack. */
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                             \
+  (((TYPE_SIZE) <= 2*sizeof(__avword)                                          \
+    && (LIST).ianum + ((TYPE_SIZE) + sizeof(__avword)-1) / sizeof(__avword) <= __AV_IARG_NUM) \
+   ? (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)&(LIST).iargs[(LIST).ianum],VAL), \
+      (LIST).ianum += ((TYPE_SIZE) + sizeof(__avword)-1) / sizeof(__avword),   \
+      0)                                                                       \
+   : ((__avword*)((uintptr_t)(LIST).aptr + (((TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN))) > (LIST).eptr \
+      ? -1 :                                                                   \
+      ((LIST).aptr = (__avword*)((uintptr_t)(LIST).aptr + (((TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN))), \
+       __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr - (((TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN))),VAL), \
+       0)))
+#endif
+#if defined(__x86_64_ms__)
+/* Structures of 1, 2, 4, 8 bytes are passed as embedded copies on the arg stack.
+ * Big structures are passed as pointers to caller-made local copies.
+ */
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8        \
+   ? ((__avword*)((uintptr_t)(LIST).aptr + (((TYPE_SIZE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))) > (LIST).eptr \
+      ? -1 :                                                           \
+      ((LIST).aptr = (__avword*)((uintptr_t)(LIST).aptr + (((TYPE_SIZE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))), \
+       __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr - (((TYPE_SIZE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))),VAL), \
+       0))                                                             \
+   : (++(LIST).aptr                                                    \
+      > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\
+      ? -1 :                                                           \
+      (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL),  \
+       (LIST).aptr[-1] = (__avword)(LIST).eptr,                                \
+       0)))
+#endif
+#if defined(__s390__) || defined(__s390x__)
+/* Structures of 1, 2, 4, 8 bytes are passed as embedded copies on the arg stack.
+ * Big structures are passed as pointers to caller-made local copies.
+ */
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8        \
+   ? ((((LIST).ianum*sizeof(__avword)+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) <= __AV_IARG_NUM*sizeof(__avword) \
+      ? ((LIST).ianum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \
+         __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)&(LIST).iargs[(LIST).ianum]-(TYPE_SIZE)),VAL), \
+         0)                                                            \
+      : ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \
+         ? -1 :                                                                \
+         ((LIST).ianum = __AV_IARG_NUM,                                        \
+          __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+          (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+          0)))                                                         \
+   : ((LIST).ianum < __AV_IARG_NUM                                     \
+      ? ((LIST).aptr                                                   \
+         > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\
+         ? -1 :                                                                \
+         (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \
+          (LIST).iargs[(LIST).ianum++] = (__avword)(LIST).eptr,                \
+          0))                                                          \
+      : (++(LIST).aptr                                                 \
+         > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\
+         ? -1 :                                                                \
+         (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \
+          (LIST).aptr[-1] = (__avword)(LIST).eptr,                     \
+          0))))
+#endif
+#if defined(__riscv32__) || defined(__riscv64__)
+/* Structures <= 16 bytes are passed as embedded copies on the arg stack.
+ * Big structures are passed as pointers to caller-made local copies.
+ */
+#define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)                     \
+  ((TYPE_SIZE) <= 2*sizeof(__avword)                                   \
+   ? ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \
+      ? -1 :                                                           \
+      (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \
+       (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \
+       0))                                                             \
+   : (++(LIST).aptr                                                    \
+      > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\
+      ? -1 :                                                           \
+      (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL),  \
+       (LIST).aptr[-1] = (__avword)(LIST).eptr,                                \
+       0)))
+#endif
+
+
+#endif /* _AVCALL_INTERNAL_H */
diff --git a/avcall/avcall-libapi.c b/avcall/avcall-libapi.c
new file mode 100644 (file)
index 0000000..5b22dfc
--- /dev/null
@@ -0,0 +1,79 @@
+/*
+ * Copyright 2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "config.h"
+
+#include "avcall-internal.h"
+
+/* This is the implementation of the library API.
+   The symbols that the linker sees are all prefixed with 'avcall_',
+   to avoid potential collisions with other libraries. */
+
+int avcall_overflown (av_alist* list)
+{
+  return _av_overflown(AV_LIST_INNER(list));
+}
+
+void avcall_start (av_alist* list, __avword* list_args, __avword* list_args_end, __avword(*func)(), void* raddr, int rettype, int flags)
+{
+  __av_start(AV_LIST_INNER(list),list_args,list_args_end,func,raddr,rettype,flags);
+}
+
+void avcall_start_struct (av_alist* list, __avword* list_args, __avword* list_args_end, __avword(*func)(), size_t type_size, int type_splittable, void* raddr, int flags)
+{
+  __av_start_struct(AV_LIST_INNER(list),list_args,list_args_end,func,type_size,type_splittable,raddr,flags);
+}
+
+int avcall_arg_long (av_alist* list, long val)
+{
+  return __av_long(AV_LIST_INNER(list),val);
+}
+
+int avcall_arg_ulong (av_alist* list, unsigned long val)
+{
+  return __av_ulong(AV_LIST_INNER(list),val);
+}
+
+int avcall_arg_ptr (av_alist* list, void* val)
+{
+  return __av_ptr(AV_LIST_INNER(list),val);
+}
+
+int avcall_arg_longlong (av_alist* list, long long val)
+{
+  return __av_longlong(AV_LIST_INNER(list),val);
+}
+
+int avcall_arg_ulonglong (av_alist* list, unsigned long long val)
+{
+  return __av_ulonglong(AV_LIST_INNER(list),val);
+}
+
+int avcall_arg_float (av_alist* list, float val)
+{
+  return _av_float(AV_LIST_INNER(list),val);
+}
+
+int avcall_arg_double (av_alist* list, double val)
+{
+  return _av_double(AV_LIST_INNER(list),val);
+}
+
+int avcall_arg_struct (av_alist* list, size_t type_size, size_t type_align, const void* val_addr)
+{
+  return __av_struct(AV_LIST_INNER(list),type_size,type_align,val_addr);
+}
diff --git a/avcall/avcall-m68k-linux.s b/avcall/avcall-m68k-linux.s
new file mode 100644 (file)
index 0000000..6190bd9
--- /dev/null
@@ -0,0 +1,167 @@
+       .file   "avcall-m68k.c"
+       .text
+       .align  2
+       .globl  avcall_call
+       .type   avcall_call,@function
+avcall_call:
+       link.w %a6,#0
+       movm.l #0x3820,-(%sp)
+       move.l 8(%a6),%a2
+       lea (-1024,%sp),%sp
+       move.l 24(%a2),%d1
+       move.l 20(%a2),%d0
+       sub.l %d1,%d0
+       asr.l #2,%d0
+       jble .L54
+       move.l %sp,%a1
+       move.l %d1,%a0
+       move.l %d0,%d2
+       .align  2
+.L6:
+       move.l (%a0)+,(%a1)+
+       subq.l #1,%d2
+       jbne .L6
+.L54:
+       moveq.l #16,%d0
+       cmp.l 12(%a2),%d0
+       jbeq .L59
+.L7:
+       move.l 4(%a2),%a0
+       jsr (%a0)
+       move.l %d0,%d2
+       move.l %d1,%d3
+       move.l 12(%a2),%a1
+       moveq.l #1,%d1
+       cmp.l %a1,%d1
+       jbeq .L9
+       tst.l %a1
+       jbeq .L55
+       moveq.l #2,%d4
+       cmp.l %a1,%d4
+       jbeq .L58
+       moveq.l #3,%d4
+       cmp.l %a1,%d4
+       jbeq .L58
+       moveq.l #4,%d4
+       cmp.l %a1,%d4
+       jbeq .L58
+       moveq.l #5,%d4
+       cmp.l %a1,%d4
+       jbeq .L57
+       moveq.l #6,%d4
+       cmp.l %a1,%d4
+       jbeq .L57
+       moveq.l #7,%d4
+       cmp.l %a1,%d4
+       jbeq .L55
+       moveq.l #8,%d4
+       cmp.l %a1,%d4
+       jbeq .L55
+       moveq.l #9,%d4
+       cmp.l %a1,%d4
+       jbeq .L55
+       moveq.l #10,%d4
+       cmp.l %a1,%d4
+       jbeq .L55
+       lea (-11,%a1),%a0
+       moveq.l #1,%d4
+       cmp.l %a0,%d4
+       jbcc .L56
+       moveq.l #13,%d4
+       cmp.l %a1,%d4
+       jbeq .L60
+       moveq.l #14,%d4
+       cmp.l %a1,%d4
+       jbeq .L61
+       moveq.l #15,%d0
+       cmp.l %a1,%d0
+       jbeq .L55
+       moveq.l #16,%d1
+       cmp.l %a1,%d1
+       jbne .L9
+       btst #1,2(%a2)
+       jbeq .L9
+       move.l 16(%a2),%d0
+       moveq.l #1,%d4
+       cmp.l %d0,%d4
+       jbeq .L58
+       moveq.l #2,%d1
+       cmp.l %d0,%d1
+       jbeq .L57
+       moveq.l #4,%d4
+       cmp.l %d0,%d4
+       jbeq .L55
+       moveq.l #8,%d1
+       cmp.l %d0,%d1
+       jbne .L9
+.L56:
+       move.l 8(%a2),%a0
+       move.l %d2,(%a0)
+       move.l %d3,4(%a0)
+       jbra .L9
+       .align  2
+.L55:
+       move.l 8(%a2),%a0
+       move.l %d2,(%a0)
+       jbra .L9
+       .align  2
+.L57:
+       move.l 8(%a2),%a0
+       move.w %d2,(%a0)
+       jbra .L9
+       .align  2
+.L58:
+       move.l 8(%a2),%a0
+       move.b %d2,(%a0)
+       jbra .L9
+       .align  2
+.L61:
+       btst #6,3(%a2)
+       jbeq .L39
+       move.l 8(%a2),%a0
+       fmove.d %fp0,(%a0)
+       jbra .L9
+       .align  2
+.L39:
+       move.l 8(%a2),%a0
+       move.l %d0,(%a0)
+       move.l %d1,4(%a0)
+       jbra .L9
+       .align  2
+.L60:
+       move.l (%a2),%d2
+       btst #6,%d2
+       jbeq .L33
+       move.l 8(%a2),%a0
+       fmove.s %fp0,(%a0)
+       jbra .L9
+       .align  2
+.L33:
+       btst #5,%d2
+       jbeq .L35
+       move.l 8(%a2),%a0
+       move.l %d1,-(%sp)
+       move.l %d0,-(%sp)
+       fmove.d (%sp)+,%fp0
+       fmove.s %fp0,(%a0)
+       jbra .L9
+       .align  2
+.L35:
+       move.l 8(%a2),%a0
+       move.l %d0,(%a0)
+       jbra .L9
+       .align  2
+.L59:
+#APP
+       move.l 8(%a2),%a1
+#NO_APP
+       jbra .L7
+       .align  2
+.L9:
+       clr.l %d0
+       movm.l -16(%a6),#0x41c
+       unlk %a6
+       rts
+.Lfe1:
+       .size   avcall_call,.Lfe1-avcall_call
+       .ident  "GCC: (GNU) 3.1"
diff --git a/avcall/avcall-m68k-sun.s b/avcall/avcall-m68k-sun.s
new file mode 100644 (file)
index 0000000..0ffb17c
--- /dev/null
@@ -0,0 +1,163 @@
+#NO_APP
+       .text
+       .even
+       .globl  _avcall_call
+_avcall_call:
+       link a6,#0
+       moveml #0x3820,sp@-
+       movel a6@(8),a2
+       lea sp@(-1024),sp
+       movel a2@(24),d1
+       movel a2@(20),d0
+       subl d1,d0
+       asrl #2,d0
+       jle L54
+       movel sp,a1
+       movel d1,a0
+       movel d0,d2
+       .even
+L6:
+       movel a0@+,a1@+
+       subql #1,d2
+       jne L6
+L54:
+       moveq #16,d0
+       cmpl a2@(12),d0
+       jeq L59
+L7:
+       movel a2@(4),a0
+       jsr a0@
+       movel d0,d2
+       movel d1,d3
+       movel a2@(12),a1
+       moveq #1,d1
+       cmpl a1,d1
+       jeq L9
+       tstl a1
+       jeq L55
+       moveq #2,d4
+       cmpl a1,d4
+       jeq L58
+       moveq #3,d4
+       cmpl a1,d4
+       jeq L58
+       moveq #4,d4
+       cmpl a1,d4
+       jeq L58
+       moveq #5,d4
+       cmpl a1,d4
+       jeq L57
+       moveq #6,d4
+       cmpl a1,d4
+       jeq L57
+       moveq #7,d4
+       cmpl a1,d4
+       jeq L55
+       moveq #8,d4
+       cmpl a1,d4
+       jeq L55
+       moveq #9,d4
+       cmpl a1,d4
+       jeq L55
+       moveq #10,d4
+       cmpl a1,d4
+       jeq L55
+       lea a1@(-11),a0
+       moveq #1,d4
+       cmpl a0,d4
+       jcc L56
+       moveq #13,d4
+       cmpl a1,d4
+       jeq L60
+       moveq #14,d4
+       cmpl a1,d4
+       jeq L61
+       moveq #15,d0
+       cmpl a1,d0
+       jeq L55
+       moveq #16,d1
+       cmpl a1,d1
+       jne L9
+       btst #1,a2@(2)
+       jeq L9
+       movel a2@(16),d0
+       moveq #1,d4
+       cmpl d0,d4
+       jeq L58
+       moveq #2,d1
+       cmpl d0,d1
+       jeq L57
+       moveq #4,d4
+       cmpl d0,d4
+       jeq L55
+       moveq #8,d1
+       cmpl d0,d1
+       jne L9
+L56:
+       movel a2@(8),a0
+       movel d2,a0@
+       movel d3,a0@(4)
+       jra L9
+       .even
+L55:
+       movel a2@(8),a0
+       movel d2,a0@
+       jra L9
+       .even
+L57:
+       movel a2@(8),a0
+       movew d2,a0@
+       jra L9
+       .even
+L58:
+       movel a2@(8),a0
+       moveb d2,a0@
+       jra L9
+       .even
+L61:
+       btst #6,a2@(3)
+       jeq L39
+       movel a2@(8),a0
+       fmoved fp0,a0@
+       jra L9
+       .even
+L39:
+       movel a2@(8),a0
+       movel d0,a0@
+       movel d1,a0@(4)
+       jra L9
+       .even
+L60:
+       movel a2@,d2
+       btst #6,d2
+       jeq L33
+       movel a2@(8),a0
+       fmoves fp0,a0@
+       jra L9
+       .even
+L33:
+       btst #5,d2
+       jeq L35
+       movel a2@(8),a0
+       movel d1,sp@-
+       movel d0,sp@-
+       fmoved sp@+,fp0
+       fmoves fp0,a0@
+       jra L9
+       .even
+L35:
+       movel a2@(8),a0
+       movel d0,a0@
+       jra L9
+       .even
+L59:
+#APP
+       movel a2@(8),a1
+#NO_APP
+       jra L7
+       .even
+L9:
+       clrl d0
+       moveml a6@(-16),#0x41c
+       unlk a6
+       rts
diff --git a/avcall/avcall-m68k.c b/avcall/avcall-m68k.c
new file mode 100644 (file)
index 0000000..2be7276
--- /dev/null
@@ -0,0 +1,148 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for a m68k Sun3 with gcc/sun-cc.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  M68k Argument Passing Conventions:
+
+  All arguments are passed on the stack with word alignment. Doubles take
+  two words. Structure args are passed as true structures embedded in the
+  argument stack. To return a structure, the called function copies the
+  return value to the address supplied in register "a1". Gcc without
+  -fpcc-struct-return returns <= 4 byte structures as integers.
+
+  Compile this routine with gcc -O (or -O2 or -g -O) to get the right
+  register variables, or use the assembler version.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("sp");  /* C names for registers */
+  register __avword*   sret    __asm__("a1");  /* structure return pointer */
+/*register __avword    iret    __asm__("d0"); */
+  register __avword    iret2   __asm__("d1");
+  register float       fret    __asm__("d0");  /* d0 */
+  register double      dret    __asm__("d0");  /* d0,d1 */
+  register float       fp_fret __asm__("fp0");
+  register double      fp_dret __asm__("fp0");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  __avword i;
+  __avword i2;
+
+  for (i = 0; i < arglen; i++)         /* push function args onto stack */
+    argframe[i] = l->args[i];
+
+  if (l->rtype == __AVstruct)          /* push struct return address */
+    __asm__("move%.l %0,%/a1" : : "g" (l->raddr));
+
+  i = (*l->func)();                    /* call function */
+  i2 = iret2;
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, i);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, i);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, i);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, i);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, i);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, i);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, i);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, i);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, i);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, i);
+  } else
+  if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) {
+    void* raddr = l->raddr;
+    ((__avword*)raddr)[0] = i;
+    ((__avword*)raddr)[1] = i2;
+  } else
+  if (l->rtype == __AVfloat) {
+    if (l->flags & __AV_FREG_FLOAT_RETURN) {
+      RETURN(float, fp_fret);
+    } else {
+      if (l->flags & __AV_SUNCC_FLOAT_RETURN) {
+        RETURN(float, (float)dret);
+      } else {
+        RETURN(float, fret);
+      }
+    }
+  } else
+  if (l->rtype == __AVdouble) {
+    if (l->flags & __AV_FREG_FLOAT_RETURN) {
+      RETURN(double, fp_dret);
+    } else {
+      RETURN(double, dret);
+    }
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, i);
+  } else
+  if (l->rtype == __AVstruct) {
+    /* NB: On m68k, all structure sizes are divisible by 2. */
+    if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+      if (l->rsize == sizeof(char)) { /* can't occur */
+        RETURN(char, i);
+      } else
+      if (l->rsize == sizeof(short)) {
+        RETURN(short, i);
+      } else
+      if (l->rsize == sizeof(int)) {
+        RETURN(int, i);
+      } else
+      if (l->rsize == 2*sizeof(__avword)) {
+        void* raddr = l->raddr;
+        ((__avword*)raddr)[0] = i;
+        ((__avword*)raddr)[1] = i2;
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-m68k.mit.S b/avcall/avcall-m68k.mit.S
new file mode 100644 (file)
index 0000000..d9591d9
--- /dev/null
@@ -0,0 +1,166 @@
+#include "asm-m68k.h"
+       .text
+       .even
+       .globl C(avcall_call)
+       DECLARE_FUNCTION(avcall_call)
+FUNBEGIN(avcall_call)
+       link $a6,#0
+       moveml #0x3820,$sp@-
+       movel $a6@(8),$a2
+       lea $sp@(-1024),$sp
+       movel $a2@(24),$d1
+       movel $a2@(20),$d0
+       subl $d1,$d0
+       asrl #2,$d0
+       jle L(54)
+       movel $sp,$a1
+       movel $d1,$a0
+       movel $d0,$d2
+       .even
+L(6):
+       movel $a0@+,$a1@+
+       subql #1,$d2
+       jne L(6)
+L(54):
+       moveq #16,$d0
+       cmpl $a2@(12),$d0
+       jeq L(59)
+L(7):
+       movel $a2@(4),$a0
+       jsr $a0@
+       movel $d0,$d2
+       movel $d1,$d3
+       movel $a2@(12),$a1
+       moveq #1,$d1
+       cmpl $a1,$d1
+       jeq L(9)
+       tstl $a1
+       jeq L(55)
+       moveq #2,$d4
+       cmpl $a1,$d4
+       jeq L(58)
+       moveq #3,$d4
+       cmpl $a1,$d4
+       jeq L(58)
+       moveq #4,$d4
+       cmpl $a1,$d4
+       jeq L(58)
+       moveq #5,$d4
+       cmpl $a1,$d4
+       jeq L(57)
+       moveq #6,$d4
+       cmpl $a1,$d4
+       jeq L(57)
+       moveq #7,$d4
+       cmpl $a1,$d4
+       jeq L(55)
+       moveq #8,$d4
+       cmpl $a1,$d4
+       jeq L(55)
+       moveq #9,$d4
+       cmpl $a1,$d4
+       jeq L(55)
+       moveq #10,$d4
+       cmpl $a1,$d4
+       jeq L(55)
+       lea $a1@(-11),$a0
+       moveq #1,$d4
+       cmpl $a0,$d4
+       jcc L(56)
+       moveq #13,$d4
+       cmpl $a1,$d4
+       jeq L(60)
+       moveq #14,$d4
+       cmpl $a1,$d4
+       jeq L(61)
+       moveq #15,$d0
+       cmpl $a1,$d0
+       jeq L(55)
+       moveq #16,$d1
+       cmpl $a1,$d1
+       jne L(9)
+       btst #1,$a2@(2)
+       jeq L(9)
+       movel $a2@(16),$d0
+       moveq #1,$d4
+       cmpl $d0,$d4
+       jeq L(58)
+       moveq #2,$d1
+       cmpl $d0,$d1
+       jeq L(57)
+       moveq #4,$d4
+       cmpl $d0,$d4
+       jeq L(55)
+       moveq #8,$d1
+       cmpl $d0,$d1
+       jne L(9)
+L(56):
+       movel $a2@(8),$a0
+       movel $d2,$a0@
+       movel $d3,$a0@(4)
+       jra L(9)
+       .even
+L(55):
+       movel $a2@(8),$a0
+       movel $d2,$a0@
+       jra L(9)
+       .even
+L(57):
+       movel $a2@(8),$a0
+       movew $d2,$a0@
+       jra L(9)
+       .even
+L(58):
+       movel $a2@(8),$a0
+       moveb $d2,$a0@
+       jra L(9)
+       .even
+L(61):
+       btst #6,$a2@(3)
+       jeq L(39)
+       movel $a2@(8),$a0
+       fmoved $fp0,$a0@
+       jra L(9)
+       .even
+L(39):
+       movel $a2@(8),$a0
+       movel $d0,$a0@
+       movel $d1,$a0@(4)
+       jra L(9)
+       .even
+L(60):
+       movel $a2@,$d2
+       btst #6,$d2
+       jeq L(33)
+       movel $a2@(8),$a0
+       fmoves $fp0,$a0@
+       jra L(9)
+       .even
+L(33):
+       btst #5,$d2
+       jeq L(35)
+       movel $a2@(8),$a0
+       movel $d1,$sp@-
+       movel $d0,$sp@-
+       fmoved $sp@+,$fp0
+       fmoves $fp0,$a0@
+       jra L(9)
+       .even
+L(35):
+       movel $a2@(8),$a0
+       movel $d0,$a0@
+       jra L(9)
+       .even
+L(59):
+       movel $a2@(8),$a1
+       jra L(7)
+       .even
+L(9):
+       clrl $d0
+       moveml $a6@(-16),#0x41c
+       unlk $a6
+       rts
+FUNEND(avcall_call)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-m68k.motorola.S b/avcall/avcall-m68k.motorola.S
new file mode 100644 (file)
index 0000000..a03518d
--- /dev/null
@@ -0,0 +1,167 @@
+#include "asm-m68k.h"
+       .text
+       .align  2
+       .globl C(avcall_call)
+       DECLARE_FUNCTION(avcall_call)
+FUNBEGIN(avcall_call)
+       link.w %a6,#0
+       movm.l #0x3820,-(%sp)
+       move.l 8(%a6),%a2
+       lea (-1024,%sp),%sp
+       move.l 24(%a2),%d1
+       move.l 20(%a2),%d0
+       sub.l %d1,%d0
+       asr.l #2,%d0
+       jble L(54)
+       move.l %sp,%a1
+       move.l %d1,%a0
+       move.l %d0,%d2
+       .align  2
+L(6):
+       move.l (%a0)+,(%a1)+
+       subq.l #1,%d2
+       jbne L(6)
+L(54):
+       moveq.l #16,%d0
+       cmp.l 12(%a2),%d0
+       jbeq L(59)
+L(7):
+       move.l 4(%a2),%a0
+       jsr (%a0)
+       move.l %d0,%d2
+       move.l %d1,%d3
+       move.l 12(%a2),%a1
+       moveq.l #1,%d1
+       cmp.l %a1,%d1
+       jbeq L(9)
+       tst.l %a1
+       jbeq L(55)
+       moveq.l #2,%d4
+       cmp.l %a1,%d4
+       jbeq L(58)
+       moveq.l #3,%d4
+       cmp.l %a1,%d4
+       jbeq L(58)
+       moveq.l #4,%d4
+       cmp.l %a1,%d4
+       jbeq L(58)
+       moveq.l #5,%d4
+       cmp.l %a1,%d4
+       jbeq L(57)
+       moveq.l #6,%d4
+       cmp.l %a1,%d4
+       jbeq L(57)
+       moveq.l #7,%d4
+       cmp.l %a1,%d4
+       jbeq L(55)
+       moveq.l #8,%d4
+       cmp.l %a1,%d4
+       jbeq L(55)
+       moveq.l #9,%d4
+       cmp.l %a1,%d4
+       jbeq L(55)
+       moveq.l #10,%d4
+       cmp.l %a1,%d4
+       jbeq L(55)
+       lea (-11,%a1),%a0
+       moveq.l #1,%d4
+       cmp.l %a0,%d4
+       jbcc L(56)
+       moveq.l #13,%d4
+       cmp.l %a1,%d4
+       jbeq L(60)
+       moveq.l #14,%d4
+       cmp.l %a1,%d4
+       jbeq L(61)
+       moveq.l #15,%d0
+       cmp.l %a1,%d0
+       jbeq L(55)
+       moveq.l #16,%d1
+       cmp.l %a1,%d1
+       jbne L(9)
+       btst #1,2(%a2)
+       jbeq L(9)
+       move.l 16(%a2),%d0
+       moveq.l #1,%d4
+       cmp.l %d0,%d4
+       jbeq L(58)
+       moveq.l #2,%d1
+       cmp.l %d0,%d1
+       jbeq L(57)
+       moveq.l #4,%d4
+       cmp.l %d0,%d4
+       jbeq L(55)
+       moveq.l #8,%d1
+       cmp.l %d0,%d1
+       jbne L(9)
+L(56):
+       move.l 8(%a2),%a0
+       move.l %d2,(%a0)
+       move.l %d3,4(%a0)
+       jbra L(9)
+       .align  2
+L(55):
+       move.l 8(%a2),%a0
+       move.l %d2,(%a0)
+       jbra L(9)
+       .align  2
+L(57):
+       move.l 8(%a2),%a0
+       move.w %d2,(%a0)
+       jbra L(9)
+       .align  2
+L(58):
+       move.l 8(%a2),%a0
+       move.b %d2,(%a0)
+       jbra L(9)
+       .align  2
+L(61):
+       btst #6,3(%a2)
+       jbeq L(39)
+       move.l 8(%a2),%a0
+       fmove.d %fp0,(%a0)
+       jbra L(9)
+       .align  2
+L(39):
+       move.l 8(%a2),%a0
+       move.l %d0,(%a0)
+       move.l %d1,4(%a0)
+       jbra L(9)
+       .align  2
+L(60):
+       move.l (%a2),%d2
+       btst #6,%d2
+       jbeq L(33)
+       move.l 8(%a2),%a0
+       fmove.s %fp0,(%a0)
+       jbra L(9)
+       .align  2
+L(33):
+       btst #5,%d2
+       jbeq L(35)
+       move.l 8(%a2),%a0
+       move.l %d1,-(%sp)
+       move.l %d0,-(%sp)
+       fmove.d (%sp)+,%fp0
+       fmove.s %fp0,(%a0)
+       jbra L(9)
+       .align  2
+L(35):
+       move.l 8(%a2),%a0
+       move.l %d0,(%a0)
+       jbra L(9)
+       .align  2
+L(59):
+       move.l 8(%a2),%a1
+       jbra L(7)
+       .align  2
+L(9):
+       clr.l %d0
+       movm.l -16(%a6),#0x41c
+       unlk %a6
+       rts
+L(fe1):
+       FUNEND(avcall_call)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-mips.c b/avcall/avcall-mips.c
new file mode 100644 (file)
index 0000000..390bd60
--- /dev/null
@@ -0,0 +1,155 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+  Copyright 2005 Thiemo Seufer  <ths@debian.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for an SGI MIPS with gcc/sgi-cc.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  SGI MIPS Argument Passing Conventions
+
+  - The entire argument list forms a structure with all the appropriate
+    holes & alignments, and space for this is allocated in the stack frame.
+  - Shorter integers are promoted to word length (sizeof(int)=sizeof(long)=4).
+  - Doubles are 2 words aligned on even boundaries.
+  - The first 4 words of the structure are passed in registers $4...$7, stack
+    space for these is always allocated. Remaining words are passed on the
+    stack.
+  - If the first two args are floats or doubles, they are also passed in $f12
+    and $f14. But varargs functions will expect them in the integer registers
+    and we can't tell whether the function is varargs so we pass them both ways.
+  - GCC 3.3.x and 3.4.x pass the next args after two floats in $7 and on the
+    stack, instead of in $6, $7, and on the stack. This is a bug that is fixed
+    in GCC 4.0.4. We don't support these versions of GCC on mips with -mabi=32.
+  - Structure arguments are copies embedded in the arglist structure.
+  - Structure returns are pointers to caller-allocated space passed in as the
+    first argument of the list. The function also returns the pointer.
+  - Integer/pointer returns are in $2, float/double returns in $f0.
+  - Under IRIX 5, the called function expects to see its own address in $25.
+
+  This file needs to be compiled with gcc for the asm extensions, but the
+  assembly version of it and the header file seem to work with SGI cc.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+#define OFFSETOF(struct,member) ((int)&(((struct*)0)->member))
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp __asm__("$sp");  /* C names for registers */
+  register __avword    iret2 __asm__("$3");
+  register float       fret_tmp __asm__("$f0");
+  register double      dret_tmp __asm__("$f0");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword *space = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword));     /* big space for child's stack frame */
+  __avword *argframe = sp;     /* stack offset for argument list is 0 */
+  int arglen = l->aptr - l->args;
+  int i;
+  __avword iret;
+  float fret;
+  double dret;
+
+  /* load leading float args */
+  if (l->farg_mask & (1 << 0))
+    __asm__("l.s $f12,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[0]));
+  if (l->darg_mask & (1 << 0))
+    __asm__("l.d $f12,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,dargs[0]));
+  if (l->farg_mask & (1 << 1))
+    __asm__("l.s $f14,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[1]));
+  if (l->darg_mask & (1 << 1))
+    __asm__("l.d $f14,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,dargs[1]));
+
+  for (i = 4; i < arglen; i++)         /* push excess function args */
+    argframe[i] = l->args[i];
+
+  /* Note: The code of this call ought to put the address of the called function
+     in register $25 before the call.  */
+  iret = (*l->func)(l->args[0], l->args[1],  /* call function with 1st 4 args */
+                   l->args[2], l->args[3]);
+  fret = fret_tmp;
+  dret = dret_tmp;
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, iret);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, iret);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, iret);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, iret);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, iret);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, iret);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, iret);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, iret);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, iret);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, iret);
+  } else
+  if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) {
+    void* raddr = l->raddr;
+    ((__avword*)raddr)[0] = iret;
+    ((__avword*)raddr)[1] = iret2;
+  } else
+  if (l->rtype == __AVfloat) {
+    RETURN(float, fret);
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, dret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, iret);
+  } else
+  if (l->rtype == __AVstruct) {
+    if (l->flags & __AV_SMALL_STRUCT_RETURN) {
+      if (l->rsize == sizeof(char)) {
+        RETURN(char, iret);
+      } else
+      if (l->rsize == sizeof(short)) {
+        RETURN(short, iret);
+      } else
+      if (l->rsize == sizeof(int)) {
+        RETURN(int, iret);
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-mips64.c b/avcall/avcall-mips64.c
new file mode 100644 (file)
index 0000000..2da61a5
--- /dev/null
@@ -0,0 +1,495 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for an SGI 64-bit MIPS with sgi-cc.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  SGI MIPS 64-bit Argument Passing Conventions
+
+  - The entire argument list forms a structure with all the appropriate
+    holes & alignments, and space for this is allocated in the stack frame.
+  - Shorter integers are promoted to longword length (sizeof(long)=8).
+  - Doubles are 1 longword.
+  - Structure arguments are copies embedded in the arglist structure.
+  - The first 8 longwords of the structure are passed in registers $4...$11,
+    except that float arguments are passed in registers $f12...$f19, and
+    that double arguments and structure elements of type double are passed
+    in registers $f12...$f19. (But varargs functions may expect them in the
+    integer registers and we can't tell whether the function is varargs so
+    we pass them both ways.)
+    Remaining longwords are passed on the stack. No stack space is allocated
+    for the first 8 longwords of the structure.
+  - Structure returns of structures > 16 bytes: pointers to caller-allocated
+    space are passed in as the first argument of the list.
+  - Structure returns of structures <= 16 bytes: in the registers $2 (for the
+    first 8 bytes) and $3 (for the next 8 bytes).
+    A structure of 1 or 2 floats or doubles is returned in $f0 and $f2:
+    the first float or double in $f0, the second float or double in $f2.
+  - Integer/pointer returns are in $2, float/double returns in $f0.
+  - The called function expects to see its own address in $25.
+
+  This file needs to be compiled with gcc for the asm extensions, but the
+  assembly version of it and the header file seem to work with SGI cc.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+#define OFFSETOF(struct,member) ((int)&(((struct*)0)->member))
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("$sp");  /* C names for registers */
+  register float       fret    __asm__("$f0");
+  register double      dret    __asm__("$f0");
+/*register __avword    iret1   __asm__("$2"); */
+  register __avword    iret2   __asm__("$3");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  __avword iret;
+  int i;
+
+  if (l->farg_mask)
+    { /* push leading float args */
+      if (l->farg_mask & (1<<0))
+        __asm__("lwc1 $f12,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[0]));
+      if (l->farg_mask & (1<<1))
+        __asm__("lwc1 $f13,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[1]));
+      if (l->farg_mask & (1<<2))
+        __asm__("lwc1 $f14,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[2]));
+      if (l->farg_mask & (1<<3))
+        __asm__("lwc1 $f15,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[3]));
+      if (l->farg_mask & (1<<4))
+        __asm__("lwc1 $f16,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[4]));
+      if (l->farg_mask & (1<<5))
+        __asm__("lwc1 $f17,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[5]));
+      if (l->farg_mask & (1<<6))
+        __asm__("lwc1 $f18,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[6]));
+      if (l->farg_mask & (1<<7))
+        __asm__("lwc1 $f19,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[7]));
+    }
+  if (l->darg_mask)
+    { /* push leading double args */
+      __avword* a = l->args;
+      if (l->darg_mask & (1<<0))
+        __asm__("ldc1 $f12,%1(%0)" : : "p" (a), "i" (0 * sizeof (__avword)));
+      if (l->darg_mask & (1<<1))
+        __asm__("ldc1 $f13,%1(%0)" : : "p" (a), "i" (1 * sizeof (__avword)));
+      if (l->darg_mask & (1<<2))
+        __asm__("ldc1 $f14,%1(%0)" : : "p" (a), "i" (2 * sizeof (__avword)));
+      if (l->darg_mask & (1<<3))
+        __asm__("ldc1 $f15,%1(%0)" : : "p" (a), "i" (3 * sizeof (__avword)));
+      if (l->darg_mask & (1<<4))
+        __asm__("ldc1 $f16,%1(%0)" : : "p" (a), "i" (4 * sizeof (__avword)));
+      if (l->darg_mask & (1<<5))
+        __asm__("ldc1 $f17,%1(%0)" : : "p" (a), "i" (5 * sizeof (__avword)));
+      if (l->darg_mask & (1<<6))
+        __asm__("ldc1 $f18,%1(%0)" : : "p" (a), "i" (6 * sizeof (__avword)));
+      if (l->darg_mask & (1<<7))
+        __asm__("ldc1 $f19,%1(%0)" : : "p" (a), "i" (7 * sizeof (__avword)));
+    }
+
+  for (i = 8; i < arglen; i++)         /* push excess function args */
+    argframe[i-8] = l->args[i];
+
+                                       /* call function with 1st 8 args */
+  __asm__ __volatile__ ("ld $4,%0" : : "m" (l->args[0]) : "$4"); /* arg1 = l->args[0]; */
+  __asm__ __volatile__ ("ld $5,%0" : : "m" (l->args[1]) : "$5"); /* arg1 = l->args[1]; */
+  __asm__ __volatile__ ("ld $6,%0" : : "m" (l->args[2]) : "$6"); /* arg1 = l->args[2]; */
+  __asm__ __volatile__ ("ld $7,%0" : : "m" (l->args[3]) : "$7"); /* arg1 = l->args[3]; */
+  __asm__ __volatile__ ("ld $8,%0" : : "m" (l->args[4]) : "$8"); /* arg1 = l->args[4]; */
+  __asm__ __volatile__ ("ld $9,%0" : : "m" (l->args[5]) : "$9"); /* arg1 = l->args[5]; */
+  __asm__ __volatile__ ("ld $10,%0" : : "m" (l->args[6]) : "$10"); /* arg1 = l->args[6]; */
+  __asm__ __volatile__ ("ld $11,%0" : : "m" (l->args[7]) : "$11"); /* arg1 = l->args[7]; */
+  /* Note: The code of this call ought to put the address of the called function
+     in register $25 before the call.  */
+  iret = (*l->func)();
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, iret);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, iret);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, iret);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, iret);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, iret);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, iret);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, iret);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, iret);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, iret);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, iret);
+  } else
+  if (l->rtype == __AVlonglong) {
+    RETURN(long long, iret);
+  } else
+  if (l->rtype == __AVulonglong) {
+    RETURN(unsigned long long, iret);
+  } else
+  if (l->rtype == __AVfloat) {
+    RETURN(float, fret);
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, dret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, iret);
+  } else
+  if (l->rtype == __AVstruct) {
+    if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+      if (l->flags & __AV_GCC_STRUCT_RETURN) {
+        /* gcc returns structs of size 1,2,4,8 in registers. */
+        if (l->rsize == sizeof(char)) {
+          RETURN(char, iret);
+        } else
+        if (l->rsize == sizeof(short)) {
+          RETURN(short, iret);
+        } else
+        if (l->rsize == sizeof(int)) {
+          RETURN(int, iret);
+        } else
+        if (l->rsize == sizeof(long)) {
+          RETURN(long, iret);
+        }
+      } else {
+        /* cc returns structs of size <= 16 in registers. */
+        if (l->rsize > 0 && l->rsize <= 16) {
+          void* raddr = l->raddr;
+          #if 0 /* Unoptimized */
+          if (l->rsize == 1) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            #endif
+          } else
+          if (l->rsize == 2) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            #endif
+          } else
+          if (l->rsize == 3) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            #endif
+          } else
+          if (l->rsize == 4) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            #endif
+          } else
+          if (l->rsize == 5) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+            #endif
+          } else
+          if (l->rsize == 6) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+            #endif
+          } else
+          if (l->rsize == 7) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8);
+            #endif
+          } else
+          if (l->rsize >= 8 && l->rsize <= 16) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[7] = (unsigned char)(iret);
+            #endif
+            if (l->rsize == 8) {
+            } else
+            if (l->rsize == 9) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              #endif
+            } else
+            if (l->rsize == 10) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              #endif
+            } else
+            if (l->rsize == 11) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              #endif
+            } else
+            if (l->rsize == 12) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              #endif
+            } else
+            if (l->rsize == 13) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+              #endif
+            } else
+            if (l->rsize == 14) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+              #endif
+            } else
+            if (l->rsize == 15) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8);
+              #endif
+            } else
+            if (l->rsize == 16) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2);
+              #endif
+            }
+          }
+          #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+          uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avword) */
+          __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+          uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+          uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avword) */
+          #if defined(_MIPSEL)
+          if (count <= sizeof(__avword)) {
+            /* Use iret. */
+            if (end_offset <= sizeof(__avword)) {
+              /* 0 < end_offset ≤ sizeof(__avword) */
+              __avword mask0 = ((__avword)2 << (end_offset*8-1)) - ((__avword)1 << (start_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            } else {
+              /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+              __avword mask0 = - ((__avword)1 << (start_offset*8));
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+              wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avword)*8-start_offset*8))) & mask1;
+            }
+          } else {
+            /* Use iret, iret2. */
+            __avword mask0 = - ((__avword)1 << (start_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            if (end_offset <= 2*sizeof(__avword)) {
+              /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1;
+            } else {
+              /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+              __avword mask2 = ((__avword)2 << (end_offset*8-2*sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] = (iret >> (sizeof(__avword)*8-start_offset*8)) | (iret2 << (start_offset*8));
+              wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avword)*8-start_offset*8))) & mask2;
+            }
+          }
+          #else
+          if (count <= sizeof(__avword)) {
+            /* Use iret. */
+            if (end_offset <= sizeof(__avword)) {
+              /* 0 < end_offset ≤ sizeof(__avword) */
+              __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - ((__avword)1 << (sizeof(__avword)*8-end_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+            } else {
+              /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+              __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+              __avword mask1 = - ((__avword)1 << (2*sizeof(__avword)*8-end_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+              wordaddr[1] ^= (wordaddr[1] ^ (iret << (sizeof(__avword)*8-start_offset*8))) & mask1;
+            }
+          } else {
+            /* Use iret, iret2. */
+            __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+            wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+            if (end_offset <= 2*sizeof(__avword)) {
+              /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+              __avword mask1 = - ((__avword)1 << (2*sizeof(__avword)*8-end_offset*8));
+              wordaddr[1] ^= (wordaddr[1] ^ ((iret << (sizeof(__avword)*4-start_offset*4) << (sizeof(__avword)*4-start_offset*4)) | (iret2 >> (start_offset*8)))) & mask1;
+            } else {
+              /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+              __avword mask2 = - ((__avword)1 << (3*sizeof(__avword)*8-end_offset*8));
+              wordaddr[1] = (iret << (sizeof(__avword)*8-start_offset*8)) | (iret2 >> (start_offset*8));
+              wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (sizeof(__avword)*8-start_offset*8))) & mask2;
+            }
+          }
+          #endif
+          #endif
+        }
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-mips64eb-linux.s b/avcall/avcall-mips64eb-linux.s
new file mode 100644 (file)
index 0000000..c638618
--- /dev/null
@@ -0,0 +1,734 @@
+       .file   1 "avcall-mips64.c"
+       .section .mdebug.abi64
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       .frame  $fp,32,$31              # vars= 0, regs= 4/0, args= 0, gp= 0
+       .mask   0xd0010000,-8
+       .fmask  0x00000000,0
+       ld      $2,40($4)
+       ld      $12,48($4)
+       lw      $3,68($4)
+       daddiu  $sp,$sp,-32
+       dsubu   $6,$2,$12
+       dsra    $6,$6,3
+       sd      $fp,16($sp)
+       sd      $16,0($sp)
+       sd      $31,24($sp)
+       move    $fp,$sp
+       daddiu  $sp,$sp,-2064
+       move    $16,$4
+       sll     $6,$6,0
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,.L2
+       move    $2,$sp
+       .set    macro
+       .set    reorder
+
+       andi    $4,$3,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L125
+       andi    $4,$3,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 77 "avcall-mips64.c" 1
+       lwc1 $f12,76($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x2
+.L125:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L126
+       andi    $4,$3,0x4
+       .set    macro
+       .set    reorder
+
+#APP
+ # 79 "avcall-mips64.c" 1
+       lwc1 $f13,80($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x4
+.L126:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L127
+       andi    $4,$3,0x8
+       .set    macro
+       .set    reorder
+
+#APP
+ # 81 "avcall-mips64.c" 1
+       lwc1 $f14,84($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x8
+.L127:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L128
+       andi    $4,$3,0x10
+       .set    macro
+       .set    reorder
+
+#APP
+ # 83 "avcall-mips64.c" 1
+       lwc1 $f15,88($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x10
+.L128:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L129
+       andi    $4,$3,0x20
+       .set    macro
+       .set    reorder
+
+#APP
+ # 85 "avcall-mips64.c" 1
+       lwc1 $f16,92($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x20
+.L129:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L130
+       andi    $4,$3,0x40
+       .set    macro
+       .set    reorder
+
+#APP
+ # 87 "avcall-mips64.c" 1
+       lwc1 $f17,96($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x40
+.L130:
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L131
+       andi    $3,$3,0x80
+       .set    macro
+       .set    reorder
+
+#APP
+ # 89 "avcall-mips64.c" 1
+       lwc1 $f18,100($16)
+ # 0 "" 2
+#NO_APP
+       andi    $3,$3,0x80
+.L131:
+       bne     $3,$0,.L118
+.L2:
+       lw      $3,72($16)
+.L124:
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$0,.L123
+       slt     $3,$6,9
+       .set    macro
+       .set    reorder
+
+       andi    $4,$3,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L132
+       andi    $4,$3,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 97 "avcall-mips64.c" 1
+       ldc1 $f12,0($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x2
+.L132:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L133
+       andi    $4,$3,0x4
+       .set    macro
+       .set    reorder
+
+#APP
+ # 99 "avcall-mips64.c" 1
+       ldc1 $f13,8($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x4
+.L133:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L134
+       andi    $4,$3,0x8
+       .set    macro
+       .set    reorder
+
+#APP
+ # 101 "avcall-mips64.c" 1
+       ldc1 $f14,16($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x8
+.L134:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L135
+       andi    $4,$3,0x10
+       .set    macro
+       .set    reorder
+
+#APP
+ # 103 "avcall-mips64.c" 1
+       ldc1 $f15,24($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x10
+.L135:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L136
+       andi    $4,$3,0x20
+       .set    macro
+       .set    reorder
+
+#APP
+ # 105 "avcall-mips64.c" 1
+       ldc1 $f16,32($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x20
+.L136:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L137
+       andi    $4,$3,0x40
+       .set    macro
+       .set    reorder
+
+#APP
+ # 107 "avcall-mips64.c" 1
+       ldc1 $f17,40($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x40
+.L137:
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L138
+       andi    $3,$3,0x80
+       .set    macro
+       .set    reorder
+
+#APP
+ # 109 "avcall-mips64.c" 1
+       ldc1 $f18,48($12)
+ # 0 "" 2
+#NO_APP
+       andi    $3,$3,0x80
+.L138:
+       bne     $3,$0,.L119
+       slt     $3,$6,9
+.L123:
+       .set    noreorder
+       .set    nomacro
+       bne     $3,$0,.L22
+       daddiu  $4,$12,64
+       .set    macro
+       .set    reorder
+
+       li      $3,8                    # 0x8
+       .align  3
+.L21:
+       ld      $5,0($4)
+       addiu   $3,$3,1
+       daddiu  $4,$4,8
+       sd      $5,0($2)
+       .set    noreorder
+       .set    nomacro
+       bne     $6,$3,.L21
+       daddiu  $2,$2,8
+       .set    macro
+       .set    reorder
+
+.L22:
+#APP
+ # 118 "avcall-mips64.c" 1
+       ld $4,0($12)
+ # 0 "" 2
+ # 119 "avcall-mips64.c" 1
+       ld $5,8($12)
+ # 0 "" 2
+ # 120 "avcall-mips64.c" 1
+       ld $6,16($12)
+ # 0 "" 2
+ # 121 "avcall-mips64.c" 1
+       ld $7,24($12)
+ # 0 "" 2
+ # 122 "avcall-mips64.c" 1
+       ld $8,32($12)
+ # 0 "" 2
+ # 123 "avcall-mips64.c" 1
+       ld $9,40($12)
+ # 0 "" 2
+ # 124 "avcall-mips64.c" 1
+       ld $10,48($12)
+ # 0 "" 2
+ # 125 "avcall-mips64.c" 1
+       ld $11,56($12)
+ # 0 "" 2
+#NO_APP
+       ld      $25,8($16)
+       jalr    $25
+       lw      $4,24($16)
+       li      $5,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L110
+       li      $5,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,3                    # 0x3
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,5                    # 0x5
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,6                    # 0x6
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,7                    # 0x7
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L113
+       li      $5,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L113
+       li      $5,9                    # 0x9
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,10                   # 0xa
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,11                   # 0xb
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,12                   # 0xc
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,13                   # 0xd
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L120
+       li      $5,14                   # 0xe
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L121
+       li      $5,15                   # 0xf
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,16                   # 0x10
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,0($16)
+       andi    $5,$4,0x200
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       andi    $4,$4,0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L38
+       ld      $4,32($16)
+       .set    macro
+       .set    reorder
+
+       ld      $3,32($16)
+       li      $4,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L108
+       li      $4,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L111
+       li      $4,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L113
+       li      $4,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,.L140
+       ld      $3,16($16)
+       .set    macro
+       .set    reorder
+
+.L19:
+       move    $sp,$fp
+.L139:
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L110:
+       ld      $3,16($16)
+       .align  3
+.L140:
+       sd      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L119:
+#APP
+ # 111 "avcall-mips64.c" 1
+       ldc1 $f19,56($12)
+ # 0 "" 2
+#NO_APP
+       .set    noreorder
+       .set    nomacro
+       b       .L123
+       slt     $3,$6,9
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L118:
+#APP
+ # 91 "avcall-mips64.c" 1
+       lwc1 $f19,104($16)
+ # 0 "" 2
+#NO_APP
+       .set    noreorder
+       .set    nomacro
+       b       .L124
+       lw      $3,72($16)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L108:
+       ld      $3,16($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L111:
+       ld      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L113:
+       ld      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sw      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L120:
+       ld      $2,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L121:
+       ld      $2,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L38:
+       daddiu  $5,$4,-1
+       sltu    $5,$5,16
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       sltu    $7,$4,9
+       .set    macro
+       .set    reorder
+
+       ld      $6,16($16)
+       li      $8,-8                   # 0xfffffffffffffff8
+       andi    $5,$6,0x7
+       daddu   $4,$4,$5
+       .set    noreorder
+       .set    nomacro
+       beq     $7,$0,.L42
+       and     $6,$6,$8
+       .set    macro
+       .set    reorder
+
+       sltu    $3,$4,9
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,.L43
+       subu    $8,$0,$5
+       .set    macro
+       .set    reorder
+
+       subu    $3,$0,$5
+       sll     $7,$4,0
+       sll     $3,$3,3
+       ld      $8,0($6)
+       addiu   $3,$3,63
+       subu    $7,$0,$7
+       li      $4,2                    # 0x2
+       dsll    $4,$4,$3
+       sll     $7,$7,3
+       sll     $5,$5,3
+       li      $3,1                    # 0x1
+       dsll    $3,$3,$7
+       dsra    $2,$2,$5
+       dsubu   $3,$4,$3
+       xor     $2,$2,$8
+       and     $2,$3,$2
+       xor     $2,$2,$8
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,0($6)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L42:
+       subu    $9,$0,$5
+       ld      $11,0($6)
+       sll     $10,$9,3
+       addiu   $7,$10,63
+       sll     $5,$5,3
+       li      $8,2                    # 0x2
+       dsll    $8,$8,$7
+       dsra    $7,$2,$5
+       daddiu  $8,$8,-1
+       xor     $7,$7,$11
+       and     $7,$8,$7
+       xor     $7,$7,$11
+       sltu    $8,$4,17
+       .set    noreorder
+       .set    nomacro
+       bne     $8,$0,.L122
+       sd      $7,0($6)
+       .set    macro
+       .set    reorder
+
+       ld      $9,16($6)
+       sll     $4,$4,0
+       addiu   $10,$10,64
+       subu    $4,$0,$4
+       move    $8,$3
+       sll     $4,$4,3
+       dsll    $3,$3,$10
+       li      $7,-1                   # 0xffffffffffffffff
+       dsll    $4,$7,$4
+       xor     $3,$3,$9
+       dsll    $2,$2,$10
+       dsra    $5,$8,$5
+       and     $3,$4,$3
+       or      $2,$2,$5
+       xor     $3,$3,$9
+       sd      $2,8($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $3,16($6)
+       .set    macro
+       .set    reorder
+
+.L43:
+       ld      $11,0($6)
+       ld      $10,8($6)
+       sll     $7,$4,0
+       sll     $8,$8,3
+       sll     $5,$5,3
+       subu    $9,$0,$7
+       addiu   $4,$8,63
+       li      $7,2                    # 0x2
+       dsra    $3,$2,$5
+       dsll    $4,$7,$4
+       dsll    $2,$2,$8
+       sll     $7,$9,3
+       li      $5,-1                   # 0xffffffffffffffff
+       daddiu  $4,$4,-1
+       xor     $3,$3,$11
+       dsll    $5,$5,$7
+       xor     $2,$2,$10
+       and     $3,$4,$3
+       and     $2,$5,$2
+       xor     $3,$3,$11
+       xor     $2,$2,$10
+       sd      $3,0($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+.L122:
+       sll     $7,$9,2
+       addiu   $7,$7,32
+       ld      $8,8($6)
+       dsll    $2,$2,$7
+       sll     $4,$4,0
+       dsll    $7,$2,$7
+       dsra    $3,$3,$5
+       subu    $4,$0,$4
+       or      $3,$7,$3
+       sll     $4,$4,3
+       li      $2,-1                   # 0xffffffffffffffff
+       xor     $3,$3,$8
+       dsll    $2,$2,$4
+       and     $2,$3,$2
+       xor     $2,$2,$8
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/avcall/avcall-mips64eb-macro.S b/avcall/avcall-mips64eb-macro.S
new file mode 100644 (file)
index 0000000..6858ebf
--- /dev/null
@@ -0,0 +1,728 @@
+#include "asm-mips.h"
+       .file   1 "avcall-mips64.c"
+       .text
+       .align  2
+       .align  3
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       DECLARE_FUNCTION(avcall_call)
+avcall_call:
+       .frame  $fp,32,$31              
+       .mask   0xd0010000,-8
+       .fmask  0x00000000,0
+       ld      $2,40($4)
+       ld      $12,48($4)
+       lw      $3,68($4)
+       daddiu  $sp,$sp,-32
+       dsubu   $6,$2,$12
+       dsra    $6,$6,3
+       sd      $fp,16($sp)
+       sd      $16,0($sp)
+       sd      $31,24($sp)
+       move    $fp,$sp
+       daddiu  $sp,$sp,-2064
+       move    $16,$4
+       sll     $6,$6,0
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,.L2
+       move    $2,$sp
+       .set    macro
+       .set    reorder
+
+       andi    $4,$3,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L125
+       andi    $4,$3,0x2
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f12,76($16)
+
+       andi    $4,$3,0x2
+.L125:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L126
+       andi    $4,$3,0x4
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f13,80($16)
+
+       andi    $4,$3,0x4
+.L126:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L127
+       andi    $4,$3,0x8
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f14,84($16)
+
+       andi    $4,$3,0x8
+.L127:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L128
+       andi    $4,$3,0x10
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f15,88($16)
+
+       andi    $4,$3,0x10
+.L128:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L129
+       andi    $4,$3,0x20
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f16,92($16)
+
+       andi    $4,$3,0x20
+.L129:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L130
+       andi    $4,$3,0x40
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f17,96($16)
+
+       andi    $4,$3,0x40
+.L130:
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L131
+       andi    $3,$3,0x80
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f18,100($16)
+
+       andi    $3,$3,0x80
+.L131:
+       bne     $3,$0,.L118
+.L2:
+       lw      $3,72($16)
+.L124:
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$0,.L123
+       slt     $3,$6,9
+       .set    macro
+       .set    reorder
+
+       andi    $4,$3,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L132
+       andi    $4,$3,0x2
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f12,0($12)
+
+       andi    $4,$3,0x2
+.L132:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L133
+       andi    $4,$3,0x4
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f13,8($12)
+
+       andi    $4,$3,0x4
+.L133:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L134
+       andi    $4,$3,0x8
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f14,16($12)
+
+       andi    $4,$3,0x8
+.L134:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L135
+       andi    $4,$3,0x10
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f15,24($12)
+
+       andi    $4,$3,0x10
+.L135:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L136
+       andi    $4,$3,0x20
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f16,32($12)
+
+       andi    $4,$3,0x20
+.L136:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L137
+       andi    $4,$3,0x40
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f17,40($12)
+
+       andi    $4,$3,0x40
+.L137:
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L138
+       andi    $3,$3,0x80
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f18,48($12)
+
+       andi    $3,$3,0x80
+.L138:
+       bne     $3,$0,.L119
+       slt     $3,$6,9
+.L123:
+       .set    noreorder
+       .set    nomacro
+       bne     $3,$0,.L22
+       daddiu  $4,$12,64
+       .set    macro
+       .set    reorder
+
+       li      $3,8                    
+       .align  3
+.L21:
+       ld      $5,0($4)
+       addiu   $3,$3,1
+       daddiu  $4,$4,8
+       sd      $5,0($2)
+       .set    noreorder
+       .set    nomacro
+       bne     $6,$3,.L21
+       daddiu  $2,$2,8
+       .set    macro
+       .set    reorder
+
+.L22:
+
+       ld $4,0($12)
+       ld $5,8($12)
+       ld $6,16($12)
+       ld $7,24($12)
+       ld $8,32($12)
+       ld $9,40($12)
+       ld $10,48($12)
+       ld $11,56($12)
+
+       ld      $25,8($16)
+       jalr    $25
+       lw      $4,24($16)
+       li      $5,1                    
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L110
+       li      $5,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,3                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,5                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,6                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,7                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L113
+       li      $5,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L113
+       li      $5,9                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,10                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,11                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,12                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,13                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L120
+       li      $5,14                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L121
+       li      $5,15                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,16                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,0($16)
+       andi    $5,$4,0x200
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       andi    $4,$4,0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L38
+       ld      $4,32($16)
+       .set    macro
+       .set    reorder
+
+       ld      $3,32($16)
+       li      $4,1                    
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L108
+       li      $4,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L111
+       li      $4,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L113
+       li      $4,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,.L140
+       ld      $3,16($16)
+       .set    macro
+       .set    reorder
+
+.L19:
+       move    $sp,$fp
+.L139:
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L110:
+       ld      $3,16($16)
+       .align  3
+.L140:
+       sd      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L119:
+
+       ldc1 $f19,56($12)
+
+       .set    noreorder
+       .set    nomacro
+       b       .L123
+       slt     $3,$6,9
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L118:
+
+       lwc1 $f19,104($16)
+
+       .set    noreorder
+       .set    nomacro
+       b       .L124
+       lw      $3,72($16)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L108:
+       ld      $3,16($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L111:
+       ld      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L113:
+       ld      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sw      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L120:
+       ld      $2,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L121:
+       ld      $2,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L38:
+       daddiu  $5,$4,-1
+       sltu    $5,$5,16
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       sltu    $7,$4,9
+       .set    macro
+       .set    reorder
+
+       ld      $6,16($16)
+       li      $8,-8                   
+       andi    $5,$6,0x7
+       daddu   $4,$4,$5
+       .set    noreorder
+       .set    nomacro
+       beq     $7,$0,.L42
+       and     $6,$6,$8
+       .set    macro
+       .set    reorder
+
+       sltu    $3,$4,9
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,.L43
+       subu    $8,$0,$5
+       .set    macro
+       .set    reorder
+
+       subu    $3,$0,$5
+       sll     $7,$4,0
+       sll     $3,$3,3
+       ld      $8,0($6)
+       addiu   $3,$3,63
+       subu    $7,$0,$7
+       li      $4,2                    
+       dsll    $4,$4,$3
+       sll     $7,$7,3
+       sll     $5,$5,3
+       li      $3,1                    
+       dsll    $3,$3,$7
+       dsra    $2,$2,$5
+       dsubu   $3,$4,$3
+       xor     $2,$2,$8
+       and     $2,$3,$2
+       xor     $2,$2,$8
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,0($6)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L42:
+       subu    $9,$0,$5
+       ld      $11,0($6)
+       sll     $10,$9,3
+       addiu   $7,$10,63
+       sll     $5,$5,3
+       li      $8,2                    
+       dsll    $8,$8,$7
+       dsra    $7,$2,$5
+       daddiu  $8,$8,-1
+       xor     $7,$7,$11
+       and     $7,$8,$7
+       xor     $7,$7,$11
+       sltu    $8,$4,17
+       .set    noreorder
+       .set    nomacro
+       bne     $8,$0,.L122
+       sd      $7,0($6)
+       .set    macro
+       .set    reorder
+
+       ld      $9,16($6)
+       sll     $4,$4,0
+       addiu   $10,$10,64
+       subu    $4,$0,$4
+       move    $8,$3
+       sll     $4,$4,3
+       dsll    $3,$3,$10
+       li      $7,-1                   
+       dsll    $4,$7,$4
+       xor     $3,$3,$9
+       dsll    $2,$2,$10
+       dsra    $5,$8,$5
+       and     $3,$4,$3
+       or      $2,$2,$5
+       xor     $3,$3,$9
+       sd      $2,8($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $3,16($6)
+       .set    macro
+       .set    reorder
+
+.L43:
+       ld      $11,0($6)
+       ld      $10,8($6)
+       sll     $7,$4,0
+       sll     $8,$8,3
+       sll     $5,$5,3
+       subu    $9,$0,$7
+       addiu   $4,$8,63
+       li      $7,2                    
+       dsra    $3,$2,$5
+       dsll    $4,$7,$4
+       dsll    $2,$2,$8
+       sll     $7,$9,3
+       li      $5,-1                   
+       daddiu  $4,$4,-1
+       xor     $3,$3,$11
+       dsll    $5,$5,$7
+       xor     $2,$2,$10
+       and     $3,$4,$3
+       and     $2,$5,$2
+       xor     $3,$3,$11
+       xor     $2,$2,$10
+       sd      $3,0($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+.L122:
+       sll     $7,$9,2
+       addiu   $7,$7,32
+       ld      $8,8($6)
+       dsll    $2,$2,$7
+       sll     $4,$4,0
+       dsll    $7,$2,$7
+       dsra    $3,$3,$5
+       subu    $4,$0,$4
+       or      $3,$7,$3
+       sll     $4,$4,3
+       li      $2,-1                   
+       xor     $3,$3,$8
+       dsll    $2,$2,$4
+       and     $2,$3,$2
+       xor     $2,$2,$8
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
diff --git a/avcall/avcall-mips64el-linux.s b/avcall/avcall-mips64el-linux.s
new file mode 100644 (file)
index 0000000..ce33b01
--- /dev/null
@@ -0,0 +1,729 @@
+       .file   1 "avcall-mips64.c"
+       .section .mdebug.abi64
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       .frame  $fp,32,$31              # vars= 0, regs= 4/0, args= 0, gp= 0
+       .mask   0xd0010000,-8
+       .fmask  0x00000000,0
+       ld      $2,40($4)
+       ld      $12,48($4)
+       lw      $3,68($4)
+       daddiu  $sp,$sp,-32
+       dsubu   $6,$2,$12
+       dsra    $6,$6,3
+       sd      $fp,16($sp)
+       sd      $16,0($sp)
+       sd      $31,24($sp)
+       move    $fp,$sp
+       daddiu  $sp,$sp,-2064
+       move    $16,$4
+       sll     $6,$6,0
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,.L2
+       move    $2,$sp
+       .set    macro
+       .set    reorder
+
+       andi    $4,$3,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L125
+       andi    $4,$3,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 77 "avcall-mips64.c" 1
+       lwc1 $f12,76($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x2
+.L125:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L126
+       andi    $4,$3,0x4
+       .set    macro
+       .set    reorder
+
+#APP
+ # 79 "avcall-mips64.c" 1
+       lwc1 $f13,80($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x4
+.L126:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L127
+       andi    $4,$3,0x8
+       .set    macro
+       .set    reorder
+
+#APP
+ # 81 "avcall-mips64.c" 1
+       lwc1 $f14,84($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x8
+.L127:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L128
+       andi    $4,$3,0x10
+       .set    macro
+       .set    reorder
+
+#APP
+ # 83 "avcall-mips64.c" 1
+       lwc1 $f15,88($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x10
+.L128:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L129
+       andi    $4,$3,0x20
+       .set    macro
+       .set    reorder
+
+#APP
+ # 85 "avcall-mips64.c" 1
+       lwc1 $f16,92($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x20
+.L129:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L130
+       andi    $4,$3,0x40
+       .set    macro
+       .set    reorder
+
+#APP
+ # 87 "avcall-mips64.c" 1
+       lwc1 $f17,96($16)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x40
+.L130:
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L131
+       andi    $3,$3,0x80
+       .set    macro
+       .set    reorder
+
+#APP
+ # 89 "avcall-mips64.c" 1
+       lwc1 $f18,100($16)
+ # 0 "" 2
+#NO_APP
+       andi    $3,$3,0x80
+.L131:
+       bne     $3,$0,.L118
+.L2:
+       lw      $3,72($16)
+.L124:
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$0,.L123
+       slt     $3,$6,9
+       .set    macro
+       .set    reorder
+
+       andi    $4,$3,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L132
+       andi    $4,$3,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 97 "avcall-mips64.c" 1
+       ldc1 $f12,0($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x2
+.L132:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L133
+       andi    $4,$3,0x4
+       .set    macro
+       .set    reorder
+
+#APP
+ # 99 "avcall-mips64.c" 1
+       ldc1 $f13,8($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x4
+.L133:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L134
+       andi    $4,$3,0x8
+       .set    macro
+       .set    reorder
+
+#APP
+ # 101 "avcall-mips64.c" 1
+       ldc1 $f14,16($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x8
+.L134:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L135
+       andi    $4,$3,0x10
+       .set    macro
+       .set    reorder
+
+#APP
+ # 103 "avcall-mips64.c" 1
+       ldc1 $f15,24($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x10
+.L135:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L136
+       andi    $4,$3,0x20
+       .set    macro
+       .set    reorder
+
+#APP
+ # 105 "avcall-mips64.c" 1
+       ldc1 $f16,32($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x20
+.L136:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L137
+       andi    $4,$3,0x40
+       .set    macro
+       .set    reorder
+
+#APP
+ # 107 "avcall-mips64.c" 1
+       ldc1 $f17,40($12)
+ # 0 "" 2
+#NO_APP
+       andi    $4,$3,0x40
+.L137:
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L138
+       andi    $3,$3,0x80
+       .set    macro
+       .set    reorder
+
+#APP
+ # 109 "avcall-mips64.c" 1
+       ldc1 $f18,48($12)
+ # 0 "" 2
+#NO_APP
+       andi    $3,$3,0x80
+.L138:
+       bne     $3,$0,.L119
+       slt     $3,$6,9
+.L123:
+       .set    noreorder
+       .set    nomacro
+       bne     $3,$0,.L22
+       daddiu  $4,$12,64
+       .set    macro
+       .set    reorder
+
+       li      $3,8                    # 0x8
+       .align  3
+.L21:
+       ld      $5,0($4)
+       addiu   $3,$3,1
+       daddiu  $4,$4,8
+       sd      $5,0($2)
+       .set    noreorder
+       .set    nomacro
+       bne     $6,$3,.L21
+       daddiu  $2,$2,8
+       .set    macro
+       .set    reorder
+
+.L22:
+#APP
+ # 118 "avcall-mips64.c" 1
+       ld $4,0($12)
+ # 0 "" 2
+ # 119 "avcall-mips64.c" 1
+       ld $5,8($12)
+ # 0 "" 2
+ # 120 "avcall-mips64.c" 1
+       ld $6,16($12)
+ # 0 "" 2
+ # 121 "avcall-mips64.c" 1
+       ld $7,24($12)
+ # 0 "" 2
+ # 122 "avcall-mips64.c" 1
+       ld $8,32($12)
+ # 0 "" 2
+ # 123 "avcall-mips64.c" 1
+       ld $9,40($12)
+ # 0 "" 2
+ # 124 "avcall-mips64.c" 1
+       ld $10,48($12)
+ # 0 "" 2
+ # 125 "avcall-mips64.c" 1
+       ld $11,56($12)
+ # 0 "" 2
+#NO_APP
+       ld      $25,8($16)
+       jalr    $25
+       lw      $4,24($16)
+       li      $5,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L110
+       li      $5,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,3                    # 0x3
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,5                    # 0x5
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,6                    # 0x6
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,7                    # 0x7
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L113
+       li      $5,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L113
+       li      $5,9                    # 0x9
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,10                   # 0xa
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,11                   # 0xb
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,12                   # 0xc
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,13                   # 0xd
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L120
+       li      $5,14                   # 0xe
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L121
+       li      $5,15                   # 0xf
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,16                   # 0x10
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,0($16)
+       andi    $5,$4,0x200
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       andi    $4,$4,0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L38
+       ld      $5,32($16)
+       .set    macro
+       .set    reorder
+
+       ld      $3,32($16)
+       li      $4,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L108
+       li      $4,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L111
+       li      $4,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L113
+       li      $4,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,.L140
+       ld      $3,16($16)
+       .set    macro
+       .set    reorder
+
+.L19:
+       move    $sp,$fp
+.L139:
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L110:
+       ld      $3,16($16)
+       .align  3
+.L140:
+       sd      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L119:
+#APP
+ # 111 "avcall-mips64.c" 1
+       ldc1 $f19,56($12)
+ # 0 "" 2
+#NO_APP
+       .set    noreorder
+       .set    nomacro
+       b       .L123
+       slt     $3,$6,9
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L118:
+#APP
+ # 91 "avcall-mips64.c" 1
+       lwc1 $f19,104($16)
+ # 0 "" 2
+#NO_APP
+       .set    noreorder
+       .set    nomacro
+       b       .L124
+       lw      $3,72($16)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L108:
+       ld      $3,16($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L111:
+       ld      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L113:
+       ld      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sw      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L120:
+       ld      $2,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L121:
+       ld      $2,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L38:
+       daddiu  $4,$5,-1
+       sltu    $4,$4,16
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L19
+       sltu    $7,$5,9
+       .set    macro
+       .set    reorder
+
+       ld      $6,16($16)
+       li      $8,-8                   # 0xfffffffffffffff8
+       andi    $4,$6,0x7
+       daddu   $5,$5,$4
+       .set    noreorder
+       .set    nomacro
+       beq     $7,$0,.L42
+       and     $6,$6,$8
+       .set    macro
+       .set    reorder
+
+       sltu    $3,$5,9
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,.L43
+       dsll    $3,$5,3
+       .set    macro
+       .set    reorder
+
+       daddiu  $3,$3,-1
+       ld      $7,0($6)
+       li      $5,2                    # 0x2
+       sll     $3,$3,0
+       sll     $4,$4,3
+       dsll    $3,$5,$3
+       li      $5,1                    # 0x1
+       dsll    $5,$5,$4
+       dsll    $4,$2,$4
+       dsubu   $3,$3,$5
+       xor     $4,$4,$7
+       and     $4,$3,$4
+       xor     $4,$4,$7
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $4,0($6)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L42:
+       ld      $10,0($6)
+       sll     $8,$4,3
+       dsll    $7,$2,$8
+       li      $9,-1                   # 0xffffffffffffffff
+       dsll    $9,$9,$8
+       xor     $7,$7,$10
+       and     $7,$9,$7
+       xor     $7,$7,$10
+       sltu    $9,$5,17
+       subu    $4,$0,$4
+       .set    noreorder
+       .set    nomacro
+       bne     $9,$0,.L122
+       sd      $7,0($6)
+       .set    macro
+       .set    reorder
+
+       dsll    $5,$5,3
+       ld      $10,16($6)
+       sll     $4,$4,3
+       daddiu  $5,$5,-129
+       addiu   $4,$4,64
+       sll     $5,$5,0
+       li      $7,2                    # 0x2
+       move    $9,$3
+       dsll    $5,$7,$5
+       dsra    $3,$3,$4
+       daddiu  $5,$5,-1
+       xor     $3,$3,$10
+       dsra    $2,$2,$4
+       dsll    $8,$9,$8
+       and     $3,$5,$3
+       or      $2,$2,$8
+       xor     $3,$3,$10
+       sd      $2,8($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $3,16($6)
+       .set    macro
+       .set    reorder
+
+.L43:
+       ld      $10,0($6)
+       ld      $9,8($6)
+       subu    $7,$0,$4
+       daddiu  $3,$3,-65
+       sll     $4,$4,3
+       li      $5,2                    # 0x2
+       sll     $3,$3,0
+       sll     $7,$7,3
+       dsll    $8,$2,$4
+       dsll    $3,$5,$3
+       dsra    $2,$2,$7
+       li      $5,-1                   # 0xffffffffffffffff
+       dsll    $4,$5,$4
+       daddiu  $3,$3,-1
+       xor     $5,$8,$10
+       xor     $2,$2,$9
+       and     $2,$3,$2
+       and     $4,$4,$5
+       xor     $3,$4,$10
+       xor     $2,$2,$9
+       sd      $3,0($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+.L122:
+       sll     $4,$4,2
+       addiu   $4,$4,32
+       dsll    $5,$5,3
+       ld      $7,8($6)
+       dsra    $2,$2,$4
+       daddiu  $5,$5,-65
+       dsra    $4,$2,$4
+       dsll    $3,$3,$8
+       sll     $5,$5,0
+       li      $2,2                    # 0x2
+       or      $3,$4,$3
+       dsll    $2,$2,$5
+       xor     $3,$3,$7
+       daddiu  $2,$2,-1
+       and     $2,$3,$2
+       xor     $2,$2,$7
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/avcall/avcall-mips64el-macro.S b/avcall/avcall-mips64el-macro.S
new file mode 100644 (file)
index 0000000..ed3df52
--- /dev/null
@@ -0,0 +1,723 @@
+#include "asm-mips.h"
+       .file   1 "avcall-mips64.c"
+       .text
+       .align  2
+       .align  3
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       DECLARE_FUNCTION(avcall_call)
+avcall_call:
+       .frame  $fp,32,$31              
+       .mask   0xd0010000,-8
+       .fmask  0x00000000,0
+       ld      $2,40($4)
+       ld      $12,48($4)
+       lw      $3,68($4)
+       daddiu  $sp,$sp,-32
+       dsubu   $6,$2,$12
+       dsra    $6,$6,3
+       sd      $fp,16($sp)
+       sd      $16,0($sp)
+       sd      $31,24($sp)
+       move    $fp,$sp
+       daddiu  $sp,$sp,-2064
+       move    $16,$4
+       sll     $6,$6,0
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,.L2
+       move    $2,$sp
+       .set    macro
+       .set    reorder
+
+       andi    $4,$3,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L125
+       andi    $4,$3,0x2
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f12,76($16)
+
+       andi    $4,$3,0x2
+.L125:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L126
+       andi    $4,$3,0x4
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f13,80($16)
+
+       andi    $4,$3,0x4
+.L126:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L127
+       andi    $4,$3,0x8
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f14,84($16)
+
+       andi    $4,$3,0x8
+.L127:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L128
+       andi    $4,$3,0x10
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f15,88($16)
+
+       andi    $4,$3,0x10
+.L128:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L129
+       andi    $4,$3,0x20
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f16,92($16)
+
+       andi    $4,$3,0x20
+.L129:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L130
+       andi    $4,$3,0x40
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f17,96($16)
+
+       andi    $4,$3,0x40
+.L130:
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L131
+       andi    $3,$3,0x80
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f18,100($16)
+
+       andi    $3,$3,0x80
+.L131:
+       bne     $3,$0,.L118
+.L2:
+       lw      $3,72($16)
+.L124:
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$0,.L123
+       slt     $3,$6,9
+       .set    macro
+       .set    reorder
+
+       andi    $4,$3,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L132
+       andi    $4,$3,0x2
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f12,0($12)
+
+       andi    $4,$3,0x2
+.L132:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L133
+       andi    $4,$3,0x4
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f13,8($12)
+
+       andi    $4,$3,0x4
+.L133:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L134
+       andi    $4,$3,0x8
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f14,16($12)
+
+       andi    $4,$3,0x8
+.L134:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L135
+       andi    $4,$3,0x10
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f15,24($12)
+
+       andi    $4,$3,0x10
+.L135:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L136
+       andi    $4,$3,0x20
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f16,32($12)
+
+       andi    $4,$3,0x20
+.L136:
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L137
+       andi    $4,$3,0x40
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f17,40($12)
+
+       andi    $4,$3,0x40
+.L137:
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L138
+       andi    $3,$3,0x80
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f18,48($12)
+
+       andi    $3,$3,0x80
+.L138:
+       bne     $3,$0,.L119
+       slt     $3,$6,9
+.L123:
+       .set    noreorder
+       .set    nomacro
+       bne     $3,$0,.L22
+       daddiu  $4,$12,64
+       .set    macro
+       .set    reorder
+
+       li      $3,8                    
+       .align  3
+.L21:
+       ld      $5,0($4)
+       addiu   $3,$3,1
+       daddiu  $4,$4,8
+       sd      $5,0($2)
+       .set    noreorder
+       .set    nomacro
+       bne     $6,$3,.L21
+       daddiu  $2,$2,8
+       .set    macro
+       .set    reorder
+
+.L22:
+
+       ld $4,0($12)
+       ld $5,8($12)
+       ld $6,16($12)
+       ld $7,24($12)
+       ld $8,32($12)
+       ld $9,40($12)
+       ld $10,48($12)
+       ld $11,56($12)
+
+       ld      $25,8($16)
+       jalr    $25
+       lw      $4,24($16)
+       li      $5,1                    
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L110
+       li      $5,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,3                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L108
+       li      $5,5                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,6                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,7                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L113
+       li      $5,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L113
+       li      $5,9                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,10                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,11                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,12                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,13                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L120
+       li      $5,14                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L121
+       li      $5,15                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L110
+       li      $5,16                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,0($16)
+       andi    $5,$4,0x200
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       andi    $4,$4,0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L38
+       ld      $5,32($16)
+       .set    macro
+       .set    reorder
+
+       ld      $3,32($16)
+       li      $4,1                    
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L108
+       li      $4,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L111
+       li      $4,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L113
+       li      $4,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,.L140
+       ld      $3,16($16)
+       .set    macro
+       .set    reorder
+
+.L19:
+       move    $sp,$fp
+.L139:
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L110:
+       ld      $3,16($16)
+       .align  3
+.L140:
+       sd      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L119:
+
+       ldc1 $f19,56($12)
+
+       .set    noreorder
+       .set    nomacro
+       b       .L123
+       slt     $3,$6,9
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L118:
+
+       lwc1 $f19,104($16)
+
+       .set    noreorder
+       .set    nomacro
+       b       .L124
+       lw      $3,72($16)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L108:
+       ld      $3,16($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       daddiu  $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L111:
+       ld      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L113:
+       ld      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sw      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L120:
+       ld      $2,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L121:
+       ld      $2,16($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L38:
+       daddiu  $4,$5,-1
+       sltu    $4,$4,16
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L19
+       sltu    $7,$5,9
+       .set    macro
+       .set    reorder
+
+       ld      $6,16($16)
+       li      $8,-8                   
+       andi    $4,$6,0x7
+       daddu   $5,$5,$4
+       .set    noreorder
+       .set    nomacro
+       beq     $7,$0,.L42
+       and     $6,$6,$8
+       .set    macro
+       .set    reorder
+
+       sltu    $3,$5,9
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,.L43
+       dsll    $3,$5,3
+       .set    macro
+       .set    reorder
+
+       daddiu  $3,$3,-1
+       ld      $7,0($6)
+       li      $5,2                    
+       sll     $3,$3,0
+       sll     $4,$4,3
+       dsll    $3,$5,$3
+       li      $5,1                    
+       dsll    $5,$5,$4
+       dsll    $4,$2,$4
+       dsubu   $3,$3,$5
+       xor     $4,$4,$7
+       and     $4,$3,$4
+       xor     $4,$4,$7
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $4,0($6)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L42:
+       ld      $10,0($6)
+       sll     $8,$4,3
+       dsll    $7,$2,$8
+       li      $9,-1                   
+       dsll    $9,$9,$8
+       xor     $7,$7,$10
+       and     $7,$9,$7
+       xor     $7,$7,$10
+       sltu    $9,$5,17
+       subu    $4,$0,$4
+       .set    noreorder
+       .set    nomacro
+       bne     $9,$0,.L122
+       sd      $7,0($6)
+       .set    macro
+       .set    reorder
+
+       dsll    $5,$5,3
+       ld      $10,16($6)
+       sll     $4,$4,3
+       daddiu  $5,$5,-129
+       addiu   $4,$4,64
+       sll     $5,$5,0
+       li      $7,2                    
+       move    $9,$3
+       dsll    $5,$7,$5
+       dsra    $3,$3,$4
+       daddiu  $5,$5,-1
+       xor     $3,$3,$10
+       dsra    $2,$2,$4
+       dsll    $8,$9,$8
+       and     $3,$5,$3
+       or      $2,$2,$8
+       xor     $3,$3,$10
+       sd      $2,8($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $3,16($6)
+       .set    macro
+       .set    reorder
+
+.L43:
+       ld      $10,0($6)
+       ld      $9,8($6)
+       subu    $7,$0,$4
+       daddiu  $3,$3,-65
+       sll     $4,$4,3
+       li      $5,2                    
+       sll     $3,$3,0
+       sll     $7,$7,3
+       dsll    $8,$2,$4
+       dsll    $3,$5,$3
+       dsra    $2,$2,$7
+       li      $5,-1                   
+       dsll    $4,$5,$4
+       daddiu  $3,$3,-1
+       xor     $5,$8,$10
+       xor     $2,$2,$9
+       and     $2,$3,$2
+       and     $4,$4,$5
+       xor     $3,$4,$10
+       xor     $2,$2,$9
+       sd      $3,0($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+.L122:
+       sll     $4,$4,2
+       addiu   $4,$4,32
+       dsll    $5,$5,3
+       ld      $7,8($6)
+       dsra    $2,$2,$4
+       daddiu  $5,$5,-65
+       dsra    $4,$2,$4
+       dsll    $3,$3,$8
+       sll     $5,$5,0
+       li      $2,2                    
+       or      $3,$4,$3
+       dsll    $2,$2,$5
+       xor     $3,$3,$7
+       daddiu  $2,$2,-1
+       and     $2,$3,$2
+       xor     $2,$2,$7
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
diff --git a/avcall/avcall-mipseb-linux.s b/avcall/avcall-mipseb-linux.s
new file mode 100644 (file)
index 0000000..4a7dee3
--- /dev/null
@@ -0,0 +1,350 @@
+       .file   1 "avcall-mips.c"
+       .section .mdebug.abi32
+       .previous
+       .nan    legacy
+       .module fp=xx
+       .module nooddspreg
+       .abicalls
+       .text
+       .align  2
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       .frame  $fp,40,$31              # vars= 0, regs= 3/0, args= 16, gp= 8
+       .mask   0xc0010000,-4
+       .fmask  0x00000000,0
+       lw      $6,40($4)
+       lw      $5,20($4)
+       lw      $8,24($4)
+       addiu   $sp,$sp,-40
+       andi    $2,$6,0x1
+       sw      $fp,32($sp)
+       sw      $16,28($sp)
+       move    $fp,$sp
+       sw      $31,36($sp)
+       move    $16,$4
+       addiu   $sp,$sp,-1032
+       subu    $4,$5,$8
+       move    $3,$sp
+       .set    noreorder
+       .set    nomacro
+       beq     $2,$0,$L2
+       sra     $4,$4,2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 76 "avcall-mips.c" 1
+       l.s $f12,48($16)
+ # 0 "" 2
+#NO_APP
+$L2:
+       lw      $2,44($16)
+       andi    $7,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $7,$0,$L55
+       andi    $6,$6,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 78 "avcall-mips.c" 1
+       l.d $f12,56($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$6,0x2
+$L55:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,$L56
+       andi    $2,$2,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 80 "avcall-mips.c" 1
+       l.s $f14,52($16)
+ # 0 "" 2
+#NO_APP
+       andi    $2,$2,0x2
+$L56:
+       .set    noreorder
+       .set    nomacro
+       beql    $2,$0,$L57
+       slt     $4,$4,5
+       .set    macro
+       .set    reorder
+
+#APP
+ # 82 "avcall-mips.c" 1
+       l.d $f14,64($16)
+ # 0 "" 2
+#NO_APP
+       slt     $4,$4,5
+$L57:
+       addiu   $2,$8,16
+       .set    noreorder
+       .set    nomacro
+       bne     $4,$0,$L10
+       addiu   $3,$3,16
+       .set    macro
+       .set    reorder
+
+$L37:
+       lw      $4,0($2)
+       addiu   $3,$3,4
+       addiu   $2,$2,4
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$2,$L37
+       sw      $4,-4($3)
+       .set    macro
+       .set    reorder
+
+$L10:
+       lw      $5,4($8)
+       lw      $4,0($8)
+       lw      $25,4($16)
+       lw      $7,12($8)
+       .set    noreorder
+       .set    nomacro
+       jalr    $25
+       lw      $6,8($8)
+       .set    macro
+       .set    reorder
+
+       lw      $4,12($16)
+       li      $5,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L58
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L46
+       li      $5,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,3                    # 0x3
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,5                    # 0x5
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L50
+       li      $5,6                    # 0x6
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L50
+       li      $5,7                    # 0x7
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,9                    # 0x9
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,10                   # 0xa
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       addiu   $5,$4,-11
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bnel    $5,$0,$L52
+       lw      $4,8($16)
+       .set    macro
+       .set    reorder
+
+       li      $3,13                   # 0xd
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L53
+       li      $3,14                   # 0xe
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L54
+       li      $3,15                   # 0xf
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L46
+       li      $3,16                   # 0x10
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$3,$L58
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $3,0($16)
+       andi    $3,$3,0x2
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,$L7
+       li      $4,1                    # 0x1
+       .set    macro
+       .set    reorder
+
+       lw      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,$L49
+       li      $4,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,$L50
+       li      $4,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,$L59
+       lw      $3,8($16)
+       .set    macro
+       .set    reorder
+
+$L7:
+       move    $sp,$fp
+$L58:
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L46:
+       lw      $3,8($16)
+$L59:
+       sw      $2,0($3)
+       move    $sp,$fp
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L49:
+       lw      $3,8($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L50:
+       lw      $3,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+$L53:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+$L52:
+       sw      $2,0($4)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sw      $3,4($4)
+       .set    macro
+       .set    reorder
+
+$L54:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/avcall/avcall-mipseb-macro.S b/avcall/avcall-mipseb-macro.S
new file mode 100644 (file)
index 0000000..e37fcd2
--- /dev/null
@@ -0,0 +1,344 @@
+#include "asm-mips.h"
+       .file   1 "avcall-mips.c"
+       .text
+       .align  2
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       DECLARE_FUNCTION(avcall_call)
+avcall_call:
+       .frame  $fp,40,$31              
+       .mask   0xc0010000,-4
+       .fmask  0x00000000,0
+       lw      $6,40($4)
+       lw      $5,20($4)
+       lw      $8,24($4)
+       addiu   $sp,$sp,-40
+       andi    $2,$6,0x1
+       sw      $fp,32($sp)
+       sw      $16,28($sp)
+       move    $fp,$sp
+       sw      $31,36($sp)
+       move    $16,$4
+       addiu   $sp,$sp,-1032
+       subu    $4,$5,$8
+       move    $3,$sp
+       .set    noreorder
+       .set    nomacro
+       beq     $2,$0,$L2
+       sra     $4,$4,2
+       .set    macro
+       .set    reorder
+
+
+       l.s $f12,48($16)
+
+$L2:
+       lw      $2,44($16)
+       andi    $7,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $7,$0,$L55
+       andi    $6,$6,0x2
+       .set    macro
+       .set    reorder
+
+
+       l.d $f12,56($16)
+
+       andi    $6,$6,0x2
+$L55:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,$L56
+       andi    $2,$2,0x2
+       .set    macro
+       .set    reorder
+
+
+       l.s $f14,52($16)
+
+       andi    $2,$2,0x2
+$L56:
+       .set    noreorder
+       .set    nomacro
+       beql    $2,$0,$L57
+       slt     $4,$4,5
+       .set    macro
+       .set    reorder
+
+
+       l.d $f14,64($16)
+
+       slt     $4,$4,5
+$L57:
+       addiu   $2,$8,16
+       .set    noreorder
+       .set    nomacro
+       bne     $4,$0,$L10
+       addiu   $3,$3,16
+       .set    macro
+       .set    reorder
+
+$L37:
+       lw      $4,0($2)
+       addiu   $3,$3,4
+       addiu   $2,$2,4
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$2,$L37
+       sw      $4,-4($3)
+       .set    macro
+       .set    reorder
+
+$L10:
+       lw      $5,4($8)
+       lw      $4,0($8)
+       lw      $25,4($16)
+       lw      $7,12($8)
+       .set    noreorder
+       .set    nomacro
+       jalr    $25
+       lw      $6,8($8)
+       .set    macro
+       .set    reorder
+
+       lw      $4,12($16)
+       li      $5,1                    
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L58
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L46
+       li      $5,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,3                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,5                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L50
+       li      $5,6                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L50
+       li      $5,7                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,9                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,10                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       addiu   $5,$4,-11
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bnel    $5,$0,$L52
+       lw      $4,8($16)
+       .set    macro
+       .set    reorder
+
+       li      $3,13                   
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L53
+       li      $3,14                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L54
+       li      $3,15                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L46
+       li      $3,16                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$3,$L58
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $3,0($16)
+       andi    $3,$3,0x2
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,$L7
+       li      $4,1                    
+       .set    macro
+       .set    reorder
+
+       lw      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,$L49
+       li      $4,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,$L50
+       li      $4,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,$L59
+       lw      $3,8($16)
+       .set    macro
+       .set    reorder
+
+$L7:
+       move    $sp,$fp
+$L58:
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L46:
+       lw      $3,8($16)
+$L59:
+       sw      $2,0($3)
+       move    $sp,$fp
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L49:
+       lw      $3,8($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L50:
+       lw      $3,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+$L53:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+$L52:
+       sw      $2,0($4)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sw      $3,4($4)
+       .set    macro
+       .set    reorder
+
+$L54:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
diff --git a/avcall/avcall-mipsel-linux.s b/avcall/avcall-mipsel-linux.s
new file mode 100644 (file)
index 0000000..4a7dee3
--- /dev/null
@@ -0,0 +1,350 @@
+       .file   1 "avcall-mips.c"
+       .section .mdebug.abi32
+       .previous
+       .nan    legacy
+       .module fp=xx
+       .module nooddspreg
+       .abicalls
+       .text
+       .align  2
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       .frame  $fp,40,$31              # vars= 0, regs= 3/0, args= 16, gp= 8
+       .mask   0xc0010000,-4
+       .fmask  0x00000000,0
+       lw      $6,40($4)
+       lw      $5,20($4)
+       lw      $8,24($4)
+       addiu   $sp,$sp,-40
+       andi    $2,$6,0x1
+       sw      $fp,32($sp)
+       sw      $16,28($sp)
+       move    $fp,$sp
+       sw      $31,36($sp)
+       move    $16,$4
+       addiu   $sp,$sp,-1032
+       subu    $4,$5,$8
+       move    $3,$sp
+       .set    noreorder
+       .set    nomacro
+       beq     $2,$0,$L2
+       sra     $4,$4,2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 76 "avcall-mips.c" 1
+       l.s $f12,48($16)
+ # 0 "" 2
+#NO_APP
+$L2:
+       lw      $2,44($16)
+       andi    $7,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $7,$0,$L55
+       andi    $6,$6,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 78 "avcall-mips.c" 1
+       l.d $f12,56($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$6,0x2
+$L55:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,$L56
+       andi    $2,$2,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 80 "avcall-mips.c" 1
+       l.s $f14,52($16)
+ # 0 "" 2
+#NO_APP
+       andi    $2,$2,0x2
+$L56:
+       .set    noreorder
+       .set    nomacro
+       beql    $2,$0,$L57
+       slt     $4,$4,5
+       .set    macro
+       .set    reorder
+
+#APP
+ # 82 "avcall-mips.c" 1
+       l.d $f14,64($16)
+ # 0 "" 2
+#NO_APP
+       slt     $4,$4,5
+$L57:
+       addiu   $2,$8,16
+       .set    noreorder
+       .set    nomacro
+       bne     $4,$0,$L10
+       addiu   $3,$3,16
+       .set    macro
+       .set    reorder
+
+$L37:
+       lw      $4,0($2)
+       addiu   $3,$3,4
+       addiu   $2,$2,4
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$2,$L37
+       sw      $4,-4($3)
+       .set    macro
+       .set    reorder
+
+$L10:
+       lw      $5,4($8)
+       lw      $4,0($8)
+       lw      $25,4($16)
+       lw      $7,12($8)
+       .set    noreorder
+       .set    nomacro
+       jalr    $25
+       lw      $6,8($8)
+       .set    macro
+       .set    reorder
+
+       lw      $4,12($16)
+       li      $5,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L58
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L46
+       li      $5,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,3                    # 0x3
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,5                    # 0x5
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L50
+       li      $5,6                    # 0x6
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L50
+       li      $5,7                    # 0x7
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,9                    # 0x9
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,10                   # 0xa
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       addiu   $5,$4,-11
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bnel    $5,$0,$L52
+       lw      $4,8($16)
+       .set    macro
+       .set    reorder
+
+       li      $3,13                   # 0xd
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L53
+       li      $3,14                   # 0xe
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L54
+       li      $3,15                   # 0xf
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L46
+       li      $3,16                   # 0x10
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$3,$L58
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $3,0($16)
+       andi    $3,$3,0x2
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,$L7
+       li      $4,1                    # 0x1
+       .set    macro
+       .set    reorder
+
+       lw      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,$L49
+       li      $4,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,$L50
+       li      $4,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,$L59
+       lw      $3,8($16)
+       .set    macro
+       .set    reorder
+
+$L7:
+       move    $sp,$fp
+$L58:
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L46:
+       lw      $3,8($16)
+$L59:
+       sw      $2,0($3)
+       move    $sp,$fp
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L49:
+       lw      $3,8($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L50:
+       lw      $3,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+$L53:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+$L52:
+       sw      $2,0($4)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sw      $3,4($4)
+       .set    macro
+       .set    reorder
+
+$L54:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/avcall/avcall-mipsel-macro.S b/avcall/avcall-mipsel-macro.S
new file mode 100644 (file)
index 0000000..e37fcd2
--- /dev/null
@@ -0,0 +1,344 @@
+#include "asm-mips.h"
+       .file   1 "avcall-mips.c"
+       .text
+       .align  2
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       DECLARE_FUNCTION(avcall_call)
+avcall_call:
+       .frame  $fp,40,$31              
+       .mask   0xc0010000,-4
+       .fmask  0x00000000,0
+       lw      $6,40($4)
+       lw      $5,20($4)
+       lw      $8,24($4)
+       addiu   $sp,$sp,-40
+       andi    $2,$6,0x1
+       sw      $fp,32($sp)
+       sw      $16,28($sp)
+       move    $fp,$sp
+       sw      $31,36($sp)
+       move    $16,$4
+       addiu   $sp,$sp,-1032
+       subu    $4,$5,$8
+       move    $3,$sp
+       .set    noreorder
+       .set    nomacro
+       beq     $2,$0,$L2
+       sra     $4,$4,2
+       .set    macro
+       .set    reorder
+
+
+       l.s $f12,48($16)
+
+$L2:
+       lw      $2,44($16)
+       andi    $7,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $7,$0,$L55
+       andi    $6,$6,0x2
+       .set    macro
+       .set    reorder
+
+
+       l.d $f12,56($16)
+
+       andi    $6,$6,0x2
+$L55:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,$L56
+       andi    $2,$2,0x2
+       .set    macro
+       .set    reorder
+
+
+       l.s $f14,52($16)
+
+       andi    $2,$2,0x2
+$L56:
+       .set    noreorder
+       .set    nomacro
+       beql    $2,$0,$L57
+       slt     $4,$4,5
+       .set    macro
+       .set    reorder
+
+
+       l.d $f14,64($16)
+
+       slt     $4,$4,5
+$L57:
+       addiu   $2,$8,16
+       .set    noreorder
+       .set    nomacro
+       bne     $4,$0,$L10
+       addiu   $3,$3,16
+       .set    macro
+       .set    reorder
+
+$L37:
+       lw      $4,0($2)
+       addiu   $3,$3,4
+       addiu   $2,$2,4
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$2,$L37
+       sw      $4,-4($3)
+       .set    macro
+       .set    reorder
+
+$L10:
+       lw      $5,4($8)
+       lw      $4,0($8)
+       lw      $25,4($16)
+       lw      $7,12($8)
+       .set    noreorder
+       .set    nomacro
+       jalr    $25
+       lw      $6,8($8)
+       .set    macro
+       .set    reorder
+
+       lw      $4,12($16)
+       li      $5,1                    
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L58
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L46
+       li      $5,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,3                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L49
+       li      $5,5                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L50
+       li      $5,6                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L50
+       li      $5,7                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,9                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       li      $5,10                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L46
+       addiu   $5,$4,-11
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bnel    $5,$0,$L52
+       lw      $4,8($16)
+       .set    macro
+       .set    reorder
+
+       li      $3,13                   
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L53
+       li      $3,14                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L54
+       li      $3,15                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$3,$L46
+       li      $3,16                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$3,$L58
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $3,0($16)
+       andi    $3,$3,0x2
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,$L7
+       li      $4,1                    
+       .set    macro
+       .set    reorder
+
+       lw      $3,16($16)
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,$L49
+       li      $4,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,$L50
+       li      $4,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,$L59
+       lw      $3,8($16)
+       .set    macro
+       .set    reorder
+
+$L7:
+       move    $sp,$fp
+$L58:
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L46:
+       lw      $3,8($16)
+$L59:
+       sw      $2,0($3)
+       move    $sp,$fp
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L49:
+       lw      $3,8($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       lw      $31,36($sp)
+       lw      $fp,32($sp)
+       lw      $16,28($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,40
+       .set    macro
+       .set    reorder
+
+$L50:
+       lw      $3,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+$L53:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+$L52:
+       sw      $2,0($4)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sw      $3,4($4)
+       .set    macro
+       .set    reorder
+
+$L54:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       $L7
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
diff --git a/avcall/avcall-mipsn32.c b/avcall/avcall-mipsn32.c
new file mode 100644 (file)
index 0000000..c776317
--- /dev/null
@@ -0,0 +1,496 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for an SGI 32-bit MIPS III with "cc -n32",
+  or gcc configured as mips-sgi-irix6.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  SGI MIPS new 32-bit Argument Passing Conventions
+
+  - The entire argument list forms a structure with all the appropriate
+    holes & alignments, and space for this is allocated in the stack frame.
+  - Shorter integers are promoted to long long length (sizeof(long long)=8).
+  - Doubles are 1 longword.
+  - Structure arguments are copies embedded in the arglist structure.
+  - The first 8 longwords of the structure are passed in registers $4...$11,
+    except that float arguments are passed in registers $f12...$f19, and
+    that double arguments and structure elements of type double are passed
+    in registers $f12...$f19. (But varargs functions may expect them in the
+    integer registers and we can't tell whether the function is varargs so
+    we pass them both ways.)
+    Remaining longwords are passed on the stack. No stack space is allocated
+    for the first 8 longwords of the structure.
+  - Structure returns of structures > 16 bytes: pointers to caller-allocated
+    space are passed in as the first argument of the list.
+  - Structure returns of structures <= 16 bytes: in the registers $2 (for the
+    first 8 bytes) and $3 (for the next 8 bytes).
+    A structure of 1 or 2 floats or doubles is returned in $f0 and $f2:
+    the first float or double in $f0, the second float or double in $f2.
+  - Integer/pointer returns are in $2, float/double returns in $f0.
+  - The called function expects to see its own address in $25.
+
+  This file needs to be compiled with gcc for the asm extensions, but the
+  assembly version of it and the header file seem to work with SGI cc.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+#define OFFSETOF(struct,member) ((int)&(((struct*)0)->member))
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("$sp");  /* C names for registers */
+  register float       fret    __asm__("$f0");
+  register double      dret    __asm__("$f0");
+/*register __avword    iret1   __asm__("$2"); */
+  register __avword    iret2   __asm__("$3");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword *argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword));  /* big space for child's stack frame */
+  int arglen = l->aptr - l->args;
+  __avword iret;
+  int i;
+
+  if (l->farg_mask)
+    { /* push leading float args */
+      if (l->farg_mask & (1<<0))
+        __asm__("lwc1 $f12,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[0]));
+      if (l->farg_mask & (1<<1))
+        __asm__("lwc1 $f13,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[1]));
+      if (l->farg_mask & (1<<2))
+        __asm__("lwc1 $f14,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[2]));
+      if (l->farg_mask & (1<<3))
+        __asm__("lwc1 $f15,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[3]));
+      if (l->farg_mask & (1<<4))
+        __asm__("lwc1 $f16,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[4]));
+      if (l->farg_mask & (1<<5))
+        __asm__("lwc1 $f17,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[5]));
+      if (l->farg_mask & (1<<6))
+        __asm__("lwc1 $f18,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[6]));
+      if (l->farg_mask & (1<<7))
+        __asm__("lwc1 $f19,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[7]));
+    }
+  if (l->darg_mask)
+    { /* push leading double args */
+      __avword* a = l->args;
+      if (l->darg_mask & (1<<0))
+        __asm__("ldc1 $f12,%1(%0)" : : "p" (a), "i" (0 * sizeof (__avword)));
+      if (l->darg_mask & (1<<1))
+        __asm__("ldc1 $f13,%1(%0)" : : "p" (a), "i" (1 * sizeof (__avword)));
+      if (l->darg_mask & (1<<2))
+        __asm__("ldc1 $f14,%1(%0)" : : "p" (a), "i" (2 * sizeof (__avword)));
+      if (l->darg_mask & (1<<3))
+        __asm__("ldc1 $f15,%1(%0)" : : "p" (a), "i" (3 * sizeof (__avword)));
+      if (l->darg_mask & (1<<4))
+        __asm__("ldc1 $f16,%1(%0)" : : "p" (a), "i" (4 * sizeof (__avword)));
+      if (l->darg_mask & (1<<5))
+        __asm__("ldc1 $f17,%1(%0)" : : "p" (a), "i" (5 * sizeof (__avword)));
+      if (l->darg_mask & (1<<6))
+        __asm__("ldc1 $f18,%1(%0)" : : "p" (a), "i" (6 * sizeof (__avword)));
+      if (l->darg_mask & (1<<7))
+        __asm__("ldc1 $f19,%1(%0)" : : "p" (a), "i" (7 * sizeof (__avword)));
+    }
+
+  for (i = 8; i < arglen; i++)         /* push excess function args */
+    argframe[i-8] = l->args[i];
+
+                                       /* call function with 1st 8 args */
+  __asm__ __volatile__ ("ld $4,%0" : : "m" (l->args[0]) : "$4"); /* arg1 = l->args[0]; */
+  __asm__ __volatile__ ("ld $5,%0" : : "m" (l->args[1]) : "$5"); /* arg1 = l->args[1]; */
+  __asm__ __volatile__ ("ld $6,%0" : : "m" (l->args[2]) : "$6"); /* arg1 = l->args[2]; */
+  __asm__ __volatile__ ("ld $7,%0" : : "m" (l->args[3]) : "$7"); /* arg1 = l->args[3]; */
+  __asm__ __volatile__ ("ld $8,%0" : : "m" (l->args[4]) : "$8"); /* arg1 = l->args[4]; */
+  __asm__ __volatile__ ("ld $9,%0" : : "m" (l->args[5]) : "$9"); /* arg1 = l->args[5]; */
+  __asm__ __volatile__ ("ld $10,%0" : : "m" (l->args[6]) : "$10"); /* arg1 = l->args[6]; */
+  __asm__ __volatile__ ("ld $11,%0" : : "m" (l->args[7]) : "$11"); /* arg1 = l->args[7]; */
+  /* Note: The code of this call ought to put the address of the called function
+     in register $25 before the call.  */
+  iret = (*l->func)();
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, iret);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, iret);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, iret);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, iret);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, iret);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, iret);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, iret);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, iret);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, iret);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, iret);
+  } else
+  if (l->rtype == __AVlonglong) {
+    RETURN(long long, iret);
+  } else
+  if (l->rtype == __AVulonglong) {
+    RETURN(unsigned long long, iret);
+  } else
+  if (l->rtype == __AVfloat) {
+    RETURN(float, fret);
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, dret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, iret);
+  } else
+  if (l->rtype == __AVstruct) {
+    if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+      if (l->flags & __AV_GCC_STRUCT_RETURN) {
+        /* gcc returns structs of size 1,2,4,8 in registers. */
+        if (l->rsize == sizeof(char)) {
+          RETURN(char, iret);
+        } else
+        if (l->rsize == sizeof(short)) {
+          RETURN(short, iret);
+        } else
+        if (l->rsize == sizeof(int)) {
+          RETURN(int, iret);
+        } else
+        if (l->rsize == sizeof(long long)) {
+          RETURN(long long, iret);
+        }
+      } else {
+        /* cc returns structs of size <= 16 in registers. */
+        if (l->rsize > 0 && l->rsize <= 16) {
+          void* raddr = l->raddr;
+          #if 0 /* Unoptimized */
+          if (l->rsize == 1) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            #endif
+          } else
+          if (l->rsize == 2) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            #endif
+          } else
+          if (l->rsize == 3) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            #endif
+          } else
+          if (l->rsize == 4) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            #endif
+          } else
+          if (l->rsize == 5) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+            #endif
+          } else
+          if (l->rsize == 6) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+            #endif
+          } else
+          if (l->rsize == 7) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8);
+            #endif
+          } else
+          if (l->rsize >= 8 && l->rsize <= 16) {
+            #if defined(_MIPSEL)
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56);
+            #else
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[7] = (unsigned char)(iret);
+            #endif
+            if (l->rsize == 8) {
+            } else
+            if (l->rsize == 9) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              #endif
+            } else
+            if (l->rsize == 10) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              #endif
+            } else
+            if (l->rsize == 11) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              #endif
+            } else
+            if (l->rsize == 12) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              #endif
+            } else
+            if (l->rsize == 13) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+              #endif
+            } else
+            if (l->rsize == 14) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+              #endif
+            } else
+            if (l->rsize == 15) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8);
+              #endif
+            } else
+            if (l->rsize == 16) {
+              #if defined(_MIPSEL)
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56);
+              #else
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2);
+              #endif
+            }
+          }
+          #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+          uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avword) */
+          __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+          uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+          uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avword) */
+          #if defined(_MIPSEL)
+          if (count <= sizeof(__avword)) {
+            /* Use iret. */
+            if (end_offset <= sizeof(__avword)) {
+              /* 0 < end_offset ≤ sizeof(__avword) */
+              __avword mask0 = ((__avword)2 << (end_offset*8-1)) - ((__avword)1 << (start_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            } else {
+              /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+              __avword mask0 = - ((__avword)1 << (start_offset*8));
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+              wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avword)*8-start_offset*8))) & mask1;
+            }
+          } else {
+            /* Use iret, iret2. */
+            __avword mask0 = - ((__avword)1 << (start_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            if (end_offset <= 2*sizeof(__avword)) {
+              /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1;
+            } else {
+              /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+              __avword mask2 = ((__avword)2 << (end_offset*8-2*sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] = (iret >> (sizeof(__avword)*8-start_offset*8)) | (iret2 << (start_offset*8));
+              wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avword)*8-start_offset*8))) & mask2;
+            }
+          }
+          #else
+          if (count <= sizeof(__avword)) {
+            /* Use iret. */
+            if (end_offset <= sizeof(__avword)) {
+              /* 0 < end_offset ≤ sizeof(__avword) */
+              __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - ((__avword)1 << (sizeof(__avword)*8-end_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+            } else {
+              /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+              __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+              __avword mask1 = - ((__avword)1 << (2*sizeof(__avword)*8-end_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+              wordaddr[1] ^= (wordaddr[1] ^ (iret << (sizeof(__avword)*8-start_offset*8))) & mask1;
+            }
+          } else {
+            /* Use iret, iret2. */
+            __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+            wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+            if (end_offset <= 2*sizeof(__avword)) {
+              /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+              __avword mask1 = - ((__avword)1 << (2*sizeof(__avword)*8-end_offset*8));
+              wordaddr[1] ^= (wordaddr[1] ^ ((iret << (sizeof(__avword)*4-start_offset*4) << (sizeof(__avword)*4-start_offset*4)) | (iret2 >> (start_offset*8)))) & mask1;
+            } else {
+              /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+              __avword mask2 = - ((__avword)1 << (3*sizeof(__avword)*8-end_offset*8));
+              wordaddr[1] = (iret << (sizeof(__avword)*8-start_offset*8)) | (iret2 >> (start_offset*8));
+              wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (sizeof(__avword)*8-start_offset*8))) & mask2;
+            }
+          }
+          #endif
+          #endif
+        }
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-mipsn32eb-linux.s b/avcall/avcall-mipsn32eb-linux.s
new file mode 100644 (file)
index 0000000..531488a
--- /dev/null
@@ -0,0 +1,733 @@
+       .file   1 "avcall-mipsn32.c"
+       .section .mdebug.abiN32
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       .frame  $fp,32,$31              # vars= 0, regs= 4/0, args= 0, gp= 0
+       .mask   0xd0010000,-8
+       .fmask  0x00000000,0
+       lw      $5,20($4)
+       lw      $12,24($4)
+       lw      $2,36($4)
+       addiu   $sp,$sp,-32
+       sd      $fp,16($sp)
+       sd      $16,0($sp)
+       sd      $31,24($sp)
+       move    $fp,$sp
+       move    $16,$4
+       addiu   $sp,$sp,-2064
+       subu    $4,$5,$12
+       move    $3,$sp
+       .set    noreorder
+       .set    nomacro
+       beq     $2,$0,.L2
+       sra     $4,$4,3
+       .set    macro
+       .set    reorder
+
+       andi    $6,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L125
+       andi    $6,$2,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 78 "avcall-mipsn32.c" 1
+       lwc1 $f12,44($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x2
+.L125:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L126
+       andi    $6,$2,0x4
+       .set    macro
+       .set    reorder
+
+#APP
+ # 80 "avcall-mipsn32.c" 1
+       lwc1 $f13,48($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x4
+.L126:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L127
+       andi    $6,$2,0x8
+       .set    macro
+       .set    reorder
+
+#APP
+ # 82 "avcall-mipsn32.c" 1
+       lwc1 $f14,52($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x8
+.L127:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L128
+       andi    $6,$2,0x10
+       .set    macro
+       .set    reorder
+
+#APP
+ # 84 "avcall-mipsn32.c" 1
+       lwc1 $f15,56($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x10
+.L128:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L129
+       andi    $6,$2,0x20
+       .set    macro
+       .set    reorder
+
+#APP
+ # 86 "avcall-mipsn32.c" 1
+       lwc1 $f16,60($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x20
+.L129:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L130
+       andi    $6,$2,0x40
+       .set    macro
+       .set    reorder
+
+#APP
+ # 88 "avcall-mipsn32.c" 1
+       lwc1 $f17,64($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x40
+.L130:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,.L131
+       andi    $2,$2,0x80
+       .set    macro
+       .set    reorder
+
+#APP
+ # 90 "avcall-mipsn32.c" 1
+       lwc1 $f18,68($16)
+ # 0 "" 2
+#NO_APP
+       andi    $2,$2,0x80
+.L131:
+       bne     $2,$0,.L118
+.L2:
+       lw      $2,40($16)
+.L124:
+       .set    noreorder
+       .set    nomacro
+       beql    $2,$0,.L123
+       slt     $4,$4,9
+       .set    macro
+       .set    reorder
+
+       andi    $6,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L132
+       andi    $6,$2,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 98 "avcall-mipsn32.c" 1
+       ldc1 $f12,0($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x2
+.L132:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L133
+       andi    $6,$2,0x4
+       .set    macro
+       .set    reorder
+
+#APP
+ # 100 "avcall-mipsn32.c" 1
+       ldc1 $f13,8($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x4
+.L133:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L134
+       andi    $6,$2,0x8
+       .set    macro
+       .set    reorder
+
+#APP
+ # 102 "avcall-mipsn32.c" 1
+       ldc1 $f14,16($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x8
+.L134:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L135
+       andi    $6,$2,0x10
+       .set    macro
+       .set    reorder
+
+#APP
+ # 104 "avcall-mipsn32.c" 1
+       ldc1 $f15,24($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x10
+.L135:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L136
+       andi    $6,$2,0x20
+       .set    macro
+       .set    reorder
+
+#APP
+ # 106 "avcall-mipsn32.c" 1
+       ldc1 $f16,32($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x20
+.L136:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L137
+       andi    $6,$2,0x40
+       .set    macro
+       .set    reorder
+
+#APP
+ # 108 "avcall-mipsn32.c" 1
+       ldc1 $f17,40($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x40
+.L137:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,.L138
+       andi    $2,$2,0x80
+       .set    macro
+       .set    reorder
+
+#APP
+ # 110 "avcall-mipsn32.c" 1
+       ldc1 $f18,48($12)
+ # 0 "" 2
+#NO_APP
+       andi    $2,$2,0x80
+.L138:
+       bne     $2,$0,.L119
+       slt     $4,$4,9
+.L123:
+       .set    noreorder
+       .set    nomacro
+       bne     $4,$0,.L22
+       addiu   $2,$12,64
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L83:
+       ld      $4,0($2)
+       addiu   $3,$3,8
+       addiu   $2,$2,8
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$2,.L83
+       sd      $4,-8($3)
+       .set    macro
+       .set    reorder
+
+.L22:
+#APP
+ # 119 "avcall-mipsn32.c" 1
+       ld $4,0($12)
+ # 0 "" 2
+ # 120 "avcall-mipsn32.c" 1
+       ld $5,8($12)
+ # 0 "" 2
+ # 121 "avcall-mipsn32.c" 1
+       ld $6,16($12)
+ # 0 "" 2
+ # 122 "avcall-mipsn32.c" 1
+       ld $7,24($12)
+ # 0 "" 2
+ # 123 "avcall-mipsn32.c" 1
+       ld $8,32($12)
+ # 0 "" 2
+ # 124 "avcall-mipsn32.c" 1
+       ld $9,40($12)
+ # 0 "" 2
+ # 125 "avcall-mipsn32.c" 1
+       ld $10,48($12)
+ # 0 "" 2
+ # 126 "avcall-mipsn32.c" 1
+       ld $11,56($12)
+ # 0 "" 2
+#NO_APP
+       lw      $25,4($16)
+       jalr    $25
+       lw      $4,12($16)
+       li      $5,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L116
+       li      $5,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,3                    # 0x3
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,5                    # 0x5
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L112
+       li      $5,6                    # 0x6
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L112
+       li      $5,7                    # 0x7
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,9                    # 0x9
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,10                   # 0xa
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,11                   # 0xb
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L116
+       li      $5,12                   # 0xc
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L116
+       li      $5,13                   # 0xd
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L120
+       li      $5,14                   # 0xe
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L121
+       li      $5,15                   # 0xf
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,16                   # 0x10
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,0($16)
+       andi    $5,$4,0x200
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       andi    $4,$4,0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L38
+       lw      $4,16($16)
+       .set    macro
+       .set    reorder
+
+       lw      $3,16($16)
+       li      $4,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L109
+       li      $4,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L112
+       li      $4,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L111
+       li      $4,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,.L140
+       lw      $3,8($16)
+       .set    macro
+       .set    reorder
+
+.L19:
+       move    $sp,$fp
+.L139:
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L116:
+       lw      $3,8($16)
+       .align  3
+.L140:
+       sd      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L119:
+#APP
+ # 112 "avcall-mipsn32.c" 1
+       ldc1 $f19,56($12)
+ # 0 "" 2
+#NO_APP
+       .set    noreorder
+       .set    nomacro
+       b       .L123
+       slt     $4,$4,9
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L118:
+#APP
+ # 92 "avcall-mipsn32.c" 1
+       lwc1 $f19,72($16)
+ # 0 "" 2
+#NO_APP
+       .set    noreorder
+       .set    nomacro
+       b       .L124
+       lw      $2,40($16)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L109:
+       lw      $3,8($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L112:
+       lw      $3,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L111:
+       lw      $3,8($16)
+       sw      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L120:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L121:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L38:
+       addiu   $5,$4,-1
+       sltu    $5,$5,16
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       sltu    $8,$4,9
+       .set    macro
+       .set    reorder
+
+       lw      $6,8($16)
+       li      $7,-8                   # 0xfffffffffffffff8
+       andi    $5,$6,0x7
+       and     $7,$6,$7
+       .set    noreorder
+       .set    nomacro
+       beq     $8,$0,.L42
+       addu    $4,$4,$5
+       .set    macro
+       .set    reorder
+
+       sltu    $3,$4,9
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,.L43
+       subu    $6,$0,$5
+       .set    macro
+       .set    reorder
+
+       subu    $3,$0,$5
+       sll     $3,$3,3
+       ld      $8,0($7)
+       addiu   $3,$3,63
+       subu    $4,$0,$4
+       li      $6,2                    # 0x2
+       dsll    $6,$6,$3
+       sll     $4,$4,3
+       sll     $5,$5,3
+       li      $3,1                    # 0x1
+       dsll    $3,$3,$4
+       dsra    $2,$2,$5
+       dsubu   $3,$6,$3
+       xor     $2,$2,$8
+       and     $2,$3,$2
+       xor     $2,$2,$8
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,0($7)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L42:
+       subu    $9,$0,$5
+       ld      $11,0($7)
+       sll     $10,$9,3
+       addiu   $6,$10,63
+       sll     $5,$5,3
+       li      $8,2                    # 0x2
+       dsll    $8,$8,$6
+       dsra    $6,$2,$5
+       daddiu  $8,$8,-1
+       xor     $6,$6,$11
+       and     $6,$8,$6
+       xor     $6,$6,$11
+       sltu    $8,$4,17
+       .set    noreorder
+       .set    nomacro
+       bne     $8,$0,.L122
+       sd      $6,0($7)
+       .set    macro
+       .set    reorder
+
+       ld      $11,16($7)
+       addiu   $6,$10,64
+       subu    $4,$0,$4
+       move    $8,$3
+       dsll    $9,$3,$6
+       sll     $4,$4,3
+       li      $3,-1                   # 0xffffffffffffffff
+       dsll    $4,$3,$4
+       xor     $3,$9,$11
+       dsll    $2,$2,$6
+       dsra    $5,$8,$5
+       and     $3,$4,$3
+       or      $2,$2,$5
+       xor     $3,$3,$11
+       sd      $2,8($7)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $3,16($7)
+       .set    macro
+       .set    reorder
+
+.L43:
+       ld      $9,0($7)
+       ld      $8,8($7)
+       sll     $6,$6,3
+       addiu   $10,$6,63
+       sll     $3,$5,3
+       subu    $4,$0,$4
+       li      $5,2                    # 0x2
+       dsra    $3,$2,$3
+       dsll    $5,$5,$10
+       dsll    $2,$2,$6
+       sll     $4,$4,3
+       li      $6,-1                   # 0xffffffffffffffff
+       daddiu  $5,$5,-1
+       xor     $3,$3,$9
+       dsll    $4,$6,$4
+       xor     $2,$2,$8
+       and     $3,$5,$3
+       and     $2,$4,$2
+       xor     $3,$3,$9
+       xor     $2,$2,$8
+       sd      $3,0($7)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($7)
+       .set    macro
+       .set    reorder
+
+.L122:
+       sll     $6,$9,2
+       addiu   $6,$6,32
+       ld      $8,8($7)
+       dsll    $2,$2,$6
+       dsll    $6,$2,$6
+       dsra    $3,$3,$5
+       subu    $2,$0,$4
+       or      $3,$6,$3
+       sll     $2,$2,3
+       li      $5,-1                   # 0xffffffffffffffff
+       xor     $3,$3,$8
+       dsll    $2,$5,$2
+       and     $2,$3,$2
+       xor     $2,$2,$8
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($7)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/avcall/avcall-mipsn32eb-macro.S b/avcall/avcall-mipsn32eb-macro.S
new file mode 100644 (file)
index 0000000..270e68b
--- /dev/null
@@ -0,0 +1,727 @@
+#include "asm-mips.h"
+       .file   1 "avcall-mipsn32.c"
+       .text
+       .align  2
+       .align  3
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       DECLARE_FUNCTION(avcall_call)
+avcall_call:
+       .frame  $fp,32,$31              
+       .mask   0xd0010000,-8
+       .fmask  0x00000000,0
+       lw      $5,20($4)
+       lw      $12,24($4)
+       lw      $2,36($4)
+       addiu   $sp,$sp,-32
+       sd      $fp,16($sp)
+       sd      $16,0($sp)
+       sd      $31,24($sp)
+       move    $fp,$sp
+       move    $16,$4
+       addiu   $sp,$sp,-2064
+       subu    $4,$5,$12
+       move    $3,$sp
+       .set    noreorder
+       .set    nomacro
+       beq     $2,$0,.L2
+       sra     $4,$4,3
+       .set    macro
+       .set    reorder
+
+       andi    $6,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L125
+       andi    $6,$2,0x2
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f12,44($16)
+
+       andi    $6,$2,0x2
+.L125:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L126
+       andi    $6,$2,0x4
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f13,48($16)
+
+       andi    $6,$2,0x4
+.L126:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L127
+       andi    $6,$2,0x8
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f14,52($16)
+
+       andi    $6,$2,0x8
+.L127:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L128
+       andi    $6,$2,0x10
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f15,56($16)
+
+       andi    $6,$2,0x10
+.L128:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L129
+       andi    $6,$2,0x20
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f16,60($16)
+
+       andi    $6,$2,0x20
+.L129:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L130
+       andi    $6,$2,0x40
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f17,64($16)
+
+       andi    $6,$2,0x40
+.L130:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,.L131
+       andi    $2,$2,0x80
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f18,68($16)
+
+       andi    $2,$2,0x80
+.L131:
+       bne     $2,$0,.L118
+.L2:
+       lw      $2,40($16)
+.L124:
+       .set    noreorder
+       .set    nomacro
+       beql    $2,$0,.L123
+       slt     $4,$4,9
+       .set    macro
+       .set    reorder
+
+       andi    $6,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L132
+       andi    $6,$2,0x2
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f12,0($12)
+
+       andi    $6,$2,0x2
+.L132:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L133
+       andi    $6,$2,0x4
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f13,8($12)
+
+       andi    $6,$2,0x4
+.L133:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L134
+       andi    $6,$2,0x8
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f14,16($12)
+
+       andi    $6,$2,0x8
+.L134:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L135
+       andi    $6,$2,0x10
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f15,24($12)
+
+       andi    $6,$2,0x10
+.L135:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L136
+       andi    $6,$2,0x20
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f16,32($12)
+
+       andi    $6,$2,0x20
+.L136:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L137
+       andi    $6,$2,0x40
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f17,40($12)
+
+       andi    $6,$2,0x40
+.L137:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,.L138
+       andi    $2,$2,0x80
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f18,48($12)
+
+       andi    $2,$2,0x80
+.L138:
+       bne     $2,$0,.L119
+       slt     $4,$4,9
+.L123:
+       .set    noreorder
+       .set    nomacro
+       bne     $4,$0,.L22
+       addiu   $2,$12,64
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L83:
+       ld      $4,0($2)
+       addiu   $3,$3,8
+       addiu   $2,$2,8
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$2,.L83
+       sd      $4,-8($3)
+       .set    macro
+       .set    reorder
+
+.L22:
+
+       ld $4,0($12)
+       ld $5,8($12)
+       ld $6,16($12)
+       ld $7,24($12)
+       ld $8,32($12)
+       ld $9,40($12)
+       ld $10,48($12)
+       ld $11,56($12)
+
+       lw      $25,4($16)
+       jalr    $25
+       lw      $4,12($16)
+       li      $5,1                    
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L116
+       li      $5,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,3                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,5                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L112
+       li      $5,6                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L112
+       li      $5,7                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,9                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,10                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,11                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L116
+       li      $5,12                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L116
+       li      $5,13                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L120
+       li      $5,14                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L121
+       li      $5,15                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,16                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,0($16)
+       andi    $5,$4,0x200
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       andi    $4,$4,0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L38
+       lw      $4,16($16)
+       .set    macro
+       .set    reorder
+
+       lw      $3,16($16)
+       li      $4,1                    
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L109
+       li      $4,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L112
+       li      $4,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L111
+       li      $4,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,.L140
+       lw      $3,8($16)
+       .set    macro
+       .set    reorder
+
+.L19:
+       move    $sp,$fp
+.L139:
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L116:
+       lw      $3,8($16)
+       .align  3
+.L140:
+       sd      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L119:
+
+       ldc1 $f19,56($12)
+
+       .set    noreorder
+       .set    nomacro
+       b       .L123
+       slt     $4,$4,9
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L118:
+
+       lwc1 $f19,72($16)
+
+       .set    noreorder
+       .set    nomacro
+       b       .L124
+       lw      $2,40($16)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L109:
+       lw      $3,8($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L112:
+       lw      $3,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L111:
+       lw      $3,8($16)
+       sw      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L120:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L121:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L38:
+       addiu   $5,$4,-1
+       sltu    $5,$5,16
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       sltu    $8,$4,9
+       .set    macro
+       .set    reorder
+
+       lw      $6,8($16)
+       li      $7,-8                   
+       andi    $5,$6,0x7
+       and     $7,$6,$7
+       .set    noreorder
+       .set    nomacro
+       beq     $8,$0,.L42
+       addu    $4,$4,$5
+       .set    macro
+       .set    reorder
+
+       sltu    $3,$4,9
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$0,.L43
+       subu    $6,$0,$5
+       .set    macro
+       .set    reorder
+
+       subu    $3,$0,$5
+       sll     $3,$3,3
+       ld      $8,0($7)
+       addiu   $3,$3,63
+       subu    $4,$0,$4
+       li      $6,2                    
+       dsll    $6,$6,$3
+       sll     $4,$4,3
+       sll     $5,$5,3
+       li      $3,1                    
+       dsll    $3,$3,$4
+       dsra    $2,$2,$5
+       dsubu   $3,$6,$3
+       xor     $2,$2,$8
+       and     $2,$3,$2
+       xor     $2,$2,$8
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,0($7)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L42:
+       subu    $9,$0,$5
+       ld      $11,0($7)
+       sll     $10,$9,3
+       addiu   $6,$10,63
+       sll     $5,$5,3
+       li      $8,2                    
+       dsll    $8,$8,$6
+       dsra    $6,$2,$5
+       daddiu  $8,$8,-1
+       xor     $6,$6,$11
+       and     $6,$8,$6
+       xor     $6,$6,$11
+       sltu    $8,$4,17
+       .set    noreorder
+       .set    nomacro
+       bne     $8,$0,.L122
+       sd      $6,0($7)
+       .set    macro
+       .set    reorder
+
+       ld      $11,16($7)
+       addiu   $6,$10,64
+       subu    $4,$0,$4
+       move    $8,$3
+       dsll    $9,$3,$6
+       sll     $4,$4,3
+       li      $3,-1                   
+       dsll    $4,$3,$4
+       xor     $3,$9,$11
+       dsll    $2,$2,$6
+       dsra    $5,$8,$5
+       and     $3,$4,$3
+       or      $2,$2,$5
+       xor     $3,$3,$11
+       sd      $2,8($7)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $3,16($7)
+       .set    macro
+       .set    reorder
+
+.L43:
+       ld      $9,0($7)
+       ld      $8,8($7)
+       sll     $6,$6,3
+       addiu   $10,$6,63
+       sll     $3,$5,3
+       subu    $4,$0,$4
+       li      $5,2                    
+       dsra    $3,$2,$3
+       dsll    $5,$5,$10
+       dsll    $2,$2,$6
+       sll     $4,$4,3
+       li      $6,-1                   
+       daddiu  $5,$5,-1
+       xor     $3,$3,$9
+       dsll    $4,$6,$4
+       xor     $2,$2,$8
+       and     $3,$5,$3
+       and     $2,$4,$2
+       xor     $3,$3,$9
+       xor     $2,$2,$8
+       sd      $3,0($7)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($7)
+       .set    macro
+       .set    reorder
+
+.L122:
+       sll     $6,$9,2
+       addiu   $6,$6,32
+       ld      $8,8($7)
+       dsll    $2,$2,$6
+       dsll    $6,$2,$6
+       dsra    $3,$3,$5
+       subu    $2,$0,$4
+       or      $3,$6,$3
+       sll     $2,$2,3
+       li      $5,-1                   
+       xor     $3,$3,$8
+       dsll    $2,$5,$2
+       and     $2,$3,$2
+       xor     $2,$2,$8
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($7)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
diff --git a/avcall/avcall-mipsn32el-linux.s b/avcall/avcall-mipsn32el-linux.s
new file mode 100644 (file)
index 0000000..cb9019c
--- /dev/null
@@ -0,0 +1,731 @@
+       .file   1 "avcall-mipsn32.c"
+       .section .mdebug.abiN32
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       .frame  $fp,32,$31              # vars= 0, regs= 4/0, args= 0, gp= 0
+       .mask   0xd0010000,-8
+       .fmask  0x00000000,0
+       lw      $5,20($4)
+       lw      $12,24($4)
+       lw      $2,36($4)
+       addiu   $sp,$sp,-32
+       sd      $fp,16($sp)
+       sd      $16,0($sp)
+       sd      $31,24($sp)
+       move    $fp,$sp
+       move    $16,$4
+       addiu   $sp,$sp,-2064
+       subu    $4,$5,$12
+       move    $3,$sp
+       .set    noreorder
+       .set    nomacro
+       beq     $2,$0,.L2
+       sra     $4,$4,3
+       .set    macro
+       .set    reorder
+
+       andi    $6,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L125
+       andi    $6,$2,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 78 "avcall-mipsn32.c" 1
+       lwc1 $f12,44($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x2
+.L125:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L126
+       andi    $6,$2,0x4
+       .set    macro
+       .set    reorder
+
+#APP
+ # 80 "avcall-mipsn32.c" 1
+       lwc1 $f13,48($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x4
+.L126:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L127
+       andi    $6,$2,0x8
+       .set    macro
+       .set    reorder
+
+#APP
+ # 82 "avcall-mipsn32.c" 1
+       lwc1 $f14,52($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x8
+.L127:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L128
+       andi    $6,$2,0x10
+       .set    macro
+       .set    reorder
+
+#APP
+ # 84 "avcall-mipsn32.c" 1
+       lwc1 $f15,56($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x10
+.L128:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L129
+       andi    $6,$2,0x20
+       .set    macro
+       .set    reorder
+
+#APP
+ # 86 "avcall-mipsn32.c" 1
+       lwc1 $f16,60($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x20
+.L129:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L130
+       andi    $6,$2,0x40
+       .set    macro
+       .set    reorder
+
+#APP
+ # 88 "avcall-mipsn32.c" 1
+       lwc1 $f17,64($16)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x40
+.L130:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,.L131
+       andi    $2,$2,0x80
+       .set    macro
+       .set    reorder
+
+#APP
+ # 90 "avcall-mipsn32.c" 1
+       lwc1 $f18,68($16)
+ # 0 "" 2
+#NO_APP
+       andi    $2,$2,0x80
+.L131:
+       bne     $2,$0,.L118
+.L2:
+       lw      $2,40($16)
+.L124:
+       .set    noreorder
+       .set    nomacro
+       beql    $2,$0,.L123
+       slt     $4,$4,9
+       .set    macro
+       .set    reorder
+
+       andi    $6,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L132
+       andi    $6,$2,0x2
+       .set    macro
+       .set    reorder
+
+#APP
+ # 98 "avcall-mipsn32.c" 1
+       ldc1 $f12,0($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x2
+.L132:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L133
+       andi    $6,$2,0x4
+       .set    macro
+       .set    reorder
+
+#APP
+ # 100 "avcall-mipsn32.c" 1
+       ldc1 $f13,8($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x4
+.L133:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L134
+       andi    $6,$2,0x8
+       .set    macro
+       .set    reorder
+
+#APP
+ # 102 "avcall-mipsn32.c" 1
+       ldc1 $f14,16($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x8
+.L134:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L135
+       andi    $6,$2,0x10
+       .set    macro
+       .set    reorder
+
+#APP
+ # 104 "avcall-mipsn32.c" 1
+       ldc1 $f15,24($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x10
+.L135:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L136
+       andi    $6,$2,0x20
+       .set    macro
+       .set    reorder
+
+#APP
+ # 106 "avcall-mipsn32.c" 1
+       ldc1 $f16,32($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x20
+.L136:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L137
+       andi    $6,$2,0x40
+       .set    macro
+       .set    reorder
+
+#APP
+ # 108 "avcall-mipsn32.c" 1
+       ldc1 $f17,40($12)
+ # 0 "" 2
+#NO_APP
+       andi    $6,$2,0x40
+.L137:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,.L138
+       andi    $2,$2,0x80
+       .set    macro
+       .set    reorder
+
+#APP
+ # 110 "avcall-mipsn32.c" 1
+       ldc1 $f18,48($12)
+ # 0 "" 2
+#NO_APP
+       andi    $2,$2,0x80
+.L138:
+       bne     $2,$0,.L119
+       slt     $4,$4,9
+.L123:
+       .set    noreorder
+       .set    nomacro
+       bne     $4,$0,.L22
+       addiu   $2,$12,64
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L83:
+       ld      $4,0($2)
+       addiu   $3,$3,8
+       addiu   $2,$2,8
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$2,.L83
+       sd      $4,-8($3)
+       .set    macro
+       .set    reorder
+
+.L22:
+#APP
+ # 119 "avcall-mipsn32.c" 1
+       ld $4,0($12)
+ # 0 "" 2
+ # 120 "avcall-mipsn32.c" 1
+       ld $5,8($12)
+ # 0 "" 2
+ # 121 "avcall-mipsn32.c" 1
+       ld $6,16($12)
+ # 0 "" 2
+ # 122 "avcall-mipsn32.c" 1
+       ld $7,24($12)
+ # 0 "" 2
+ # 123 "avcall-mipsn32.c" 1
+       ld $8,32($12)
+ # 0 "" 2
+ # 124 "avcall-mipsn32.c" 1
+       ld $9,40($12)
+ # 0 "" 2
+ # 125 "avcall-mipsn32.c" 1
+       ld $10,48($12)
+ # 0 "" 2
+ # 126 "avcall-mipsn32.c" 1
+       ld $11,56($12)
+ # 0 "" 2
+#NO_APP
+       lw      $25,4($16)
+       jalr    $25
+       lw      $4,12($16)
+       li      $5,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L116
+       li      $5,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,3                    # 0x3
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,5                    # 0x5
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L112
+       li      $5,6                    # 0x6
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L112
+       li      $5,7                    # 0x7
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,9                    # 0x9
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,10                   # 0xa
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,11                   # 0xb
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L116
+       li      $5,12                   # 0xc
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L116
+       li      $5,13                   # 0xd
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L120
+       li      $5,14                   # 0xe
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L121
+       li      $5,15                   # 0xf
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,16                   # 0x10
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,0($16)
+       andi    $5,$4,0x200
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       andi    $4,$4,0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L38
+       lw      $5,16($16)
+       .set    macro
+       .set    reorder
+
+       lw      $3,16($16)
+       li      $4,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L109
+       li      $4,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L112
+       li      $4,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L111
+       li      $4,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,.L140
+       lw      $3,8($16)
+       .set    macro
+       .set    reorder
+
+.L19:
+       move    $sp,$fp
+.L139:
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L116:
+       lw      $3,8($16)
+       .align  3
+.L140:
+       sd      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L119:
+#APP
+ # 112 "avcall-mipsn32.c" 1
+       ldc1 $f19,56($12)
+ # 0 "" 2
+#NO_APP
+       .set    noreorder
+       .set    nomacro
+       b       .L123
+       slt     $4,$4,9
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L118:
+#APP
+ # 92 "avcall-mipsn32.c" 1
+       lwc1 $f19,72($16)
+ # 0 "" 2
+#NO_APP
+       .set    noreorder
+       .set    nomacro
+       b       .L124
+       lw      $2,40($16)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L109:
+       lw      $3,8($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L112:
+       lw      $3,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L111:
+       lw      $3,8($16)
+       sw      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L120:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L121:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L38:
+       addiu   $4,$5,-1
+       sltu    $4,$4,16
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L19
+       sltu    $7,$5,9
+       .set    macro
+       .set    reorder
+
+       lw      $6,8($16)
+       li      $8,-8                   # 0xfffffffffffffff8
+       andi    $4,$6,0x7
+       addu    $5,$5,$4
+       .set    noreorder
+       .set    nomacro
+       beq     $7,$0,.L42
+       and     $6,$6,$8
+       .set    macro
+       .set    reorder
+
+       sltu    $3,$5,9
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$0,.L43
+       ld      $10,0($6)
+       .set    macro
+       .set    reorder
+
+       sll     $5,$5,3
+       ld      $7,0($6)
+       li      $3,2                    # 0x2
+       addiu   $5,$5,-1
+       sll     $4,$4,3
+       dsll    $5,$3,$5
+       li      $3,1                    # 0x1
+       dsll    $3,$3,$4
+       dsll    $4,$2,$4
+       dsubu   $3,$5,$3
+       xor     $2,$4,$7
+       and     $2,$3,$2
+       xor     $2,$2,$7
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,0($6)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L42:
+       ld      $10,0($6)
+       sll     $9,$4,3
+       dsll    $7,$2,$9
+       li      $8,-1                   # 0xffffffffffffffff
+       dsll    $8,$8,$9
+       xor     $7,$7,$10
+       and     $7,$8,$7
+       xor     $7,$7,$10
+       sltu    $8,$5,17
+       .set    noreorder
+       .set    nomacro
+       bne     $8,$0,.L122
+       sd      $7,0($6)
+       .set    macro
+       .set    reorder
+
+       subu    $4,$0,$4
+       ld      $10,16($6)
+       sll     $4,$4,3
+       sll     $5,$5,3
+       addiu   $4,$4,64
+       addiu   $5,$5,-129
+       li      $7,2                    # 0x2
+       move    $8,$3
+       dsll    $5,$7,$5
+       dsra    $3,$3,$4
+       daddiu  $5,$5,-1
+       xor     $3,$3,$10
+       dsra    $2,$2,$4
+       dsll    $8,$8,$9
+       and     $3,$5,$3
+       or      $2,$2,$8
+       xor     $3,$3,$10
+       sd      $2,8($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $3,16($6)
+       .set    macro
+       .set    reorder
+
+.L43:
+       ld      $9,8($6)
+       sll     $3,$5,3
+       subu    $5,$0,$4
+       addiu   $8,$3,-65
+       sll     $4,$4,3
+       sll     $5,$5,3
+       li      $3,2                    # 0x2
+       dsll    $7,$2,$4
+       dsll    $3,$3,$8
+       dsra    $2,$2,$5
+       li      $5,-1                   # 0xffffffffffffffff
+       dsll    $4,$5,$4
+       daddiu  $3,$3,-1
+       xor     $5,$7,$10
+       xor     $2,$2,$9
+       and     $2,$3,$2
+       and     $4,$4,$5
+       xor     $3,$4,$10
+       xor     $2,$2,$9
+       sd      $3,0($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+.L122:
+       subu    $7,$0,$4
+       sll     $7,$7,2
+       addiu   $7,$7,32
+       ld      $10,8($6)
+       dsra    $4,$2,$7
+       move    $8,$3
+       sll     $3,$5,3
+       addiu   $3,$3,-65
+       dsra    $5,$4,$7
+       dsll    $2,$8,$9
+       li      $4,2                    # 0x2
+       dsll    $3,$4,$3
+       or      $2,$5,$2
+       daddiu  $3,$3,-1
+       xor     $2,$2,$10
+       and     $2,$3,$2
+       xor     $2,$2,$10
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/avcall/avcall-mipsn32el-macro.S b/avcall/avcall-mipsn32el-macro.S
new file mode 100644 (file)
index 0000000..91e4fe5
--- /dev/null
@@ -0,0 +1,725 @@
+#include "asm-mips.h"
+       .file   1 "avcall-mipsn32.c"
+       .text
+       .align  2
+       .align  3
+       .globl  avcall_call
+       .set    nomips16
+       .set    nomicromips
+       .ent    avcall_call
+       DECLARE_FUNCTION(avcall_call)
+avcall_call:
+       .frame  $fp,32,$31              
+       .mask   0xd0010000,-8
+       .fmask  0x00000000,0
+       lw      $5,20($4)
+       lw      $12,24($4)
+       lw      $2,36($4)
+       addiu   $sp,$sp,-32
+       sd      $fp,16($sp)
+       sd      $16,0($sp)
+       sd      $31,24($sp)
+       move    $fp,$sp
+       move    $16,$4
+       addiu   $sp,$sp,-2064
+       subu    $4,$5,$12
+       move    $3,$sp
+       .set    noreorder
+       .set    nomacro
+       beq     $2,$0,.L2
+       sra     $4,$4,3
+       .set    macro
+       .set    reorder
+
+       andi    $6,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L125
+       andi    $6,$2,0x2
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f12,44($16)
+
+       andi    $6,$2,0x2
+.L125:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L126
+       andi    $6,$2,0x4
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f13,48($16)
+
+       andi    $6,$2,0x4
+.L126:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L127
+       andi    $6,$2,0x8
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f14,52($16)
+
+       andi    $6,$2,0x8
+.L127:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L128
+       andi    $6,$2,0x10
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f15,56($16)
+
+       andi    $6,$2,0x10
+.L128:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L129
+       andi    $6,$2,0x20
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f16,60($16)
+
+       andi    $6,$2,0x20
+.L129:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L130
+       andi    $6,$2,0x40
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f17,64($16)
+
+       andi    $6,$2,0x40
+.L130:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,.L131
+       andi    $2,$2,0x80
+       .set    macro
+       .set    reorder
+
+
+       lwc1 $f18,68($16)
+
+       andi    $2,$2,0x80
+.L131:
+       bne     $2,$0,.L118
+.L2:
+       lw      $2,40($16)
+.L124:
+       .set    noreorder
+       .set    nomacro
+       beql    $2,$0,.L123
+       slt     $4,$4,9
+       .set    macro
+       .set    reorder
+
+       andi    $6,$2,0x1
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L132
+       andi    $6,$2,0x2
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f12,0($12)
+
+       andi    $6,$2,0x2
+.L132:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L133
+       andi    $6,$2,0x4
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f13,8($12)
+
+       andi    $6,$2,0x4
+.L133:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L134
+       andi    $6,$2,0x8
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f14,16($12)
+
+       andi    $6,$2,0x8
+.L134:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L135
+       andi    $6,$2,0x10
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f15,24($12)
+
+       andi    $6,$2,0x10
+.L135:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L136
+       andi    $6,$2,0x20
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f16,32($12)
+
+       andi    $6,$2,0x20
+.L136:
+       .set    noreorder
+       .set    nomacro
+       beq     $6,$0,.L137
+       andi    $6,$2,0x40
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f17,40($12)
+
+       andi    $6,$2,0x40
+.L137:
+       .set    noreorder
+       .set    nomacro
+       beql    $6,$0,.L138
+       andi    $2,$2,0x80
+       .set    macro
+       .set    reorder
+
+
+       ldc1 $f18,48($12)
+
+       andi    $2,$2,0x80
+.L138:
+       bne     $2,$0,.L119
+       slt     $4,$4,9
+.L123:
+       .set    noreorder
+       .set    nomacro
+       bne     $4,$0,.L22
+       addiu   $2,$12,64
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L83:
+       ld      $4,0($2)
+       addiu   $3,$3,8
+       addiu   $2,$2,8
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$2,.L83
+       sd      $4,-8($3)
+       .set    macro
+       .set    reorder
+
+.L22:
+
+       ld $4,0($12)
+       ld $5,8($12)
+       ld $6,16($12)
+       ld $7,24($12)
+       ld $8,32($12)
+       ld $9,40($12)
+       ld $10,48($12)
+       ld $11,56($12)
+
+       lw      $25,4($16)
+       jalr    $25
+       lw      $4,12($16)
+       li      $5,1                    
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L116
+       li      $5,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,3                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L109
+       li      $5,5                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L112
+       li      $5,6                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L112
+       li      $5,7                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,9                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,10                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,11                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L116
+       li      $5,12                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L116
+       li      $5,13                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L120
+       li      $5,14                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L121
+       li      $5,15                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,.L111
+       li      $5,16                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,.L139
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,0($16)
+       andi    $5,$4,0x200
+       .set    noreorder
+       .set    nomacro
+       beq     $5,$0,.L19
+       andi    $4,$4,0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,.L38
+       lw      $5,16($16)
+       .set    macro
+       .set    reorder
+
+       lw      $3,16($16)
+       li      $4,1                    
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L109
+       li      $4,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L112
+       li      $4,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $3,$4,.L111
+       li      $4,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$4,.L140
+       lw      $3,8($16)
+       .set    macro
+       .set    reorder
+
+.L19:
+       move    $sp,$fp
+.L139:
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L116:
+       lw      $3,8($16)
+       .align  3
+.L140:
+       sd      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L119:
+
+       ldc1 $f19,56($12)
+
+       .set    noreorder
+       .set    nomacro
+       b       .L123
+       slt     $4,$4,9
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L118:
+
+       lwc1 $f19,72($16)
+
+       .set    noreorder
+       .set    nomacro
+       b       .L124
+       lw      $2,40($16)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L109:
+       lw      $3,8($16)
+       sb      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L112:
+       lw      $3,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sh      $2,0($3)
+       .set    macro
+       .set    reorder
+
+.L111:
+       lw      $3,8($16)
+       sw      $2,0($3)
+       move    $sp,$fp
+       ld      $31,24($sp)
+       ld      $fp,16($sp)
+       ld      $16,0($sp)
+       move    $2,$0
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,32
+       .set    macro
+       .set    reorder
+
+.L120:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       swc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L121:
+       lw      $2,8($16)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sdc1    $f0,0($2)
+       .set    macro
+       .set    reorder
+
+.L38:
+       addiu   $4,$5,-1
+       sltu    $4,$4,16
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,.L19
+       sltu    $7,$5,9
+       .set    macro
+       .set    reorder
+
+       lw      $6,8($16)
+       li      $8,-8                   
+       andi    $4,$6,0x7
+       addu    $5,$5,$4
+       .set    noreorder
+       .set    nomacro
+       beq     $7,$0,.L42
+       and     $6,$6,$8
+       .set    macro
+       .set    reorder
+
+       sltu    $3,$5,9
+       .set    noreorder
+       .set    nomacro
+       beql    $3,$0,.L43
+       ld      $10,0($6)
+       .set    macro
+       .set    reorder
+
+       sll     $5,$5,3
+       ld      $7,0($6)
+       li      $3,2                    
+       addiu   $5,$5,-1
+       sll     $4,$4,3
+       dsll    $5,$3,$5
+       li      $3,1                    
+       dsll    $3,$3,$4
+       dsll    $4,$2,$4
+       dsubu   $3,$5,$3
+       xor     $2,$4,$7
+       and     $2,$3,$2
+       xor     $2,$2,$7
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,0($6)
+       .set    macro
+       .set    reorder
+
+       .align  3
+.L42:
+       ld      $10,0($6)
+       sll     $9,$4,3
+       dsll    $7,$2,$9
+       li      $8,-1                   
+       dsll    $8,$8,$9
+       xor     $7,$7,$10
+       and     $7,$8,$7
+       xor     $7,$7,$10
+       sltu    $8,$5,17
+       .set    noreorder
+       .set    nomacro
+       bne     $8,$0,.L122
+       sd      $7,0($6)
+       .set    macro
+       .set    reorder
+
+       subu    $4,$0,$4
+       ld      $10,16($6)
+       sll     $4,$4,3
+       sll     $5,$5,3
+       addiu   $4,$4,64
+       addiu   $5,$5,-129
+       li      $7,2                    
+       move    $8,$3
+       dsll    $5,$7,$5
+       dsra    $3,$3,$4
+       daddiu  $5,$5,-1
+       xor     $3,$3,$10
+       dsra    $2,$2,$4
+       dsll    $8,$8,$9
+       and     $3,$5,$3
+       or      $2,$2,$8
+       xor     $3,$3,$10
+       sd      $2,8($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $3,16($6)
+       .set    macro
+       .set    reorder
+
+.L43:
+       ld      $9,8($6)
+       sll     $3,$5,3
+       subu    $5,$0,$4
+       addiu   $8,$3,-65
+       sll     $4,$4,3
+       sll     $5,$5,3
+       li      $3,2                    
+       dsll    $7,$2,$4
+       dsll    $3,$3,$8
+       dsra    $2,$2,$5
+       li      $5,-1                   
+       dsll    $4,$5,$4
+       daddiu  $3,$3,-1
+       xor     $5,$7,$10
+       xor     $2,$2,$9
+       and     $2,$3,$2
+       and     $4,$4,$5
+       xor     $3,$4,$10
+       xor     $2,$2,$9
+       sd      $3,0($6)
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+.L122:
+       subu    $7,$0,$4
+       sll     $7,$7,2
+       addiu   $7,$7,32
+       ld      $10,8($6)
+       dsra    $4,$2,$7
+       move    $8,$3
+       sll     $3,$5,3
+       addiu   $3,$3,-65
+       dsra    $5,$4,$7
+       dsll    $2,$8,$9
+       li      $4,2                    
+       dsll    $3,$4,$3
+       or      $2,$5,$2
+       daddiu  $3,$3,-1
+       xor     $2,$2,$10
+       and     $2,$3,$2
+       xor     $2,$2,$10
+       .set    noreorder
+       .set    nomacro
+       b       .L19
+       sd      $2,8($6)
+       .set    macro
+       .set    reorder
+
+       .end    avcall_call
+       .size   avcall_call, .-avcall_call
diff --git a/avcall/avcall-powerpc-aix.s b/avcall/avcall-powerpc-aix.s
new file mode 100644 (file)
index 0000000..d345fb6
--- /dev/null
@@ -0,0 +1,214 @@
+       .file   "avcall-powerpc.c"
+       .toc
+       .csect .text[PR]
+       .align 2
+       .globl avcall_call
+       .globl .avcall_call
+       .csect avcall_call[DS]
+avcall_call:
+       .long .avcall_call, TOC[tc0], 0
+       .csect .text[PR]
+.avcall_call:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       mflr 0
+       stw 0,8(1)
+       stw 30,-8(1)
+       stw 31,-4(1)
+       stw 29,-12(1)
+       stwu 1,-72(1)
+       lwz 0,20(3)
+       lwz 11,24(3)
+       mr 30,3
+       subfc 0,11,0
+       srawi 8,0,2
+       li 3,8
+       lwz 9,0(1)
+       cmpw 0,3,8
+       mr 31,1
+       stwu 9,-1040(1)
+       addi 0,1,71
+       rlwinm 10,0,0,0,27
+       bge- 0,L..89
+L..6:
+       slwi 9,3,2
+       addi 3,3,1
+       cmpw 0,3,8
+       lwzx 0,9,11
+       add 9,9,10
+       stw 0,-32(9)
+       blt+ 0,L..6
+L..88:
+       lwz 9,40(30)
+       subfc 9,30,9
+       addi 9,9,-44
+       srawi. 9,9,3
+       beq- 0,L..8
+       cmpwi 0,9,1
+       beq- 0,L..11
+       cmpwi 0,9,2
+       beq- 0,L..14
+       cmpwi 0,9,3
+       beq- 0,L..17
+       cmpwi 0,9,4
+       beq- 0,L..20
+       cmpwi 0,9,5
+       beq- 0,L..23
+       cmpwi 0,9,6
+       beq- 0,L..26
+       cmpwi 0,9,7
+       beq- 0,L..29
+       cmpwi 0,9,8
+       beq- 0,L..32
+       cmpwi 0,9,9
+       beq- 0,L..35
+       cmpwi 0,9,10
+       beq- 0,L..38
+       cmpwi 0,9,11
+       beq- 0,L..41
+       cmpwi 0,9,12
+       beq- 0,L..44
+L..47:
+       lfd 13,140(30)
+L..44:
+       lfd 12,132(30)
+L..41:
+       lfd 11,124(30)
+L..38:
+       lfd 10,116(30)
+L..35:
+       lfd 9,108(30)
+L..32:
+       lfd 8,100(30)
+L..29:
+       lfd 7,92(30)
+L..26:
+       lfd 6,84(30)
+L..23:
+       lfd 5,76(30)
+L..20:
+       lfd 4,68(30)
+L..17:
+       lfd 3,60(30)
+L..14:
+       lfd 2,52(30)
+L..11:
+       lfd 1,44(30)
+L..8:
+       lwz 29,4(30)
+       lwz 9,24(11)
+       lwz 0,0(29)
+       lwz 10,28(11)
+       lwz 3,0(11)
+       mtctr 0
+       lwz 4,4(11)
+       lwz 5,8(11)
+       lwz 6,12(11)
+       lwz 7,16(11)
+       lwz 8,20(11)
+       stw 2,20(1)
+       lwz 11,8(29)
+       lwz 2,4(29)
+       bctrl
+       lwz 2,20(1)
+       lwz 9,12(30)
+       cmpwi 0,9,1
+       beq- 0,L..49
+       cmpwi 0,9,0
+       beq- 0,L..99
+       cmpwi 0,9,2
+       beq- 0,L..92
+       cmpwi 0,9,3
+       beq- 0,L..92
+       cmpwi 0,9,4
+       beq- 0,L..92
+       cmpwi 0,9,5
+       beq- 0,L..91
+       cmpwi 0,9,6
+       beq- 0,L..91
+       cmpwi 0,9,7
+       beq- 0,L..99
+       cmpwi 0,9,8
+       beq- 0,L..99
+       cmpwi 0,9,9
+       beq- 0,L..99
+       cmpwi 0,9,10
+       beq- 0,L..99
+       addi 0,9,-11
+       cmplwi 0,0,1
+       ble- 0,L..98
+       cmpwi 0,9,13
+       beq- 0,L..100
+       cmpwi 0,9,14
+       beq- 0,L..101
+       cmpwi 0,9,15
+       beq- 0,L..99
+       cmpwi 0,9,16
+       beq- 0,L..102
+L..49:
+       lwz 1,0(1)
+       li 3,0
+       lwz 0,8(1)
+       lwz 29,-12(1)
+       mtlr 0
+       lwz 30,-8(1)
+       lwz 31,-4(1)
+       blr
+L..102:
+       lwz 0,0(30)
+       andi. 9,0,512
+       beq- 0,L..49
+       lwz 0,16(30)
+       cmpwi 0,0,1
+       beq- 0,L..92
+       cmpwi 0,0,2
+       beq- 0,L..91
+       cmpwi 0,0,4
+       beq- 0,L..99
+       cmpwi 0,0,8
+       bne+ 0,L..49
+L..98:
+       lwz 9,8(30)
+       stw 4,4(9)
+L..90:
+       stw 3,0(9)
+       b L..49
+L..99:
+       lwz 9,8(30)
+       b L..90
+L..91:
+       lwz 9,8(30)
+       sth 3,0(9)
+       b L..49
+L..92:
+       lwz 9,8(30)
+       stb 3,0(9)
+       b L..49
+L..101:
+       lwz 9,8(30)
+       stfd 1,0(9)
+       b L..49
+L..100:
+       lwz 9,8(30)
+       frsp 0,1
+       stfs 0,0(9)
+       b L..49
+L..89:
+       lwz 11,24(30)
+       b L..88
+LT..avcall_call:
+       .long 0
+       .byte 0,0,32,97,128,3,1,0
+       .long 0
+       .long LT..avcall_call-.avcall_call
+       .short 11
+       .byte "avcall_call"
+       .byte 31
+       .align 2
+_section_.text:
+       .csect .data[RW],3
+       .long _section_.text
diff --git a/avcall/avcall-powerpc-linux-macro.S b/avcall/avcall-powerpc-linux-macro.S
new file mode 100644 (file)
index 0000000..b67f316
--- /dev/null
@@ -0,0 +1,169 @@
+       .file   "avcall-powerpc.c"
+       .section        ".text"
+       .align 2
+       .globl avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-1056(1)
+       mflr 0
+       stw 0,1060(1)
+       addi 10,1,8
+       stw 30,1048(1)
+       mr 30,3
+       lwz 0,20(30)
+       li 3,0
+       lwz 11,24(30)
+       stw 31,1052(1)
+       mr 31,1
+       subfc 0,11,0
+       srawi 0,0,2
+       cmpw 0,3,0
+       bge- 0,.L73
+       mtctr 0
+.L74:
+       slwi 9,3,2
+       addi 3,3,1
+       lwzx 0,9,11
+       stwx 0,9,10
+       bdnz .L74
+.L73:
+       lwz 9,76(30)
+       subfc 9,30,9
+       addi 9,9,-80
+       srawi. 9,9,3
+       beq- 0,.L8
+       cmpwi 0,9,1
+       beq- 0,.L11
+       cmpwi 0,9,2
+       beq- 0,.L14
+       cmpwi 0,9,3
+       beq- 0,.L17
+       cmpwi 0,9,4
+       beq- 0,.L20
+       cmpwi 0,9,5
+       beq- 0,.L23
+       cmpwi 0,9,6
+       beq- 0,.L26
+       cmpwi 0,9,7
+       beq- 0,.L29
+.L32:
+       lfd 8,136(30)
+.L29:
+       lfd 7,128(30)
+.L26:
+       lfd 6,120(30)
+.L23:
+       lfd 5,112(30)
+.L20:
+       lfd 4,104(30)
+.L17:
+       lfd 3,96(30)
+.L14:
+       lfd 2,88(30)
+.L11:
+       lfd 1,80(30)
+.L8:
+       lwz 0,4(30)
+       lwz 9,68(30)
+       lwz 3,44(30)
+       mtctr 0
+       lwz 4,48(30)
+       lwz 5,52(30)
+       lwz 6,56(30)
+       lwz 7,60(30)
+       lwz 8,64(30)
+       lwz 10,72(30)
+       crxor 6,6,6
+       bctrl
+       lwz 9,12(30)
+       cmpwi 0,9,1
+       beq- 0,.L34
+       cmpwi 0,9,0
+       beq- 0,.L84
+       cmpwi 0,9,2
+       beq- 0,.L77
+       cmpwi 0,9,3
+       beq- 0,.L77
+       cmpwi 0,9,4
+       beq- 0,.L77
+       cmpwi 0,9,5
+       beq- 0,.L76
+       cmpwi 0,9,6
+       beq- 0,.L76
+       cmpwi 0,9,7
+       beq- 0,.L84
+       cmpwi 0,9,8
+       beq- 0,.L84
+       cmpwi 0,9,9
+       beq- 0,.L84
+       cmpwi 0,9,10
+       beq- 0,.L84
+       addi 0,9,-11
+       cmplwi 0,0,1
+       ble- 0,.L83
+       cmpwi 0,9,13
+       beq- 0,.L85
+       cmpwi 0,9,14
+       beq- 0,.L86
+       cmpwi 0,9,15
+       beq- 0,.L84
+       cmpwi 0,9,16
+       beq- 0,.L87
+.L34:
+       lwz 11,0(1)
+       li 3,0
+       lwz 0,4(11)
+       lwz 30,-8(11)
+       lwz 31,-4(11)
+       mtlr 0
+       mr 1,11
+       blr
+.L87:
+       lwz 0,0(30)
+       andi. 9,0,512
+       beq- 0,.L34
+       lwz 0,16(30)
+       cmpwi 0,0,1
+       beq- 0,.L77
+       cmpwi 0,0,2
+       beq- 0,.L76
+       cmpwi 0,0,4
+       beq- 0,.L84
+       cmpwi 0,0,8
+       bne+ 0,.L34
+.L83:
+       lwz 9,8(30)
+       stw 4,4(9)
+.L75:
+       stw 3,0(9)
+       b .L34
+.L84:
+       lwz 9,8(30)
+       b .L75
+.L76:
+       lwz 9,8(30)
+       sth 3,0(9)
+       b .L34
+.L77:
+       lwz 9,8(30)
+       stb 3,0(9)
+       b .L34
+.L86:
+       lwz 9,8(30)
+       stfd 1,0(9)
+       b .L34
+.L85:
+       frsp 0,1
+       lwz 9,8(30)
+       stfs 0,0(9)
+       b .L34
+       .size   avcall_call, .-avcall_call
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-powerpc-linux.s b/avcall/avcall-powerpc-linux.s
new file mode 100644 (file)
index 0000000..bedae2a
--- /dev/null
@@ -0,0 +1,168 @@
+       .file   "avcall-powerpc.c"
+       .section        ".text"
+       .align 2
+       .globl avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-1056(1)
+       mflr 0
+       stw 0,1060(1)
+       addi 10,1,8
+       stw 30,1048(1)
+       mr 30,3
+       lwz 0,20(30)
+       li 3,0
+       lwz 11,24(30)
+       stw 31,1052(1)
+       mr 31,1
+       subfc 0,11,0
+       srawi 0,0,2
+       cmpw 0,3,0
+       bge- 0,.L73
+       mtctr 0
+.L74:
+       slwi 9,3,2
+       addi 3,3,1
+       lwzx 0,9,11
+       stwx 0,9,10
+       bdnz .L74
+.L73:
+       lwz 9,76(30)
+       subfc 9,30,9
+       addi 9,9,-80
+       srawi. 9,9,3
+       beq- 0,.L8
+       cmpwi 0,9,1
+       beq- 0,.L11
+       cmpwi 0,9,2
+       beq- 0,.L14
+       cmpwi 0,9,3
+       beq- 0,.L17
+       cmpwi 0,9,4
+       beq- 0,.L20
+       cmpwi 0,9,5
+       beq- 0,.L23
+       cmpwi 0,9,6
+       beq- 0,.L26
+       cmpwi 0,9,7
+       beq- 0,.L29
+.L32:
+       lfd 8,136(30)
+.L29:
+       lfd 7,128(30)
+.L26:
+       lfd 6,120(30)
+.L23:
+       lfd 5,112(30)
+.L20:
+       lfd 4,104(30)
+.L17:
+       lfd 3,96(30)
+.L14:
+       lfd 2,88(30)
+.L11:
+       lfd 1,80(30)
+.L8:
+       lwz 0,4(30)
+       lwz 9,68(30)
+       lwz 3,44(30)
+       mtctr 0
+       lwz 4,48(30)
+       lwz 5,52(30)
+       lwz 6,56(30)
+       lwz 7,60(30)
+       lwz 8,64(30)
+       lwz 10,72(30)
+       crxor 6,6,6
+       bctrl
+       lwz 9,12(30)
+       cmpwi 0,9,1
+       beq- 0,.L34
+       cmpwi 0,9,0
+       beq- 0,.L84
+       cmpwi 0,9,2
+       beq- 0,.L77
+       cmpwi 0,9,3
+       beq- 0,.L77
+       cmpwi 0,9,4
+       beq- 0,.L77
+       cmpwi 0,9,5
+       beq- 0,.L76
+       cmpwi 0,9,6
+       beq- 0,.L76
+       cmpwi 0,9,7
+       beq- 0,.L84
+       cmpwi 0,9,8
+       beq- 0,.L84
+       cmpwi 0,9,9
+       beq- 0,.L84
+       cmpwi 0,9,10
+       beq- 0,.L84
+       addi 0,9,-11
+       cmplwi 0,0,1
+       ble- 0,.L83
+       cmpwi 0,9,13
+       beq- 0,.L85
+       cmpwi 0,9,14
+       beq- 0,.L86
+       cmpwi 0,9,15
+       beq- 0,.L84
+       cmpwi 0,9,16
+       beq- 0,.L87
+.L34:
+       lwz 11,0(1)
+       li 3,0
+       lwz 0,4(11)
+       lwz 30,-8(11)
+       lwz 31,-4(11)
+       mtlr 0
+       mr 1,11
+       blr
+.L87:
+       lwz 0,0(30)
+       andi. 9,0,512
+       beq- 0,.L34
+       lwz 0,16(30)
+       cmpwi 0,0,1
+       beq- 0,.L77
+       cmpwi 0,0,2
+       beq- 0,.L76
+       cmpwi 0,0,4
+       beq- 0,.L84
+       cmpwi 0,0,8
+       bne+ 0,.L34
+.L83:
+       lwz 9,8(30)
+       stw 4,4(9)
+.L75:
+       stw 3,0(9)
+       b .L34
+.L84:
+       lwz 9,8(30)
+       b .L75
+.L76:
+       lwz 9,8(30)
+       sth 3,0(9)
+       b .L34
+.L77:
+       lwz 9,8(30)
+       stb 3,0(9)
+       b .L34
+.L86:
+       lwz 9,8(30)
+       stfd 1,0(9)
+       b .L34
+.L85:
+       frsp 0,1
+       lwz 9,8(30)
+       stfs 0,0(9)
+       b .L34
+       .size   avcall_call, .-avcall_call
+       .section        .note.GNU-stack,"",@progbits
+       .ident  "GCC: (GNU) 3.3.6"
diff --git a/avcall/avcall-powerpc-macos.s b/avcall/avcall-powerpc-macos.s
new file mode 100644 (file)
index 0000000..f76e2c0
--- /dev/null
@@ -0,0 +1,177 @@
+.text
+       .align 2
+       .globl _avcall_call
+_avcall_call:
+       mflr r0
+       stmw r29,-12(r1)
+       stw r0,8(r1)
+       mr r29,r3
+       stwu r1,-1104(r1)
+       li r3,8
+       lwz r0,20(r29)
+       mr r30,r1
+       lwz r9,24(r29)
+       addi r10,r1,56
+       subf r0,r9,r0
+       srawi r11,r0,2
+       cmpw cr0,r3,r11
+       bge- cr0,L89
+       mr r12,r9
+L6:
+       slwi r9,r3,2
+       addi r3,r3,1
+       cmpw cr0,r3,r11
+       lwzx r0,r9,r12
+       add r9,r9,r10
+       stw r0,-32(r9)
+       blt+ cr0,L6
+L88:
+       lwz r9,40(r29)
+       subf r9,r29,r9
+       addi r9,r9,-44
+       srawi. r9,r9,3
+       beq- cr0,L8
+       cmpwi cr0,r9,1
+       beq- cr0,L11
+       cmpwi cr0,r9,2
+       beq- cr0,L14
+       cmpwi cr0,r9,3
+       beq- cr0,L17
+       cmpwi cr0,r9,4
+       beq- cr0,L20
+       cmpwi cr0,r9,5
+       beq- cr0,L23
+       cmpwi cr0,r9,6
+       beq- cr0,L26
+       cmpwi cr0,r9,7
+       beq- cr0,L29
+       cmpwi cr0,r9,8
+       beq- cr0,L32
+       cmpwi cr0,r9,9
+       beq- cr0,L35
+       cmpwi cr0,r9,10
+       beq- cr0,L38
+       cmpwi cr0,r9,11
+       beq- cr0,L41
+       cmpwi cr0,r9,12
+       beq- cr0,L44
+L47:
+       lfd f13,140(r29)
+L44:
+       lfd f12,132(r29)
+L41:
+       lfd f11,124(r29)
+L38:
+       lfd f10,116(r29)
+L35:
+       lfd f9,108(r29)
+L32:
+       lfd f8,100(r29)
+L29:
+       lfd f7,92(r29)
+L26:
+       lfd f6,84(r29)
+L23:
+       lfd f5,76(r29)
+L20:
+       lfd f4,68(r29)
+L17:
+       lfd f3,60(r29)
+L14:
+       lfd f2,52(r29)
+L11:
+       lfd f1,44(r29)
+L8:
+       lwz r0,4(r29)
+       lwz r9,24(r12)
+       lwz r10,28(r12)
+       mtctr r0
+       lwz r3,0(r12)
+       lwz r4,4(r12)
+       lwz r5,8(r12)
+       lwz r6,12(r12)
+       lwz r7,16(r12)
+       lwz r8,20(r12)
+       bctrl
+       lwz r9,12(r29)
+       cmpwi cr0,r9,1
+       beq- cr0,L49
+       cmpwi cr0,r9,0
+       beq- cr0,L99
+       cmpwi cr0,r9,2
+       beq- cr0,L92
+       cmpwi cr0,r9,3
+       beq- cr0,L92
+       cmpwi cr0,r9,4
+       beq- cr0,L92
+       cmpwi cr0,r9,5
+       beq- cr0,L91
+       cmpwi cr0,r9,6
+       beq- cr0,L91
+       cmpwi cr0,r9,7
+       beq- cr0,L99
+       cmpwi cr0,r9,8
+       beq- cr0,L99
+       cmpwi cr0,r9,9
+       beq- cr0,L99
+       cmpwi cr0,r9,10
+       beq- cr0,L99
+       addi r0,r9,-11
+       cmplwi cr0,r0,1
+       ble- cr0,L98
+       cmpwi cr0,r9,13
+       beq- cr0,L100
+       cmpwi cr0,r9,14
+       beq- cr0,L101
+       cmpwi cr0,r9,15
+       beq- cr0,L99
+       cmpwi cr0,r9,16
+       beq- cr0,L102
+L49:
+       lwz r1,0(r1)
+       li r3,0
+       lwz r0,8(r1)
+       lmw r29,-12(r1)
+       mtlr r0
+       blr
+L102:
+       lwz r0,0(r29)
+       andi. r9,r0,512
+       beq- cr0,L49
+       lwz r0,16(r29)
+       cmpwi cr0,r0,1
+       beq- cr0,L92
+       cmpwi cr0,r0,2
+       beq- cr0,L91
+       cmpwi cr0,r0,4
+       beq- cr0,L99
+       cmpwi cr0,r0,8
+       bne+ cr0,L49
+L98:
+       lwz r9,8(r29)
+       stw r4,4(r9)
+L90:
+       stw r3,0(r9)
+       b L49
+L99:
+       lwz r9,8(r29)
+       b L90
+L91:
+       lwz r9,8(r29)
+       sth r3,0(r9)
+       b L49
+L92:
+       lwz r9,8(r29)
+       stb r3,0(r9)
+       b L49
+L101:
+       lwz r9,8(r29)
+       stfd f1,0(r9)
+       b L49
+L100:
+       lwz r9,8(r29)
+       stfs f1,0(r9)
+       b L49
+L89:
+       lwz r12,24(r29)
+       b L88
diff --git a/avcall/avcall-powerpc-sysv4-macro.S b/avcall/avcall-powerpc-sysv4-macro.S
new file mode 100644 (file)
index 0000000..b67f316
--- /dev/null
@@ -0,0 +1,169 @@
+       .file   "avcall-powerpc.c"
+       .section        ".text"
+       .align 2
+       .globl avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-1056(1)
+       mflr 0
+       stw 0,1060(1)
+       addi 10,1,8
+       stw 30,1048(1)
+       mr 30,3
+       lwz 0,20(30)
+       li 3,0
+       lwz 11,24(30)
+       stw 31,1052(1)
+       mr 31,1
+       subfc 0,11,0
+       srawi 0,0,2
+       cmpw 0,3,0
+       bge- 0,.L73
+       mtctr 0
+.L74:
+       slwi 9,3,2
+       addi 3,3,1
+       lwzx 0,9,11
+       stwx 0,9,10
+       bdnz .L74
+.L73:
+       lwz 9,76(30)
+       subfc 9,30,9
+       addi 9,9,-80
+       srawi. 9,9,3
+       beq- 0,.L8
+       cmpwi 0,9,1
+       beq- 0,.L11
+       cmpwi 0,9,2
+       beq- 0,.L14
+       cmpwi 0,9,3
+       beq- 0,.L17
+       cmpwi 0,9,4
+       beq- 0,.L20
+       cmpwi 0,9,5
+       beq- 0,.L23
+       cmpwi 0,9,6
+       beq- 0,.L26
+       cmpwi 0,9,7
+       beq- 0,.L29
+.L32:
+       lfd 8,136(30)
+.L29:
+       lfd 7,128(30)
+.L26:
+       lfd 6,120(30)
+.L23:
+       lfd 5,112(30)
+.L20:
+       lfd 4,104(30)
+.L17:
+       lfd 3,96(30)
+.L14:
+       lfd 2,88(30)
+.L11:
+       lfd 1,80(30)
+.L8:
+       lwz 0,4(30)
+       lwz 9,68(30)
+       lwz 3,44(30)
+       mtctr 0
+       lwz 4,48(30)
+       lwz 5,52(30)
+       lwz 6,56(30)
+       lwz 7,60(30)
+       lwz 8,64(30)
+       lwz 10,72(30)
+       crxor 6,6,6
+       bctrl
+       lwz 9,12(30)
+       cmpwi 0,9,1
+       beq- 0,.L34
+       cmpwi 0,9,0
+       beq- 0,.L84
+       cmpwi 0,9,2
+       beq- 0,.L77
+       cmpwi 0,9,3
+       beq- 0,.L77
+       cmpwi 0,9,4
+       beq- 0,.L77
+       cmpwi 0,9,5
+       beq- 0,.L76
+       cmpwi 0,9,6
+       beq- 0,.L76
+       cmpwi 0,9,7
+       beq- 0,.L84
+       cmpwi 0,9,8
+       beq- 0,.L84
+       cmpwi 0,9,9
+       beq- 0,.L84
+       cmpwi 0,9,10
+       beq- 0,.L84
+       addi 0,9,-11
+       cmplwi 0,0,1
+       ble- 0,.L83
+       cmpwi 0,9,13
+       beq- 0,.L85
+       cmpwi 0,9,14
+       beq- 0,.L86
+       cmpwi 0,9,15
+       beq- 0,.L84
+       cmpwi 0,9,16
+       beq- 0,.L87
+.L34:
+       lwz 11,0(1)
+       li 3,0
+       lwz 0,4(11)
+       lwz 30,-8(11)
+       lwz 31,-4(11)
+       mtlr 0
+       mr 1,11
+       blr
+.L87:
+       lwz 0,0(30)
+       andi. 9,0,512
+       beq- 0,.L34
+       lwz 0,16(30)
+       cmpwi 0,0,1
+       beq- 0,.L77
+       cmpwi 0,0,2
+       beq- 0,.L76
+       cmpwi 0,0,4
+       beq- 0,.L84
+       cmpwi 0,0,8
+       bne+ 0,.L34
+.L83:
+       lwz 9,8(30)
+       stw 4,4(9)
+.L75:
+       stw 3,0(9)
+       b .L34
+.L84:
+       lwz 9,8(30)
+       b .L75
+.L76:
+       lwz 9,8(30)
+       sth 3,0(9)
+       b .L34
+.L77:
+       lwz 9,8(30)
+       stb 3,0(9)
+       b .L34
+.L86:
+       lwz 9,8(30)
+       stfd 1,0(9)
+       b .L34
+.L85:
+       frsp 0,1
+       lwz 9,8(30)
+       stfs 0,0(9)
+       b .L34
+       .size   avcall_call, .-avcall_call
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-powerpc.c b/avcall/avcall-powerpc.c
new file mode 100644 (file)
index 0000000..5d1b6f8
--- /dev/null
@@ -0,0 +1,216 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+  Copyright 2000 Adam Fedor <fedor@gnu.org>
+  Copyright 2004 Paul Guyot <pguyot@kallisys.net>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for an IBM RS/6000 with gcc
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  RS6000 Argument Passing Conventions:
+
+  All arguments, except the first 8 words, are passed on the stack with
+  word alignment. Doubles take two words. The first 13 doubles and floats
+  are also passed in floating-point-registers.
+  To return a structure, the called function copies the value to space
+  pointed to by its first argument, and all other arguments are shifted
+  down by one.
+
+  Differences between AIX and SysV.4 argument passing conventions:
+  - AIX: the first 13 doubles and floats are passed in FP registers,
+         and when they do, there is still room allocated for them in the
+         argument sequence (integer regs or stack).
+    SysV.4: the first 8 doubles and floats are passed in FP registers,
+         and no room is allocated for them in the argument sequence.
+  - AIX: Structures are passed in the argument sequence.
+    SysV.4: Structures are passed by reference: only a pointer appears in
+         the argument sequence.
+  - AIX: Long longs are only word aligned.
+    SysV.4: Long longs are two-word aligned, both when passed in registers
+         (pairs: 3/4, 5/6, 7/8, 9/10) and when passed on the stack. (Recall
+         that the stack is always 8-byte aligned).
+
+  Compile this routine with gcc -O (or -O2 -fno-omit-frame-pointer or -g -O)
+  to get the right register variables. For other compilers use the
+  pre-compiled assembler version.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */
+#define STACK_OFFSET 14
+#else /* __powerpc_sysv4__ */
+#define STACK_OFFSET 2
+#endif
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+register double farg1  __asm__("fr1");
+register double farg2  __asm__("fr2");
+register double farg3  __asm__("fr3");
+register double farg4  __asm__("fr4");
+register double farg5  __asm__("fr5");
+register double farg6  __asm__("fr6");
+register double farg7  __asm__("fr7");
+register double farg8  __asm__("fr8");
+register double farg9  __asm__("fr9");
+register double farg10 __asm__("fr10");
+register double farg11 __asm__("fr11");
+register double farg12 __asm__("fr12");
+register double farg13 __asm__("fr13");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("r1");  /* C names for registers */
+/*register __avword    iret    __asm__("r3"); */
+  register __avword    iret2   __asm__("r4");
+  register float       fret    __asm__("fr1");
+  register double      dret    __asm__("fr1");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+#if defined(_AIX) /* for some reason, this does not work on Mac OS X and Linux! */
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+#else
+  __avword space[__AV_ALIST_WORDS];    /* space for callee's stack frame */
+  __avword* argframe = sp + STACK_OFFSET;/* stack offset for argument list */
+#endif
+  int arglen = l->aptr - l->args;
+  __avword i;
+#if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */
+  int farglen = 0;
+
+  for (i = (8-farglen); i < arglen; i++) /* push function args onto stack */
+    argframe[i-8+farglen] = l->args[i];
+#else /* __powerpc_sysv4__ */
+  for (i = 0; i < arglen; i++) /* push function args onto stack */
+    argframe[i] = l->args[i];
+#endif
+
+  /* pass first 13 floating-point args in registers */
+  arglen = l->faptr - l->fargs;
+  if (arglen == 0) goto fargs0;
+  else if (arglen == 1) goto fargs1;
+  else if (arglen == 2) goto fargs2;
+  else if (arglen == 3) goto fargs3;
+  else if (arglen == 4) goto fargs4;
+  else if (arglen == 5) goto fargs5;
+  else if (arglen == 6) goto fargs6;
+  else if (arglen == 7) goto fargs7;
+  else if (arglen == 8) goto fargs8;
+#if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */
+  else if (arglen == 9) goto fargs9;
+  else if (arglen == 10) goto fargs10;
+  else if (arglen == 11) goto fargs11;
+  else if (arglen == 12) goto fargs12;
+  else if (arglen == 13) goto fargs13;
+  fargs13: farg13 = l->fargs[12];
+  fargs12: farg12 = l->fargs[11];
+  fargs11: farg11 = l->fargs[10];
+  fargs10: farg10 = l->fargs[9];
+  fargs9: farg9 = l->fargs[8];
+#endif
+  fargs8: farg8 = l->fargs[7];
+  fargs7: farg7 = l->fargs[6];
+  fargs6: farg6 = l->fargs[5];
+  fargs5: farg5 = l->fargs[4];
+  fargs4: farg4 = l->fargs[3];
+  fargs3: farg3 = l->fargs[2];
+  fargs2: farg2 = l->fargs[1];
+  fargs1: farg1 = l->fargs[0];
+  fargs0: ;
+
+#if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */
+                               /* call function, pass 8 args in registers */
+  i = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3],
+                l->args[4], l->args[5], l->args[6], l->args[7]);
+#else /* __powerpc_sysv4__ */
+  i = (*l->func)(l->iargs[0], l->iargs[1], l->iargs[2], l->iargs[3],
+                l->iargs[4], l->iargs[5], l->iargs[6], l->iargs[7]);
+#endif
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, i);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, i);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, i);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, i);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, i);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, i);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, i);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, i);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, i);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, i);
+  } else
+  if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) {
+    void* raddr = l->raddr;
+    ((__avword*)raddr)[0] = i;
+    ((__avword*)raddr)[1] = iret2;
+  } else
+  if (l->rtype == __AVfloat) {
+    RETURN(float, fret);
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, dret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, i);
+  } else
+  if (l->rtype == __AVstruct) {
+    if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+      if (l->rsize == sizeof(char)) {
+        RETURN(char, i);
+      } else
+      if (l->rsize == sizeof(short)) {
+        RETURN(short, i);
+      } else
+      if (l->rsize == sizeof(int)) {
+        RETURN(int, i);
+      } else
+      if (l->rsize == 2*sizeof(__avword)) {
+        void* raddr = l->raddr;
+        ((__avword*)raddr)[0] = i;
+        ((__avword*)raddr)[1] = iret2;
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-powerpc64-aix.s b/avcall/avcall-powerpc64-aix.s
new file mode 100644 (file)
index 0000000..b0248fc
--- /dev/null
@@ -0,0 +1,207 @@
+       .file   "avcall-powerpc64.c"
+       .csect .text[PR]
+       .toc
+       .csect .text[PR]
+       .align 2
+       .align 4
+       .globl avcall_call
+       .globl .avcall_call
+       .csect avcall_call[DS],3
+avcall_call:
+       .llong .avcall_call, TOC[tc0], 0
+       .csect .text[PR]
+.avcall_call:
+       mflr 0
+       std 30,-16(1)
+       std 31,-8(1)
+       mr 30,3
+       std 0,16(1)
+       stdu 1,-128(1)
+       ld 3,48(3)
+       ld 9,40(30)
+       ld 10,0(1)
+       mr 31,1
+       subf 9,3,9
+       stdu 10,-2064(1)
+       sradi 9,9,3
+       cmpwi 7,9,8
+       ble 7,L..6
+       addi 10,9,-9
+       addi 8,1,112
+       rldicl 10,10,0,32
+       addi 9,3,56
+       addi 10,10,8
+       addi 8,8,-8
+       sldi 10,10,3
+       add 10,3,10
+       .align 4
+L..5:
+       ldu 7,8(9)
+       stdu 7,8(8)
+       cmpld 7,10,9
+       bne 7,L..5
+L..6:
+       ld 10,64(30)
+       addi 9,30,72
+       subf 9,9,10
+       sradi 9,9,3
+       extsw 9,9
+       cmpwi 7,9,0
+       ble 7,L..4
+       cmpwi 7,9,1
+       beq 7,L..7
+       cmpwi 7,9,2
+       beq 7,L..8
+       cmpwi 7,9,3
+       beq 7,L..9
+       cmpwi 7,9,4
+       beq 7,L..10
+       cmpwi 7,9,5
+       beq 7,L..11
+       cmpwi 7,9,6
+       beq 7,L..12
+       cmpwi 7,9,7
+       beq 7,L..13
+       cmpwi 7,9,8
+       beq 7,L..14
+       cmpwi 7,9,9
+       beq 7,L..15
+       cmpwi 7,9,10
+       beq 7,L..16
+       cmpwi 7,9,11
+       beq 7,L..17
+       cmpwi 7,9,12
+       beq 7,L..18
+       lfd 13,168(30)
+L..18:
+       lfd 12,160(30)
+L..17:
+       lfd 11,152(30)
+L..16:
+       lfd 10,144(30)
+L..15:
+       lfd 9,136(30)
+L..14:
+       lfd 8,128(30)
+L..13:
+       lfd 7,120(30)
+L..12:
+       lfd 6,112(30)
+L..11:
+       lfd 5,104(30)
+L..10:
+       lfd 4,96(30)
+L..9:
+       lfd 3,88(30)
+L..8:
+       lfd 2,80(30)
+L..7:
+       lfd 1,72(30)
+L..4:
+       ld 9,48(3)
+       ld 10,56(3)
+       ld 8,40(3)
+       ld 7,32(3)
+       ld 6,24(3)
+       ld 5,16(3)
+       ld 4,8(3)
+       ld 3,0(3)
+       std 2,40(1)
+       ld 12,8(30)
+       ld 0,0(12)
+       ld 11,16(12)
+       mtctr 0
+       ld 2,8(12)
+       bctrl
+       ld 2,40(1)
+       lwz 9,24(30)
+       cmplwi 7,9,1
+       beq 7,L..19
+       cmpdi 7,9,0
+       beq 7,L..36
+       cmplwi 7,9,2
+       beq 7,L..38
+       cmplwi 7,9,3
+       beq 7,L..38
+       cmplwi 7,9,4
+       beq 7,L..38
+       cmplwi 7,9,5
+       beq 7,L..39
+       cmplwi 7,9,6
+       beq 7,L..39
+       cmplwi 7,9,7
+       beq 7,L..40
+       cmplwi 7,9,8
+       beq 7,L..40
+       cmplwi 7,9,9
+       beq 7,L..36
+       cmplwi 7,9,10
+       beq 7,L..36
+       cmplwi 7,9,11
+       beq 7,L..36
+       cmplwi 7,9,12
+       beq 7,L..36
+       cmplwi 7,9,13
+       beq 7,L..42
+       cmplwi 7,9,14
+       beq 7,L..43
+       cmplwi 7,9,15
+       beq 7,L..36
+L..19:
+       addi 1,31,128
+       ld 0,16(1)
+       ld 30,-16(1)
+       li 3,0
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .align 4
+L..36:
+       ld 9,16(30)
+       std 3,0(9)
+       addi 1,31,128
+       li 3,0
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .align 4
+L..38:
+       ld 9,16(30)
+       stb 3,0(9)
+       addi 1,31,128
+       li 3,0
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+L..39:
+       ld 9,16(30)
+       sth 3,0(9)
+       b L..19
+L..40:
+       ld 9,16(30)
+       stw 3,0(9)
+       b L..19
+L..42:
+       ld 9,16(30)
+       stfs 1,0(9)
+       b L..19
+L..43:
+       ld 9,16(30)
+       stfd 1,0(9)
+       b L..19
+LT..avcall_call:
+       .long 0
+       .byte 0,0,32,97,128,2,1,0
+       .long 0
+       .long LT..avcall_call-.avcall_call
+       .short 11
+       .byte "avcall_call"
+       .byte 31
+       .align 2
+_section_.text:
+       .csect .data[RW],4
+       .llong _section_.text
diff --git a/avcall/avcall-powerpc64-elfv2-linux.S b/avcall/avcall-powerpc64-elfv2-linux.S
new file mode 100644 (file)
index 0000000..3ffa3e6
--- /dev/null
@@ -0,0 +1,304 @@
+       .file   "avcall-powerpc64.c"
+       .machine power4
+       .abiversion 2
+       .section        ".toc","aw"
+       .section        ".text"
+       .align 2
+       .p2align 4,,15
+       .globl avcall_call
+       .type   avcall_call, @function
+avcall_call:
+0:     addis 2,12,.TOC.-0b@ha
+       addi 2,2,.TOC.-0b@l
+       .localentry     avcall_call,.-avcall_call
+       mflr 0
+       std 30,-16(1)
+       std 31,-8(1)
+       mr 30,3
+       std 0,16(1)
+       stdu 1,-112(1)
+       ld 3,48(3)
+       ld 9,40(30)
+       mr 31,1
+       ld 10,0(1)
+       subf 9,3,9
+       stdu 10,-2064(1)
+       sradi 9,9,3
+       cmpwi 7,9,8
+       ble 7,.L6
+       addi 10,9,-9
+       addi 8,1,96
+       addi 9,3,56
+       rldicl 10,10,0,32
+       addi 8,8,-8
+       addi 10,10,8
+       sldi 10,10,3
+       add 10,3,10
+       .p2align 4,,15
+.L5:
+       ldu 7,8(9)
+       cmpld 7,10,9
+       stdu 7,8(8)
+       bne 7,.L5
+.L6:
+       ld 10,64(30)
+       addi 9,30,72
+       subf 9,9,10
+       sradi 9,9,3
+       extsw 9,9
+       cmpwi 7,9,0
+       ble 7,.L4
+       cmpwi 7,9,1
+       beq 7,.L7
+       cmpwi 7,9,2
+       beq 7,.L8
+       cmpwi 7,9,3
+       beq 7,.L9
+       cmpwi 7,9,4
+       beq 7,.L10
+       cmpwi 7,9,5
+       beq 7,.L11
+       cmpwi 7,9,6
+       beq 7,.L12
+       cmpwi 7,9,7
+       beq 7,.L13
+       cmpwi 7,9,8
+       beq 7,.L14
+       cmpwi 7,9,9
+       beq 7,.L15
+       cmpwi 7,9,10
+       beq 7,.L16
+       cmpwi 7,9,11
+       beq 7,.L17
+       cmpwi 7,9,12
+       beq 7,.L18
+       lfd 13,168(30)
+.L18:
+       lfd 12,160(30)
+.L17:
+       lfd 11,152(30)
+.L16:
+       lfd 10,144(30)
+.L15:
+       lfd 9,136(30)
+.L14:
+       lfd 8,128(30)
+.L13:
+       lfd 7,120(30)
+.L12:
+       lfd 6,112(30)
+.L11:
+       lfd 5,104(30)
+.L10:
+       lfd 4,96(30)
+.L9:
+       lfd 3,88(30)
+.L8:
+       lfd 2,80(30)
+.L7:
+       lfd 1,72(30)
+.L4:
+       ld 11,8(30)
+       ld 9,48(3)
+       ld 10,56(3)
+       ld 8,40(3)
+       ld 7,32(3)
+       ld 6,24(3)
+       ld 5,16(3)
+       ld 4,8(3)
+       mtctr 11
+       ld 3,0(3)
+       mr 12,11
+       std 2,24(1)
+       bctrl
+       ld 2,24(1)
+       lwz 9,24(30)
+       cmplwi 7,9,1
+       beq 7,.L19
+       cmpdi 7,9,0
+       beq 7,.L50
+       cmplwi 7,9,2
+       beq 7,.L45
+       cmplwi 7,9,3
+       beq 7,.L45
+       cmplwi 7,9,4
+       beq 7,.L45
+       cmplwi 7,9,5
+       beq 7,.L46
+       cmplwi 7,9,6
+       beq 7,.L46
+       cmplwi 7,9,7
+       beq 7,.L47
+       cmplwi 7,9,8
+       beq 7,.L47
+       cmplwi 7,9,9
+       beq 7,.L50
+       cmplwi 7,9,10
+       beq 7,.L50
+       cmplwi 7,9,11
+       beq 7,.L50
+       cmplwi 7,9,12
+       beq 7,.L50
+       cmplwi 7,9,13
+       beq 7,.L52
+       cmplwi 7,9,14
+       beq 7,.L53
+       cmplwi 7,9,15
+       beq 7,.L50
+       cmplwi 7,9,16
+       bne 7,.L19
+       lwz 9,0(30)
+       rldicl. 10,9,55,63
+       beq 0,.L19
+       ld 10,32(30)
+       addi 9,10,-1
+       cmpldi 7,9,15
+       bgt 7,.L19
+       ld 8,16(30)
+       cmpldi 7,10,8
+       rldicl 9,8,0,61
+       rldicr 8,8,0,60
+       add 10,10,9
+       bgt 7,.L35
+       cmpldi 7,10,8
+       bgt 7,.L36
+       slwi 10,10,3
+       li 7,2
+       ld 6,0(8)
+       slwi 9,9,3
+       addi 10,10,-1
+       sld 10,7,10
+       li 7,1
+       sld 7,7,9
+       sld 9,3,9
+       subf 10,7,10
+       xor 9,9,6
+       and 9,10,9
+       xor 9,9,6
+       std 9,0(8)
+.L19:
+       addi 1,31,112
+       li 3,0
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L50:
+       ld 9,16(30)
+       std 3,0(9)
+       addi 1,31,112
+       li 3,0
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L45:
+       ld 9,16(30)
+       stb 3,0(9)
+       addi 1,31,112
+       li 3,0
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+.L46:
+       ld 9,16(30)
+       sth 3,0(9)
+       b .L19
+.L47:
+       ld 9,16(30)
+       stw 3,0(9)
+       b .L19
+.L52:
+       ld 9,16(30)
+       stfs 1,0(9)
+       b .L19
+.L53:
+       ld 9,16(30)
+       stfd 1,0(9)
+       b .L19
+.L36:
+       rldicl 9,9,0,32
+       slwi 10,10,3
+       ld 11,0(8)
+       ld 4,8(8)
+       li 7,2
+       mulli 6,9,-8
+       addi 10,10,-65
+       slwi 9,9,3
+       sld 10,7,10
+       sld 5,3,9
+       li 7,-1
+       addi 6,6,64
+       addi 10,10,-1
+       sld 7,7,9
+       srad 3,3,6
+       xor 6,5,11
+       xor 9,3,4
+       and 7,7,6
+       and 9,10,9
+       xor 10,7,11
+       xor 9,9,4
+       std 10,0(8)
+       std 9,8(8)
+       b .L19
+.L35:
+       rldicl 9,9,0,32
+       ld 11,0(8)
+       li 6,-1
+       cmpldi 7,10,16
+       slwi 5,9,3
+       sld 7,3,5
+       sld 6,6,5
+       xor 7,7,11
+       and 7,6,7
+       xor 7,7,11
+       std 7,0(8)
+       ble 7,.L54
+       mulli 9,9,-8
+       ld 11,16(8)
+       slwi 10,10,3
+       li 7,2
+       addi 10,10,-129
+       addi 9,9,64
+       sld 7,7,10
+       srad 6,4,9
+       srad 3,3,9
+       addi 7,7,-1
+       sld 9,4,5
+       xor 10,6,11
+       or 9,3,9
+       and 10,7,10
+       std 9,8(8)
+       xor 10,10,11
+       std 10,16(8)
+       b .L19
+.L54:
+       mulli 9,9,-4
+       slwi 10,10,3
+       ld 11,8(8)
+       sld 4,4,5
+       addi 10,10,-65
+       li 6,2
+       addi 9,9,32
+       sld 10,6,10
+       srad 3,3,9
+       srad 9,3,9
+       or 7,9,4
+       addi 9,10,-1
+       xor 10,7,11
+       and 9,10,9
+       xor 9,9,11
+       std 9,8(8)
+       b .L19
+       .long 0
+       .byte 0,0,0,1,128,2,0,0
+       .size   avcall_call,.-avcall_call
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-powerpc64-linux.S b/avcall/avcall-powerpc64-linux.S
new file mode 100644 (file)
index 0000000..83537fe
--- /dev/null
@@ -0,0 +1,202 @@
+       .file   "avcall-powerpc64.c"
+       .machine power4
+       .section        ".toc","aw"
+       .section        ".text"
+       .align 2
+       .p2align 4,,15
+       .globl avcall_call
+       .section        ".opd","aw"
+       .align 3
+avcall_call:
+       .quad   .L.avcall_call,.TOC.@tocbase,0
+       .previous
+       .type   avcall_call, @function
+.L.avcall_call:
+       mflr 0
+       std 30,-16(1)
+       std 31,-8(1)
+       mr 30,3
+       std 0,16(1)
+       stdu 1,-128(1)
+       ld 3,48(3)
+       ld 9,40(30)
+       mr 31,1
+       ld 10,0(1)
+       subf 9,3,9
+       stdu 10,-2064(1)
+       sradi 9,9,3
+       cmpwi 7,9,8
+       ble 7,.L6
+       addi 10,9,-9
+       addi 8,1,112
+       addi 9,3,56
+       rldicl 10,10,0,32
+       addi 8,8,-8
+       addi 10,10,8
+       sldi 10,10,3
+       add 10,3,10
+       .p2align 4,,15
+.L5:
+       ldu 7,8(9)
+       cmpld 7,10,9
+       stdu 7,8(8)
+       bne 7,.L5
+.L6:
+       ld 10,64(30)
+       addi 9,30,72
+       subf 9,9,10
+       sradi 9,9,3
+       extsw 9,9
+       cmpwi 7,9,0
+       ble 7,.L4
+       cmpwi 7,9,1
+       beq 7,.L7
+       cmpwi 7,9,2
+       beq 7,.L8
+       cmpwi 7,9,3
+       beq 7,.L9
+       cmpwi 7,9,4
+       beq 7,.L10
+       cmpwi 7,9,5
+       beq 7,.L11
+       cmpwi 7,9,6
+       beq 7,.L12
+       cmpwi 7,9,7
+       beq 7,.L13
+       cmpwi 7,9,8
+       beq 7,.L14
+       cmpwi 7,9,9
+       beq 7,.L15
+       cmpwi 7,9,10
+       beq 7,.L16
+       cmpwi 7,9,11
+       beq 7,.L17
+       cmpwi 7,9,12
+       beq 7,.L18
+       lfd 13,168(30)
+.L18:
+       lfd 12,160(30)
+.L17:
+       lfd 11,152(30)
+.L16:
+       lfd 10,144(30)
+.L15:
+       lfd 9,136(30)
+.L14:
+       lfd 8,128(30)
+.L13:
+       lfd 7,120(30)
+.L12:
+       lfd 6,112(30)
+.L11:
+       lfd 5,104(30)
+.L10:
+       lfd 4,96(30)
+.L9:
+       lfd 3,88(30)
+.L8:
+       lfd 2,80(30)
+.L7:
+       lfd 1,72(30)
+.L4:
+       ld 9,48(3)
+       ld 10,56(3)
+       ld 8,40(3)
+       ld 7,32(3)
+       ld 6,24(3)
+       ld 5,16(3)
+       ld 4,8(3)
+       ld 3,0(3)
+       std 2,40(1)
+       ld 12,8(30)
+       ld 0,0(12)
+       ld 11,16(12)
+       mtctr 0
+       ld 2,8(12)
+       bctrl
+       ld 2,40(1)
+       lwz 9,24(30)
+       cmplwi 7,9,1
+       beq 7,.L19
+       cmpdi 7,9,0
+       beq 7,.L36
+       cmplwi 7,9,2
+       beq 7,.L38
+       cmplwi 7,9,3
+       beq 7,.L38
+       cmplwi 7,9,4
+       beq 7,.L38
+       cmplwi 7,9,5
+       beq 7,.L39
+       cmplwi 7,9,6
+       beq 7,.L39
+       cmplwi 7,9,7
+       beq 7,.L40
+       cmplwi 7,9,8
+       beq 7,.L40
+       cmplwi 7,9,9
+       beq 7,.L36
+       cmplwi 7,9,10
+       beq 7,.L36
+       cmplwi 7,9,11
+       beq 7,.L36
+       cmplwi 7,9,12
+       beq 7,.L36
+       cmplwi 7,9,13
+       beq 7,.L42
+       cmplwi 7,9,14
+       beq 7,.L43
+       cmplwi 7,9,15
+       beq 7,.L36
+.L19:
+       addi 1,31,128
+       li 3,0
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L36:
+       ld 9,16(30)
+       std 3,0(9)
+       addi 1,31,128
+       li 3,0
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L38:
+       ld 9,16(30)
+       stb 3,0(9)
+       addi 1,31,128
+       li 3,0
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+.L39:
+       ld 9,16(30)
+       sth 3,0(9)
+       b .L19
+.L40:
+       ld 9,16(30)
+       stw 3,0(9)
+       b .L19
+.L42:
+       ld 9,16(30)
+       stfs 1,0(9)
+       b .L19
+.L43:
+       ld 9,16(30)
+       stfd 1,0(9)
+       b .L19
+       .long 0
+       .byte 0,0,0,1,128,2,0,0
+       .size   avcall_call,.-.L.avcall_call
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-powerpc64.c b/avcall/avcall-powerpc64.c
new file mode 100644 (file)
index 0000000..f0d64d2
--- /dev/null
@@ -0,0 +1,330 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+  Copyright 2000 Adam Fedor <fedor@gnu.org>
+  Copyright 2004 Paul Guyot <pguyot@kallisys.net>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for a 64-bit PowerPC with gcc
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  PowerPC64 Argument Passing Conventions:
+
+  All arguments, except the first 8 words, are passed on the stack with
+  word alignment. The first 13 doubles and floats are also passed in
+  floating-point-registers.
+  To return a structure, the called function copies the value to space
+  pointed to by its first argument, and all other arguments are shifted
+  down by one.
+
+  The AIX argument passing conventions are used:
+  - the first 13 doubles and floats are passed in FP registers,
+    and when they do, there is still room allocated for them in the
+    argument sequence (integer regs or stack).
+  - Structures are passed in the argument sequence. But structures
+    containing floats or doubles are passed in FP registers?!
+
+  Compile this routine with gcc -O (or -O2 -fno-omit-frame-pointer or -g -O)
+  to get the right register variables. For other compilers use the
+  pre-compiled assembler version.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+register double farg1  __asm__("fr1");
+register double farg2  __asm__("fr2");
+register double farg3  __asm__("fr3");
+register double farg4  __asm__("fr4");
+register double farg5  __asm__("fr5");
+register double farg6  __asm__("fr6");
+register double farg7  __asm__("fr7");
+register double farg8  __asm__("fr8");
+register double farg9  __asm__("fr9");
+register double farg10 __asm__("fr10");
+register double farg11 __asm__("fr11");
+register double farg12 __asm__("fr12");
+register double farg13 __asm__("fr13");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("r1");  /* C names for registers */
+/*register __avword    iret    __asm__("r3"); */
+  register __avword    iret2   __asm__("r4");
+  register float       fret    __asm__("fr1");
+  register double      dret    __asm__("fr1");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  __avword iret;
+  int i;
+
+  for (i = 8; i < arglen; i++) /* push function args onto stack */
+    argframe[i-8] = l->args[i];
+
+  /* pass first 13 floating-point args in registers */
+  arglen = l->faptr - l->fargs;
+  if (arglen > 0) {
+    if (arglen > 1) {
+      if (arglen > 2) {
+        if (arglen > 3) {
+          if (arglen > 4) {
+            if (arglen > 5) {
+              if (arglen > 6) {
+                if (arglen > 7) {
+                  if (arglen > 8) {
+                    if (arglen > 9) {
+                      if (arglen > 10) {
+                        if (arglen > 11) {
+                          if (arglen > 12) {
+                            farg13 = l->fargs[12];
+                          }
+                          farg12 = l->fargs[11];
+                        }
+                        farg11 = l->fargs[10];
+                      }
+                      farg10 = l->fargs[9];
+                    }
+                    farg9 = l->fargs[8];
+                  }
+                  farg8 = l->fargs[7];
+                }
+                farg7 = l->fargs[6];
+              }
+              farg6 = l->fargs[5];
+            }
+            farg5 = l->fargs[4];
+          }
+          farg4 = l->fargs[3];
+        }
+        farg3 = l->fargs[2];
+      }
+      farg2 = l->fargs[1];
+    }
+    farg1 = l->fargs[0];
+  }
+                               /* call function, pass 8 args in registers */
+  iret = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3],
+                   l->args[4], l->args[5], l->args[6], l->args[7]);
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, iret);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, iret);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, iret);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, iret);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, iret);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, iret);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, iret);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, iret);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, iret);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, iret);
+  } else
+  if (l->rtype == __AVlonglong) {
+    RETURN(long long, iret);
+  } else
+  if (l->rtype == __AVulonglong) {
+    RETURN(unsigned long long, iret);
+  } else
+  if (l->rtype == __AVfloat) {
+    RETURN(float, fret);
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, dret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, iret);
+  } else
+  if (l->rtype == __AVstruct) {
+#ifdef __powerpc64_elfv2__
+    if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+      /* In the ELFv2 ABI, gcc returns structs of size <= 16 in registers. */
+      if (l->rsize > 0 && l->rsize <= 16) {
+        void* raddr = l->raddr;
+        #if 0 /* Unoptimized */
+        if (l->rsize == 1) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+        } else
+        if (l->rsize == 2) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+        } else
+        if (l->rsize == 3) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+        } else
+        if (l->rsize == 4) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+        } else
+        if (l->rsize == 5) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+        } else
+        if (l->rsize == 6) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+          ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+        } else
+        if (l->rsize == 7) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+          ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+          ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+        } else
+        if (l->rsize >= 8 && l->rsize <= 16) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+          ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+          ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+          ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56);
+          if (l->rsize == 8) {
+          } else
+          if (l->rsize == 9) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+          } else
+          if (l->rsize == 10) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+          } else
+          if (l->rsize == 11) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+          } else
+          if (l->rsize == 12) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+            ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+          } else
+          if (l->rsize == 13) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+            ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+            ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+          } else
+          if (l->rsize == 14) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+            ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+            ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+            ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+          } else
+          if (l->rsize == 15) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+            ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+            ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+            ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+            ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+          } else
+          if (l->rsize == 16) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+            ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+            ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+            ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+            ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+            ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56);
+          }
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avword) */
+        __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+        uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avword) */
+        if (count <= sizeof(__avword)) {
+          /* Use iret. */
+          if (end_offset <= sizeof(__avword)) {
+            /* 0 < end_offset ≤ sizeof(__avword) */
+            __avword mask0 = ((__avword)2 << (end_offset*8-1)) - ((__avword)1 << (start_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+          } else {
+            /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+            __avword mask0 = - ((__avword)1 << (start_offset*8));
+            __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avword)*8-start_offset*8))) & mask1;
+          }
+        } else {
+          /* Use iret, iret2. */
+          __avword mask0 = - ((__avword)1 << (start_offset*8));
+          wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+          if (end_offset <= 2*sizeof(__avword)) {
+            /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+            __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+            wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1;
+          } else {
+            /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+            __avword mask2 = ((__avword)2 << (end_offset*8-2*sizeof(__avword)*8-1)) - 1;
+            wordaddr[1] = (iret >> (sizeof(__avword)*8-start_offset*8)) | (iret2 << (start_offset*8));
+            wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avword)*8-start_offset*8))) & mask2;
+          }
+        }
+        #endif
+      }
+    }
+#endif
+  }
+  return 0;
+}
diff --git a/avcall/avcall-riscv32-ilp32d-linux.s b/avcall/avcall-riscv32-ilp32d-linux.s
new file mode 100644 (file)
index 0000000..fbbb9d6
--- /dev/null
@@ -0,0 +1,327 @@
+       .file   "avcall-riscv32.c"
+       .option pic
+       .text
+       .align  1
+       .globl  avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       add     sp,sp,-32
+       sw      ra,28(sp)
+       sw      s0,24(sp)
+       sw      s1,20(sp)
+       sw      s2,16(sp)
+       sw      s3,12(sp)
+       sw      s4,8(sp)
+       sw      s5,4(sp)
+       add     s0,sp,32
+       lw      t2,24(a0)
+       lw      t0,20(a0)
+       li      t3,32
+       mv      s1,a0
+       sub     t0,t0,t2
+       add     sp,sp,-1040
+       lw      ra,40(a0)
+       ble     t0,t3,.L2
+       mv      t1,sp
+       sra     t6,t0,2
+       add     t4,t2,32
+       li      t3,8
+.L3:
+       lw      t5,0(t4)
+       add     t3,t3,1
+       add     t4,t4,4
+       sw      t5,0(t1)
+       add     t1,t1,4
+       bgt     t6,t3,.L3
+.L4:
+       li      t1,4
+       lw      a0,0(t2)
+       bgt     t0,t1,.L81
+.L5:
+       beqz    ra,.L8
+       lw      t1,48(s1)
+       and     t3,t1,1
+       beqz    t3,.L9
+       fld     fa0,88(s1)
+.L10:
+       li      t3,1
+       bleu    ra,t3,.L8
+       and     t3,t1,2
+       bnez    t3,.L82
+       lw      t3,44(s1)
+       and     t3,t3,2
+       beqz    t3,.L13
+       flw     fa1,56(s1)
+.L13:
+       li      t3,2
+       beq     ra,t3,.L8
+       and     t3,t1,4
+       beqz    t3,.L14
+       fld     fa2,104(s1)
+.L15:
+       li      t3,3
+       beq     ra,t3,.L8
+       and     t3,t1,8
+       bnez    t3,.L83
+       lw      t3,44(s1)
+       and     t3,t3,8
+       beqz    t3,.L17
+       flw     fa3,64(s1)
+.L17:
+       li      t3,4
+       beq     ra,t3,.L8
+       and     t3,t1,16
+       beqz    t3,.L18
+       fld     fa4,120(s1)
+.L19:
+       li      t3,5
+       beq     ra,t3,.L8
+       and     t3,t1,32
+       beqz    t3,.L20
+       fld     fa5,128(s1)
+.L21:
+       li      t3,6
+       beq     ra,t3,.L8
+       and     t3,t1,64
+       beqz    t3,.L22
+       fld     fa6,136(s1)
+.L23:
+       li      t3,7
+       beq     ra,t3,.L8
+       and     t1,t1,128
+       beqz    t1,.L24
+       fld     fa7,144(s1)
+.L8:
+       lw      t1,12(s1)
+       li      t3,13
+       lw      t4,4(s1)
+       bne     t1,t3,.L25
+       lw      s1,8(s1)
+       jalr    t4
+       fsw     fa0,0(s1)
+.L26:
+       add     sp,s0,-32
+       lw      ra,28(sp)
+       li      a0,0
+       lw      s0,24(sp)
+       lw      s1,20(sp)
+       lw      s2,16(sp)
+       lw      s3,12(sp)
+       lw      s4,8(sp)
+       lw      s5,4(sp)
+       add     sp,sp,32
+       jr      ra
+.L81:
+       li      t1,8
+       lw      a1,4(t2)
+       ble     t0,t1,.L5
+       li      t1,12
+       lw      a2,8(t2)
+       ble     t0,t1,.L5
+       li      t1,16
+       lw      a3,12(t2)
+       ble     t0,t1,.L5
+       li      t1,20
+       lw      a4,16(t2)
+       ble     t0,t1,.L5
+       li      t1,24
+       lw      a5,20(t2)
+       ble     t0,t1,.L5
+       li      t1,28
+       lw      a6,24(t2)
+       ble     t0,t1,.L5
+       lw      a7,28(t2)
+       j       .L5
+.L9:
+       lw      t3,44(s1)
+       and     t3,t3,1
+       beqz    t3,.L10
+       flw     fa0,52(s1)
+       j       .L10
+.L25:
+       li      t3,14
+       beq     t1,t3,.L84
+       jalr    t4
+       lw      t1,12(s1)
+       li      t4,1
+       mv      t3,a0
+       beq     t1,t4,.L26
+       beqz    t1,.L79
+       li      t4,2
+       beq     t1,t4,.L74
+       li      t4,3
+       beq     t1,t4,.L74
+       li      t4,4
+       beq     t1,t4,.L74
+       li      t4,5
+       beq     t1,t4,.L75
+       li      t4,6
+       beq     t1,t4,.L75
+       li      t4,7
+       beq     t1,t4,.L79
+       li      s4,8
+       beq     t1,s4,.L79
+       li      t4,9
+       beq     t1,t4,.L79
+       li      t4,10
+       beq     t1,t4,.L79
+       add     t6,t1,-11
+       li      t4,1
+       bleu    t6,t4,.L85
+       li      t6,15
+       beq     t1,t6,.L79
+       li      t6,16
+       bne     t1,t6,.L26
+       lw      t1,0(s1)
+       and     t1,t1,2
+       beqz    t1,.L26
+       lw      s3,16(s1)
+       li      t1,7
+       add     t6,s3,-1
+       bgtu    t6,t1,.L26
+       lw      t6,8(s1)
+       li      s5,4
+       and     t0,t6,-4
+       lw      t2,0(t0)
+       and     t6,t6,3
+       sll     s2,t6,3
+       sll     s1,a0,s2
+       add     t1,s3,t6
+       sll     t4,t4,s2
+       xor     s1,s1,t2
+       bgtu    s3,s5,.L40
+       bgtu    t1,s5,.L41
+       sll     t1,t1,3
+       add     t3,t1,-1
+       li      t1,2
+       sll     t1,t1,t3
+       sub     t1,t1,t4
+       and     t1,t1,s1
+       xor     t1,t1,t2
+       sw      t1,0(t0)
+       j       .L26
+.L82:
+       fld     fa1,96(s1)
+       j       .L13
+.L84:
+       lw      s1,8(s1)
+       jalr    t4
+       fsd     fa0,0(s1)
+       j       .L26
+.L2:
+       blez    t0,.L5
+       j       .L4
+.L14:
+       lw      t3,44(s1)
+       and     t3,t3,4
+       beqz    t3,.L15
+       flw     fa2,60(s1)
+       j       .L15
+.L79:
+       lw      t1,8(s1)
+       sw      t3,0(t1)
+       j       .L26
+.L83:
+       fld     fa3,112(s1)
+       j       .L17
+.L74:
+       lw      t1,8(s1)
+       sb      t3,0(t1)
+       j       .L26
+.L18:
+       lw      t3,44(s1)
+       and     t3,t3,16
+       beqz    t3,.L19
+       flw     fa4,68(s1)
+       j       .L19
+.L75:
+       lw      t1,8(s1)
+       sh      t3,0(t1)
+       j       .L26
+.L20:
+       lw      t3,44(s1)
+       and     t3,t3,32
+       beqz    t3,.L21
+       flw     fa5,72(s1)
+       j       .L21
+.L22:
+       lw      t3,44(s1)
+       and     t3,t3,64
+       beqz    t3,.L23
+       flw     fa6,76(s1)
+       j       .L23
+.L24:
+       lw      t1,44(s1)
+       and     t1,t1,128
+       beqz    t1,.L8
+       flw     fa7,80(s1)
+       j       .L8
+.L85:
+       lw      t1,8(s1)
+       sw      a0,0(t1)
+       sw      a1,4(t1)
+       j       .L26
+.L41:
+       li      t5,-8
+       mul     t6,t6,t5
+       lw      s2,4(t0)
+       sll     t1,t1,3
+       add     t5,t1,-33
+       li      t1,2
+       sll     t1,t1,t5
+       sub     t4,zero,t4
+       add     t1,t1,-1
+       and     t4,t4,s1
+       xor     t4,t4,t2
+       sra     t3,a0,t6
+       xor     t3,t3,s2
+       and     t1,t1,t3
+       xor     t1,t1,s2
+       sw      t4,0(t0)
+       sw      t1,4(t0)
+       j       .L26
+.L40:
+       sub     t4,zero,t4
+       and     t4,t4,s1
+       xor     t4,t4,t2
+       sw      t4,0(t0)
+       sll     s1,a1,s2
+       bleu    t1,s4,.L86
+       li      t4,-8
+       mul     t6,t6,t4
+       sll     t1,t1,3
+       li      t2,2
+       add     t1,t1,-65
+       lw      s2,8(t0)
+       sll     t1,t2,t1
+       add     t2,t1,-1
+       add     t1,t6,32
+       sra     t4,a1,t1
+       xor     t4,t4,s2
+       sra     t1,a0,t1
+       and     t3,t2,t4
+       or      t1,t1,s1
+       xor     t3,t3,s2
+       sw      t1,4(t0)
+       sw      t3,8(t0)
+       j       .L26
+.L86:
+       li      t4,-4
+       mul     t4,t6,t4
+       sll     t1,t1,3
+       lw      t6,4(t0)
+       add     t5,t1,-33
+       li      t1,2
+       sll     t1,t1,t5
+       add     t1,t1,-1
+       add     t4,t4,16
+       sra     t3,a0,t4
+       sra     t3,t3,t4
+       or      t3,t3,s1
+       xor     t3,t3,t6
+       and     t1,t1,t3
+       xor     t1,t1,t6
+       sw      t1,4(t0)
+       j       .L26
+       .size   avcall_call, .-avcall_call
+       .ident  "GCC: (GNU) 7.3.0"
diff --git a/avcall/avcall-riscv32-ilp32d-macro.S b/avcall/avcall-riscv32-ilp32d-macro.S
new file mode 100644 (file)
index 0000000..2a14861
--- /dev/null
@@ -0,0 +1,329 @@
+       .file   "avcall-riscv32.c"
+       .option pic
+       .text
+       .align  1
+       .globl  avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       add     sp,sp,-32
+       sw      ra,28(sp)
+       sw      s0,24(sp)
+       sw      s1,20(sp)
+       sw      s2,16(sp)
+       sw      s3,12(sp)
+       sw      s4,8(sp)
+       sw      s5,4(sp)
+       add     s0,sp,32
+       lw      t2,24(a0)
+       lw      t0,20(a0)
+       li      t3,32
+       mv      s1,a0
+       sub     t0,t0,t2
+       add     sp,sp,-1040
+       lw      ra,40(a0)
+       ble     t0,t3,.L2
+       mv      t1,sp
+       sra     t6,t0,2
+       add     t4,t2,32
+       li      t3,8
+.L3:
+       lw      t5,0(t4)
+       add     t3,t3,1
+       add     t4,t4,4
+       sw      t5,0(t1)
+       add     t1,t1,4
+       bgt     t6,t3,.L3
+.L4:
+       li      t1,4
+       lw      a0,0(t2)
+       bgt     t0,t1,.L81
+.L5:
+       beqz    ra,.L8
+       lw      t1,48(s1)
+       and     t3,t1,1
+       beqz    t3,.L9
+       fld     fa0,88(s1)
+.L10:
+       li      t3,1
+       bleu    ra,t3,.L8
+       and     t3,t1,2
+       bnez    t3,.L82
+       lw      t3,44(s1)
+       and     t3,t3,2
+       beqz    t3,.L13
+       flw     fa1,56(s1)
+.L13:
+       li      t3,2
+       beq     ra,t3,.L8
+       and     t3,t1,4
+       beqz    t3,.L14
+       fld     fa2,104(s1)
+.L15:
+       li      t3,3
+       beq     ra,t3,.L8
+       and     t3,t1,8
+       bnez    t3,.L83
+       lw      t3,44(s1)
+       and     t3,t3,8
+       beqz    t3,.L17
+       flw     fa3,64(s1)
+.L17:
+       li      t3,4
+       beq     ra,t3,.L8
+       and     t3,t1,16
+       beqz    t3,.L18
+       fld     fa4,120(s1)
+.L19:
+       li      t3,5
+       beq     ra,t3,.L8
+       and     t3,t1,32
+       beqz    t3,.L20
+       fld     fa5,128(s1)
+.L21:
+       li      t3,6
+       beq     ra,t3,.L8
+       and     t3,t1,64
+       beqz    t3,.L22
+       fld     fa6,136(s1)
+.L23:
+       li      t3,7
+       beq     ra,t3,.L8
+       and     t1,t1,128
+       beqz    t1,.L24
+       fld     fa7,144(s1)
+.L8:
+       lw      t1,12(s1)
+       li      t3,13
+       lw      t4,4(s1)
+       bne     t1,t3,.L25
+       lw      s1,8(s1)
+       jalr    t4
+       fsw     fa0,0(s1)
+.L26:
+       add     sp,s0,-32
+       lw      ra,28(sp)
+       li      a0,0
+       lw      s0,24(sp)
+       lw      s1,20(sp)
+       lw      s2,16(sp)
+       lw      s3,12(sp)
+       lw      s4,8(sp)
+       lw      s5,4(sp)
+       add     sp,sp,32
+       jr      ra
+.L81:
+       li      t1,8
+       lw      a1,4(t2)
+       ble     t0,t1,.L5
+       li      t1,12
+       lw      a2,8(t2)
+       ble     t0,t1,.L5
+       li      t1,16
+       lw      a3,12(t2)
+       ble     t0,t1,.L5
+       li      t1,20
+       lw      a4,16(t2)
+       ble     t0,t1,.L5
+       li      t1,24
+       lw      a5,20(t2)
+       ble     t0,t1,.L5
+       li      t1,28
+       lw      a6,24(t2)
+       ble     t0,t1,.L5
+       lw      a7,28(t2)
+       j       .L5
+.L9:
+       lw      t3,44(s1)
+       and     t3,t3,1
+       beqz    t3,.L10
+       flw     fa0,52(s1)
+       j       .L10
+.L25:
+       li      t3,14
+       beq     t1,t3,.L84
+       jalr    t4
+       lw      t1,12(s1)
+       li      t4,1
+       mv      t3,a0
+       beq     t1,t4,.L26
+       beqz    t1,.L79
+       li      t4,2
+       beq     t1,t4,.L74
+       li      t4,3
+       beq     t1,t4,.L74
+       li      t4,4
+       beq     t1,t4,.L74
+       li      t4,5
+       beq     t1,t4,.L75
+       li      t4,6
+       beq     t1,t4,.L75
+       li      t4,7
+       beq     t1,t4,.L79
+       li      s4,8
+       beq     t1,s4,.L79
+       li      t4,9
+       beq     t1,t4,.L79
+       li      t4,10
+       beq     t1,t4,.L79
+       add     t6,t1,-11
+       li      t4,1
+       bleu    t6,t4,.L85
+       li      t6,15
+       beq     t1,t6,.L79
+       li      t6,16
+       bne     t1,t6,.L26
+       lw      t1,0(s1)
+       and     t1,t1,2
+       beqz    t1,.L26
+       lw      s3,16(s1)
+       li      t1,7
+       add     t6,s3,-1
+       bgtu    t6,t1,.L26
+       lw      t6,8(s1)
+       li      s5,4
+       and     t0,t6,-4
+       lw      t2,0(t0)
+       and     t6,t6,3
+       sll     s2,t6,3
+       sll     s1,a0,s2
+       add     t1,s3,t6
+       sll     t4,t4,s2
+       xor     s1,s1,t2
+       bgtu    s3,s5,.L40
+       bgtu    t1,s5,.L41
+       sll     t1,t1,3
+       add     t3,t1,-1
+       li      t1,2
+       sll     t1,t1,t3
+       sub     t1,t1,t4
+       and     t1,t1,s1
+       xor     t1,t1,t2
+       sw      t1,0(t0)
+       j       .L26
+.L82:
+       fld     fa1,96(s1)
+       j       .L13
+.L84:
+       lw      s1,8(s1)
+       jalr    t4
+       fsd     fa0,0(s1)
+       j       .L26
+.L2:
+       blez    t0,.L5
+       j       .L4
+.L14:
+       lw      t3,44(s1)
+       and     t3,t3,4
+       beqz    t3,.L15
+       flw     fa2,60(s1)
+       j       .L15
+.L79:
+       lw      t1,8(s1)
+       sw      t3,0(t1)
+       j       .L26
+.L83:
+       fld     fa3,112(s1)
+       j       .L17
+.L74:
+       lw      t1,8(s1)
+       sb      t3,0(t1)
+       j       .L26
+.L18:
+       lw      t3,44(s1)
+       and     t3,t3,16
+       beqz    t3,.L19
+       flw     fa4,68(s1)
+       j       .L19
+.L75:
+       lw      t1,8(s1)
+       sh      t3,0(t1)
+       j       .L26
+.L20:
+       lw      t3,44(s1)
+       and     t3,t3,32
+       beqz    t3,.L21
+       flw     fa5,72(s1)
+       j       .L21
+.L22:
+       lw      t3,44(s1)
+       and     t3,t3,64
+       beqz    t3,.L23
+       flw     fa6,76(s1)
+       j       .L23
+.L24:
+       lw      t1,44(s1)
+       and     t1,t1,128
+       beqz    t1,.L8
+       flw     fa7,80(s1)
+       j       .L8
+.L85:
+       lw      t1,8(s1)
+       sw      a0,0(t1)
+       sw      a1,4(t1)
+       j       .L26
+.L41:
+       li      t5,-8
+       mul     t6,t6,t5
+       lw      s2,4(t0)
+       sll     t1,t1,3
+       add     t5,t1,-33
+       li      t1,2
+       sll     t1,t1,t5
+       sub     t4,zero,t4
+       add     t1,t1,-1
+       and     t4,t4,s1
+       xor     t4,t4,t2
+       sra     t3,a0,t6
+       xor     t3,t3,s2
+       and     t1,t1,t3
+       xor     t1,t1,s2
+       sw      t4,0(t0)
+       sw      t1,4(t0)
+       j       .L26
+.L40:
+       sub     t4,zero,t4
+       and     t4,t4,s1
+       xor     t4,t4,t2
+       sw      t4,0(t0)
+       sll     s1,a1,s2
+       bleu    t1,s4,.L86
+       li      t4,-8
+       mul     t6,t6,t4
+       sll     t1,t1,3
+       li      t2,2
+       add     t1,t1,-65
+       lw      s2,8(t0)
+       sll     t1,t2,t1
+       add     t2,t1,-1
+       add     t1,t6,32
+       sra     t4,a1,t1
+       xor     t4,t4,s2
+       sra     t1,a0,t1
+       and     t3,t2,t4
+       or      t1,t1,s1
+       xor     t3,t3,s2
+       sw      t1,4(t0)
+       sw      t3,8(t0)
+       j       .L26
+.L86:
+       li      t4,-4
+       mul     t4,t6,t4
+       sll     t1,t1,3
+       lw      t6,4(t0)
+       add     t5,t1,-33
+       li      t1,2
+       sll     t1,t1,t5
+       add     t1,t1,-1
+       add     t4,t4,16
+       sra     t3,a0,t4
+       sra     t3,t3,t4
+       or      t3,t3,s1
+       xor     t3,t3,t6
+       and     t1,t1,t3
+       xor     t1,t1,t6
+       sw      t1,4(t0)
+       j       .L26
+       .size   avcall_call, .-avcall_call
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-riscv32.c b/avcall/avcall-riscv32.c
new file mode 100644 (file)
index 0000000..7b70fd9
--- /dev/null
@@ -0,0 +1,280 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  Foreign function interface for a Linux riscv32 with ILP32 ABI.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  RISC-V Argument Passing Conventions are documented in
+  https://people.eecs.berkeley.edu/~krste/papers/riscv-spec-v2.1.pdf
+  chapter 20.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+register __avword iarg1 __asm__("a0");
+register __avword iarg2 __asm__("a1");
+register __avword iarg3 __asm__("a2");
+register __avword iarg4 __asm__("a3");
+register __avword iarg5 __asm__("a4");
+register __avword iarg6 __asm__("a5");
+register __avword iarg7 __asm__("a6");
+register __avword iarg8 __asm__("a7");
+
+register float farg1 __asm__("fa0");
+register float farg2 __asm__("fa1");
+register float farg3 __asm__("fa2");
+register float farg4 __asm__("fa3");
+register float farg5 __asm__("fa4");
+register float farg6 __asm__("fa5");
+register float farg7 __asm__("fa6");
+register float farg8 __asm__("fa7");
+
+register double darg1 __asm__("fa0");
+register double darg2 __asm__("fa1");
+register double darg3 __asm__("fa2");
+register double darg4 __asm__("fa3");
+register double darg5 __asm__("fa4");
+register double darg6 __asm__("fa5");
+register double darg7 __asm__("fa6");
+register double darg8 __asm__("fa7");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword    iretreg  __asm__("a0");
+  register __avword    iret2reg __asm__("a1");
+  register double      dret    __asm__("fa0");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  unsigned int fanum = l->fanum;
+
+  {
+    int i;
+    for (i = 8; i < arglen; i++)       /* push function args onto stack */
+      argframe[i-8] = l->args[i];
+  }
+
+  /* Put up to 8 integer args into registers. */
+  if (arglen >= 1) {
+    iarg1 = l->args[0];
+    if (arglen >= 2) {
+      iarg2 = l->args[1];
+      if (arglen >= 3) {
+        iarg3 = l->args[2];
+        if (arglen >= 4) {
+          iarg4 = l->args[3];
+          if (arglen >= 5) {
+            iarg5 = l->args[4];
+            if (arglen >= 6) {
+              iarg6 = l->args[5];
+              if (arglen >= 7) {
+                iarg7 = l->args[6];
+                if (arglen >= 8) {
+                  iarg8 = l->args[7];
+                }
+              }
+            }
+          }
+        }
+      }
+    }
+  }
+
+  /* Put upto 8 floating-point args into registers. */
+  if (fanum >= 1) {
+    if (l->darg_mask & (1 << 0)) darg1 = l->dargs[0];
+    else if (l->farg_mask & (1 << 0)) farg1 = l->fargs[0];
+    if (fanum >= 2) {
+      if (l->darg_mask & (1 << 1)) darg2 = l->dargs[1];
+      else if (l->farg_mask & (1 << 1)) farg2 = l->fargs[1];
+      if (fanum >= 3) {
+        if (l->darg_mask & (1 << 2)) darg3 = l->dargs[2];
+        else if (l->farg_mask & (1 << 2)) farg3 = l->fargs[2];
+        if (fanum >= 4) {
+          if (l->darg_mask & (1 << 3)) darg4 = l->dargs[3];
+          else if (l->farg_mask & (1 << 3)) farg4 = l->fargs[3];
+          if (fanum >= 5) {
+            if (l->darg_mask & (1 << 4)) darg5 = l->dargs[4];
+            else if (l->farg_mask & (1 << 4)) farg5 = l->fargs[4];
+            if (fanum >= 6) {
+              if (l->darg_mask & (1 << 5)) darg6 = l->dargs[5];
+              else if (l->farg_mask & (1 << 5)) farg6 = l->fargs[5];
+              if (fanum >= 7) {
+                if (l->darg_mask & (1 << 6)) darg7 = l->dargs[6];
+                else if (l->farg_mask & (1 << 6)) farg7 = l->fargs[6];
+                if (fanum >= 8) {
+                  if (l->darg_mask & (1 << 7)) darg8 = l->dargs[7];
+                  else if (l->farg_mask & (1 << 7)) farg8 = l->fargs[7];
+                }
+              }
+            }
+          }
+        }
+      }
+    }
+  }
+
+  /* Call function. */
+  if (l->rtype == __AVfloat) {
+    *(float*)l->raddr = (*(float(*)())l->func)();
+  } else
+  if (l->rtype == __AVdouble) {
+    *(double*)l->raddr = (*(double(*)())l->func)();
+  } else {
+    __avword iret, iret2;
+
+    iret = (*l->func)();
+    iret2 = iret2reg;
+
+    /* save return value */
+    if (l->rtype == __AVvoid) {
+    } else
+    if (l->rtype == __AVword) {
+      RETURN(__avword, iret);
+    } else
+    if (l->rtype == __AVchar) {
+      RETURN(char, iret);
+    } else
+    if (l->rtype == __AVschar) {
+      RETURN(signed char, iret);
+    } else
+    if (l->rtype == __AVuchar) {
+      RETURN(unsigned char, iret);
+    } else
+    if (l->rtype == __AVshort) {
+      RETURN(short, iret);
+    } else
+    if (l->rtype == __AVushort) {
+      RETURN(unsigned short, iret);
+    } else
+    if (l->rtype == __AVint) {
+      RETURN(int, iret);
+    } else
+    if (l->rtype == __AVuint) {
+      RETURN(unsigned int, iret);
+    } else
+    if (l->rtype == __AVlong) {
+      RETURN(long, iret);
+    } else
+    if (l->rtype == __AVulong) {
+      RETURN(unsigned long, iret);
+    } else
+    if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) {
+      void* raddr = l->raddr;
+      ((__avword*)raddr)[0] = iret;
+      ((__avword*)raddr)[1] = iret2;
+    } else
+  /* see above
+    if (l->rtype == __AVfloat) {
+    } else
+    if (l->rtype == __AVdouble) {
+    } else
+  */
+    if (l->rtype == __AVvoidp) {
+      RETURN(void*, iret);
+    } else
+    if (l->rtype == __AVstruct) {
+      if (l->flags & __AV_SMALL_STRUCT_RETURN) {
+        /* Return structs of size <= 8 in registers. */
+        if (l->rsize > 0 && l->rsize <= 8) {
+          void* raddr = l->raddr;
+          #if 0 /* Unoptimized */
+          if (l->rsize == 1) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          } else
+          if (l->rsize == 2) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          } else
+          if (l->rsize == 3) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          } else
+          if (l->rsize >= 4 && l->rsize <= 8) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            if (l->rsize == 4) {
+            } else
+            if (l->rsize == 5) {
+              ((unsigned char *)raddr)[4+0] = (unsigned char)(iret2);
+            } else
+            if (l->rsize == 6) {
+              ((unsigned char *)raddr)[4+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[4+1] = (unsigned char)(iret2>>8);
+            } else
+            if (l->rsize == 7) {
+              ((unsigned char *)raddr)[4+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[4+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[4+2] = (unsigned char)(iret2>>16);
+            } else
+            if (l->rsize == 8) {
+              ((unsigned char *)raddr)[4+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[4+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[4+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[4+3] = (unsigned char)(iret2>>24);
+            }
+          }
+          #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+          uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avword) */
+          __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+          uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+          uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avword) */
+          if (count <= sizeof(__avword)) {
+            /* Use iret. */
+            if (end_offset <= sizeof(__avword)) {
+              /* 0 < end_offset ≤ sizeof(__avword) */
+              __avword mask0 = ((__avword)2 << (end_offset*8-1)) - ((__avword)1 << (start_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            } else {
+              /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+              __avword mask0 = - ((__avword)1 << (start_offset*8));
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+              wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avword)*8-start_offset*8))) & mask1;
+            }
+          } else {
+            /* Use iret, iret2. */
+            __avword mask0 = - ((__avword)1 << (start_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            if (end_offset <= 2*sizeof(__avword)) {
+              /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1;
+            } else {
+              /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+              __avword mask2 = ((__avword)2 << (end_offset*8-2*sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] = (iret >> (sizeof(__avword)*8-start_offset*8)) | (iret2 << (start_offset*8));
+              wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avword)*8-start_offset*8))) & mask2;
+            }
+          }
+          #endif
+        }
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-riscv64-lp64d-linux.s b/avcall/avcall-riscv64-lp64d-linux.s
new file mode 100644 (file)
index 0000000..bd8cf68
--- /dev/null
@@ -0,0 +1,329 @@
+       .file   "avcall-riscv64.c"
+       .option pic
+       .text
+       .align  1
+       .globl  avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       add     sp,sp,-64
+       sd      s0,48(sp)
+       sd      s1,40(sp)
+       sd      ra,56(sp)
+       sd      s2,32(sp)
+       sd      s3,24(sp)
+       sd      s4,16(sp)
+       sd      s5,8(sp)
+       sd      s6,0(sp)
+       add     s0,sp,64
+       ld      t6,48(a0)
+       ld      t3,40(a0)
+       li      t1,-4096
+       add     t1,t1,2032
+       sub     t3,t3,t6
+       sra     t3,t3,3
+       sext.w  t0,t3
+       li      t4,8
+       mv      s1,a0
+       add     sp,sp,t1
+       lw      t2,64(a0)
+       ble     t0,t4,.L2
+       addw    t3,t3,-9
+       sll     t3,t3,32
+       srl     t3,t3,29
+       mv      t1,sp
+       add     t3,t3,8
+       add     t4,t6,64
+       add     t3,t1,t3
+.L3:
+       ld      t5,0(t4)
+       add     t1,t1,8
+       add     t4,t4,8
+       sd      t5,-8(t1)
+       bne     t3,t1,.L3
+.L4:
+       li      t1,1
+       ld      a0,0(t6)
+       beq     t0,t1,.L5
+       li      t1,2
+       ld      a1,8(t6)
+       beq     t0,t1,.L5
+       li      t1,3
+       ld      a2,16(t6)
+       beq     t0,t1,.L5
+       li      t1,4
+       ld      a3,24(t6)
+       beq     t0,t1,.L5
+       li      t1,5
+       ld      a4,32(t6)
+       beq     t0,t1,.L5
+       li      t1,6
+       ld      a5,40(t6)
+       beq     t0,t1,.L5
+       li      t1,7
+       ld      a6,48(t6)
+       beq     t0,t1,.L5
+       ld      a7,56(t6)
+.L5:
+       beqz    t2,.L8
+       lw      t1,72(s1)
+       and     t3,t1,1
+       beqz    t3,.L9
+       fld     fa0,112(s1)
+.L10:
+       li      t3,1
+       bleu    t2,t3,.L8
+       and     t3,t1,2
+       bnez    t3,.L79
+       lw      t3,68(s1)
+       and     t3,t3,2
+       beqz    t3,.L13
+       flw     fa1,80(s1)
+.L13:
+       li      t3,2
+       beq     t2,t3,.L8
+       and     t3,t1,4
+       beqz    t3,.L14
+       fld     fa2,128(s1)
+.L15:
+       li      t3,3
+       beq     t2,t3,.L8
+       and     t3,t1,8
+       bnez    t3,.L80
+       lw      t3,68(s1)
+       and     t3,t3,8
+       beqz    t3,.L17
+       flw     fa3,88(s1)
+.L17:
+       li      t3,4
+       beq     t2,t3,.L8
+       and     t3,t1,16
+       beqz    t3,.L18
+       fld     fa4,144(s1)
+.L19:
+       li      t3,5
+       beq     t2,t3,.L8
+       and     t3,t1,32
+       beqz    t3,.L20
+       fld     fa5,152(s1)
+.L21:
+       li      t3,6
+       beq     t2,t3,.L8
+       and     t3,t1,64
+       beqz    t3,.L22
+       fld     fa6,160(s1)
+.L23:
+       li      t3,7
+       beq     t2,t3,.L8
+       and     t1,t1,128
+       beqz    t1,.L24
+       fld     fa7,168(s1)
+.L8:
+       lw      t1,24(s1)
+       li      t3,13
+       ld      t4,8(s1)
+       bne     t1,t3,.L25
+       ld      s1,16(s1)
+       jalr    t4
+       fsw     fa0,0(s1)
+.L26:
+       add     sp,s0,-64
+       ld      ra,56(sp)
+       li      a0,0
+       ld      s0,48(sp)
+       ld      s1,40(sp)
+       ld      s2,32(sp)
+       ld      s3,24(sp)
+       ld      s4,16(sp)
+       ld      s5,8(sp)
+       ld      s6,0(sp)
+       add     sp,sp,64
+       jr      ra
+.L9:
+       lw      t3,68(s1)
+       and     t3,t3,1
+       beqz    t3,.L10
+       flw     fa0,76(s1)
+       j       .L10
+.L25:
+       li      t3,14
+       beq     t1,t3,.L81
+       jalr    t4
+       lw      t1,24(s1)
+       li      t4,1
+       mv      t3,a0
+       beq     t1,t4,.L26
+       beqz    t1,.L77
+       li      t4,2
+       beq     t1,t4,.L73
+       li      t4,3
+       beq     t1,t4,.L73
+       li      t4,4
+       beq     t1,t4,.L73
+       li      t4,5
+       beq     t1,t4,.L74
+       li      t4,6
+       beq     t1,t4,.L74
+       li      t4,7
+       beq     t1,t4,.L75
+       li      s4,8
+       beq     t1,s4,.L75
+       and     t4,t1,-3
+       li      t6,9
+       beq     t4,t6,.L77
+       addw    t4,t1,-10
+       and     t4,t4,-3
+       sext.w  t4,t4
+       beqz    t4,.L77
+       li      t6,15
+       beq     t1,t6,.L77
+       li      t4,16
+       bne     t1,t4,.L26
+       lw      t4,0(s1)
+       and     t4,t4,512
+       beqz    t4,.L26
+       ld      s6,32(s1)
+       add     t4,s6,-1
+       bgtu    t4,t6,.L26
+       ld      t6,16(s1)
+       li      t4,1
+       and     s1,t6,7
+       and     t6,t6,-8
+       sext.w  s3,s1
+       ld      t0,0(t6)
+       sll     s5,s3,3
+       add     s1,s6,s1
+       sll     t2,a0,s5
+       sll     t4,t4,s5
+       xor     t2,t2,t0
+       sllw    s2,s1,3
+       bgtu    s6,s4,.L39
+       bgtu    s1,s4,.L40
+       addw    s2,s2,-1
+       li      t1,2
+       sll     t1,t1,s2
+       sub     t1,t1,t4
+       and     t1,t1,t2
+       xor     t1,t1,t0
+       sd      t1,0(t6)
+       j       .L26
+.L79:
+       fld     fa1,120(s1)
+       j       .L13
+.L81:
+       ld      s1,16(s1)
+       jalr    t4
+       fsd     fa0,0(s1)
+       j       .L26
+.L2:
+       blez    t0,.L5
+       j       .L4
+.L14:
+       lw      t3,68(s1)
+       and     t3,t3,4
+       beqz    t3,.L15
+       flw     fa2,84(s1)
+       j       .L15
+.L77:
+       ld      t1,16(s1)
+       sd      t3,0(t1)
+       j       .L26
+.L80:
+       fld     fa3,136(s1)
+       j       .L17
+.L73:
+       ld      t1,16(s1)
+       sb      t3,0(t1)
+       j       .L26
+.L18:
+       lw      t3,68(s1)
+       and     t3,t3,16
+       beqz    t3,.L19
+       flw     fa4,92(s1)
+       j       .L19
+.L74:
+       ld      t1,16(s1)
+       sh      t3,0(t1)
+       j       .L26
+.L20:
+       lw      t3,68(s1)
+       and     t3,t3,32
+       beqz    t3,.L21
+       flw     fa5,96(s1)
+       j       .L21
+.L75:
+       ld      t1,16(s1)
+       sw      t3,0(t1)
+       j       .L26
+.L22:
+       lw      t3,68(s1)
+       and     t3,t3,64
+       beqz    t3,.L23
+       flw     fa6,100(s1)
+       j       .L23
+.L24:
+       lw      t1,68(s1)
+       and     t1,t1,128
+       beqz    t1,.L8
+       flw     fa7,104(s1)
+       j       .L8
+.L40:
+       li      t1,-8
+       mulw    t1,t1,s3
+       ld      s1,8(t6)
+       addw    s2,s2,-65
+       li      t5,2
+       sll     t5,t5,s2
+       sub     t4,zero,t4
+       add     t5,t5,-1
+       and     t4,t4,t2
+       xor     t4,t4,t0
+       sd      t4,0(t6)
+       sra     t1,a0,t1
+       xor     t1,t1,s1
+       and     t1,t1,t5
+       xor     t1,t1,s1
+       sd      t1,8(t6)
+       j       .L26
+.L39:
+       sub     t4,zero,t4
+       and     t4,t4,t2
+       xor     t4,t4,t0
+       sd      t4,0(t6)
+       sll     t2,a1,s5
+       bleu    s1,t1,.L82
+       li      t1,-8
+       mulw    t1,t1,s3
+       ld      s1,16(t6)
+       addw    t4,s2,-129
+       li      t0,2
+       sll     t0,t0,t4
+       add     t0,t0,-1
+       addw    t1,t1,64
+       sra     t4,a1,t1
+       xor     t4,t4,s1
+       sra     t1,a0,t1
+       and     t3,t0,t4
+       or      t1,t1,t2
+       xor     t3,t3,s1
+       sd      t1,8(t6)
+       sd      t3,16(t6)
+       j       .L26
+.L82:
+       li      t1,-4
+       mulw    t1,t1,s3
+       addw    t4,s2,-65
+       li      t5,2
+       sll     t5,t5,t4
+       ld      t0,8(t6)
+       add     t5,t5,-1
+       addw    t4,t1,32
+       sra     t1,a0,t4
+       sra     t1,t1,t4
+       or      t1,t1,t2
+       xor     t1,t1,t0
+       and     t1,t1,t5
+       xor     t1,t1,t0
+       sd      t1,8(t6)
+       j       .L26
+       .size   avcall_call, .-avcall_call
+       .ident  "GCC: (GNU) 7.3.0"
diff --git a/avcall/avcall-riscv64-lp64d-macro.S b/avcall/avcall-riscv64-lp64d-macro.S
new file mode 100644 (file)
index 0000000..e768f32
--- /dev/null
@@ -0,0 +1,331 @@
+       .file   "avcall-riscv64.c"
+       .option pic
+       .text
+       .align  1
+       .globl  avcall_call
+       .type   avcall_call, @function
+avcall_call:
+       add     sp,sp,-64
+       sd      s0,48(sp)
+       sd      s1,40(sp)
+       sd      ra,56(sp)
+       sd      s2,32(sp)
+       sd      s3,24(sp)
+       sd      s4,16(sp)
+       sd      s5,8(sp)
+       sd      s6,0(sp)
+       add     s0,sp,64
+       ld      t6,48(a0)
+       ld      t3,40(a0)
+       li      t1,-4096
+       add     t1,t1,2032
+       sub     t3,t3,t6
+       sra     t3,t3,3
+       sext.w  t0,t3
+       li      t4,8
+       mv      s1,a0
+       add     sp,sp,t1
+       lw      t2,64(a0)
+       ble     t0,t4,.L2
+       addw    t3,t3,-9
+       sll     t3,t3,32
+       srl     t3,t3,29
+       mv      t1,sp
+       add     t3,t3,8
+       add     t4,t6,64
+       add     t3,t1,t3
+.L3:
+       ld      t5,0(t4)
+       add     t1,t1,8
+       add     t4,t4,8
+       sd      t5,-8(t1)
+       bne     t3,t1,.L3
+.L4:
+       li      t1,1
+       ld      a0,0(t6)
+       beq     t0,t1,.L5
+       li      t1,2
+       ld      a1,8(t6)
+       beq     t0,t1,.L5
+       li      t1,3
+       ld      a2,16(t6)
+       beq     t0,t1,.L5
+       li      t1,4
+       ld      a3,24(t6)
+       beq     t0,t1,.L5
+       li      t1,5
+       ld      a4,32(t6)
+       beq     t0,t1,.L5
+       li      t1,6
+       ld      a5,40(t6)
+       beq     t0,t1,.L5
+       li      t1,7
+       ld      a6,48(t6)
+       beq     t0,t1,.L5
+       ld      a7,56(t6)
+.L5:
+       beqz    t2,.L8
+       lw      t1,72(s1)
+       and     t3,t1,1
+       beqz    t3,.L9
+       fld     fa0,112(s1)
+.L10:
+       li      t3,1
+       bleu    t2,t3,.L8
+       and     t3,t1,2
+       bnez    t3,.L79
+       lw      t3,68(s1)
+       and     t3,t3,2
+       beqz    t3,.L13
+       flw     fa1,80(s1)
+.L13:
+       li      t3,2
+       beq     t2,t3,.L8
+       and     t3,t1,4
+       beqz    t3,.L14
+       fld     fa2,128(s1)
+.L15:
+       li      t3,3
+       beq     t2,t3,.L8
+       and     t3,t1,8
+       bnez    t3,.L80
+       lw      t3,68(s1)
+       and     t3,t3,8
+       beqz    t3,.L17
+       flw     fa3,88(s1)
+.L17:
+       li      t3,4
+       beq     t2,t3,.L8
+       and     t3,t1,16
+       beqz    t3,.L18
+       fld     fa4,144(s1)
+.L19:
+       li      t3,5
+       beq     t2,t3,.L8
+       and     t3,t1,32
+       beqz    t3,.L20
+       fld     fa5,152(s1)
+.L21:
+       li      t3,6
+       beq     t2,t3,.L8
+       and     t3,t1,64
+       beqz    t3,.L22
+       fld     fa6,160(s1)
+.L23:
+       li      t3,7
+       beq     t2,t3,.L8
+       and     t1,t1,128
+       beqz    t1,.L24
+       fld     fa7,168(s1)
+.L8:
+       lw      t1,24(s1)
+       li      t3,13
+       ld      t4,8(s1)
+       bne     t1,t3,.L25
+       ld      s1,16(s1)
+       jalr    t4
+       fsw     fa0,0(s1)
+.L26:
+       add     sp,s0,-64
+       ld      ra,56(sp)
+       li      a0,0
+       ld      s0,48(sp)
+       ld      s1,40(sp)
+       ld      s2,32(sp)
+       ld      s3,24(sp)
+       ld      s4,16(sp)
+       ld      s5,8(sp)
+       ld      s6,0(sp)
+       add     sp,sp,64
+       jr      ra
+.L9:
+       lw      t3,68(s1)
+       and     t3,t3,1
+       beqz    t3,.L10
+       flw     fa0,76(s1)
+       j       .L10
+.L25:
+       li      t3,14
+       beq     t1,t3,.L81
+       jalr    t4
+       lw      t1,24(s1)
+       li      t4,1
+       mv      t3,a0
+       beq     t1,t4,.L26
+       beqz    t1,.L77
+       li      t4,2
+       beq     t1,t4,.L73
+       li      t4,3
+       beq     t1,t4,.L73
+       li      t4,4
+       beq     t1,t4,.L73
+       li      t4,5
+       beq     t1,t4,.L74
+       li      t4,6
+       beq     t1,t4,.L74
+       li      t4,7
+       beq     t1,t4,.L75
+       li      s4,8
+       beq     t1,s4,.L75
+       and     t4,t1,-3
+       li      t6,9
+       beq     t4,t6,.L77
+       addw    t4,t1,-10
+       and     t4,t4,-3
+       sext.w  t4,t4
+       beqz    t4,.L77
+       li      t6,15
+       beq     t1,t6,.L77
+       li      t4,16
+       bne     t1,t4,.L26
+       lw      t4,0(s1)
+       and     t4,t4,512
+       beqz    t4,.L26
+       ld      s6,32(s1)
+       add     t4,s6,-1
+       bgtu    t4,t6,.L26
+       ld      t6,16(s1)
+       li      t4,1
+       and     s1,t6,7
+       and     t6,t6,-8
+       sext.w  s3,s1
+       ld      t0,0(t6)
+       sll     s5,s3,3
+       add     s1,s6,s1
+       sll     t2,a0,s5
+       sll     t4,t4,s5
+       xor     t2,t2,t0
+       sllw    s2,s1,3
+       bgtu    s6,s4,.L39
+       bgtu    s1,s4,.L40
+       addw    s2,s2,-1
+       li      t1,2
+       sll     t1,t1,s2
+       sub     t1,t1,t4
+       and     t1,t1,t2
+       xor     t1,t1,t0
+       sd      t1,0(t6)
+       j       .L26
+.L79:
+       fld     fa1,120(s1)
+       j       .L13
+.L81:
+       ld      s1,16(s1)
+       jalr    t4
+       fsd     fa0,0(s1)
+       j       .L26
+.L2:
+       blez    t0,.L5
+       j       .L4
+.L14:
+       lw      t3,68(s1)
+       and     t3,t3,4
+       beqz    t3,.L15
+       flw     fa2,84(s1)
+       j       .L15
+.L77:
+       ld      t1,16(s1)
+       sd      t3,0(t1)
+       j       .L26
+.L80:
+       fld     fa3,136(s1)
+       j       .L17
+.L73:
+       ld      t1,16(s1)
+       sb      t3,0(t1)
+       j       .L26
+.L18:
+       lw      t3,68(s1)
+       and     t3,t3,16
+       beqz    t3,.L19
+       flw     fa4,92(s1)
+       j       .L19
+.L74:
+       ld      t1,16(s1)
+       sh      t3,0(t1)
+       j       .L26
+.L20:
+       lw      t3,68(s1)
+       and     t3,t3,32
+       beqz    t3,.L21
+       flw     fa5,96(s1)
+       j       .L21
+.L75:
+       ld      t1,16(s1)
+       sw      t3,0(t1)
+       j       .L26
+.L22:
+       lw      t3,68(s1)
+       and     t3,t3,64
+       beqz    t3,.L23
+       flw     fa6,100(s1)
+       j       .L23
+.L24:
+       lw      t1,68(s1)
+       and     t1,t1,128
+       beqz    t1,.L8
+       flw     fa7,104(s1)
+       j       .L8
+.L40:
+       li      t1,-8
+       mulw    t1,t1,s3
+       ld      s1,8(t6)
+       addw    s2,s2,-65
+       li      t5,2
+       sll     t5,t5,s2
+       sub     t4,zero,t4
+       add     t5,t5,-1
+       and     t4,t4,t2
+       xor     t4,t4,t0
+       sd      t4,0(t6)
+       sra     t1,a0,t1
+       xor     t1,t1,s1
+       and     t1,t1,t5
+       xor     t1,t1,s1
+       sd      t1,8(t6)
+       j       .L26
+.L39:
+       sub     t4,zero,t4
+       and     t4,t4,t2
+       xor     t4,t4,t0
+       sd      t4,0(t6)
+       sll     t2,a1,s5
+       bleu    s1,t1,.L82
+       li      t1,-8
+       mulw    t1,t1,s3
+       ld      s1,16(t6)
+       addw    t4,s2,-129
+       li      t0,2
+       sll     t0,t0,t4
+       add     t0,t0,-1
+       addw    t1,t1,64
+       sra     t4,a1,t1
+       xor     t4,t4,s1
+       sra     t1,a0,t1
+       and     t3,t0,t4
+       or      t1,t1,t2
+       xor     t3,t3,s1
+       sd      t1,8(t6)
+       sd      t3,16(t6)
+       j       .L26
+.L82:
+       li      t1,-4
+       mulw    t1,t1,s3
+       addw    t4,s2,-65
+       li      t5,2
+       sll     t5,t5,t4
+       ld      t0,8(t6)
+       add     t5,t5,-1
+       addw    t4,t1,32
+       sra     t1,a0,t4
+       sra     t1,t1,t4
+       or      t1,t1,t2
+       xor     t1,t1,t0
+       and     t1,t1,t5
+       xor     t1,t1,t0
+       sd      t1,8(t6)
+       j       .L26
+       .size   avcall_call, .-avcall_call
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-riscv64.c b/avcall/avcall-riscv64.c
new file mode 100644 (file)
index 0000000..eb6e115
--- /dev/null
@@ -0,0 +1,343 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  Foreign function interface for a Linux riscv64 with LP64 ABI.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  RISC-V Argument Passing Conventions are documented in
+  https://people.eecs.berkeley.edu/~krste/papers/riscv-spec-v2.1.pdf
+  chapter 20.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+register __avword iarg1 __asm__("a0");
+register __avword iarg2 __asm__("a1");
+register __avword iarg3 __asm__("a2");
+register __avword iarg4 __asm__("a3");
+register __avword iarg5 __asm__("a4");
+register __avword iarg6 __asm__("a5");
+register __avword iarg7 __asm__("a6");
+register __avword iarg8 __asm__("a7");
+
+register float farg1 __asm__("fa0");
+register float farg2 __asm__("fa1");
+register float farg3 __asm__("fa2");
+register float farg4 __asm__("fa3");
+register float farg5 __asm__("fa4");
+register float farg6 __asm__("fa5");
+register float farg7 __asm__("fa6");
+register float farg8 __asm__("fa7");
+
+register double darg1 __asm__("fa0");
+register double darg2 __asm__("fa1");
+register double darg3 __asm__("fa2");
+register double darg4 __asm__("fa3");
+register double darg5 __asm__("fa4");
+register double darg6 __asm__("fa5");
+register double darg7 __asm__("fa6");
+register double darg8 __asm__("fa7");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword    iretreg  __asm__("a0");
+  register __avword    iret2reg __asm__("a1");
+  register double      dret    __asm__("fa0");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  unsigned int fanum = l->fanum;
+
+  {
+    int i;
+    for (i = 8; i < arglen; i++)       /* push function args onto stack */
+      argframe[i-8] = l->args[i];
+  }
+
+  /* Put up to 8 integer args into registers. */
+  if (arglen >= 1) {
+    iarg1 = l->args[0];
+    if (arglen >= 2) {
+      iarg2 = l->args[1];
+      if (arglen >= 3) {
+        iarg3 = l->args[2];
+        if (arglen >= 4) {
+          iarg4 = l->args[3];
+          if (arglen >= 5) {
+            iarg5 = l->args[4];
+            if (arglen >= 6) {
+              iarg6 = l->args[5];
+              if (arglen >= 7) {
+                iarg7 = l->args[6];
+                if (arglen >= 8) {
+                  iarg8 = l->args[7];
+                }
+              }
+            }
+          }
+        }
+      }
+    }
+  }
+
+  /* Put upto 8 floating-point args into registers. */
+  if (fanum >= 1) {
+    if (l->darg_mask & (1 << 0)) darg1 = l->dargs[0];
+    else if (l->farg_mask & (1 << 0)) farg1 = l->fargs[0];
+    if (fanum >= 2) {
+      if (l->darg_mask & (1 << 1)) darg2 = l->dargs[1];
+      else if (l->farg_mask & (1 << 1)) farg2 = l->fargs[1];
+      if (fanum >= 3) {
+        if (l->darg_mask & (1 << 2)) darg3 = l->dargs[2];
+        else if (l->farg_mask & (1 << 2)) farg3 = l->fargs[2];
+        if (fanum >= 4) {
+          if (l->darg_mask & (1 << 3)) darg4 = l->dargs[3];
+          else if (l->farg_mask & (1 << 3)) farg4 = l->fargs[3];
+          if (fanum >= 5) {
+            if (l->darg_mask & (1 << 4)) darg5 = l->dargs[4];
+            else if (l->farg_mask & (1 << 4)) farg5 = l->fargs[4];
+            if (fanum >= 6) {
+              if (l->darg_mask & (1 << 5)) darg6 = l->dargs[5];
+              else if (l->farg_mask & (1 << 5)) farg6 = l->fargs[5];
+              if (fanum >= 7) {
+                if (l->darg_mask & (1 << 6)) darg7 = l->dargs[6];
+                else if (l->farg_mask & (1 << 6)) farg7 = l->fargs[6];
+                if (fanum >= 8) {
+                  if (l->darg_mask & (1 << 7)) darg8 = l->dargs[7];
+                  else if (l->farg_mask & (1 << 7)) farg8 = l->fargs[7];
+                }
+              }
+            }
+          }
+        }
+      }
+    }
+  }
+        
+  /* Call function. */
+  if (l->rtype == __AVfloat) {
+    *(float*)l->raddr = (*(float(*)())l->func)();
+  } else
+  if (l->rtype == __AVdouble) {
+    *(double*)l->raddr = (*(double(*)())l->func)();
+  } else {
+    __avword iret, iret2;
+
+    iret = (*l->func)();
+    iret2 = iret2reg;
+
+    /* save return value */
+    if (l->rtype == __AVvoid) {
+    } else
+    if (l->rtype == __AVword) {
+      RETURN(__avword, iret);
+    } else
+    if (l->rtype == __AVchar) {
+      RETURN(char, iret);
+    } else
+    if (l->rtype == __AVschar) {
+      RETURN(signed char, iret);
+    } else
+    if (l->rtype == __AVuchar) {
+      RETURN(unsigned char, iret);
+    } else
+    if (l->rtype == __AVshort) {
+      RETURN(short, iret);
+    } else
+    if (l->rtype == __AVushort) {
+      RETURN(unsigned short, iret);
+    } else
+    if (l->rtype == __AVint) {
+      RETURN(int, iret);
+    } else
+    if (l->rtype == __AVuint) {
+      RETURN(unsigned int, iret);
+    } else
+    if (l->rtype == __AVlong || l->rtype == __AVlonglong) {
+      RETURN(long, iret);
+    } else
+    if (l->rtype == __AVulong || l->rtype == __AVulonglong) {
+      RETURN(unsigned long, iret);
+    } else
+  /* see above
+    if (l->rtype == __AVfloat) {
+    } else
+    if (l->rtype == __AVdouble) {
+    } else
+  */
+    if (l->rtype == __AVvoidp) {
+      RETURN(void*, iret);
+    } else
+    if (l->rtype == __AVstruct) {
+      if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+        /* Return structs of size <= 16 in registers. */
+        if (l->rsize > 0 && l->rsize <= 16) {
+          void* raddr = l->raddr;
+          #if 0 /* Unoptimized */
+          if (l->rsize == 1) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          } else
+          if (l->rsize == 2) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          } else
+          if (l->rsize == 3) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          } else
+          if (l->rsize == 4) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+          } else
+          if (l->rsize == 5) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+          } else
+          if (l->rsize == 6) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+          } else
+          if (l->rsize == 7) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+          } else
+          if (l->rsize >= 8 && l->rsize <= 16) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56);
+            if (l->rsize == 8) {
+            } else
+            if (l->rsize == 9) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+            } else
+            if (l->rsize == 10) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+            } else
+            if (l->rsize == 11) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+            } else
+            if (l->rsize == 12) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+            } else
+            if (l->rsize == 13) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+            } else
+            if (l->rsize == 14) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+            } else
+            if (l->rsize == 15) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+            } else
+            if (l->rsize == 16) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56);
+            }
+          }
+          #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+          uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avword) */
+          __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+          uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+          uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avword) */
+          if (count <= sizeof(__avword)) {
+            /* Use iret. */
+            if (end_offset <= sizeof(__avword)) {
+              /* 0 < end_offset ≤ sizeof(__avword) */
+              __avword mask0 = ((__avword)2 << (end_offset*8-1)) - ((__avword)1 << (start_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            } else {
+              /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+              __avword mask0 = - ((__avword)1 << (start_offset*8));
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+              wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avword)*8-start_offset*8))) & mask1;
+            }
+          } else {
+            /* Use iret, iret2. */
+            __avword mask0 = - ((__avword)1 << (start_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            if (end_offset <= 2*sizeof(__avword)) {
+              /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1;
+            } else {
+              /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+              __avword mask2 = ((__avword)2 << (end_offset*8-2*sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] = (iret >> (sizeof(__avword)*8-start_offset*8)) | (iret2 << (start_offset*8));
+              wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avword)*8-start_offset*8))) & mask2;
+            }
+          }
+          #endif
+        }
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-s390-linux.s b/avcall/avcall-s390-linux.s
new file mode 100644 (file)
index 0000000..7680874
--- /dev/null
@@ -0,0 +1,148 @@
+       .file   "avcall-s390.c"
+.text
+       .align  4
+.globl avcall_call
+       .type   avcall_call,@function
+avcall_call:
+       stm     %r6,%r15,24(%r15)
+       bras    %r13,.LTN0_0
+.LT0_0:
+.LC0:
+       .long   1
+.LTN0_0:
+       lr      %r14,%r15
+       ahi     %r15,-96
+       lr      %r10,%r2
+       lr      %r11,%r15
+       lhi     %r2,0
+       st      %r14,0(%r15)
+       l       %r1,0(%r15)
+       ahi     %r15,-1032
+       l       %r3,20(%r10)
+       l       %r4,24(%r10)
+       sr      %r3,%r4
+       sra     %r3,2
+       la      %r5,96(%r15)
+       st      %r1,0(%r15)
+       cr      %r2,%r3
+       l       %r0,64(%r10)
+       jhe     .L55
+.L6:
+       lr      %r1,%r2
+       sll     %r1,2
+       ahi     %r2,1
+       cr      %r2,%r3
+       l       %r9,0(%r1,%r4)
+       st      %r9,0(%r1,%r5)
+       jl      .L6
+.L55:
+       ltr     %r0,%r0
+       je      .L7
+       l       %r1,72(%r10)
+       tml     %r1,1
+       je      .L8
+       ld      %f0,88(%r10)
+.L9:
+       cl      %r0,.LC0-.LT0_0(%r13)
+       jle     .L7
+       tml     %r1,2
+       je      .L12
+       ld      %f2,96(%r10)
+.L7:
+       l       %r1,4(%r10)
+       l       %r4,52(%r10)
+       l       %r2,44(%r10)
+       l       %r3,48(%r10)
+       l       %r5,56(%r10)
+       l       %r6,60(%r10)
+       basr    %r14,%r1
+       l       %r4,12(%r10)
+       chi     %r4,1
+       je      .L16
+       ltr     %r4,%r4
+       je      .L65
+       chi     %r4,2
+       je      .L58
+       chi     %r4,3
+       je      .L58
+       chi     %r4,4
+       je      .L58
+       chi     %r4,5
+       je      .L57
+       chi     %r4,6
+       je      .L57
+       chi     %r4,7
+       je      .L65
+       chi     %r4,8
+       je      .L65
+       chi     %r4,9
+       je      .L65
+       chi     %r4,10
+       je      .L65
+       lr      %r1,%r4
+       ahi     %r1,-11
+       cl      %r1,.LC0-.LT0_0(%r13)
+       jle     .L64
+       chi     %r4,13
+       je      .L66
+       chi     %r4,14
+       je      .L67
+       chi     %r4,15
+       je      .L65
+       chi     %r4,16
+       je      .L68
+.L16:
+       lhi     %r2,0
+       l       %r4,152(%r11)
+       lm      %r6,%r15,120(%r11)
+       br      %r4
+.L68:
+       tm      2(%r10),2
+       je      .L16
+       l       %r1,16(%r10)
+       chi     %r1,1
+       je      .L58
+       chi     %r1,2
+       je      .L57
+       chi     %r1,4
+       je      .L65
+       chi     %r1,8
+       jne     .L16
+.L64:
+       l       %r1,8(%r10)
+       st      %r3,4(%r1)
+.L56:
+       st      %r2,0(%r1)
+       j       .L16
+.L65:
+       l       %r1,8(%r10)
+       j       .L56
+.L57:
+       l       %r1,8(%r10)
+       sth     %r2,0(%r1)
+       j       .L16
+.L58:
+       l       %r1,8(%r10)
+       stc     %r2,0(%r1)
+       j       .L16
+.L67:
+       l       %r1,8(%r10)
+       std     %f0,0(%r1)
+       j       .L16
+.L66:
+       l       %r1,8(%r10)
+       ste     %f0,0(%r1)
+       j       .L16
+.L12:
+       tm      71(%r10),2
+       je      .L7
+       le      %f2,80(%r10)
+       j       .L7
+.L8:
+       tm      71(%r10),1
+       je      .L9
+       le      %f0,76(%r10)
+       j       .L9
+.Lfe1:
+       .size   avcall_call,.Lfe1-avcall_call
+       .ident  "GCC: (GNU) 3.1"
diff --git a/avcall/avcall-s390-macro.S b/avcall/avcall-s390-macro.S
new file mode 100644 (file)
index 0000000..267b4c3
--- /dev/null
@@ -0,0 +1,150 @@
+       .file   "avcall-s390.c"
+.text
+       .align  4
+.globl avcall_call
+       .type   avcall_call,@function
+avcall_call:
+       stm     %r6,%r15,24(%r15)
+       bras    %r13,.LTN0_0
+.LT0_0:
+.LC0:
+       .long   1
+.LTN0_0:
+       lr      %r14,%r15
+       ahi     %r15,-96
+       lr      %r10,%r2
+       lr      %r11,%r15
+       lhi     %r2,0
+       st      %r14,0(%r15)
+       l       %r1,0(%r15)
+       ahi     %r15,-1032
+       l       %r3,20(%r10)
+       l       %r4,24(%r10)
+       sr      %r3,%r4
+       sra     %r3,2
+       la      %r5,96(%r15)
+       st      %r1,0(%r15)
+       cr      %r2,%r3
+       l       %r0,64(%r10)
+       jhe     .L55
+.L6:
+       lr      %r1,%r2
+       sll     %r1,2
+       ahi     %r2,1
+       cr      %r2,%r3
+       l       %r9,0(%r1,%r4)
+       st      %r9,0(%r1,%r5)
+       jl      .L6
+.L55:
+       ltr     %r0,%r0
+       je      .L7
+       l       %r1,72(%r10)
+       tml     %r1,1
+       je      .L8
+       ld      %f0,88(%r10)
+.L9:
+       cl      %r0,.LC0-.LT0_0(%r13)
+       jle     .L7
+       tml     %r1,2
+       je      .L12
+       ld      %f2,96(%r10)
+.L7:
+       l       %r1,4(%r10)
+       l       %r4,52(%r10)
+       l       %r2,44(%r10)
+       l       %r3,48(%r10)
+       l       %r5,56(%r10)
+       l       %r6,60(%r10)
+       basr    %r14,%r1
+       l       %r4,12(%r10)
+       chi     %r4,1
+       je      .L16
+       ltr     %r4,%r4
+       je      .L65
+       chi     %r4,2
+       je      .L58
+       chi     %r4,3
+       je      .L58
+       chi     %r4,4
+       je      .L58
+       chi     %r4,5
+       je      .L57
+       chi     %r4,6
+       je      .L57
+       chi     %r4,7
+       je      .L65
+       chi     %r4,8
+       je      .L65
+       chi     %r4,9
+       je      .L65
+       chi     %r4,10
+       je      .L65
+       lr      %r1,%r4
+       ahi     %r1,-11
+       cl      %r1,.LC0-.LT0_0(%r13)
+       jle     .L64
+       chi     %r4,13
+       je      .L66
+       chi     %r4,14
+       je      .L67
+       chi     %r4,15
+       je      .L65
+       chi     %r4,16
+       je      .L68
+.L16:
+       lhi     %r2,0
+       l       %r4,152(%r11)
+       lm      %r6,%r15,120(%r11)
+       br      %r4
+.L68:
+       tm      2(%r10),2
+       je      .L16
+       l       %r1,16(%r10)
+       chi     %r1,1
+       je      .L58
+       chi     %r1,2
+       je      .L57
+       chi     %r1,4
+       je      .L65
+       chi     %r1,8
+       jne     .L16
+.L64:
+       l       %r1,8(%r10)
+       st      %r3,4(%r1)
+.L56:
+       st      %r2,0(%r1)
+       j       .L16
+.L65:
+       l       %r1,8(%r10)
+       j       .L56
+.L57:
+       l       %r1,8(%r10)
+       sth     %r2,0(%r1)
+       j       .L16
+.L58:
+       l       %r1,8(%r10)
+       stc     %r2,0(%r1)
+       j       .L16
+.L67:
+       l       %r1,8(%r10)
+       std     %f0,0(%r1)
+       j       .L16
+.L66:
+       l       %r1,8(%r10)
+       ste     %f0,0(%r1)
+       j       .L16
+.L12:
+       tm      71(%r10),2
+       je      .L7
+       le      %f2,80(%r10)
+       j       .L7
+.L8:
+       tm      71(%r10),1
+       je      .L9
+       le      %f0,76(%r10)
+       j       .L9
+.Lfe1:
+       .size   avcall_call,.Lfe1-avcall_call
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-s390.c b/avcall/avcall-s390.c
new file mode 100644 (file)
index 0000000..d2cb117
--- /dev/null
@@ -0,0 +1,146 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+  Copyright 2001 Gerhard Tonn <gt@debian.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+
+  Foreign function interface for an IBM S/390 with gcc
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  S390 Argument Passing Conventions:
+
+  All arguments, except the first 5 words, are passed on the stack with
+  word alignment. Doubles take two words. The first 2 doubles and floats
+  are also passed in floating-point-registers.
+  To return a structure, the called function copies the value to space
+  pointed to by its first argument, and all other arguments are shifted
+  down by one.
+
+  Compile this routine with gcc -O2 to get the right register variables.
+  For other compilers use the pre-compiled assembler version.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+register float  farg1  __asm__("f0");
+register float  farg2  __asm__("f2");
+register double darg1  __asm__("f0");
+register double darg2  __asm__("f2");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("r15");  /* C names for registers */
+/*register __avword    iret    __asm__("r2"); */
+  register __avword    iret2   __asm__("r3");
+  register float       fret    __asm__("f0");
+  register double      dret    __asm__("f0");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  unsigned int fanum = l->fanum;
+  __avword i;
+
+  for (i = 0; i < arglen; i++)         /* push function args onto stack */
+   argframe[i] = l->args[i];
+
+  /* Put upto 2 floating-point args into registers. */
+  if (fanum >= 1) {
+    if (l->darg_mask & (1 << 0)) darg1 = l->dargs[0];
+    else if (l->farg_mask & (1 << 0)) farg1 = l->fargs[0];
+    if (fanum >= 2) {
+      if (l->darg_mask & (1 << 1)) darg2 = l->dargs[1];
+      else if (l->farg_mask & (1 << 1)) farg2 = l->fargs[1];
+    }
+  }
+
+                               /* call function, pass 5 args in registers */
+  i = (*l->func)(l->iargs[0], l->iargs[1], l->iargs[2], l->iargs[3],
+                l->iargs[4]);
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, i);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, i);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, i);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, i);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, i);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, i);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, i);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, i);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, i);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, i);
+  } else
+  if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) {
+    void* raddr = l->raddr;
+    ((__avword*)raddr)[0] = i;
+    ((__avword*)raddr)[1] = iret2;
+  } else
+  if (l->rtype == __AVfloat) {
+    RETURN(float, fret);
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, dret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, i);
+  } else
+  if (l->rtype == __AVstruct) {
+    if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+      if (l->rsize == sizeof(char)) {
+        RETURN(char, i);
+      } else
+      if (l->rsize == sizeof(short)) {
+        RETURN(short, i);
+      } else
+      if (l->rsize == sizeof(int)) {
+        RETURN(int, i);
+      } else
+      if (l->rsize == 2*sizeof(__avword)) {
+        void* raddr = l->raddr;
+        ((__avword*)raddr)[0] = i;
+        ((__avword*)raddr)[1] = iret2;
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-s390x-linux.s b/avcall/avcall-s390x-linux.s
new file mode 100644 (file)
index 0000000..a76a9a0
--- /dev/null
@@ -0,0 +1,269 @@
+       .file   "avcall-s390x.c"
+.text
+       .align  8
+.globl avcall_call
+       .type   avcall_call, @function
+avcall_call:
+.LFB0:
+       .cfi_startproc
+       stmg    %r7,%r15,56(%r15)
+       .cfi_offset 7, -104
+       .cfi_offset 8, -96
+       .cfi_offset 9, -88
+       .cfi_offset 10, -80
+       .cfi_offset 11, -72
+       .cfi_offset 12, -64
+       .cfi_offset 13, -56
+       .cfi_offset 14, -48
+       .cfi_offset 15, -40
+       larl    %r13,.L78
+       aghi    %r15,-176
+       .cfi_def_cfa_offset 336
+       lgr     %r11,%r15
+       .cfi_def_cfa_register 11
+       aghi    %r15,-2056
+       lg      %r9,48(%r2)
+       lg      %r1,40(%r2)
+       sgr     %r1,%r9
+       srag    %r1,%r1,3
+       stg     %r2,168(%r11)
+       stg     %r6,160(%r11)
+       ltr     %r1,%r1
+       la      %r8,160(%r15)
+       l       %r0,64(%r2)
+       l       %r7,112(%r2)
+       jle     .L6
+       ahi     %r1,-1
+       llgfr   %r1,%r1
+       aghi    %r1,1
+       lghi    %r14,0
+.L5:
+       lg      %r10,0(%r14,%r9)
+       stg     %r10,0(%r14,%r8)
+       aghi    %r14,8
+       brctg   %r1,.L5
+.L6:
+       ltr     %r0,%r0
+       je      .L7
+       lg      %r1,168(%r11)
+       cl      %r0,.L79-.L78(%r13)
+       lg      %r2,72(%r1)
+       jle     .L7
+       chi     %r0,2
+       lg      %r3,80(%r1)
+       je      .L7
+       chi     %r0,3
+       lg      %r4,88(%r1)
+       je      .L7
+       chi     %r0,4
+       lg      %r5,96(%r1)
+       jne     .L73
+.L7:
+       ltr     %r7,%r7
+       je      .L9
+       lg      %r10,168(%r11)
+       l       %r1,120(%r10)
+       tmll    %r1,1
+       je      .L10
+       ld      %f0,144(%r10)
+.L11:
+       cl      %r7,.L79-.L78(%r13)
+       jle     .L9
+       tmll    %r1,2
+       lg      %r10,168(%r11)
+       jne     .L74
+       tm      119(%r10),2
+       je      .L14
+       le      %f2,128(%r10)
+.L14:
+       chi     %r7,2
+       je      .L9
+       tmll    %r1,4
+       lg      %r10,168(%r11)
+       je      .L15
+       ld      %f4,160(%r10)
+.L16:
+       chi     %r7,3
+       je      .L9
+       tmll    %r1,8
+       lg      %r1,168(%r11)
+       jne     .L75
+       tm      119(%r1),8
+       je      .L9
+       le      %f6,136(%r1)
+.L9:
+       lg      %r1,168(%r11)
+       l       %r1,24(%r1)
+       chi     %r1,13
+       je      .L76
+       chi     %r1,14
+       je      .L77
+       lg      %r10,168(%r11)
+       lg      %r1,8(%r10)
+       basr    %r14,%r1
+       l       %r1,24(%r10)
+       chi     %r1,1
+       lgr     %r0,%r2
+       je      .L19
+       ltr     %r1,%r1
+       je      .L67
+       chi     %r1,2
+       je      .L69
+       chi     %r1,3
+       je      .L69
+       chi     %r1,4
+       je      .L69
+       chi     %r1,5
+       je      .L71
+       chi     %r1,6
+       je      .L71
+       chi     %r1,7
+       je      .L70
+       chi     %r1,8
+       je      .L70
+       lr      %r9,%r1
+       nill    %r9,65533
+       chi     %r9,9
+       je      .L67
+       chi     %r1,10
+       je      .L67
+       chi     %r1,12
+       je      .L67
+       chi     %r1,15
+       je      .L67
+.L19:
+       lg      %r4,288(%r11)
+       lg      %r6,160(%r11)
+       lghi    %r2,0
+       lmg     %r7,%r15,232(%r11)
+       .cfi_remember_state
+       .cfi_restore 15
+       .cfi_restore 14
+       .cfi_restore 13
+       .cfi_restore 12
+       .cfi_restore 11
+       .cfi_restore 10
+       .cfi_restore 9
+       .cfi_restore 8
+       .cfi_restore 7
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L10:
+       .cfi_restore_state
+       lg      %r10,168(%r11)
+       tm      119(%r10),1
+       je      .L11
+       le      %f0,124(%r10)
+       j       .L11
+.L67:
+       lg      %r1,168(%r11)
+       lghi    %r2,0
+       lg      %r1,16(%r1)
+       stg     %r0,0(%r1)
+       lg      %r4,288(%r11)
+       lg      %r6,160(%r11)
+       lmg     %r7,%r15,232(%r11)
+       .cfi_remember_state
+       .cfi_restore 7
+       .cfi_restore 8
+       .cfi_restore 9
+       .cfi_restore 10
+       .cfi_restore 11
+       .cfi_restore 12
+       .cfi_restore 13
+       .cfi_restore 14
+       .cfi_restore 15
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L74:
+       .cfi_restore_state
+       ld      %f2,152(%r10)
+       j       .L14
+.L69:
+       lg      %r1,168(%r11)
+       lghi    %r2,0
+       lg      %r1,16(%r1)
+       stc     %r0,0(%r1)
+       lg      %r4,288(%r11)
+       lg      %r6,160(%r11)
+       lmg     %r7,%r15,232(%r11)
+       .cfi_remember_state
+       .cfi_restore 7
+       .cfi_restore 8
+       .cfi_restore 9
+       .cfi_restore 10
+       .cfi_restore 11
+       .cfi_restore 12
+       .cfi_restore 13
+       .cfi_restore 14
+       .cfi_restore 15
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L77:
+       .cfi_restore_state
+       lg      %r0,168(%r11)
+       lgr     %r1,%r0
+       lgr     %r10,%r0
+       lg      %r1,8(%r1)
+       lg      %r10,16(%r10)
+       basr    %r14,%r1
+       lg      %r4,288(%r11)
+       std     %f0,0(%r10)
+       lg      %r6,160(%r11)
+       lghi    %r2,0
+       lmg     %r7,%r15,232(%r11)
+       .cfi_remember_state
+       .cfi_restore 7
+       .cfi_restore 8
+       .cfi_restore 9
+       .cfi_restore 10
+       .cfi_restore 11
+       .cfi_restore 12
+       .cfi_restore 13
+       .cfi_restore 14
+       .cfi_restore 15
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L76:
+       .cfi_restore_state
+       lg      %r0,168(%r11)
+       lgr     %r1,%r0
+       lgr     %r10,%r0
+       lg      %r1,8(%r1)
+       lg      %r10,16(%r10)
+       basr    %r14,%r1
+       ste     %f0,0(%r10)
+       j       .L19
+.L15:
+       tm      119(%r10),4
+       je      .L16
+       le      %f4,132(%r10)
+       j       .L16
+.L71:
+       lg      %r1,168(%r11)
+       lg      %r1,16(%r1)
+       sth     %r0,0(%r1)
+       j       .L19
+.L73:
+       lg      %r6,104(%r1)
+       j       .L7
+.L75:
+       ld      %f6,168(%r1)
+       j       .L9
+.L70:
+       lg      %r1,168(%r11)
+       lg      %r1,16(%r1)
+       st      %r0,0(%r1)
+       j       .L19
+       .section        .rodata
+       .align  8
+.L78:
+.L79:
+       .long   1
+       .align  2
+       .previous
+       .cfi_endproc
+.LFE0:
+       .size   avcall_call, .-avcall_call
+       .ident  "GCC: (GNU) 5.4.0"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/avcall/avcall-s390x-macro.S b/avcall/avcall-s390x-macro.S
new file mode 100644 (file)
index 0000000..6fafcc3
--- /dev/null
@@ -0,0 +1,270 @@
+       .file   "avcall-s390x.c"
+.text
+       .align  8
+.globl avcall_call
+       .type   avcall_call, @function
+avcall_call:
+.LFB0:
+       .cfi_startproc
+       stmg    %r7,%r15,56(%r15)
+       .cfi_offset 7, -104
+       .cfi_offset 8, -96
+       .cfi_offset 9, -88
+       .cfi_offset 10, -80
+       .cfi_offset 11, -72
+       .cfi_offset 12, -64
+       .cfi_offset 13, -56
+       .cfi_offset 14, -48
+       .cfi_offset 15, -40
+       larl    %r13,.L78
+       aghi    %r15,-176
+       .cfi_def_cfa_offset 336
+       lgr     %r11,%r15
+       .cfi_def_cfa_register 11
+       aghi    %r15,-2056
+       lg      %r9,48(%r2)
+       lg      %r1,40(%r2)
+       sgr     %r1,%r9
+       srag    %r1,%r1,3
+       stg     %r2,168(%r11)
+       stg     %r6,160(%r11)
+       ltr     %r1,%r1
+       la      %r8,160(%r15)
+       l       %r0,64(%r2)
+       l       %r7,112(%r2)
+       jle     .L6
+       ahi     %r1,-1
+       llgfr   %r1,%r1
+       aghi    %r1,1
+       lghi    %r14,0
+.L5:
+       lg      %r10,0(%r14,%r9)
+       stg     %r10,0(%r14,%r8)
+       aghi    %r14,8
+       brctg   %r1,.L5
+.L6:
+       ltr     %r0,%r0
+       je      .L7
+       lg      %r1,168(%r11)
+       cl      %r0,.L79-.L78(%r13)
+       lg      %r2,72(%r1)
+       jle     .L7
+       chi     %r0,2
+       lg      %r3,80(%r1)
+       je      .L7
+       chi     %r0,3
+       lg      %r4,88(%r1)
+       je      .L7
+       chi     %r0,4
+       lg      %r5,96(%r1)
+       jne     .L73
+.L7:
+       ltr     %r7,%r7
+       je      .L9
+       lg      %r10,168(%r11)
+       l       %r1,120(%r10)
+       tmll    %r1,1
+       je      .L10
+       ld      %f0,144(%r10)
+.L11:
+       cl      %r7,.L79-.L78(%r13)
+       jle     .L9
+       tmll    %r1,2
+       lg      %r10,168(%r11)
+       jne     .L74
+       tm      119(%r10),2
+       je      .L14
+       le      %f2,128(%r10)
+.L14:
+       chi     %r7,2
+       je      .L9
+       tmll    %r1,4
+       lg      %r10,168(%r11)
+       je      .L15
+       ld      %f4,160(%r10)
+.L16:
+       chi     %r7,3
+       je      .L9
+       tmll    %r1,8
+       lg      %r1,168(%r11)
+       jne     .L75
+       tm      119(%r1),8
+       je      .L9
+       le      %f6,136(%r1)
+.L9:
+       lg      %r1,168(%r11)
+       l       %r1,24(%r1)
+       chi     %r1,13
+       je      .L76
+       chi     %r1,14
+       je      .L77
+       lg      %r10,168(%r11)
+       lg      %r1,8(%r10)
+       basr    %r14,%r1
+       l       %r1,24(%r10)
+       chi     %r1,1
+       lgr     %r0,%r2
+       je      .L19
+       ltr     %r1,%r1
+       je      .L67
+       chi     %r1,2
+       je      .L69
+       chi     %r1,3
+       je      .L69
+       chi     %r1,4
+       je      .L69
+       chi     %r1,5
+       je      .L71
+       chi     %r1,6
+       je      .L71
+       chi     %r1,7
+       je      .L70
+       chi     %r1,8
+       je      .L70
+       lr      %r9,%r1
+       nill    %r9,65533
+       chi     %r9,9
+       je      .L67
+       chi     %r1,10
+       je      .L67
+       chi     %r1,12
+       je      .L67
+       chi     %r1,15
+       je      .L67
+.L19:
+       lg      %r4,288(%r11)
+       lg      %r6,160(%r11)
+       lghi    %r2,0
+       lmg     %r7,%r15,232(%r11)
+       .cfi_remember_state
+       .cfi_restore 15
+       .cfi_restore 14
+       .cfi_restore 13
+       .cfi_restore 12
+       .cfi_restore 11
+       .cfi_restore 10
+       .cfi_restore 9
+       .cfi_restore 8
+       .cfi_restore 7
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L10:
+       .cfi_restore_state
+       lg      %r10,168(%r11)
+       tm      119(%r10),1
+       je      .L11
+       le      %f0,124(%r10)
+       j       .L11
+.L67:
+       lg      %r1,168(%r11)
+       lghi    %r2,0
+       lg      %r1,16(%r1)
+       stg     %r0,0(%r1)
+       lg      %r4,288(%r11)
+       lg      %r6,160(%r11)
+       lmg     %r7,%r15,232(%r11)
+       .cfi_remember_state
+       .cfi_restore 7
+       .cfi_restore 8
+       .cfi_restore 9
+       .cfi_restore 10
+       .cfi_restore 11
+       .cfi_restore 12
+       .cfi_restore 13
+       .cfi_restore 14
+       .cfi_restore 15
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L74:
+       .cfi_restore_state
+       ld      %f2,152(%r10)
+       j       .L14
+.L69:
+       lg      %r1,168(%r11)
+       lghi    %r2,0
+       lg      %r1,16(%r1)
+       stc     %r0,0(%r1)
+       lg      %r4,288(%r11)
+       lg      %r6,160(%r11)
+       lmg     %r7,%r15,232(%r11)
+       .cfi_remember_state
+       .cfi_restore 7
+       .cfi_restore 8
+       .cfi_restore 9
+       .cfi_restore 10
+       .cfi_restore 11
+       .cfi_restore 12
+       .cfi_restore 13
+       .cfi_restore 14
+       .cfi_restore 15
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L77:
+       .cfi_restore_state
+       lg      %r0,168(%r11)
+       lgr     %r1,%r0
+       lgr     %r10,%r0
+       lg      %r1,8(%r1)
+       lg      %r10,16(%r10)
+       basr    %r14,%r1
+       lg      %r4,288(%r11)
+       std     %f0,0(%r10)
+       lg      %r6,160(%r11)
+       lghi    %r2,0
+       lmg     %r7,%r15,232(%r11)
+       .cfi_remember_state
+       .cfi_restore 7
+       .cfi_restore 8
+       .cfi_restore 9
+       .cfi_restore 10
+       .cfi_restore 11
+       .cfi_restore 12
+       .cfi_restore 13
+       .cfi_restore 14
+       .cfi_restore 15
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L76:
+       .cfi_restore_state
+       lg      %r0,168(%r11)
+       lgr     %r1,%r0
+       lgr     %r10,%r0
+       lg      %r1,8(%r1)
+       lg      %r10,16(%r10)
+       basr    %r14,%r1
+       ste     %f0,0(%r10)
+       j       .L19
+.L15:
+       tm      119(%r10),4
+       je      .L16
+       le      %f4,132(%r10)
+       j       .L16
+.L71:
+       lg      %r1,168(%r11)
+       lg      %r1,16(%r1)
+       sth     %r0,0(%r1)
+       j       .L19
+.L73:
+       lg      %r6,104(%r1)
+       j       .L7
+.L75:
+       ld      %f6,168(%r1)
+       j       .L9
+.L70:
+       lg      %r1,168(%r11)
+       lg      %r1,16(%r1)
+       st      %r0,0(%r1)
+       j       .L19
+       .section        .rodata
+       .align  8
+.L78:
+.L79:
+       .long   1
+       .align  2
+       .previous
+       .cfi_endproc
+.LFE0:
+       .size   avcall_call, .-avcall_call
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-s390x.c b/avcall/avcall-s390x.c
new file mode 100644 (file)
index 0000000..06f488a
--- /dev/null
@@ -0,0 +1,193 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2018 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O -fno-omit-frame-pointer !!!
+
+  Foreign function interface for an s390x 64-bit CPU.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  s390x 64-bit Argument Passing Conventions
+
+  * Arguments:
+    - The first 5 integer or pointer arguments get passed in
+      r2, r3, r4, r5, r6; the remaining ones (as an entire word each)
+      on the stack.
+    - The first 4 float or double arguments get passed in
+      f0, f2, f4, f6; the remaining ones on the stack (as an entire
+      word each, floats in the upper half of a word).
+    - Structures of sizes 1, 2, 4, 8 are passed as follows:
+      - Structures consisting only of a float or double are passed
+        like an immediate float or double, that is, in f0, f2, f4, f6
+        and on the stack (floats in the upper half of their respective
+        word). But we don't support this kind of structure.
+      - Other structures get passed as an entire word, like integers
+        and pointers.
+        When in r2, ..., r6: as the 8*sizeof(S) low bits of the register
+        (a.k.a. "right-adjusted").
+        When on the stack: they occupy an entire word and are adjusted
+        on the high end of the word:
+          - sizeof(S) == 1: at an address == 7 mod 8,
+          - sizeof(S) == 2: at an address == 6 mod 8,
+          - sizeof(S) == 4: at an address == 4 mod 8,
+    - Structures of other sizes are passed as references.
+  * Return value:
+    - An integer or pointer is returned in r2.
+    - A float or double is returned in f0.
+    - Structure return convention: The caller passes a pointer to the
+      destination area (quasi as an additional first pointer argument)
+      in r2. The callee fills it and returns the same pointer in r2.
+
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+register __avword iarg1 __asm__("r2");
+register __avword iarg2 __asm__("r3");
+register __avword iarg3 __asm__("r4");
+register __avword iarg4 __asm__("r5");
+register __avword iarg5 __asm__("r6");
+
+register float farg1 __asm__("f0");
+register float farg2 __asm__("f2");
+register float farg3 __asm__("f4");
+register float farg4 __asm__("f6");
+
+register double darg1 __asm__("f0");
+register double darg2 __asm__("f2");
+register double darg3 __asm__("f4");
+register double darg4 __asm__("f6");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("r15"); /* C names for registers */
+  register __avword    iretreg __asm__("r2");
+  register double      dret    __asm__("f0");
+
+  /* We need to put a value in r6, but it's a call-saved register. */
+  __avword saved_iarg5 = iarg5;
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  unsigned int ianum = l->ianum;
+  unsigned int fanum = l->fanum;
+
+  {
+    int i;
+    for (i = 0; i < arglen; i++)       /* push function args onto stack */
+      argframe[i] = l->args[i];
+  }
+
+  /* Put up to 5 integer args into registers. */
+  if (ianum >= 1) {
+    iarg1 = l->iargs[0];
+    if (ianum >= 2) {
+      iarg2 = l->iargs[1];
+      if (ianum >= 3) {
+        iarg3 = l->iargs[2];
+        if (ianum >= 4) {
+          iarg4 = l->iargs[3];
+          if (ianum >= 5) {
+            iarg5 = l->iargs[4];
+          }
+        }
+      }
+    }
+  }
+
+  /* Put upto 4 floating-point args into registers. */
+  if (fanum >= 1) {
+    if (l->darg_mask & (1 << 0)) darg1 = l->dargs[0];
+    else if (l->farg_mask & (1 << 0)) farg1 = l->fargs[0];
+    if (fanum >= 2) {
+      if (l->darg_mask & (1 << 1)) darg2 = l->dargs[1];
+      else if (l->farg_mask & (1 << 1)) farg2 = l->fargs[1];
+      if (fanum >= 3) {
+        if (l->darg_mask & (1 << 2)) darg3 = l->dargs[2];
+        else if (l->farg_mask & (1 << 2)) farg3 = l->fargs[2];
+        if (fanum >= 4) {
+          if (l->darg_mask & (1 << 3)) darg4 = l->dargs[3];
+          else if (l->farg_mask & (1 << 3)) farg4 = l->fargs[3];
+        }
+      }
+    }
+  }
+
+  /* Call function. */
+  if (l->rtype == __AVfloat) {
+    *(float*)l->raddr = (*(float(*)())l->func)();
+  } else
+  if (l->rtype == __AVdouble) {
+    *(double*)l->raddr = (*(double(*)())l->func)();
+  } else {
+    __avword iret = (*l->func)();
+
+    /* save return value */
+    if (l->rtype == __AVvoid) {
+    } else
+    if (l->rtype == __AVword) {
+      RETURN(__avword, iret);
+    } else
+    if (l->rtype == __AVchar) {
+      RETURN(char, iret);
+    } else
+    if (l->rtype == __AVschar) {
+      RETURN(signed char, iret);
+    } else
+    if (l->rtype == __AVuchar) {
+      RETURN(unsigned char, iret);
+    } else
+    if (l->rtype == __AVshort) {
+      RETURN(short, iret);
+    } else
+    if (l->rtype == __AVushort) {
+      RETURN(unsigned short, iret);
+    } else
+    if (l->rtype == __AVint) {
+      RETURN(int, iret);
+    } else
+    if (l->rtype == __AVuint) {
+      RETURN(unsigned int, iret);
+    } else
+    if (l->rtype == __AVlong || l->rtype == __AVlonglong) {
+      RETURN(long, iret);
+    } else
+    if (l->rtype == __AVulong || l->rtype == __AVulonglong) {
+      RETURN(unsigned long, iret);
+    } else
+  /* see above
+    if (l->rtype == __AVfloat) {
+    } else
+    if (l->rtype == __AVdouble) {
+    } else
+  */
+    if (l->rtype == __AVvoidp) {
+      RETURN(void*, iret);
+    } else
+    if (l->rtype == __AVstruct) {
+      /* normal struct return convention */
+    }
+  }
+  iarg5 = saved_iarg5;
+  return 0;
+}
diff --git a/avcall/avcall-sparc-linux.s b/avcall/avcall-sparc-linux.s
new file mode 100644 (file)
index 0000000..68946c2
--- /dev/null
@@ -0,0 +1,170 @@
+       .file   "avcall-sparc.c"
+       .section        ".text"
+       .align 4
+       .global avcall_call
+       .type   avcall_call,#function
+       .proc   04
+avcall_call:
+       !#PROLOGUE# 0
+       save    %sp, -1152, %sp
+       ld      [%i0+20], %g3
+       add     %sp, 68, %l1
+       ld      [%i0+24], %o7
+       ld      [%i0+12], %l0
+       sub     %g3, %o7, %g3
+       cmp     %l0, 16
+       be      .LL54
+       sra     %g3, 2, %g4
+.LL2:
+       mov     6, %l0
+       cmp     %l0, %g4
+       bge     .LL49
+       ld      [%i0+24], %g1
+.LL7:
+       sll     %l0, 2, %g3
+       ld      [%g1+%g3], %o7
+       add     %l0, 1, %l0
+       cmp     %l0, %g4
+       bl      .LL7
+       st      %o7, [%l1+%g3]
+.LL49:
+       ld      [%i0+12], %g3
+       cmp     %g3, 16
+       be,a    .LL55
+       ld      [%i0], %g3
+       ld      [%g1+20], %o5
+.LL60:
+       ld      [%i0+4], %g3
+       ld      [%g1], %o0
+       ld      [%g1+4], %o1
+       ld      [%g1+8], %o2
+       ld      [%g1+12], %o3
+       call    %g3, 0
+       ld      [%g1+16], %o4
+       nop
+       ld      [%i0+12], %o7
+       cmp     %o7, 1
+       be      .LL10
+       mov     %o0, %l0
+       cmp     %o7, 0
+       be,a    .LL59
+       ld      [%i0+8], %g3
+       cmp     %o7, 2
+       be      .LL53
+       cmp     %o7, 3
+       be      .LL53
+       cmp     %o7, 4
+       be      .LL53
+       cmp     %o7, 5
+       be      .LL52
+       cmp     %o7, 6
+       be      .LL52
+       cmp     %o7, 7
+       be      .LL51
+       cmp     %o7, 8
+       be      .LL51
+       cmp     %o7, 9
+       be      .LL51
+       cmp     %o7, 10
+       be      .LL51
+       add     %o7, -11, %g3
+       cmp     %g3, 1
+       bgu     .LL31
+       cmp     %o7, 13
+       ld      [%i0+8], %g3
+       st      %o0, [%g3]
+       b       .LL10
+       st      %o1, [%g3+4]
+.LL31:
+       be      .LL56
+       cmp     %o7, 14
+       be      .LL57
+       cmp     %o7, 15
+       be      .LL51
+       cmp     %o7, 16
+       bne     .LL10
+       nop
+       ld      [%i0], %g3
+       andcc   %g3, 2, %g0
+       be      .LL10
+       nop
+       ld      [%i0+16], %g3
+       cmp     %g3, 1
+       be      .LL53
+       cmp     %g3, 2
+       be      .LL52
+       cmp     %g3, 4
+       bne     .LL10
+       nop
+.LL51:
+       ld      [%i0+8], %g3
+.LL59:
+       b       .LL10
+       st      %l0, [%g3]
+.LL52:
+       ld      [%i0+8], %g3
+       b       .LL10
+       sth     %l0, [%g3]
+.LL53:
+       ld      [%i0+8], %g3
+       b       .LL10
+       stb     %l0, [%g3]
+.LL57:
+       ld      [%i0+8], %g3
+       b       .LL10
+       std     %f0, [%g3]
+.LL56:
+       ld      [%i0], %g3
+       andcc   %g3, 32, %g0
+       bne,a   .LL34
+       fdtos   %f0, %f0
+.LL34:
+       ld      [%i0+8], %g3
+       b       .LL10
+       st      %f0, [%g3]
+.LL55:
+       andcc   %g3, 16, %g0
+       be,a    .LL60
+       ld      [%g1+20], %o5
+       b       .LL58
+       ld      [%i0+16], %l0
+.LL54:
+       ld      [%i0+8], %g3
+       b       .LL2
+       st      %g3, [%sp+64]
+.LL58:
+       sethi   %hi(-1614774272), %g3
+       sethi   %hi(16777216), %o7
+       st      %g3, [%fp-32]
+       st      %o7, [%fp-28]
+       sethi   %hi(-1341120512), %o7
+       sethi   %hi(-2117607424), %g3
+       st      %o7, [%fp-20]
+       or      %g3, 8, %g3
+       and     %l0, 4095, %l0
+       st      %g3, [%fp-16]
+       sethi   %hi(-2115502080), %o7
+       st      %l0, [%fp-24]
+       st      %o7, [%fp-12]
+       add     %fp, -32, %g3
+       iflush %g3
+       add     %fp, -24, %o7
+       iflush %o7
+       add     %fp, -16, %g3
+       iflush %g3
+       add     %fp, -12, %o7
+       iflush %o7
+       ld      [%g1+20], %o5
+       ld      [%i0+4], %g2
+       ld      [%g1], %o0
+       ld      [%g1+4], %o1
+       ld      [%g1+8], %o2
+       ld      [%g1+12], %o3
+       jmp     %fp-32
+       ld      [%g1+16], %o4
+.LL10:
+       ret
+       restore %g0, 0, %o0
+.LLfe1:
+       .size   avcall_call,.LLfe1-avcall_call
+       .ident  "GCC: (GNU) 3.1"
diff --git a/avcall/avcall-sparc-macro.S b/avcall/avcall-sparc-macro.S
new file mode 100644 (file)
index 0000000..7d4da98
--- /dev/null
@@ -0,0 +1,172 @@
+#include "asm-sparc.h"
+       .section        ".text"
+       .align 4
+       .global C(avcall_call)
+       DECLARE_FUNCTION(avcall_call)
+       .proc   04
+FUNBEGIN(avcall_call)
+       !$PROLOGUE$ 0
+       save    %sp, -1152, %sp
+       ld      [%i0+20], %g3
+       add     %sp, 68, %l1
+       ld      [%i0+24], %o7
+       ld      [%i0+12], %l0
+       sub     %g3, %o7, %g3
+       cmp     %l0, 16
+       be      L(L54)
+       sra     %g3, 2, %g4
+L(L2):
+       mov     6, %l0
+       cmp     %l0, %g4
+       bge     L(L49)
+       ld      [%i0+24], %g1
+L(L7):
+       sll     %l0, 2, %g3
+       ld      [%g1+%g3], %o7
+       add     %l0, 1, %l0
+       cmp     %l0, %g4
+       bl      L(L7)
+       st      %o7, [%l1+%g3]
+L(L49):
+       ld      [%i0+12], %g3
+       cmp     %g3, 16
+       be,a    L(L55)
+       ld      [%i0], %g3
+       ld      [%g1+20], %o5
+L(L60):
+       ld      [%i0+4], %g3
+       ld      [%g1], %o0
+       ld      [%g1+4], %o1
+       ld      [%g1+8], %o2
+       ld      [%g1+12], %o3
+       call    %g3, 0
+       ld      [%g1+16], %o4
+       nop
+       ld      [%i0+12], %o7
+       cmp     %o7, 1
+       be      L(L10)
+       mov     %o0, %l0
+       cmp     %o7, 0
+       be,a    L(L59)
+       ld      [%i0+8], %g3
+       cmp     %o7, 2
+       be      L(L53)
+       cmp     %o7, 3
+       be      L(L53)
+       cmp     %o7, 4
+       be      L(L53)
+       cmp     %o7, 5
+       be      L(L52)
+       cmp     %o7, 6
+       be      L(L52)
+       cmp     %o7, 7
+       be      L(L51)
+       cmp     %o7, 8
+       be      L(L51)
+       cmp     %o7, 9
+       be      L(L51)
+       cmp     %o7, 10
+       be      L(L51)
+       add     %o7, -11, %g3
+       cmp     %g3, 1
+       bgu     L(L31)
+       cmp     %o7, 13
+       ld      [%i0+8], %g3
+       st      %o0, [%g3]
+       b       L(L10)
+       st      %o1, [%g3+4]
+L(L31):
+       be      L(L56)
+       cmp     %o7, 14
+       be      L(L57)
+       cmp     %o7, 15
+       be      L(L51)
+       cmp     %o7, 16
+       bne     L(L10)
+       nop
+       ld      [%i0], %g3
+       andcc   %g3, 2, %g0
+       be      L(L10)
+       nop
+       ld      [%i0+16], %g3
+       cmp     %g3, 1
+       be      L(L53)
+       cmp     %g3, 2
+       be      L(L52)
+       cmp     %g3, 4
+       bne     L(L10)
+       nop
+L(L51):
+       ld      [%i0+8], %g3
+L(L59):
+       b       L(L10)
+       st      %l0, [%g3]
+L(L52):
+       ld      [%i0+8], %g3
+       b       L(L10)
+       sth     %l0, [%g3]
+L(L53):
+       ld      [%i0+8], %g3
+       b       L(L10)
+       stb     %l0, [%g3]
+L(L57):
+       ld      [%i0+8], %g3
+       b       L(L10)
+       std     %f0, [%g3]
+L(L56):
+       ld      [%i0], %g3
+       andcc   %g3, 32, %g0
+       bne,a   L(L34)
+       fdtos   %f0, %f0
+L(L34):
+       ld      [%i0+8], %g3
+       b       L(L10)
+       st      %f0, [%g3]
+L(L55):
+       andcc   %g3, 16, %g0
+       be,a    L(L60)
+       ld      [%g1+20], %o5
+       b       L(L58)
+       ld      [%i0+16], %l0
+L(L54):
+       ld      [%i0+8], %g3
+       b       L(L2)
+       st      %g3, [%sp+64]
+L(L58):
+       sethi   %hi(-1614774272), %g3
+       sethi   %hi(16777216), %o7
+       st      %g3, [%fp-32]
+       st      %o7, [%fp-28]
+       sethi   %hi(-1341120512), %o7
+       sethi   %hi(-2117607424), %g3
+       st      %o7, [%fp-20]
+       or      %g3, 8, %g3
+       and     %l0, 4095, %l0
+       st      %g3, [%fp-16]
+       sethi   %hi(-2115502080), %o7
+       st      %l0, [%fp-24]
+       st      %o7, [%fp-12]
+       add     %fp, -32, %g3
+       iflush %g3
+       add     %fp, -24, %o7
+       iflush %o7
+       add     %fp, -16, %g3
+       iflush %g3
+       add     %fp, -12, %o7
+       iflush %o7
+       ld      [%g1+20], %o5
+       ld      [%i0+4], %g2
+       ld      [%g1], %o0
+       ld      [%g1+4], %o1
+       ld      [%g1+8], %o2
+       ld      [%g1+12], %o3
+       jmp     %fp-32
+       ld      [%g1+16], %o4
+L(L10):
+       ret
+       restore %g0, 0, %o0
+L(Lfe1):
+       FUNEND(avcall_call)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-sparc.c b/avcall/avcall-sparc.c
new file mode 100644 (file)
index 0000000..64e649b
--- /dev/null
@@ -0,0 +1,192 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for a Sun4 Sparc with gcc/sun-cc.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  Sparc Argument Passing Conventions
+
+  The first 6 words of arguments are passed in integer registers o0-o5
+  regardless of type or alignment.  (Registers are windowed: o0-o5 become
+  i0-i5 if the called function executes a ‘save’ instruction.)  Remaining
+  arguments are pushed onto the stack starting at a fixed offset
+  ("argframe"). Space is left on the stack frame for temporary storage of
+  the register arguments as well.
+
+  Doubles may be cut in half and misaligned.  Shorter integers are
+  always promoted to word-length.  Functions with K&R-style declarations
+  and float args pass them as doubles and truncate them on function entry.
+  Structures are passed as pointers to a local copy of the structure made
+  by the caller.
+
+  Integers and pointers are returned in o0, floats in f0, doubles in
+  f0/f1.  If the function returns a structure a pointer to space
+  allocated by the caller is pushed onto the stack immediately
+  before the function arguments. Gcc without -fpcc-struct-return returns
+  <= 4 byte structures as integers.
+
+  Sun cc allocates temporary space for a returned structure just below
+  the current frame pointer $fp (the $sp of the caller), and the caller
+  must copy them from there. It also returns the temp address in $o0, but
+  that gets nuked in the return in the code below so we can't use it.
+  **The Sun cc struct return stuff below is a kludge**, but seems to work
+  on the test cases...
+
+  Compile this routine with gcc for the __asm__ extensions and with
+  optimisation on (-O or -O2 or -g -O) so that argframe is set to the
+  correct offset. (%sp is used differently in non-optimized code).
+  For Sun cc, use the pre-compiled assembler version of this routine.
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+register void* callee  __asm__("%g2");  /* any global or local register */
+register __avword o0   __asm__("%o0");
+register __avword o1   __asm__("%o1");
+register __avword o2   __asm__("%o2");
+register __avword o3   __asm__("%o3");
+register __avword o4   __asm__("%o4");
+register __avword o5   __asm__("%o5");
+
+int
+avcall_call(av_alist* list)
+{
+  /*?? We probably need to make space for Sun cc
+    struct return somewhere here. */
+  register __avword* sp        __asm__("%sp");  /* C names for registers */
+  register float fret  __asm__("%f0");  /* %f0 */
+  register double dret __asm__("%f0");  /* %f0,%f1 */
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword trampoline[6];              /* room for a trampoline */
+  __avword space[__AV_ALIST_WORDS];    /* space for callee's stack frame */
+  __avword *argframe = sp + 17;                /* stack offset for argument list */
+  int arglen = l->aptr - l->args;
+  __avword i;
+
+  if (l->rtype == __AVstruct)
+    argframe[-1] = (__avword)l->raddr; /* push struct return address */
+
+  {
+    int i;
+    for (i = 6; i < arglen; i++)       /* push excess function args */
+      argframe[i] = l->args[i];
+  }
+
+  if ((l->rtype == __AVstruct) && (l->flags & __AV_SUNPROCC_STRUCT_RETURN))
+    /* SUNWspro cc compiled functions don't copy the structure to the area
+     * pointed to by argframe[-1] unless the caller has a proper "unimp n"
+     * instruction. We generate the calling instructions on the stack. */
+    {
+      trampoline[0] = 0x9FC08000;      /* call %g2     */
+      trampoline[1] = 0x01000000;      /* nop          */
+      trampoline[2] = l->rsize & 0xFFF;        /* unimp n      */
+      trampoline[3] = 0xB0102000;       /* mov 0,%i0    */
+      trampoline[4] = 0x81C7E008;       /* ret          */
+      trampoline[5] = 0x81E80000;       /* restore      */
+      __asm__ __volatile__ ("iflush %0" : : "r" (&trampoline[0]));
+      __asm__ __volatile__ ("iflush %0" : : "r" (&trampoline[2]));
+      __asm__ __volatile__ ("iflush %0" : : "r" (&trampoline[4]));
+      __asm__ __volatile__ ("iflush %0" : : "r" (&trampoline[5]));
+      o0 = l->args[0]; o1 = l->args[1]; o2 = l->args[2];
+      o3 = l->args[3]; o4 = l->args[4]; o5 = l->args[5];
+      callee = l->func;
+      goto *(void*)trampoline;
+    }
+
+                                       /* call function with 1st 6 args */
+  i = ({ register __avword iret __asm__("%o0");
+         iret = (*l->func)(l->args[0], l->args[1], l->args[2],
+                          l->args[3], l->args[4], l->args[5]);
+         asm ("nop");  /* struct returning functions skip this instruction */
+         iret;
+       });
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, i);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, i);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, i);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, i);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, i);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, i);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, i);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, i);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, i);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, i);
+  } else
+  if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) {
+    void* raddr = l->raddr;
+    ((__avword*)raddr)[0] = i;
+    ((__avword*)raddr)[1] = o1;
+  } else
+  if (l->rtype == __AVfloat) {
+    /* old Sun cc returns floats as doubles */
+    if (l->flags & __AV_SUNCC_FLOAT_RETURN) {
+      RETURN(float, (float)dret);
+    } else {
+      RETURN(float, fret);
+    }
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, dret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, i);
+  } else
+  if (l->rtype == __AVstruct) {
+    if (l->flags & __AV_SMALL_STRUCT_RETURN) {
+      if (l->rsize == sizeof(char)) {
+        RETURN(char, i);
+      } else
+      if (l->rsize == sizeof(short)) {
+        RETURN(short, i);
+      } else
+      if (l->rsize == sizeof(int)) {
+        RETURN(int, i);
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-sparc64-linux.s b/avcall/avcall-sparc64-linux.s
new file mode 100644 (file)
index 0000000..1f9781e
--- /dev/null
@@ -0,0 +1,525 @@
+       .file   "avcall-sparc64.c"
+       .section        ".text"
+       .align 4
+       .global avcall_call
+       .type   avcall_call, #function
+       .proc   04
+avcall_call:
+       .register       %g2, #scratch
+       .register       %g3, #scratch
+       save    %sp, -192, %sp
+       ldx     [%i0+48], %g2
+       ldx     [%i0+40], %g1
+       lduw    [%i0+68], %g3
+       sub     %g1, %g2, %g1
+       cmp     %g3, 0
+       be,pt   %icc, .LL2
+        srlx   %g1, 3, %o7
+       andcc   %g3, 1, %g0
+       bne,pt  %xcc, .LL100
+        andcc  %g3, 2, %g0
+       bne,pt  %xcc, .LL101
+        andcc  %g3, 4, %g0
+.LL130:
+       bne,pt  %xcc, .LL102
+        andcc  %g3, 8, %g0
+.LL129:
+       bne,pt  %xcc, .LL103
+        andcc  %g3, 16, %g0
+.LL128:
+       bne,pt  %xcc, .LL104
+        andcc  %g3, 32, %g0
+.LL127:
+       bne,pt  %xcc, .LL105
+        andcc  %g3, 64, %g0
+.LL126:
+       bne,pt  %xcc, .LL106
+        andcc  %g3, 128, %g0
+.LL125:
+       bne,pt  %xcc, .LL107
+        andcc  %g3, 256, %g0
+.LL124:
+       bne,pt  %xcc, .LL108
+        andcc  %g3, 512, %g0
+.LL123:
+       bne,pt  %xcc, .LL109
+        andcc  %g3, 1024, %g0
+.LL134:
+       bne,pt  %xcc, .LL110
+        andcc  %g3, 2048, %g0
+.LL133:
+       bne,pt  %xcc, .LL111
+        sethi  %hi(4096), %g1
+.LL132:
+       andcc   %g3, %g1, %g0
+       bne,pt  %icc, .LL112
+        sethi  %hi(8192), %g1
+.LL131:
+       andcc   %g3, %g1, %g0
+       bne,pt  %icc, .LL113
+        sethi  %hi(16384), %g1
+.LL136:
+       andcc   %g3, %g1, %g0
+       bne,pt  %icc, .LL114
+        sethi  %hi(32768), %g1
+.LL135:
+       andcc   %g3, %g1, %g0
+       bne,pt  %icc, .LL115
+        nop
+.LL2:
+       cmp     %o7, 6
+.LL137:
+       bg,pn   %icc, .LL120
+        add    %o7, -6, %g1
+       ldx     [%i0+48], %g3
+.LL122:
+       ldx     [%g3+40], %o5
+.LL119:
+       ldx     [%i0+8], %g1
+       ldx     [%g3], %o0
+       ldx     [%g3+8], %o1
+       ldx     [%g3+16], %o2
+       ldx     [%g3+24], %o3
+       call    %g1, 0
+        ldx    [%g3+32], %o4
+       mov     %o0, %l3
+       nop
+       lduw    [%i0+24], %g1
+       cmp     %g1, 1
+       be,pn   %icc, .LL38
+        cmp    %g1, 0
+       be,a,pt %icc, .LL121
+        ldx    [%i0+16], %g1
+       cmp     %g1, 2
+       be,pn   %icc, .LL92
+        cmp    %g1, 3
+       be,pn   %icc, .LL92
+        cmp    %g1, 4
+       be,pn   %icc, .LL92
+        cmp    %g1, 5
+       be,pn   %icc, .LL93
+        cmp    %g1, 6
+       be,pn   %icc, .LL93
+        cmp    %g1, 7
+       be,pn   %icc, .LL94
+        cmp    %g1, 8
+       be,pn   %icc, .LL94
+        cmp    %g1, 9
+       be,pn   %icc, .LL98
+        cmp    %g1, 10
+       be,pn   %icc, .LL98
+        cmp    %g1, 11
+       be,pn   %icc, .LL98
+        cmp    %g1, 12
+       be,pn   %icc, .LL98
+        cmp    %g1, 13
+       be,pn   %icc, .LL117
+        cmp    %g1, 14
+       be,pn   %icc, .LL118
+        cmp    %g1, 15
+       be,pn   %icc, .LL98
+        cmp    %g1, 16
+       bne,pt  %icc, .LL38
+        nop
+       lduw    [%i0], %g1
+       andcc   %g1, 512, %g0
+       be,pn   %xcc, .LL38
+        nop
+       ldx     [%i0+32], %g2
+       add     %g2, -1, %g1
+       cmp     %g1, 31
+       bgu,pn  %xcc, .LL38
+        cmp    %g2, 8
+       ldx     [%i0+16], %g1
+       and     %g1, 7, %g5
+       and     %g1, -8, %i0
+       bgu,pt  %xcc, .LL73
+        add    %g2, %g5, %g4
+       cmp     %g4, 8
+       bgu,pt  %xcc, .LL75
+        sllx   %g5, 3, %g2
+       sllx    %g5, 3, %g3
+       sllx    %g4, 3, %g4
+       ldx     [%i0], %g5
+       srax    %o0, %g3, %o7
+       sub     %g0, %g4, %g4
+       xor     %g5, %o7, %o7
+       xnor    %g0, %g3, %g3
+       mov     2, %g1
+       mov     1, %g2
+       sllx    %g1, %g3, %g1
+       sllx    %g2, %g4, %g2
+       sub     %g1, %g2, %g1
+       and     %g1, %o7, %g1
+       xor     %g5, %g1, %g5
+       stx     %g5, [%i0]
+.LL38:
+       return  %i7+8
+        mov    0, %o0
+.LL98:
+       ldx     [%i0+16], %g1
+.LL121:
+       stx     %l3, [%g1]
+       return  %i7+8
+        mov    0, %o0
+.LL115:
+       ldd [%g2+120],%f30
+       cmp     %o7, 6
+       ble,a,pt %icc, .LL122
+        ldx    [%i0+48], %g3
+       add     %o7, -6, %g1
+.LL120:
+       sra     %g1, 0, %g1
+       sllx    %g1, 3, %g1
+       add     %g1, 15, %g1
+       and     %g1, -16, %g1
+       mov     6, %g4
+       sub     %sp, %g1, %sp
+       ldx     [%i0+48], %g3
+       add     %sp, 2238, %g1
+       and     %g1, -16, %g1
+       add     %g1, -48, %g5
+.LL37:
+       sra     %g4, 0, %g1
+       add     %g4, 1, %g4
+       sllx    %g1, 3, %g1
+       cmp     %o7, %g4
+       ldx     [%g1+%g3], %g2
+       bne,pt  %icc, .LL37
+        stx    %g2, [%g5+%g1]
+       ba,pt   %xcc, .LL119
+        ldx    [%g3+40], %o5
+.LL107:
+       ldd [%g2+56],%f14
+       andcc   %g3, 256, %g0
+       be,pt   %xcc, .LL123
+        andcc  %g3, 512, %g0
+       ba,pt   %xcc, .LL108
+        nop
+.LL106:
+       ldd [%g2+48],%f12
+       andcc   %g3, 128, %g0
+       be,pt   %xcc, .LL124
+        andcc  %g3, 256, %g0
+       ba,pt   %xcc, .LL107
+        nop
+.LL105:
+       ldd [%g2+40],%f10
+       andcc   %g3, 64, %g0
+       be,pt   %xcc, .LL125
+        andcc  %g3, 128, %g0
+       ba,pt   %xcc, .LL106
+        nop
+.LL104:
+       ldd [%g2+32],%f8
+       andcc   %g3, 32, %g0
+       be,pt   %xcc, .LL126
+        andcc  %g3, 64, %g0
+       ba,pt   %xcc, .LL105
+        nop
+.LL103:
+       ldd [%g2+24],%f6
+       andcc   %g3, 16, %g0
+       be,pt   %xcc, .LL127
+        andcc  %g3, 32, %g0
+       ba,pt   %xcc, .LL104
+        nop
+.LL102:
+       ldd [%g2+16],%f4
+       andcc   %g3, 8, %g0
+       be,pt   %xcc, .LL128
+        andcc  %g3, 16, %g0
+       ba,pt   %xcc, .LL103
+        nop
+.LL101:
+       ldd [%g2+8],%f2
+       andcc   %g3, 4, %g0
+       be,pt   %xcc, .LL129
+        andcc  %g3, 8, %g0
+       ba,pt   %xcc, .LL102
+        nop
+.LL100:
+       ldd [%g2+0],%f0
+       andcc   %g3, 2, %g0
+       be,pt   %xcc, .LL130
+        andcc  %g3, 4, %g0
+       ba,pt   %xcc, .LL101
+        nop
+.LL111:
+       ldd [%g2+88],%f22
+       sethi   %hi(4096), %g1
+       andcc   %g3, %g1, %g0
+       be,pt   %icc, .LL131
+        sethi  %hi(8192), %g1
+       ba,pt   %xcc, .LL112
+        nop
+.LL110:
+       ldd [%g2+80],%f20
+       andcc   %g3, 2048, %g0
+       be,pt   %xcc, .LL132
+        sethi  %hi(4096), %g1
+       ba,pt   %xcc, .LL111
+        nop
+.LL109:
+       ldd [%g2+72],%f18
+       andcc   %g3, 1024, %g0
+       be,pt   %xcc, .LL133
+        andcc  %g3, 2048, %g0
+       ba,pt   %xcc, .LL110
+        nop
+.LL108:
+       ldd [%g2+64],%f16
+       andcc   %g3, 512, %g0
+       be,pt   %xcc, .LL134
+        andcc  %g3, 1024, %g0
+       ba,pt   %xcc, .LL109
+        nop
+.LL113:
+       ldd [%g2+104],%f26
+       sethi   %hi(16384), %g1
+       andcc   %g3, %g1, %g0
+       be,pt   %icc, .LL135
+        sethi  %hi(32768), %g1
+       ba,pt   %xcc, .LL114
+        nop
+.LL112:
+       ldd [%g2+96],%f24
+       sethi   %hi(8192), %g1
+       andcc   %g3, %g1, %g0
+       be,pt   %icc, .LL136
+        sethi  %hi(16384), %g1
+       ba,pt   %xcc, .LL113
+        nop
+.LL114:
+       ldd [%g2+112],%f28
+       sethi   %hi(32768), %g1
+       andcc   %g3, %g1, %g0
+       be,pt   %icc, .LL137
+        cmp    %o7, 6
+       ba,pt   %xcc, .LL115
+        nop
+.LL92:
+       ldx     [%i0+16], %g1
+       stb     %l3, [%g1]
+       return  %i7+8
+        mov    0, %o0
+.LL93:
+       ldx     [%i0+16], %g1
+       ba,pt   %xcc, .LL38
+        sth    %l3, [%g1]
+.LL94:
+       ldx     [%i0+16], %g1
+       ba,pt   %xcc, .LL38
+        st     %l3, [%g1]
+.LL117:
+       ldx     [%i0+16], %g1
+       ba,pt   %xcc, .LL38
+        st     %f0, [%g1]
+.LL118:
+       ldx     [%i0+16], %g1
+       ba,pt   %xcc, .LL38
+        std    %f0, [%g1]
+.LL75:
+       sllx    %g4, 3, %l0
+       ldx     [%i0], %g5
+       srax    %o0, %g2, %g4
+       sub     %g0, %g2, %g3
+       xor     %g5, %g4, %g4
+       xnor    %g0, %g2, %g2
+       mov     2, %g1
+       sllx    %g1, %g2, %g1
+       add     %g1, -1, %g1
+       and     %g1, %g4, %g1
+       ldx     [%i0+8], %o7
+       xor     %g5, %g1, %g5
+       sub     %g0, %l0, %l0
+       sllx    %o0, %g3, %g3
+       mov     -1, %g1
+       xor     %o7, %g3, %g3
+       sllx    %g1, %l0, %g1
+       stx     %g5, [%i0]
+       and     %g1, %g3, %g1
+       xor     %o7, %g1, %o7
+       ba,pt   %xcc, .LL38
+        stx    %o7, [%i0+8]
+.LL73:
+       cmp     %g2, 16
+       bgu,pt  %xcc, .LL77
+        cmp    %g2, 24
+       sll     %g5, 3, %l2
+       xnor    %g0, %l2, %g2
+       ldx     [%i0], %g3
+       mov     2, %g1
+       cmp     %g4, 16
+       sllx    %g1, %g2, %g1
+       srax    %o0, %l2, %g2
+       add     %g1, -1, %g1
+       xor     %g3, %g2, %g2
+       and     %g1, %g2, %g1
+       xor     %g3, %g1, %g3
+       bgu,pt  %xcc, .LL79
+        stx    %g3, [%i0]
+       sllx    %g5, 2, %g5
+       mov     32, %g2
+       sub     %g2, %g5, %g2
+       ldx     [%i0+8], %g3
+       sllx    %o0, %g2, %g1
+       sllx    %g4, 3, %g4
+       sllx    %g1, %g2, %g1
+       srax    %o1, %l2, %o7
+       sub     %g0, %g4, %g4
+       or      %g1, %o7, %g1
+       mov     -1, %g2
+       xor     %g3, %g1, %g1
+       sllx    %g2, %g4, %g2
+       and     %g2, %g1, %g2
+       xor     %g3, %g2, %g3
+       ba,pt   %xcc, .LL38
+        stx    %g3, [%i0+8]
+.LL77:
+       bgu,pt  %xcc, .LL81
+        sll    %g5, 3, %l4
+       sll     %g5, 3, %l2
+       xnor    %g0, %l2, %g2
+       ldx     [%i0], %g3
+       mov     2, %g1
+       cmp     %g4, 24
+       sllx    %g1, %g2, %g1
+       srax    %o0, %l2, %g2
+       add     %g1, -1, %g1
+       xor     %g3, %g2, %g2
+       and     %g1, %g2, %g1
+       xor     %g3, %g1, %g3
+       bgu,pt  %xcc, .LL83
+        stx    %g3, [%i0]
+       sllx    %g5, 2, %g2
+       mov     32, %g1
+       sub     %g1, %g2, %g1
+       ldx     [%i0+16], %o7
+       sllx    %g4, 3, %g5
+       sllx    %o0, %g1, %g3
+       sllx    %o1, %g1, %g2
+       sllx    %g3, %g1, %g3
+       sllx    %g2, %g1, %g2
+       srax    %o2, %l2, %l0
+       sub     %g0, %g5, %g5
+       or      %g2, %l0, %g2
+       srax    %o1, %l2, %g4
+       xor     %o7, %g2, %g2
+       or      %g3, %g4, %g3
+       mov     -1, %g1
+       stx     %g3, [%i0+8]
+       sllx    %g1, %g5, %g1
+       and     %g1, %g2, %g1
+       xor     %o7, %g1, %o7
+       ba,pt   %xcc, .LL38
+        stx    %o7, [%i0+16]
+.LL79:
+       srax    %o1, %l2, %g5
+       mov     64, %g1
+       sub     %g1, %l2, %g1
+       sllx    %o1, %g1, %g2
+       sllx    %o0, %g1, %g1
+       or      %g1, %g5, %g1
+       sllx    %g4, 3, %g3
+       stx     %g1, [%i0+8]
+       ldx     [%i0+16], %g4
+       sub     %g0, %g3, %g3
+       xor     %g4, %g2, %g2
+       mov     -1, %g1
+       sllx    %g1, %g3, %g1
+       and     %g1, %g2, %g1
+       xor     %g4, %g1, %g4
+       ba,pt   %xcc, .LL38
+        stx    %g4, [%i0+16]
+.LL83:
+       sllx    %g4, 3, %g5
+       srax    %o2, %l2, %l0
+       mov     64, %g1
+       sub     %g1, %l2, %g1
+       sllx    %o2, %g1, %g4
+       sllx    %o0, %g1, %g2
+       sllx    %o1, %g1, %g1
+       or      %g1, %l0, %g1
+       ldx     [%i0+24], %o7
+       sub     %g0, %g5, %g5
+       xor     %o7, %g4, %g4
+       stx     %g1, [%i0+16]
+       srax    %o1, %l2, %g3
+       mov     -1, %g1
+       or      %g2, %g3, %g2
+       sllx    %g1, %g5, %g1
+       stx     %g2, [%i0+8]
+       and     %g1, %g4, %g1
+       xor     %o7, %g1, %o7
+       ba,pt   %xcc, .LL38
+        stx    %o7, [%i0+24]
+.LL81:
+       xnor    %g0, %l4, %g2
+       ldx     [%i0], %g3
+       mov     2, %g1
+       cmp     %g4, 32
+       sllx    %g1, %g2, %g1
+       srax    %o0, %l4, %g2
+       add     %g1, -1, %g1
+       xor     %g3, %g2, %g2
+       and     %g1, %g2, %g1
+       xor     %g3, %g1, %g3
+       bgu,pt  %xcc, .LL85
+        stx    %g3, [%i0]
+       sllx    %g5, 2, %g2
+       mov     32, %g1
+       sub     %g1, %g2, %g1
+       ldx     [%i0+24], %l0
+       sllx    %g4, 3, %l1
+       sllx    %o0, %g1, %g3
+       sllx    %o1, %g1, %g4
+       sllx    %g3, %g1, %g3
+       sllx    %g4, %g1, %g4
+       sllx    %o2, %g1, %g2
+       srax    %o3, %l4, %l2
+       sllx    %g2, %g1, %g2
+       sub     %g0, %l1, %l1
+       or      %g2, %l2, %g2
+       srax    %o1, %l4, %g5
+       xor     %l0, %g2, %g2
+       or      %g3, %g5, %g3
+       srax    %o2, %l4, %o7
+       mov     -1, %g1
+       or      %g4, %o7, %g4
+       sllx    %g1, %l1, %g1
+       stx     %g3, [%i0+8]
+       and     %g1, %g2, %g1
+       stx     %g4, [%i0+16]
+       xor     %l0, %g1, %l0
+       ba,pt   %xcc, .LL38
+        stx    %l0, [%i0+24]
+.LL85:
+       srax    %o3, %l4, %l2
+       mov     64, %g1
+       sub     %g1, %l4, %g1
+       sllx    %o3, %g1, %o7
+       sllx    %o0, %g1, %g2
+       sllx    %o1, %g1, %g3
+       sllx    %o2, %g1, %g1
+       or      %g1, %l2, %g1
+       ldx     [%i0+32], %l0
+       sllx    %g4, 3, %l1
+       xor     %l0, %o7, %o7
+       sub     %g0, %l1, %l1
+       stx     %g1, [%i0+24]
+       srax    %o1, %l4, %g4
+       srax    %o2, %l4, %g5
+       or      %g2, %g4, %g2
+       or      %g3, %g5, %g3
+       mov     -1, %g1
+       stx     %g2, [%i0+8]
+       sllx    %g1, %l1, %g1
+       stx     %g3, [%i0+16]
+       and     %g1, %o7, %g1
+       xor     %l0, %g1, %l0
+       ba,pt   %xcc, .LL38
+        stx    %l0, [%i0+32]
+       .size   avcall_call, .-avcall_call
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        ".note.GNU-stack"
diff --git a/avcall/avcall-sparc64-macro.S b/avcall/avcall-sparc64-macro.S
new file mode 100644 (file)
index 0000000..e538a4e
--- /dev/null
@@ -0,0 +1,526 @@
+#include "asm-sparc.h"
+       .section        ".text"
+       .align 4
+       .global C(avcall_call)
+       DECLARE_FUNCTION(avcall_call)
+       .proc   04
+FUNBEGIN(avcall_call)
+       .register       %g2, $scratch
+       .register       %g3, $scratch
+       save    %sp, -192, %sp
+       ldx     [%i0+48], %g2
+       ldx     [%i0+40], %g1
+       lduw    [%i0+68], %g3
+       sub     %g1, %g2, %g1
+       cmp     %g3, 0
+       be,pt   %icc, L(L2)
+        srlx   %g1, 3, %o7
+       andcc   %g3, 1, %g0
+       bne,pt  %xcc, L(L100)
+        andcc  %g3, 2, %g0
+       bne,pt  %xcc, L(L101)
+        andcc  %g3, 4, %g0
+L(L130):
+       bne,pt  %xcc, L(L102)
+        andcc  %g3, 8, %g0
+L(L129):
+       bne,pt  %xcc, L(L103)
+        andcc  %g3, 16, %g0
+L(L128):
+       bne,pt  %xcc, L(L104)
+        andcc  %g3, 32, %g0
+L(L127):
+       bne,pt  %xcc, L(L105)
+        andcc  %g3, 64, %g0
+L(L126):
+       bne,pt  %xcc, L(L106)
+        andcc  %g3, 128, %g0
+L(L125):
+       bne,pt  %xcc, L(L107)
+        andcc  %g3, 256, %g0
+L(L124):
+       bne,pt  %xcc, L(L108)
+        andcc  %g3, 512, %g0
+L(L123):
+       bne,pt  %xcc, L(L109)
+        andcc  %g3, 1024, %g0
+L(L134):
+       bne,pt  %xcc, L(L110)
+        andcc  %g3, 2048, %g0
+L(L133):
+       bne,pt  %xcc, L(L111)
+        sethi  %hi(4096), %g1
+L(L132):
+       andcc   %g3, %g1, %g0
+       bne,pt  %icc, L(L112)
+        sethi  %hi(8192), %g1
+L(L131):
+       andcc   %g3, %g1, %g0
+       bne,pt  %icc, L(L113)
+        sethi  %hi(16384), %g1
+L(L136):
+       andcc   %g3, %g1, %g0
+       bne,pt  %icc, L(L114)
+        sethi  %hi(32768), %g1
+L(L135):
+       andcc   %g3, %g1, %g0
+       bne,pt  %icc, L(L115)
+        nop
+L(L2):
+       cmp     %o7, 6
+L(L137):
+       bg,pn   %icc, L(L120)
+        add    %o7, -6, %g1
+       ldx     [%i0+48], %g3
+L(L122):
+       ldx     [%g3+40], %o5
+L(L119):
+       ldx     [%i0+8], %g1
+       ldx     [%g3], %o0
+       ldx     [%g3+8], %o1
+       ldx     [%g3+16], %o2
+       ldx     [%g3+24], %o3
+       call    %g1, 0
+        ldx    [%g3+32], %o4
+       mov     %o0, %l3
+       nop
+       lduw    [%i0+24], %g1
+       cmp     %g1, 1
+       be,pn   %icc, L(L38)
+        cmp    %g1, 0
+       be,a,pt %icc, L(L121)
+        ldx    [%i0+16], %g1
+       cmp     %g1, 2
+       be,pn   %icc, L(L92)
+        cmp    %g1, 3
+       be,pn   %icc, L(L92)
+        cmp    %g1, 4
+       be,pn   %icc, L(L92)
+        cmp    %g1, 5
+       be,pn   %icc, L(L93)
+        cmp    %g1, 6
+       be,pn   %icc, L(L93)
+        cmp    %g1, 7
+       be,pn   %icc, L(L94)
+        cmp    %g1, 8
+       be,pn   %icc, L(L94)
+        cmp    %g1, 9
+       be,pn   %icc, L(L98)
+        cmp    %g1, 10
+       be,pn   %icc, L(L98)
+        cmp    %g1, 11
+       be,pn   %icc, L(L98)
+        cmp    %g1, 12
+       be,pn   %icc, L(L98)
+        cmp    %g1, 13
+       be,pn   %icc, L(L117)
+        cmp    %g1, 14
+       be,pn   %icc, L(L118)
+        cmp    %g1, 15
+       be,pn   %icc, L(L98)
+        cmp    %g1, 16
+       bne,pt  %icc, L(L38)
+        nop
+       lduw    [%i0], %g1
+       andcc   %g1, 512, %g0
+       be,pn   %xcc, L(L38)
+        nop
+       ldx     [%i0+32], %g2
+       add     %g2, -1, %g1
+       cmp     %g1, 31
+       bgu,pn  %xcc, L(L38)
+        cmp    %g2, 8
+       ldx     [%i0+16], %g1
+       and     %g1, 7, %g5
+       and     %g1, -8, %i0
+       bgu,pt  %xcc, L(L73)
+        add    %g2, %g5, %g4
+       cmp     %g4, 8
+       bgu,pt  %xcc, L(L75)
+        sllx   %g5, 3, %g2
+       sllx    %g5, 3, %g3
+       sllx    %g4, 3, %g4
+       ldx     [%i0], %g5
+       srax    %o0, %g3, %o7
+       sub     %g0, %g4, %g4
+       xor     %g5, %o7, %o7
+       xnor    %g0, %g3, %g3
+       mov     2, %g1
+       mov     1, %g2
+       sllx    %g1, %g3, %g1
+       sllx    %g2, %g4, %g2
+       sub     %g1, %g2, %g1
+       and     %g1, %o7, %g1
+       xor     %g5, %g1, %g5
+       stx     %g5, [%i0]
+L(L38):
+       return  %i7+8
+        mov    0, %o0
+L(L98):
+       ldx     [%i0+16], %g1
+L(L121):
+       stx     %l3, [%g1]
+       return  %i7+8
+        mov    0, %o0
+L(L115):
+       ldd [%g2+120],%f30
+       cmp     %o7, 6
+       ble,a,pt %icc, L(L122)
+        ldx    [%i0+48], %g3
+       add     %o7, -6, %g1
+L(L120):
+       sra     %g1, 0, %g1
+       sllx    %g1, 3, %g1
+       add     %g1, 15, %g1
+       and     %g1, -16, %g1
+       mov     6, %g4
+       sub     %sp, %g1, %sp
+       ldx     [%i0+48], %g3
+       add     %sp, 2238, %g1
+       and     %g1, -16, %g1
+       add     %g1, -48, %g5
+L(L37):
+       sra     %g4, 0, %g1
+       add     %g4, 1, %g4
+       sllx    %g1, 3, %g1
+       cmp     %o7, %g4
+       ldx     [%g1+%g3], %g2
+       bne,pt  %icc, L(L37)
+        stx    %g2, [%g5+%g1]
+       ba,pt   %xcc, L(L119)
+        ldx    [%g3+40], %o5
+L(L107):
+       ldd [%g2+56],%f14
+       andcc   %g3, 256, %g0
+       be,pt   %xcc, L(L123)
+        andcc  %g3, 512, %g0
+       ba,pt   %xcc, L(L108)
+        nop
+L(L106):
+       ldd [%g2+48],%f12
+       andcc   %g3, 128, %g0
+       be,pt   %xcc, L(L124)
+        andcc  %g3, 256, %g0
+       ba,pt   %xcc, L(L107)
+        nop
+L(L105):
+       ldd [%g2+40],%f10
+       andcc   %g3, 64, %g0
+       be,pt   %xcc, L(L125)
+        andcc  %g3, 128, %g0
+       ba,pt   %xcc, L(L106)
+        nop
+L(L104):
+       ldd [%g2+32],%f8
+       andcc   %g3, 32, %g0
+       be,pt   %xcc, L(L126)
+        andcc  %g3, 64, %g0
+       ba,pt   %xcc, L(L105)
+        nop
+L(L103):
+       ldd [%g2+24],%f6
+       andcc   %g3, 16, %g0
+       be,pt   %xcc, L(L127)
+        andcc  %g3, 32, %g0
+       ba,pt   %xcc, L(L104)
+        nop
+L(L102):
+       ldd [%g2+16],%f4
+       andcc   %g3, 8, %g0
+       be,pt   %xcc, L(L128)
+        andcc  %g3, 16, %g0
+       ba,pt   %xcc, L(L103)
+        nop
+L(L101):
+       ldd [%g2+8],%f2
+       andcc   %g3, 4, %g0
+       be,pt   %xcc, L(L129)
+        andcc  %g3, 8, %g0
+       ba,pt   %xcc, L(L102)
+        nop
+L(L100):
+       ldd [%g2+0],%f0
+       andcc   %g3, 2, %g0
+       be,pt   %xcc, L(L130)
+        andcc  %g3, 4, %g0
+       ba,pt   %xcc, L(L101)
+        nop
+L(L111):
+       ldd [%g2+88],%f22
+       sethi   %hi(4096), %g1
+       andcc   %g3, %g1, %g0
+       be,pt   %icc, L(L131)
+        sethi  %hi(8192), %g1
+       ba,pt   %xcc, L(L112)
+        nop
+L(L110):
+       ldd [%g2+80],%f20
+       andcc   %g3, 2048, %g0
+       be,pt   %xcc, L(L132)
+        sethi  %hi(4096), %g1
+       ba,pt   %xcc, L(L111)
+        nop
+L(L109):
+       ldd [%g2+72],%f18
+       andcc   %g3, 1024, %g0
+       be,pt   %xcc, L(L133)
+        andcc  %g3, 2048, %g0
+       ba,pt   %xcc, L(L110)
+        nop
+L(L108):
+       ldd [%g2+64],%f16
+       andcc   %g3, 512, %g0
+       be,pt   %xcc, L(L134)
+        andcc  %g3, 1024, %g0
+       ba,pt   %xcc, L(L109)
+        nop
+L(L113):
+       ldd [%g2+104],%f26
+       sethi   %hi(16384), %g1
+       andcc   %g3, %g1, %g0
+       be,pt   %icc, L(L135)
+        sethi  %hi(32768), %g1
+       ba,pt   %xcc, L(L114)
+        nop
+L(L112):
+       ldd [%g2+96],%f24
+       sethi   %hi(8192), %g1
+       andcc   %g3, %g1, %g0
+       be,pt   %icc, L(L136)
+        sethi  %hi(16384), %g1
+       ba,pt   %xcc, L(L113)
+        nop
+L(L114):
+       ldd [%g2+112],%f28
+       sethi   %hi(32768), %g1
+       andcc   %g3, %g1, %g0
+       be,pt   %icc, L(L137)
+        cmp    %o7, 6
+       ba,pt   %xcc, L(L115)
+        nop
+L(L92):
+       ldx     [%i0+16], %g1
+       stb     %l3, [%g1]
+       return  %i7+8
+        mov    0, %o0
+L(L93):
+       ldx     [%i0+16], %g1
+       ba,pt   %xcc, L(L38)
+        sth    %l3, [%g1]
+L(L94):
+       ldx     [%i0+16], %g1
+       ba,pt   %xcc, L(L38)
+        st     %l3, [%g1]
+L(L117):
+       ldx     [%i0+16], %g1
+       ba,pt   %xcc, L(L38)
+        st     %f0, [%g1]
+L(L118):
+       ldx     [%i0+16], %g1
+       ba,pt   %xcc, L(L38)
+        std    %f0, [%g1]
+L(L75):
+       sllx    %g4, 3, %l0
+       ldx     [%i0], %g5
+       srax    %o0, %g2, %g4
+       sub     %g0, %g2, %g3
+       xor     %g5, %g4, %g4
+       xnor    %g0, %g2, %g2
+       mov     2, %g1
+       sllx    %g1, %g2, %g1
+       add     %g1, -1, %g1
+       and     %g1, %g4, %g1
+       ldx     [%i0+8], %o7
+       xor     %g5, %g1, %g5
+       sub     %g0, %l0, %l0
+       sllx    %o0, %g3, %g3
+       mov     -1, %g1
+       xor     %o7, %g3, %g3
+       sllx    %g1, %l0, %g1
+       stx     %g5, [%i0]
+       and     %g1, %g3, %g1
+       xor     %o7, %g1, %o7
+       ba,pt   %xcc, L(L38)
+        stx    %o7, [%i0+8]
+L(L73):
+       cmp     %g2, 16
+       bgu,pt  %xcc, L(L77)
+        cmp    %g2, 24
+       sll     %g5, 3, %l2
+       xnor    %g0, %l2, %g2
+       ldx     [%i0], %g3
+       mov     2, %g1
+       cmp     %g4, 16
+       sllx    %g1, %g2, %g1
+       srax    %o0, %l2, %g2
+       add     %g1, -1, %g1
+       xor     %g3, %g2, %g2
+       and     %g1, %g2, %g1
+       xor     %g3, %g1, %g3
+       bgu,pt  %xcc, L(L79)
+        stx    %g3, [%i0]
+       sllx    %g5, 2, %g5
+       mov     32, %g2
+       sub     %g2, %g5, %g2
+       ldx     [%i0+8], %g3
+       sllx    %o0, %g2, %g1
+       sllx    %g4, 3, %g4
+       sllx    %g1, %g2, %g1
+       srax    %o1, %l2, %o7
+       sub     %g0, %g4, %g4
+       or      %g1, %o7, %g1
+       mov     -1, %g2
+       xor     %g3, %g1, %g1
+       sllx    %g2, %g4, %g2
+       and     %g2, %g1, %g2
+       xor     %g3, %g2, %g3
+       ba,pt   %xcc, L(L38)
+        stx    %g3, [%i0+8]
+L(L77):
+       bgu,pt  %xcc, L(L81)
+        sll    %g5, 3, %l4
+       sll     %g5, 3, %l2
+       xnor    %g0, %l2, %g2
+       ldx     [%i0], %g3
+       mov     2, %g1
+       cmp     %g4, 24
+       sllx    %g1, %g2, %g1
+       srax    %o0, %l2, %g2
+       add     %g1, -1, %g1
+       xor     %g3, %g2, %g2
+       and     %g1, %g2, %g1
+       xor     %g3, %g1, %g3
+       bgu,pt  %xcc, L(L83)
+        stx    %g3, [%i0]
+       sllx    %g5, 2, %g2
+       mov     32, %g1
+       sub     %g1, %g2, %g1
+       ldx     [%i0+16], %o7
+       sllx    %g4, 3, %g5
+       sllx    %o0, %g1, %g3
+       sllx    %o1, %g1, %g2
+       sllx    %g3, %g1, %g3
+       sllx    %g2, %g1, %g2
+       srax    %o2, %l2, %l0
+       sub     %g0, %g5, %g5
+       or      %g2, %l0, %g2
+       srax    %o1, %l2, %g4
+       xor     %o7, %g2, %g2
+       or      %g3, %g4, %g3
+       mov     -1, %g1
+       stx     %g3, [%i0+8]
+       sllx    %g1, %g5, %g1
+       and     %g1, %g2, %g1
+       xor     %o7, %g1, %o7
+       ba,pt   %xcc, L(L38)
+        stx    %o7, [%i0+16]
+L(L79):
+       srax    %o1, %l2, %g5
+       mov     64, %g1
+       sub     %g1, %l2, %g1
+       sllx    %o1, %g1, %g2
+       sllx    %o0, %g1, %g1
+       or      %g1, %g5, %g1
+       sllx    %g4, 3, %g3
+       stx     %g1, [%i0+8]
+       ldx     [%i0+16], %g4
+       sub     %g0, %g3, %g3
+       xor     %g4, %g2, %g2
+       mov     -1, %g1
+       sllx    %g1, %g3, %g1
+       and     %g1, %g2, %g1
+       xor     %g4, %g1, %g4
+       ba,pt   %xcc, L(L38)
+        stx    %g4, [%i0+16]
+L(L83):
+       sllx    %g4, 3, %g5
+       srax    %o2, %l2, %l0
+       mov     64, %g1
+       sub     %g1, %l2, %g1
+       sllx    %o2, %g1, %g4
+       sllx    %o0, %g1, %g2
+       sllx    %o1, %g1, %g1
+       or      %g1, %l0, %g1
+       ldx     [%i0+24], %o7
+       sub     %g0, %g5, %g5
+       xor     %o7, %g4, %g4
+       stx     %g1, [%i0+16]
+       srax    %o1, %l2, %g3
+       mov     -1, %g1
+       or      %g2, %g3, %g2
+       sllx    %g1, %g5, %g1
+       stx     %g2, [%i0+8]
+       and     %g1, %g4, %g1
+       xor     %o7, %g1, %o7
+       ba,pt   %xcc, L(L38)
+        stx    %o7, [%i0+24]
+L(L81):
+       xnor    %g0, %l4, %g2
+       ldx     [%i0], %g3
+       mov     2, %g1
+       cmp     %g4, 32
+       sllx    %g1, %g2, %g1
+       srax    %o0, %l4, %g2
+       add     %g1, -1, %g1
+       xor     %g3, %g2, %g2
+       and     %g1, %g2, %g1
+       xor     %g3, %g1, %g3
+       bgu,pt  %xcc, L(L85)
+        stx    %g3, [%i0]
+       sllx    %g5, 2, %g2
+       mov     32, %g1
+       sub     %g1, %g2, %g1
+       ldx     [%i0+24], %l0
+       sllx    %g4, 3, %l1
+       sllx    %o0, %g1, %g3
+       sllx    %o1, %g1, %g4
+       sllx    %g3, %g1, %g3
+       sllx    %g4, %g1, %g4
+       sllx    %o2, %g1, %g2
+       srax    %o3, %l4, %l2
+       sllx    %g2, %g1, %g2
+       sub     %g0, %l1, %l1
+       or      %g2, %l2, %g2
+       srax    %o1, %l4, %g5
+       xor     %l0, %g2, %g2
+       or      %g3, %g5, %g3
+       srax    %o2, %l4, %o7
+       mov     -1, %g1
+       or      %g4, %o7, %g4
+       sllx    %g1, %l1, %g1
+       stx     %g3, [%i0+8]
+       and     %g1, %g2, %g1
+       stx     %g4, [%i0+16]
+       xor     %l0, %g1, %l0
+       ba,pt   %xcc, L(L38)
+        stx    %l0, [%i0+24]
+L(L85):
+       srax    %o3, %l4, %l2
+       mov     64, %g1
+       sub     %g1, %l4, %g1
+       sllx    %o3, %g1, %o7
+       sllx    %o0, %g1, %g2
+       sllx    %o1, %g1, %g3
+       sllx    %o2, %g1, %g1
+       or      %g1, %l2, %g1
+       ldx     [%i0+32], %l0
+       sllx    %g4, 3, %l1
+       xor     %l0, %o7, %o7
+       sub     %g0, %l1, %l1
+       stx     %g1, [%i0+24]
+       srax    %o1, %l4, %g4
+       srax    %o2, %l4, %g5
+       or      %g2, %g4, %g2
+       or      %g3, %g5, %g3
+       mov     -1, %g1
+       stx     %g2, [%i0+8]
+       sllx    %g1, %l1, %g1
+       stx     %g3, [%i0+16]
+       and     %g1, %o7, %g1
+       xor     %l0, %g1, %l0
+       ba,pt   %xcc, L(L38)
+        stx    %l0, [%i0+32]
+       FUNEND(avcall_call)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-sparc64.c b/avcall/avcall-sparc64.c
new file mode 100644 (file)
index 0000000..6a911da
--- /dev/null
@@ -0,0 +1,521 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
+
+  Foreign function interface for a Sparc v9 in 64-bit mode with gcc.
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  Sparc 64-bit Argument Passing Conventions
+
+  The argument registers are laid out as an array of 16 elements
+  and arguments are added sequentially.  The first 6 int args and up to the
+  first 16 fp args (depending on size) are passed in regs.
+
+  Slot    Stack   Integral   Float   Float in structure   Double   Long Double
+  ----    -----   --------   -----   ------------------   ------   -----------
+   15   [SP+248]              %f31       %f30,%f31         %d30
+   14   [SP+240]              %f29       %f28,%f29         %d28       %q28
+   13   [SP+232]              %f27       %f26,%f27         %d26
+   12   [SP+224]              %f25       %f24,%f25         %d24       %q24
+   11   [SP+216]              %f23       %f22,%f23         %d22
+   10   [SP+208]              %f21       %f20,%f21         %d20       %q20
+    9   [SP+200]              %f19       %f18,%f19         %d18
+    8   [SP+192]              %f17       %f16,%f17         %d16       %q16
+    7   [SP+184]              %f15       %f14,%f15         %d14
+    6   [SP+176]              %f13       %f12,%f13         %d12       %q12
+    5   [SP+168]     %o5      %f11       %f10,%f11         %d10
+    4   [SP+160]     %o4       %f9        %f8,%f9           %d8        %q8
+    3   [SP+152]     %o3       %f7        %f6,%f7           %d6
+    2   [SP+144]     %o2       %f5        %f4,%f5           %d4        %q4
+    1   [SP+136]     %o1       %f3        %f2,%f3           %d2
+    0   [SP+128]     %o0       %f1        %f0,%f1           %d0        %q0
+
+  Here SP = %sp if -mno-stack-bias or %sp+stack_bias otherwise.
+
+  Integral arguments are always passed as 64 bit quantities appropriately
+  extended.
+
+  Passing of floating point values is handled as follows.
+  If a prototype is in scope:
+    If the value is in a named argument (i.e. not a stdarg function or a
+    value not part of the ‘...’) then the value is passed in the appropriate
+    fp reg.
+    If the value is part of the ‘...’ and is passed in one of the first 6
+    slots then the value is passed in the appropriate int reg.
+    If the value is part of the ‘...’ and is not passed in one of the first 6
+    slots then the value is passed in memory.
+  If a prototype is not in scope:
+    If the value is one of the first 6 arguments the value is passed in the
+    appropriate integer reg and the appropriate fp reg.
+    If the value is not one of the first 6 arguments the value is passed in
+    the appropriate fp reg and in memory.
+
+  Remaining arguments are pushed onto the stack starting at a fixed offset
+  Space is left on the stack frame for temporary storage of the register
+  arguments as well.
+
+  Integers shorter than ‘long’ are always promoted to word-length
+  (zero-extended or sign-extended, according to their type). Structures
+  <= 16 bytes are passed embedded in the argument sequence; bigger structures
+  are passed by reference.
+
+  Integers and pointers are returned in o0, floats in f0, doubles in
+  f0/f1.  If the function returns a structure a pointer to space
+  allocated by the caller is pushed onto the stack immediately
+  before the function arguments. Structures <= 32 bytes are returned in
+  registers (integer/float/double registers, as appropriate).
+
+  Long doubles are 16-byte aligned, but we don't deal with this here, so
+  we assume 8-byte alignment for everything.
+
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+#define OFFSETOF(struct,member) ((int)&(((struct*)0)->member))
+
+register __avword o0   __asm__("%o0");
+register __avword o1   __asm__("%o1");
+register __avword o2   __asm__("%o2");
+register __avword o3   __asm__("%o3");
+register __avword o4   __asm__("%o4");
+register __avword o5   __asm__("%o5");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword* sp        __asm__("%sp");  /* C names for registers */
+  register float fret  __asm__("%f0");  /* %f0 */
+  register double dret __asm__("%f0");  /* %f0,%f1 */
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword trampoline[6];              /* room for a trampoline */
+  int arglen = l->aptr - l->args;
+  __avword iret;
+
+  if (l->darg_mask) {
+    /* push leading float/double args */
+      __avword* a = l->args;
+    if (l->darg_mask & (1<<0))
+      __asm__("ldd [%0+%1],%%f0" : : "p" (a), "i" (0 * sizeof (__avword)));
+    if (l->darg_mask & (1<<1))
+      __asm__("ldd [%0+%1],%%f2" : : "p" (a), "i" (1 * sizeof (__avword)));
+    if (l->darg_mask & (1<<2))
+      __asm__("ldd [%0+%1],%%f4" : : "p" (a), "i" (2 * sizeof (__avword)));
+    if (l->darg_mask & (1<<3))
+      __asm__("ldd [%0+%1],%%f6" : : "p" (a), "i" (3 * sizeof (__avword)));
+    if (l->darg_mask & (1<<4))
+      __asm__("ldd [%0+%1],%%f8" : : "p" (a), "i" (4 * sizeof (__avword)));
+    if (l->darg_mask & (1<<5))
+      __asm__("ldd [%0+%1],%%f10" : : "p" (a), "i" (5 * sizeof (__avword)));
+    if (l->darg_mask & (1<<6))
+      __asm__("ldd [%0+%1],%%f12" : : "p" (a), "i" (6 * sizeof (__avword)));
+    if (l->darg_mask & (1<<7))
+      __asm__("ldd [%0+%1],%%f14" : : "p" (a), "i" (7 * sizeof (__avword)));
+    if (l->darg_mask & (1<<8))
+      __asm__("ldd [%0+%1],%%f16" : : "p" (a), "i" (8 * sizeof (__avword)));
+    if (l->darg_mask & (1<<9))
+      __asm__("ldd [%0+%1],%%f18" : : "p" (a), "i" (9 * sizeof (__avword)));
+    if (l->darg_mask & (1<<10))
+      __asm__("ldd [%0+%1],%%f20" : : "p" (a), "i" (10 * sizeof (__avword)));
+    if (l->darg_mask & (1<<11))
+      __asm__("ldd [%0+%1],%%f22" : : "p" (a), "i" (11 * sizeof (__avword)));
+    if (l->darg_mask & (1<<12))
+      __asm__("ldd [%0+%1],%%f24" : : "p" (a), "i" (12 * sizeof (__avword)));
+    if (l->darg_mask & (1<<13))
+      __asm__("ldd [%0+%1],%%f26" : : "p" (a), "i" (13 * sizeof (__avword)));
+    if (l->darg_mask & (1<<14))
+      __asm__("ldd [%0+%1],%%f28" : : "p" (a), "i" (14 * sizeof (__avword)));
+    if (l->darg_mask & (1<<15))
+      __asm__("ldd [%0+%1],%%f30" : : "p" (a), "i" (15 * sizeof (__avword)));
+  }
+
+  if (arglen > 6) {
+    /* alloca space is separated from the extra outgoing args area by
+     * the area for compiler temps (addressable with postive offsets from sp)
+     * but they shouldn't be needed for this function, so, effectively,
+     * space returned by alloca is safe to use as the area for extra args.
+     */
+    void *extra_args_area = __builtin_alloca(sizeof(__avword) * (arglen - 6));
+    __avword *argframe = (__avword *)extra_args_area - 6;
+#if 0
+    /* "by construction" */
+    assert(argframe == (void *)((unsigned long)(sp + 16)+2047));
+#endif
+
+    int i;
+    for (i = 6; i < arglen; i++)       /* push excess function args */
+      argframe[i] = l->args[i];
+  }
+
+                                       /* call function with 1st 6 args */
+  iret = ({ register __avword iretreg __asm__ ("%o0");
+            iretreg = (*l->func)(l->args[0], l->args[1], l->args[2],
+                                 l->args[3], l->args[4], l->args[5]);
+            asm __volatile__("nop");   /* struct returning functions skip this instruction */
+            iretreg;
+          });
+
+  /* save return value */
+  if (l->rtype == __AVvoid) {
+  } else
+  if (l->rtype == __AVword) {
+    RETURN(__avword, iret);
+  } else
+  if (l->rtype == __AVchar) {
+    RETURN(char, iret);
+  } else
+  if (l->rtype == __AVschar) {
+    RETURN(signed char, iret);
+  } else
+  if (l->rtype == __AVuchar) {
+    RETURN(unsigned char, iret);
+  } else
+  if (l->rtype == __AVshort) {
+    RETURN(short, iret);
+  } else
+  if (l->rtype == __AVushort) {
+    RETURN(unsigned short, iret);
+  } else
+  if (l->rtype == __AVint) {
+    RETURN(int, iret);
+  } else
+  if (l->rtype == __AVuint) {
+    RETURN(unsigned int, iret);
+  } else
+  if (l->rtype == __AVlong) {
+    RETURN(long, iret);
+  } else
+  if (l->rtype == __AVulong) {
+    RETURN(unsigned long, iret);
+  } else
+  if (l->rtype == __AVlonglong) {
+    RETURN(long long, iret);
+  } else
+  if (l->rtype == __AVulonglong) {
+    RETURN(unsigned long long, iret);
+  } else
+  if (l->rtype == __AVfloat) {
+    RETURN(float, fret);
+  } else
+  if (l->rtype == __AVdouble) {
+    RETURN(double, dret);
+  } else
+  if (l->rtype == __AVvoidp) {
+    RETURN(void*, iret);
+  } else
+  if (l->rtype == __AVstruct) {
+    if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+      /* Return structs of size <= 32 in registers. */
+      #define iret2 o1
+      #define iret3 o2
+      #define iret4 o3
+      if (l->rsize > 0 && l->rsize <= 32) {
+        void* raddr = l->raddr;
+        #if 0 /* Unoptimized */
+        if (l->rsize == 1) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+        } else
+        if (l->rsize == 2) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+        } else
+        if (l->rsize == 3) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+        } else
+        if (l->rsize == 4) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+        } else
+        if (l->rsize == 5) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+        } else
+        if (l->rsize == 6) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+          ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+        } else
+        if (l->rsize == 7) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+          ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8);
+        } else
+        if (l->rsize >= 8 && l->rsize <= 32) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24);
+          ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[7] = (unsigned char)(iret);
+          if (l->rsize == 8) {
+          } else
+          if (l->rsize == 9) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+          } else
+          if (l->rsize == 10) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+          } else
+          if (l->rsize == 11) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+          } else
+          if (l->rsize == 12) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+            ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+          } else
+          if (l->rsize == 13) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+            ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+            ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+          } else
+          if (l->rsize == 14) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+            ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+            ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+            ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+          } else
+          if (l->rsize == 15) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+            ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+            ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+            ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+            ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8);
+          } else
+          if (l->rsize >= 16 && l->rsize <= 32) {
+            ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56);
+            ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48);
+            ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40);
+            ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32);
+            ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24);
+            ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16);
+            ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8);
+            ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2);
+            if (l->rsize == 16) {
+            } else
+            if (l->rsize == 17) {
+              ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56);
+            } else
+            if (l->rsize == 18) {
+              ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56);
+              ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48);
+            } else
+            if (l->rsize == 19) {
+              ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56);
+              ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48);
+              ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40);
+            } else
+            if (l->rsize == 20) {
+              ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56);
+              ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48);
+              ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40);
+              ((unsigned char *)raddr)[16+3] = (unsigned char)(iret3>>32);
+            } else
+            if (l->rsize == 21) {
+              ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56);
+              ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48);
+              ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40);
+              ((unsigned char *)raddr)[16+3] = (unsigned char)(iret3>>32);
+              ((unsigned char *)raddr)[16+4] = (unsigned char)(iret3>>24);
+            } else
+            if (l->rsize == 22) {
+              ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56);
+              ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48);
+              ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40);
+              ((unsigned char *)raddr)[16+3] = (unsigned char)(iret3>>32);
+              ((unsigned char *)raddr)[16+4] = (unsigned char)(iret3>>24);
+              ((unsigned char *)raddr)[16+5] = (unsigned char)(iret3>>16);
+            } else
+            if (l->rsize == 23) {
+              ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56);
+              ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48);
+              ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40);
+              ((unsigned char *)raddr)[16+3] = (unsigned char)(iret3>>32);
+              ((unsigned char *)raddr)[16+4] = (unsigned char)(iret3>>24);
+              ((unsigned char *)raddr)[16+5] = (unsigned char)(iret3>>16);
+              ((unsigned char *)raddr)[16+6] = (unsigned char)(iret3>>8);
+            } else
+            if (l->rsize >= 24 && l->rsize <= 32) {
+              ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56);
+              ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48);
+              ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40);
+              ((unsigned char *)raddr)[16+3] = (unsigned char)(iret3>>32);
+              ((unsigned char *)raddr)[16+4] = (unsigned char)(iret3>>24);
+              ((unsigned char *)raddr)[16+5] = (unsigned char)(iret3>>16);
+              ((unsigned char *)raddr)[16+6] = (unsigned char)(iret3>>8);
+              ((unsigned char *)raddr)[16+7] = (unsigned char)(iret3);
+              if (l->rsize == 24) {
+              } else
+              if (l->rsize == 25) {
+                ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56);
+              } else
+              if (l->rsize == 26) {
+                ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56);
+                ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48);
+              } else
+              if (l->rsize == 27) {
+                ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56);
+                ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48);
+                ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40);
+              } else
+              if (l->rsize == 28) {
+                ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56);
+                ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48);
+                ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40);
+                ((unsigned char *)raddr)[24+3] = (unsigned char)(iret4>>32);
+              } else
+              if (l->rsize == 29) {
+                ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56);
+                ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48);
+                ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40);
+                ((unsigned char *)raddr)[24+3] = (unsigned char)(iret4>>32);
+                ((unsigned char *)raddr)[24+4] = (unsigned char)(iret4>>24);
+              } else
+              if (l->rsize == 30) {
+                ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56);
+                ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48);
+                ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40);
+                ((unsigned char *)raddr)[24+3] = (unsigned char)(iret4>>32);
+                ((unsigned char *)raddr)[24+4] = (unsigned char)(iret4>>24);
+                ((unsigned char *)raddr)[24+5] = (unsigned char)(iret4>>16);
+              } else
+              if (l->rsize == 31) {
+                ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56);
+                ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48);
+                ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40);
+                ((unsigned char *)raddr)[24+3] = (unsigned char)(iret4>>32);
+                ((unsigned char *)raddr)[24+4] = (unsigned char)(iret4>>24);
+                ((unsigned char *)raddr)[24+5] = (unsigned char)(iret4>>16);
+                ((unsigned char *)raddr)[24+6] = (unsigned char)(iret4>>8);
+              } else
+              if (l->rsize == 32) {
+                ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56);
+                ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48);
+                ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40);
+                ((unsigned char *)raddr)[24+3] = (unsigned char)(iret4>>32);
+                ((unsigned char *)raddr)[24+4] = (unsigned char)(iret4>>24);
+                ((unsigned char *)raddr)[24+5] = (unsigned char)(iret4>>16);
+                ((unsigned char *)raddr)[24+6] = (unsigned char)(iret4>>8);
+                ((unsigned char *)raddr)[24+7] = (unsigned char)(iret4);
+              }
+            }
+          }
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = l->rsize; /* > 0, ≤ 4*sizeof(__avword) */
+        __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+        uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 5*sizeof(__avword) */
+        if (count <= sizeof(__avword)) {
+          /* Use iret. */
+          if (end_offset <= sizeof(__avword)) {
+            /* 0 < end_offset ≤ sizeof(__avword) */
+            __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - ((__avword)1 << (sizeof(__avword)*8-end_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+          } else {
+            /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+            __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+            __avword mask1 = - ((__avword)1 << (2*sizeof(__avword)*8-end_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+            wordaddr[1] ^= (wordaddr[1] ^ (iret << (sizeof(__avword)*8-start_offset*8))) & mask1;
+          }
+        } else if (count <= 2*sizeof(__avword)) {
+          /* Use iret, iret2. */
+          __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+          wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+          if (end_offset <= 2*sizeof(__avword)) {
+            /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+            __avword mask1 = - ((__avword)1 << (2*sizeof(__avword)*8-end_offset*8));
+            wordaddr[1] ^= (wordaddr[1] ^ ((iret << (sizeof(__avword)*4-start_offset*4) << (sizeof(__avword)*4-start_offset*4)) | (iret2 >> (start_offset*8)))) & mask1;
+          } else {
+            /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+            __avword mask2 = - ((__avword)1 << (3*sizeof(__avword)*8-end_offset*8));
+            wordaddr[1] = (iret << (sizeof(__avword)*8-start_offset*8)) | (iret2 >> (start_offset*8));
+            wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (sizeof(__avword)*8-start_offset*8))) & mask2;
+          }
+        } else if (count <= 3*sizeof(__avword)) {
+          /* Use iret, iret2, iret3. */
+          __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+          wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+          if (end_offset <= 3*sizeof(__avword)) {
+            /* 2*sizeof(__avword) < end_offset ≤ 3*sizeof(__avword) */
+            __avword mask2 = - ((__avword)1 << (3*sizeof(__avword)*8-end_offset*8));
+            wordaddr[1] = (iret << (sizeof(__avword)*4-start_offset*4) << (sizeof(__avword)*4-start_offset*4)) | (iret2 >> (start_offset*8));
+            wordaddr[2] ^= (wordaddr[2] ^ ((iret2 << (sizeof(__avword)*4-start_offset*4) << (sizeof(__avword)*4-start_offset*4)) | (iret3 >> (start_offset*8)))) & mask2;
+          } else {
+            /* 3*sizeof(__avword) < end_offset < 4*sizeof(__avword), start_offset > 0 */
+            __avword mask3 = - ((__avword)1 << (4*sizeof(__avword)*8-end_offset*8));
+            wordaddr[1] = (iret << (sizeof(__avword)*8-start_offset*8)) | (iret2 >> (start_offset*8));
+            wordaddr[2] = (iret2 << (sizeof(__avword)*8-start_offset*8)) | (iret3 >> (start_offset*8));
+            wordaddr[3] ^= (wordaddr[3] ^ (iret3 << (sizeof(__avword)*8-start_offset*8))) & mask3;
+          }
+        } else {
+          /* Use iret, iret2, iret3, iret4. */
+          __avword mask0 = ((__avword)2 << (sizeof(__avword)*8-start_offset*8-1)) - 1;
+          wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0;
+          if (end_offset <= 4*sizeof(__avword)) {
+            /* 3*sizeof(__avword) < end_offset ≤ 4*sizeof(__avword) */
+            __avword mask3 = - ((__avword)1 << (4*sizeof(__avword)*8-end_offset*8));
+            wordaddr[1] = (iret << (sizeof(__avword)*4-start_offset*4) << (sizeof(__avword)*4-start_offset*4)) | (iret2 >> (start_offset*8));
+            wordaddr[2] = (iret2 << (sizeof(__avword)*4-start_offset*4) << (sizeof(__avword)*4-start_offset*4)) | (iret3 >> (start_offset*8));
+            wordaddr[3] ^= (wordaddr[3] ^ ((iret3 << (sizeof(__avword)*4-start_offset*4) << (sizeof(__avword)*4-start_offset*4)) | (iret4 >> (start_offset*8)))) & mask3;
+          } else {
+            /* 4*sizeof(__avword) < end_offset < 5*sizeof(__avword), start_offset > 0 */
+            __avword mask4 = - ((__avword)1 << (5*sizeof(__avword)*8-end_offset*8));
+            wordaddr[1] = (iret << (sizeof(__avword)*8-start_offset*8)) | (iret2 >> (start_offset*8));
+            wordaddr[2] = (iret2 << (sizeof(__avword)*8-start_offset*8)) | (iret3 >> (start_offset*8));
+            wordaddr[3] = (iret3 << (sizeof(__avword)*8-start_offset*8)) | (iret4 >> (start_offset*8));
+            wordaddr[4] ^= (wordaddr[4] ^ (iret4 << (sizeof(__avword)*8-start_offset*8))) & mask4;
+          }
+        }
+        #endif
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-structcpy.c b/avcall/avcall-structcpy.c
new file mode 100644 (file)
index 0000000..4b41bb5
--- /dev/null
@@ -0,0 +1,22 @@
+/* copy structs */
+
+/*
+ * Copyright 2016 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#define __structcpy avcall_structcpy
+
+#include "structcpy.c"
diff --git a/avcall/avcall-x86_64-linux.s b/avcall/avcall-x86_64-linux.s
new file mode 100644 (file)
index 0000000..5111dbd
--- /dev/null
@@ -0,0 +1,647 @@
+       .file   "avcall-x86_64.c"
+       .text
+       .p2align 4,,15
+.globl avcall_call
+       .type   avcall_call, @function
+avcall_call:
+.LFB2:
+       pushq   %rbp
+.LCFI0:
+       movq    %rsp, %rbp
+.LCFI1:
+       pushq   %r13
+.LCFI2:
+       pushq   %r12
+.LCFI3:
+       pushq   %rbx
+.LCFI4:
+       movq    %rdi, %rbx
+       leaq    128(%rbx), %rdx
+       subq    $2072, %rsp
+.LCFI5:
+       movq    40(%rdi), %rax
+       movq    48(%rdi), %r8
+       leaq    15(%rsp), %rsi
+       subq    %r8, %rax
+       andq    $-16, %rsi
+       movq    %rax, %rdi
+       movq    120(%rbx), %rax
+       shrq    $3, %rdi
+       subq    %rdx, %rax
+       movq    %rax, %r9
+       shrq    $3, %r9
+       testl   %edi, %edi
+       jle     .L2
+       xorl    %ecx, %ecx
+       xorl    %edx, %edx
+       .p2align 4,,7
+.L4:
+       movq    (%rdx,%r8), %rax
+       incl    %ecx
+       movq    %rax, (%rsi,%rdx)
+       addq    $8, %rdx
+       cmpl    %ecx, %edi
+       jne     .L4
+.L2:
+       movl    24(%rbx), %eax
+       cmpl    $13, %eax
+       je      .L127
+       cmpl    $14, %eax
+       je      .L128
+       cmpl    $7, %r9d
+       movq    8(%rbx), %r12
+       jle     .L58
+       movlpd  184(%rbx), %xmm10
+.L60:
+       movq    176(%rbx), %r9
+.L63:
+       movq    168(%rbx), %r11
+.L66:
+       movq    160(%rbx), %r10
+.L69:
+       movlpd  152(%rbx), %xmm8
+.L72:
+       movq    144(%rbx), %rax
+.L75:
+       movq    136(%rbx), %r8
+.L78:
+       movlpd  128(%rbx), %xmm9
+.L81:
+       movq    88(%rbx), %rdx
+       movq    96(%rbx), %rcx
+       movsd   %xmm10, %xmm7
+       movq    80(%rbx), %rsi
+       movq    72(%rbx), %rdi
+       movsd   %xmm8, %xmm3
+       movq    %r9, -32(%rbp)
+       movsd   %xmm9, %xmm0
+       movlpd  -32(%rbp), %xmm6
+       movq    %r11, -32(%rbp)
+       movlpd  -32(%rbp), %xmm5
+       movq    %r10, -32(%rbp)
+       movlpd  -32(%rbp), %xmm4
+       movq    %rax, -32(%rbp)
+       movl    $8, %eax
+       movlpd  -32(%rbp), %xmm2
+       movq    %r8, -32(%rbp)
+       movlpd  -32(%rbp), %xmm1
+       movq    112(%rbx), %r9
+       movq    104(%rbx), %r8
+       call    *%r12
+       movq    %rax, %r8
+       movl    24(%rbx), %eax
+       movq    %rdx, %r9
+       cmpl    $1, %eax
+       je      .L31
+       testl   %eax, %eax
+       je      .L125
+       cmpl    $2, %eax
+       je      .L122
+       cmpl    $3, %eax
+       .p2align 4,,5
+       je      .L122
+       cmpl    $4, %eax
+       .p2align 4,,5
+       je      .L122
+       cmpl    $5, %eax
+       .p2align 4,,5
+       je      .L123
+       cmpl    $6, %eax
+       .p2align 4,,5
+       je      .L123
+       cmpl    $7, %eax
+       .p2align 4,,5
+       je      .L124
+       cmpl    $8, %eax
+       .p2align 4,,5
+       je      .L124
+       cmpl    $9, %eax
+       .p2align 4,,5
+       je      .L125
+       cmpl    $10, %eax
+       .p2align 4,,5
+       je      .L125
+       cmpl    $11, %eax
+       .p2align 4,,5
+       je      .L125
+       cmpl    $12, %eax
+       .p2align 4,,5
+       je      .L125
+       cmpl    $15, %eax
+       .p2align 4,,5
+       je      .L125
+       cmpl    $16, %eax
+       .p2align 4,,5
+       jne     .L31
+       testb   $2, 1(%rbx)
+       .p2align 4,,5
+       je      .L31
+       movq    32(%rbx), %rdx
+       leaq    -1(%rdx), %rax
+       cmpq    $15, %rax
+       ja      .L31
+       movq    16(%rbx), %rax
+       movq    %rax, %r10
+       movq    %rax, %rdi
+       andl    $7, %edi
+       andq    $-8, %r10
+       cmpq    $8, %rdx
+       leaq    (%rdx,%rdi), %r11
+       ja      .L112
+       cmpq    $8, %r11
+       ja      .L114
+       leal    -1(,%r11,8), %ecx
+       movq    (%r10), %rsi
+       sall    $3, %edi
+       movl    $2, %edx
+       movl    $1, %eax
+       salq    %cl, %rdx
+       movl    %edi, %ecx
+       salq    %cl, %rax
+       salq    %cl, %r8
+       xorq    %rsi, %r8
+       subq    %rax, %rdx
+       andq    %r8, %rdx
+       xorq    %rdx, %rsi
+       movq    %rsi, (%r10)
+.L31:
+       leaq    -24(%rbp), %rsp
+       xorl    %eax, %eax
+       popq    %rbx
+       popq    %r12
+       popq    %r13
+       leave
+       ret
+.L58:
+       je      .L129
+       cmpl    $5, %r9d
+       jle     .L64
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movlpd  -32(%rbp), %xmm10
+       .p2align 4,,3
+       jmp     .L63
+.L127:
+       cmpl    $7, %r9d
+       movq    16(%rbx), %r13
+       movq    8(%rbx), %r12
+       jle     .L7
+       movlpd  184(%rbx), %xmm10
+.L9:
+       movq    176(%rbx), %r9
+.L12:
+       movq    168(%rbx), %r11
+.L15:
+       movq    160(%rbx), %r10
+.L18:
+       movlpd  152(%rbx), %xmm8
+.L21:
+       movq    144(%rbx), %rax
+.L24:
+       movq    136(%rbx), %r8
+.L27:
+       movlpd  128(%rbx), %xmm9
+.L30:
+       movq    96(%rbx), %rcx
+       movq    88(%rbx), %rdx
+       movsd   %xmm10, %xmm7
+       movq    80(%rbx), %rsi
+       movq    72(%rbx), %rdi
+       movsd   %xmm8, %xmm3
+       movq    %r9, -32(%rbp)
+       movsd   %xmm9, %xmm0
+       movlpd  -32(%rbp), %xmm6
+       movq    %r11, -32(%rbp)
+       movlpd  -32(%rbp), %xmm5
+       movq    %r10, -32(%rbp)
+       movlpd  -32(%rbp), %xmm4
+       movq    %rax, -32(%rbp)
+       movl    $8, %eax
+       movlpd  -32(%rbp), %xmm2
+       movq    %r8, -32(%rbp)
+       movlpd  -32(%rbp), %xmm1
+       movq    112(%rbx), %r9
+       movq    104(%rbx), %r8
+       call    *%r12
+       movss   %xmm0, (%r13)
+       leaq    -24(%rbp), %rsp
+       xorl    %eax, %eax
+       popq    %rbx
+       popq    %r12
+       popq    %r13
+       leave
+       ret
+.L125:
+       movq    16(%rbx), %rax
+       movq    %r8, (%rax)
+       leaq    -24(%rbp), %rsp
+       xorl    %eax, %eax
+       popq    %rbx
+       popq    %r12
+       popq    %r13
+       leave
+       ret
+.L128:
+       cmpl    $7, %r9d
+       movq    16(%rbx), %r13
+       movq    8(%rbx), %r12
+       jle     .L34
+       movlpd  184(%rbx), %xmm10
+.L36:
+       movq    176(%rbx), %r10
+.L39:
+       movq    168(%rbx), %r11
+.L42:
+       movq    160(%rbx), %r9
+.L45:
+       movlpd  152(%rbx), %xmm8
+.L48:
+       movq    144(%rbx), %rax
+.L51:
+       movq    136(%rbx), %r8
+.L54:
+       movlpd  128(%rbx), %xmm9
+.L57:
+       movq    96(%rbx), %rcx
+       movq    88(%rbx), %rdx
+       movsd   %xmm10, %xmm7
+       movq    80(%rbx), %rsi
+       movq    72(%rbx), %rdi
+       movsd   %xmm8, %xmm3
+       movq    %r10, -32(%rbp)
+       movsd   %xmm9, %xmm0
+       movlpd  -32(%rbp), %xmm6
+       movq    %r11, -32(%rbp)
+       movlpd  -32(%rbp), %xmm5
+       movq    %r9, -32(%rbp)
+       movlpd  -32(%rbp), %xmm4
+       movq    %rax, -32(%rbp)
+       movl    $8, %eax
+       movlpd  -32(%rbp), %xmm2
+       movq    %r8, -32(%rbp)
+       movlpd  -32(%rbp), %xmm1
+       movq    112(%rbx), %r9
+       movq    104(%rbx), %r8
+       call    *%r12
+       movsd   %xmm0, (%r13)
+       leaq    -24(%rbp), %rsp
+       xorl    %eax, %eax
+       popq    %rbx
+       popq    %r12
+       popq    %r13
+       leave
+       ret
+.L7:
+       jne     .L10
+       xorpd   %xmm10, %xmm10
+       jmp     .L9
+.L129:
+       xorpd   %xmm10, %xmm10
+       .p2align 4,,7
+       jmp     .L60
+.L34:
+       .p2align 4,,7
+       jne     .L37
+       xorpd   %xmm10, %xmm10
+       .p2align 4,,7
+       jmp     .L36
+.L122:
+       movq    16(%rbx), %rax
+       movb    %r8b, (%rax)
+       leaq    -24(%rbp), %rsp
+       xorl    %eax, %eax
+       popq    %rbx
+       popq    %r12
+       popq    %r13
+       leave
+       ret
+.L10:
+       cmpl    $5, %r9d
+       jg      .L130
+       jne     .L16
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movq    %r9, %r11
+       movlpd  -32(%rbp), %xmm10
+       jmp     .L15
+.L64:
+       .p2align 4,,3
+       je      .L131
+       cmpl    $3, %r9d
+       jle     .L70
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movq    %r9, %r10
+       movq    %r9, %r11
+       movlpd  -32(%rbp), %xmm10
+       jmp     .L69
+.L37:
+       cmpl    $5, %r9d
+       jg      .L132
+       jne     .L43
+       xorl    %r10d, %r10d
+       movq    %r10, -32(%rbp)
+       movq    %r10, %r11
+       movlpd  -32(%rbp), %xmm10
+       jmp     .L42
+.L130:
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movlpd  -32(%rbp), %xmm10
+       jmp     .L12
+.L131:
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movq    %r9, %r11
+       movlpd  -32(%rbp), %xmm10
+       jmp     .L66
+.L132:
+       xorl    %r10d, %r10d
+       movq    %r10, -32(%rbp)
+       movlpd  -32(%rbp), %xmm10
+       jmp     .L39
+.L123:
+       movq    16(%rbx), %rax
+       movw    %r8w, (%rax)
+       jmp     .L31
+.L124:
+       movq    16(%rbx), %rax
+       movl    %r8d, (%rax)
+       jmp     .L31
+.L16:
+       cmpl    $3, %r9d
+       jle     .L19
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movq    %r9, %r10
+       movq    %r9, %r11
+       movlpd  -32(%rbp), %xmm10
+       jmp     .L18
+.L70:
+       jne     .L73
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movq    %r9, %r10
+       movq    %r9, %r11
+       movlpd  -32(%rbp), %xmm10
+       movsd   %xmm10, %xmm8
+       jmp     .L72
+.L43:
+       cmpl    $3, %r9d
+       jle     .L46
+       xorl    %r10d, %r10d
+       movq    %r10, -32(%rbp)
+       movq    %r10, %r9
+       movq    %r10, %r11
+       movlpd  -32(%rbp), %xmm10
+       jmp     .L45
+.L19:
+       jne     .L22
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movq    %r9, %r10
+       movq    %r9, %r11
+       movlpd  -32(%rbp), %xmm10
+       movsd   %xmm10, %xmm8
+       jmp     .L21
+.L73:
+       cmpl    $1, %r9d
+       jle     .L76
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movq    %r9, %r10
+       movq    %r9, %r11
+       movlpd  -32(%rbp), %xmm10
+       movq    %r9, %rax
+       movsd   %xmm10, %xmm8
+       jmp     .L75
+.L46:
+       jne     .L49
+       xorl    %r10d, %r10d
+       movq    %r10, -32(%rbp)
+       movq    %r10, %r9
+       movq    %r10, %r11
+       movlpd  -32(%rbp), %xmm10
+       movsd   %xmm10, %xmm8
+       jmp     .L48
+.L22:
+       cmpl    $1, %r9d
+       jle     .L25
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movq    %r9, %r10
+       movq    %r9, %r11
+       movlpd  -32(%rbp), %xmm10
+       movq    %r9, %rax
+       movsd   %xmm10, %xmm8
+       jmp     .L24
+.L49:
+       cmpl    $1, %r9d
+       jle     .L52
+       xorl    %r10d, %r10d
+       movq    %r10, -32(%rbp)
+       movq    %r10, %r9
+       movq    %r10, %r11
+       movlpd  -32(%rbp), %xmm10
+       movq    %r10, %rax
+       movsd   %xmm10, %xmm8
+       jmp     .L51
+.L76:
+       jne     .L133
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movq    %r9, %r10
+       movq    %r9, %r11
+       movlpd  -32(%rbp), %xmm10
+       movq    %r9, %rax
+       movq    %r9, %r8
+       movsd   %xmm10, %xmm8
+       jmp     .L78
+.L25:
+       jne     .L134
+       xorl    %r9d, %r9d
+       movq    %r9, -32(%rbp)
+       movq    %r9, %r10
+       movq    %r9, %r11
+       movlpd  -32(%rbp), %xmm10
+       movq    %r9, %rax
+       movq    %r9, %r8
+       movsd   %xmm10, %xmm8
+       jmp     .L27
+.L112:
+       leaq    0(,%rdi,8), %r12
+       movq    (%r10), %rsi
+       movq    %r8, %rax
+       movq    $-1, %rdx
+       movl    %r12d, %ecx
+       salq    %cl, %rax
+       salq    %cl, %rdx
+       xorq    %rsi, %rax
+       andq    %rax, %rdx
+       xorq    %rdx, %rsi
+       cmpq    $16, %r11
+       movq    %rsi, (%r10)
+       ja      .L116
+       leaq    0(,%rdi,4), %rax
+       leal    -65(,%r11,8), %edx
+       movl    $32, %edi
+       movq    8(%r10), %rsi
+       subl    %eax, %edi
+       movl    %edx, %ecx
+       movl    $2, %eax
+       salq    %cl, %rax
+       movl    %edi, %ecx
+       sarq    %cl, %r8
+       decq    %rax
+       sarq    %cl, %r8
+       movl    %r12d, %ecx
+       salq    %cl, %r9
+       orq     %r9, %r8
+       xorq    %rsi, %r8
+       andq    %r8, %rax
+       xorq    %rax, %rsi
+       movq    %rsi, 8(%r10)
+       jmp     .L31
+       .p2align 4,,7
+.L133:
+       xorpd   %xmm9, %xmm9
+       movsd   %xmm9, -32(%rbp)
+       movq    -32(%rbp), %r9
+       movsd   %xmm9, %xmm10
+       movsd   %xmm9, %xmm8
+       movq    %r9, %r11
+       movq    %r9, %r10
+       movq    %r9, %rax
+       movq    %r9, %r8
+       jmp     .L81
+.L52:
+       jne     .L135
+       xorl    %r10d, %r10d
+       movq    %r10, -32(%rbp)
+       movq    %r10, %r9
+       movq    %r10, %r11
+       movlpd  -32(%rbp), %xmm10
+       movq    %r10, %rax
+       movq    %r10, %r8
+       movsd   %xmm10, %xmm8
+       jmp     .L54
+.L134:
+       xorpd   %xmm9, %xmm9
+       movsd   %xmm9, -32(%rbp)
+       movq    -32(%rbp), %r9
+       movsd   %xmm9, %xmm10
+       movsd   %xmm9, %xmm8
+       movq    %r9, %r11
+       movq    %r9, %r10
+       movq    %r9, %rax
+       movq    %r9, %r8
+       jmp     .L30
+.L135:
+       xorpd   %xmm9, %xmm9
+       movsd   %xmm9, -32(%rbp)
+       movq    -32(%rbp), %r10
+       movsd   %xmm9, %xmm10
+       movsd   %xmm9, %xmm8
+       movq    %r10, %r11
+       movq    %r10, %r9
+       movq    %r10, %rax
+       movq    %r10, %r8
+       jmp     .L57
+.L114:
+       leaq    0(,%rdi,8), %rsi
+       movq    (%r10), %rdx
+       movq    %r8, %rbx
+       movq    $-1, %rax
+       movl    %esi, %ecx
+       salq    %cl, %rbx
+       salq    %cl, %rax
+       movq    %rbx, %rcx
+       xorq    %rdx, %rcx
+       andq    %rcx, %rax
+       leal    -65(,%r11,8), %ecx
+       xorq    %rax, %rdx
+       movl    $2, %eax
+       salq    %cl, %rax
+       movq    %rdx, (%r10)
+       movl    $64, %ecx
+       movq    8(%r10), %rdx
+       subl    %esi, %ecx
+       decq    %rax
+       sarq    %cl, %r8
+       xorq    %rdx, %r8
+       andq    %r8, %rax
+       xorq    %rax, %rdx
+       movq    %rdx, 8(%r10)
+       jmp     .L31
+.L116:
+       movl    $64, %esi
+       movq    %r9, %rax
+       movq    16(%r10), %rdx
+       subl    %r12d, %esi
+       movl    %esi, %ecx
+       sarq    %cl, %r8
+       movl    %r12d, %ecx
+       salq    %cl, %rax
+       leal    -129(,%r11,8), %ecx
+       orq     %r8, %rax
+       movq    %rax, 8(%r10)
+       movl    $2, %eax
+       salq    %cl, %rax
+       movl    %esi, %ecx
+       sarq    %cl, %r9
+       decq    %rax
+       xorq    %rdx, %r9
+       andq    %r9, %rax
+       xorq    %rax, %rdx
+       movq    %rdx, 16(%r10)
+       jmp     .L31
+.LFE2:
+       .size   avcall_call, .-avcall_call
+       .section        .eh_frame,"a",@progbits
+.Lframe1:
+       .long   .LECIE1-.LSCIE1
+.LSCIE1:
+       .long   0x0
+       .byte   0x1
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .byte   0x10
+       .uleb128 0x1
+       .byte   0x1b
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+.LECIE1:
+.LSFDE1:
+       .long   .LEFDE1-.LASFDE1
+.LASFDE1:
+       .long   .LASFDE1-.Lframe1
+       .long   .LFB2-.
+       .long   .LFE2-.LFB2
+       .uleb128 0x0
+       .byte   0x4
+       .long   .LCFI0-.LFB2
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI1-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   .LCFI4-.LCFI1
+       .byte   0x83
+       .uleb128 0x5
+       .byte   0x8c
+       .uleb128 0x4
+       .byte   0x8d
+       .uleb128 0x3
+       .align 8
+.LEFDE1:
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/avcall/avcall-x86_64-macro.S b/avcall/avcall-x86_64-macro.S
new file mode 100644 (file)
index 0000000..f7c6688
--- /dev/null
@@ -0,0 +1,650 @@
+#include "asm-x86_64.h"
+       TEXT()
+       P2ALIGN(4,15)
+GLOBL(C(avcall_call))
+       DECLARE_FUNCTION(avcall_call)
+FUNBEGIN(avcall_call)
+L(FB2):
+       INSN1(push,q    ,R(rbp))
+L(CFI0):
+       INSN2(mov,q     ,R(rsp), R(rbp))
+L(CFI1):
+       INSN1(push,q    ,R(r13))
+L(CFI2):
+       INSN1(push,q    ,R(r12))
+L(CFI3):
+       INSN1(push,q    ,R(rbx))
+L(CFI4):
+       INSN2(mov,q     ,R(rdi), R(rbx))
+       INSN2(lea,q     ,X8 MEM_DISP(rbx,128), R(rdx))
+       INSN2(sub,q     ,NUM(2072), R(rsp))
+L(CFI5):
+       INSN2(mov,q     ,X8 MEM_DISP(rdi,40), R(rax))
+       INSN2(mov,q     ,X8 MEM_DISP(rdi,48), R(r8))
+       INSN2(lea,q     ,X8 MEM_DISP(rsp,15), R(rsi))
+       INSN2(sub,q     ,R(r8), R(rax))
+       INSN2(and,q     ,NUM(-16), R(rsi))
+       INSN2(mov,q     ,R(rax), R(rdi))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,120), R(rax))
+       INSN2(shr,q     ,NUM(3), R(rdi))
+       INSN2(sub,q     ,R(rdx), R(rax))
+       INSN2(mov,q     ,R(rax), R(r9))
+       INSN2(shr,q     ,NUM(3), R(r9))
+       INSN2(test,l    ,R(edi), R(edi))
+       INSN1(jle,_     ,L(2))
+       INSN2(xor,l     ,R(ecx), R(ecx))
+       INSN2(xor,l     ,R(edx), R(edx))
+       P2ALIGN(4,7)
+L(4):
+       INSN2(mov,q     ,X8 MEM_INDEX(rdx,r8), R(rax))
+       INSN1(inc,l     ,R(ecx))
+       INSN2(mov,q     ,R(rax),X8 MEM_INDEX(rsi,rdx))
+       INSN2(add,q     ,NUM(8), R(rdx))
+       INSN2(cmp,l     ,R(ecx), R(edi))
+       INSN1(jne,_     ,L(4))
+L(2):
+       INSN2(mov,l     ,X4 MEM_DISP(rbx,24), R(eax))
+       INSN2(cmp,l     ,NUM(13), R(eax))
+       INSN1(je,_      ,L(127))
+       INSN2(cmp,l     ,NUM(14), R(eax))
+       INSN1(je,_      ,L(128))
+       INSN2(cmp,l     ,NUM(7), R(r9d))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,8), R(r12))
+       INSN1(jle,_     ,L(58))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbx,184), R(xmm10))
+L(60):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,176), R(r9))
+L(63):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,168), R(r11))
+L(66):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,160), R(r10))
+L(69):
+       INSN2(movlp,d   ,X8 MEM_DISP(rbx,152), R(xmm8))
+L(72):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,144), R(rax))
+L(75):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,136), R(r8))
+L(78):
+       INSN2(movlp,d   ,X8 MEM_DISP(rbx,128), R(xmm9))
+L(81):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,88), R(rdx))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,96), R(rcx))
+       INSN2S(movs,d   ,R(xmm10), R(xmm7))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,80), R(rsi))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,72), R(rdi))
+       INSN2S(movs,d   ,R(xmm8), R(xmm3))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2S(movs,d   ,R(xmm9), R(xmm0))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm6))
+       INSN2(mov,q     ,R(r11),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm5))
+       INSN2(mov,q     ,R(r10),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm4))
+       INSN2(mov,q     ,R(rax),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,l     ,NUM(8), R(eax))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm2))
+       INSN2(mov,q     ,R(r8),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm1))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,112), R(r9))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,104), R(r8))
+       INSN1(call,_    ,INDIR(R(r12)))
+       INSN2(mov,q     ,R(rax), R(r8))
+       INSN2(mov,l     ,X4 MEM_DISP(rbx,24), R(eax))
+       INSN2(mov,q     ,R(rdx), R(r9))
+       INSN2(cmp,l     ,NUM(1), R(eax))
+       INSN1(je,_      ,L(31))
+       INSN2(test,l    ,R(eax), R(eax))
+       INSN1(je,_      ,L(125))
+       INSN2(cmp,l     ,NUM(2), R(eax))
+       INSN1(je,_      ,L(122))
+       INSN2(cmp,l     ,NUM(3), R(eax))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(122))
+       INSN2(cmp,l     ,NUM(4), R(eax))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(122))
+       INSN2(cmp,l     ,NUM(5), R(eax))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(123))
+       INSN2(cmp,l     ,NUM(6), R(eax))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(123))
+       INSN2(cmp,l     ,NUM(7), R(eax))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(124))
+       INSN2(cmp,l     ,NUM(8), R(eax))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(124))
+       INSN2(cmp,l     ,NUM(9), R(eax))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(125))
+       INSN2(cmp,l     ,NUM(10), R(eax))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(125))
+       INSN2(cmp,l     ,NUM(11), R(eax))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(125))
+       INSN2(cmp,l     ,NUM(12), R(eax))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(125))
+       INSN2(cmp,l     ,NUM(15), R(eax))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(125))
+       INSN2(cmp,l     ,NUM(16), R(eax))
+       P2ALIGN(4,5)
+       INSN1(jne,_     ,L(31))
+       INSN2(test,b    ,NUM(2),X1 MEM_DISP(rbx,1))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(31))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,32), R(rdx))
+       INSN2(lea,q     ,X8 MEM_DISP(rdx,-1), R(rax))
+       INSN2(cmp,q     ,NUM(15), R(rax))
+       INSN1(ja,_      ,L(31))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rax))
+       INSN2(mov,q     ,R(rax), R(r10))
+       INSN2(mov,q     ,R(rax), R(rdi))
+       INSN2(and,l     ,NUM(7), R(edi))
+       INSN2(and,q     ,NUM(-8), R(r10))
+       INSN2(cmp,q     ,NUM(8), R(rdx))
+       INSN2(lea,q     ,X8 MEM_INDEX(rdx,rdi), R(r11))
+       INSN1(ja,_      ,L(112))
+       INSN2(cmp,q     ,NUM(8), R(r11))
+       INSN1(ja,_      ,L(114))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-1,r11,8), R(ecx))
+       INSN2(mov,q     ,X8 MEM(r10), R(rsi))
+       INSN2(sal,l     ,NUM(3), R(edi))
+       INSN2(mov,l     ,NUM(2), R(edx))
+       INSN2(mov,l     ,NUM(1), R(eax))
+       INSN2(sal,q     ,R(cl), R(rdx))
+       INSN2(mov,l     ,R(edi), R(ecx))
+       INSN2(sal,q     ,R(cl), R(rax))
+       INSN2(sal,q     ,R(cl), R(r8))
+       INSN2(xor,q     ,R(rsi), R(r8))
+       INSN2(sub,q     ,R(rax), R(rdx))
+       INSN2(and,q     ,R(r8), R(rdx))
+       INSN2(xor,q     ,R(rdx), R(rsi))
+       INSN2(mov,q     ,R(rsi),X8 MEM(r10))
+L(31):
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-24), R(rsp))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN1(pop,q     ,R(rbx))
+       INSN1(pop,q     ,R(r12))
+       INSN1(pop,q     ,R(r13))
+       leave
+       ret
+L(58):
+       INSN1(je,_      ,L(129))
+       INSN2(cmp,l     ,NUM(5), R(r9d))
+       INSN1(jle,_     ,L(64))
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       P2ALIGN(4,3)
+       INSN1(jmp,_     ,L(63))
+L(127):
+       INSN2(cmp,l     ,NUM(7), R(r9d))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(r13))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,8), R(r12))
+       INSN1(jle,_     ,L(7))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbx,184), R(xmm10))
+L(9):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,176), R(r9))
+L(12):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,168), R(r11))
+L(15):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,160), R(r10))
+L(18):
+       INSN2(movlp,d   ,X8 MEM_DISP(rbx,152), R(xmm8))
+L(21):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,144), R(rax))
+L(24):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,136), R(r8))
+L(27):
+       INSN2(movlp,d   ,X8 MEM_DISP(rbx,128), R(xmm9))
+L(30):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,96), R(rcx))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,88), R(rdx))
+       INSN2S(movs,d   ,R(xmm10), R(xmm7))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,80), R(rsi))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,72), R(rdi))
+       INSN2S(movs,d   ,R(xmm8), R(xmm3))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2S(movs,d   ,R(xmm9), R(xmm0))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm6))
+       INSN2(mov,q     ,R(r11),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm5))
+       INSN2(mov,q     ,R(r10),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm4))
+       INSN2(mov,q     ,R(rax),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,l     ,NUM(8), R(eax))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm2))
+       INSN2(mov,q     ,R(r8),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm1))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,112), R(r9))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,104), R(r8))
+       INSN1(call,_    ,INDIR(R(r12)))
+       INSN2S(movs,s   ,R(xmm0),X4 MEM(r13))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-24), R(rsp))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN1(pop,q     ,R(rbx))
+       INSN1(pop,q     ,R(r12))
+       INSN1(pop,q     ,R(r13))
+       leave
+       ret
+L(125):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rax))
+       INSN2(mov,q     ,R(r8),X8 MEM(rax))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-24), R(rsp))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN1(pop,q     ,R(rbx))
+       INSN1(pop,q     ,R(r12))
+       INSN1(pop,q     ,R(r13))
+       leave
+       ret
+L(128):
+       INSN2(cmp,l     ,NUM(7), R(r9d))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(r13))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,8), R(r12))
+       INSN1(jle,_     ,L(34))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbx,184), R(xmm10))
+L(36):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,176), R(r10))
+L(39):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,168), R(r11))
+L(42):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,160), R(r9))
+L(45):
+       INSN2(movlp,d   ,X8 MEM_DISP(rbx,152), R(xmm8))
+L(48):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,144), R(rax))
+L(51):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,136), R(r8))
+L(54):
+       INSN2(movlp,d   ,X8 MEM_DISP(rbx,128), R(xmm9))
+L(57):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,96), R(rcx))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,88), R(rdx))
+       INSN2S(movs,d   ,R(xmm10), R(xmm7))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,80), R(rsi))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,72), R(rdi))
+       INSN2S(movs,d   ,R(xmm8), R(xmm3))
+       INSN2(mov,q     ,R(r10),X8 MEM_DISP(rbp,-32))
+       INSN2S(movs,d   ,R(xmm9), R(xmm0))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm6))
+       INSN2(mov,q     ,R(r11),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm5))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm4))
+       INSN2(mov,q     ,R(rax),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,l     ,NUM(8), R(eax))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm2))
+       INSN2(mov,q     ,R(r8),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm1))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,112), R(r9))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,104), R(r8))
+       INSN1(call,_    ,INDIR(R(r12)))
+       INSN2S(movs,d   ,R(xmm0),X8 MEM(r13))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-24), R(rsp))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN1(pop,q     ,R(rbx))
+       INSN1(pop,q     ,R(r12))
+       INSN1(pop,q     ,R(r13))
+       leave
+       ret
+L(7):
+       INSN1(jne,_     ,L(10))
+       INSN2(xorp,d    ,R(xmm10), R(xmm10))
+       INSN1(jmp,_     ,L(9))
+L(129):
+       INSN2(xorp,d    ,R(xmm10), R(xmm10))
+       P2ALIGN(4,7)
+       INSN1(jmp,_     ,L(60))
+L(34):
+       P2ALIGN(4,7)
+       INSN1(jne,_     ,L(37))
+       INSN2(xorp,d    ,R(xmm10), R(xmm10))
+       P2ALIGN(4,7)
+       INSN1(jmp,_     ,L(36))
+L(122):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rax))
+       INSN2(mov,b     ,R(r8b),X1 MEM(rax))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-24), R(rsp))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN1(pop,q     ,R(rbx))
+       INSN1(pop,q     ,R(r12))
+       INSN1(pop,q     ,R(r13))
+       leave
+       ret
+L(10):
+       INSN2(cmp,l     ,NUM(5), R(r9d))
+       INSN1(jg,_      ,L(130))
+       INSN1(jne,_     ,L(16))
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN1(jmp,_     ,L(15))
+L(64):
+       P2ALIGN(4,3)
+       INSN1(je,_      ,L(131))
+       INSN2(cmp,l     ,NUM(3), R(r9d))
+       INSN1(jle,_     ,L(70))
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r9), R(r10))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN1(jmp,_     ,L(69))
+L(37):
+       INSN2(cmp,l     ,NUM(5), R(r9d))
+       INSN1(jg,_      ,L(132))
+       INSN1(jne,_     ,L(43))
+       INSN2(xor,l     ,R(r10d), R(r10d))
+       INSN2(mov,q     ,R(r10),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r10), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN1(jmp,_     ,L(42))
+L(130):
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN1(jmp,_     ,L(12))
+L(131):
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN1(jmp,_     ,L(66))
+L(132):
+       INSN2(xor,l     ,R(r10d), R(r10d))
+       INSN2(mov,q     ,R(r10),X8 MEM_DISP(rbp,-32))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN1(jmp,_     ,L(39))
+L(123):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rax))
+       INSN2(mov,w     ,R(r8w),X2 MEM(rax))
+       INSN1(jmp,_     ,L(31))
+L(124):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rax))
+       INSN2(mov,l     ,R(r8d),X4 MEM(rax))
+       INSN1(jmp,_     ,L(31))
+L(16):
+       INSN2(cmp,l     ,NUM(3), R(r9d))
+       INSN1(jle,_     ,L(19))
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r9), R(r10))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN1(jmp,_     ,L(18))
+L(70):
+       INSN1(jne,_     ,L(73))
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r9), R(r10))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN2S(movs,d   ,R(xmm10), R(xmm8))
+       INSN1(jmp,_     ,L(72))
+L(43):
+       INSN2(cmp,l     ,NUM(3), R(r9d))
+       INSN1(jle,_     ,L(46))
+       INSN2(xor,l     ,R(r10d), R(r10d))
+       INSN2(mov,q     ,R(r10),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r10), R(r9))
+       INSN2(mov,q     ,R(r10), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN1(jmp,_     ,L(45))
+L(19):
+       INSN1(jne,_     ,L(22))
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r9), R(r10))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN2S(movs,d   ,R(xmm10), R(xmm8))
+       INSN1(jmp,_     ,L(21))
+L(73):
+       INSN2(cmp,l     ,NUM(1), R(r9d))
+       INSN1(jle,_     ,L(76))
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r9), R(r10))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN2(mov,q     ,R(r9), R(rax))
+       INSN2S(movs,d   ,R(xmm10), R(xmm8))
+       INSN1(jmp,_     ,L(75))
+L(46):
+       INSN1(jne,_     ,L(49))
+       INSN2(xor,l     ,R(r10d), R(r10d))
+       INSN2(mov,q     ,R(r10),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r10), R(r9))
+       INSN2(mov,q     ,R(r10), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN2S(movs,d   ,R(xmm10), R(xmm8))
+       INSN1(jmp,_     ,L(48))
+L(22):
+       INSN2(cmp,l     ,NUM(1), R(r9d))
+       INSN1(jle,_     ,L(25))
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r9), R(r10))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN2(mov,q     ,R(r9), R(rax))
+       INSN2S(movs,d   ,R(xmm10), R(xmm8))
+       INSN1(jmp,_     ,L(24))
+L(49):
+       INSN2(cmp,l     ,NUM(1), R(r9d))
+       INSN1(jle,_     ,L(52))
+       INSN2(xor,l     ,R(r10d), R(r10d))
+       INSN2(mov,q     ,R(r10),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r10), R(r9))
+       INSN2(mov,q     ,R(r10), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN2(mov,q     ,R(r10), R(rax))
+       INSN2S(movs,d   ,R(xmm10), R(xmm8))
+       INSN1(jmp,_     ,L(51))
+L(76):
+       INSN1(jne,_     ,L(133))
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r9), R(r10))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN2(mov,q     ,R(r9), R(rax))
+       INSN2(mov,q     ,R(r9), R(r8))
+       INSN2S(movs,d   ,R(xmm10), R(xmm8))
+       INSN1(jmp,_     ,L(78))
+L(25):
+       INSN1(jne,_     ,L(134))
+       INSN2(xor,l     ,R(r9d), R(r9d))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r9), R(r10))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN2(mov,q     ,R(r9), R(rax))
+       INSN2(mov,q     ,R(r9), R(r8))
+       INSN2S(movs,d   ,R(xmm10), R(xmm8))
+       INSN1(jmp,_     ,L(27))
+L(112):
+       INSN2(lea,q     ,X8 MEM_DISP_SHINDEX0(0,rdi,8), R(r12))
+       INSN2(mov,q     ,X8 MEM(r10), R(rsi))
+       INSN2(mov,q     ,R(r8), R(rax))
+       INSN2(mov,q     ,NUM(-1), R(rdx))
+       INSN2(mov,l     ,R(r12d), R(ecx))
+       INSN2(sal,q     ,R(cl), R(rax))
+       INSN2(sal,q     ,R(cl), R(rdx))
+       INSN2(xor,q     ,R(rsi), R(rax))
+       INSN2(and,q     ,R(rax), R(rdx))
+       INSN2(xor,q     ,R(rdx), R(rsi))
+       INSN2(cmp,q     ,NUM(16), R(r11))
+       INSN2(mov,q     ,R(rsi),X8 MEM(r10))
+       INSN1(ja,_      ,L(116))
+       INSN2(lea,q     ,X8 MEM_DISP_SHINDEX0(0,rdi,4), R(rax))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-65,r11,8), R(edx))
+       INSN2(mov,l     ,NUM(32), R(edi))
+       INSN2(mov,q     ,X8 MEM_DISP(r10,8), R(rsi))
+       INSN2(sub,l     ,R(eax), R(edi))
+       INSN2(mov,l     ,R(edx), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(eax))
+       INSN2(sal,q     ,R(cl), R(rax))
+       INSN2(mov,l     ,R(edi), R(ecx))
+       INSN2(sar,q     ,R(cl), R(r8))
+       INSN1(dec,q     ,R(rax))
+       INSN2(sar,q     ,R(cl), R(r8))
+       INSN2(mov,l     ,R(r12d), R(ecx))
+       INSN2(sal,q     ,R(cl), R(r9))
+       INSN2(or,q      ,R(r9), R(r8))
+       INSN2(xor,q     ,R(rsi), R(r8))
+       INSN2(and,q     ,R(r8), R(rax))
+       INSN2(xor,q     ,R(rax), R(rsi))
+       INSN2(mov,q     ,R(rsi),X8 MEM_DISP(r10,8))
+       INSN1(jmp,_     ,L(31))
+       P2ALIGN(4,7)
+L(133):
+       INSN2(xorp,d    ,R(xmm9), R(xmm9))
+       INSN2S(movs,d   ,R(xmm9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-32), R(r9))
+       INSN2S(movs,d   ,R(xmm9), R(xmm10))
+       INSN2S(movs,d   ,R(xmm9), R(xmm8))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(mov,q     ,R(r9), R(r10))
+       INSN2(mov,q     ,R(r9), R(rax))
+       INSN2(mov,q     ,R(r9), R(r8))
+       INSN1(jmp,_     ,L(81))
+L(52):
+       INSN1(jne,_     ,L(135))
+       INSN2(xor,l     ,R(r10d), R(r10d))
+       INSN2(mov,q     ,R(r10),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,R(r10), R(r9))
+       INSN2(mov,q     ,R(r10), R(r11))
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-32), R(xmm10))
+       INSN2(mov,q     ,R(r10), R(rax))
+       INSN2(mov,q     ,R(r10), R(r8))
+       INSN2S(movs,d   ,R(xmm10), R(xmm8))
+       INSN1(jmp,_     ,L(54))
+L(134):
+       INSN2(xorp,d    ,R(xmm9), R(xmm9))
+       INSN2S(movs,d   ,R(xmm9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-32), R(r9))
+       INSN2S(movs,d   ,R(xmm9), R(xmm10))
+       INSN2S(movs,d   ,R(xmm9), R(xmm8))
+       INSN2(mov,q     ,R(r9), R(r11))
+       INSN2(mov,q     ,R(r9), R(r10))
+       INSN2(mov,q     ,R(r9), R(rax))
+       INSN2(mov,q     ,R(r9), R(r8))
+       INSN1(jmp,_     ,L(30))
+L(135):
+       INSN2(xorp,d    ,R(xmm9), R(xmm9))
+       INSN2S(movs,d   ,R(xmm9),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-32), R(r10))
+       INSN2S(movs,d   ,R(xmm9), R(xmm10))
+       INSN2S(movs,d   ,R(xmm9), R(xmm8))
+       INSN2(mov,q     ,R(r10), R(r11))
+       INSN2(mov,q     ,R(r10), R(r9))
+       INSN2(mov,q     ,R(r10), R(rax))
+       INSN2(mov,q     ,R(r10), R(r8))
+       INSN1(jmp,_     ,L(57))
+L(114):
+       INSN2(lea,q     ,X8 MEM_DISP_SHINDEX0(0,rdi,8), R(rsi))
+       INSN2(mov,q     ,X8 MEM(r10), R(rdx))
+       INSN2(mov,q     ,R(r8), R(rbx))
+       INSN2(mov,q     ,NUM(-1), R(rax))
+       INSN2(mov,l     ,R(esi), R(ecx))
+       INSN2(sal,q     ,R(cl), R(rbx))
+       INSN2(sal,q     ,R(cl), R(rax))
+       INSN2(mov,q     ,R(rbx), R(rcx))
+       INSN2(xor,q     ,R(rdx), R(rcx))
+       INSN2(and,q     ,R(rcx), R(rax))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-65,r11,8), R(ecx))
+       INSN2(xor,q     ,R(rax), R(rdx))
+       INSN2(mov,l     ,NUM(2), R(eax))
+       INSN2(sal,q     ,R(cl), R(rax))
+       INSN2(mov,q     ,R(rdx),X8 MEM(r10))
+       INSN2(mov,l     ,NUM(64), R(ecx))
+       INSN2(mov,q     ,X8 MEM_DISP(r10,8), R(rdx))
+       INSN2(sub,l     ,R(esi), R(ecx))
+       INSN1(dec,q     ,R(rax))
+       INSN2(sar,q     ,R(cl), R(r8))
+       INSN2(xor,q     ,R(rdx), R(r8))
+       INSN2(and,q     ,R(r8), R(rax))
+       INSN2(xor,q     ,R(rax), R(rdx))
+       INSN2(mov,q     ,R(rdx),X8 MEM_DISP(r10,8))
+       INSN1(jmp,_     ,L(31))
+L(116):
+       INSN2(mov,l     ,NUM(64), R(esi))
+       INSN2(mov,q     ,R(r9), R(rax))
+       INSN2(mov,q     ,X8 MEM_DISP(r10,16), R(rdx))
+       INSN2(sub,l     ,R(r12d), R(esi))
+       INSN2(mov,l     ,R(esi), R(ecx))
+       INSN2(sar,q     ,R(cl), R(r8))
+       INSN2(mov,l     ,R(r12d), R(ecx))
+       INSN2(sal,q     ,R(cl), R(rax))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-129,r11,8), R(ecx))
+       INSN2(or,q      ,R(r8), R(rax))
+       INSN2(mov,q     ,R(rax),X8 MEM_DISP(r10,8))
+       INSN2(mov,l     ,NUM(2), R(eax))
+       INSN2(sal,q     ,R(cl), R(rax))
+       INSN2(mov,l     ,R(esi), R(ecx))
+       INSN2(sar,q     ,R(cl), R(r9))
+       INSN1(dec,q     ,R(rax))
+       INSN2(xor,q     ,R(rdx), R(r9))
+       INSN2(and,q     ,R(r9), R(rax))
+       INSN2(xor,q     ,R(rax), R(rdx))
+       INSN2(mov,q     ,R(rdx),X8 MEM_DISP(r10,16))
+       INSN1(jmp,_     ,L(31))
+L(FE2):
+       FUNEND(avcall_call, .-avcall_call)
+#if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__))
+       .section        EH_FRAME_SECTION
+L(frame1):
+       .long   L(ECIE1)-.LSCIE1
+L(SCIE1):
+       .long   0x0
+       .byte   0x1
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .byte   0x10
+       .uleb128 0x1
+       .byte   0x1b
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+L(ECIE1):
+L(SFDE1):
+       .long   L(EFDE1)-.LASFDE1
+L(ASFDE1):
+       .long   L(ASFDE1)-.Lframe1
+       .long   L(FB2)-.
+       .long   L(FE2)-.LFB2
+       .uleb128 0x0
+       .byte   0x4
+       .long   L(CFI0)-.LFB2
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   L(CFI1)-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   L(CFI4)-.LCFI1
+       .byte   0x83
+       .uleb128 0x5
+       .byte   0x8c
+       .uleb128 0x4
+       .byte   0x8d
+       .uleb128 0x3
+       .align 8
+L(EFDE1):
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-x86_64-windows-macro.S b/avcall/avcall-x86_64-windows-macro.S
new file mode 100644 (file)
index 0000000..fe824f2
--- /dev/null
@@ -0,0 +1,372 @@
+#include "asm-x86_64.h"
+       TEXT()
+       P2ALIGN(4,15)
+       GLOBL(C(avcall_call))
+       DECLARE_FUNCTION(avcall_call)
+FUNBEGIN(avcall_call)
+L(FB0):
+       INSN1(push,q    ,R(rbp))
+L(CFI0):
+       INSN2(mov,q     ,R(rsp), R(rbp))
+L(CFI1):
+       INSN1(push,q    ,R(rsi))
+       INSN1(push,q    ,R(rbx))
+L(CFI2):
+       INSN2(mov,q     ,R(rcx), R(rbx))
+       INSN2(sub,q     ,NUM(32), R(rsp))
+       INSN2(mov,q     ,X8 MEM_DISP(rcx,48), R(rcx))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,40), R(rax))
+       INSN2(sub,q     ,NUM(2064), R(rsp))
+       INSN2(sub,q     ,R(rcx), R(rax))
+       INSN2(sar,q     ,NUM(3), R(rax))
+       INSN2(cmp,l     ,NUM(4), R(eax))
+       INSN1(jle,_     ,L(6))
+       INSN2(lea,l     ,X4 MEM_DISP(rax,-5), R(r8d))
+       INSN2(lea,q     ,X8 MEM_DISP(rsp,32), R(r9))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN2(add,q     ,NUM(1), R(r8))
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(5):
+       INSN2(mov,q     ,X8 MEM_DISP_SHINDEX(rcx,32,rax,8), R(rdx))
+       INSN2(mov,q     ,R(rdx),X8 MEM_SHINDEX(r9,rax,8))
+       INSN2(add,q     ,NUM(1), R(rax))
+       INSN2(cmp,q     ,R(r8), R(rax))
+       INSN1(jne,_     ,L(5))
+L(6):
+       INSN2(mov,l     ,X4 MEM_DISP(rbx,68), R(eax))
+       INSN2(test,l    ,R(eax), R(eax))
+       INSN1(je,_      ,L(7))
+       INSN2(test,b    ,NUM(1), R(al))
+       INSN1(je,_      ,L(8))
+       INSN2S(movs,s   ,X4 MEM_DISP(rbx,76), R(xmm0))
+L(8):
+       INSN2(test,b    ,NUM(2), R(al))
+       INSN1(je,_      ,L(9))
+       INSN2S(movs,s   ,X4 MEM_DISP(rbx,80), R(xmm1))
+L(9):
+       INSN2(test,b    ,NUM(4), R(al))
+       INSN1(je,_      ,L(10))
+       INSN2S(movs,s   ,X4 MEM_DISP(rbx,84), R(xmm2))
+L(10):
+       INSN2(test,b    ,NUM(8), R(al))
+       INSN1(jne,_     ,L(78))
+L(7):
+       INSN2(mov,l     ,X4 MEM_DISP(rbx,72), R(eax))
+       INSN2(test,l    ,R(eax), R(eax))
+       INSN1(je,_      ,L(12))
+       INSN2(test,b    ,NUM(1), R(al))
+       INSN1(je,_      ,L(13))
+       INSN2S(movs,d   ,X8 MEM_DISP(rbx,96), R(xmm0))
+L(13):
+       INSN2(test,b    ,NUM(2), R(al))
+       INSN1(je,_      ,L(14))
+       INSN2S(movs,d   ,X8 MEM_DISP(rbx,104), R(xmm1))
+L(14):
+       INSN2(test,b    ,NUM(4), R(al))
+       INSN1(je,_      ,L(15))
+       INSN2S(movs,d   ,X8 MEM_DISP(rbx,112), R(xmm2))
+L(15):
+       INSN2(test,b    ,NUM(8), R(al))
+       INSN1(jne,_     ,L(79))
+L(12):
+       INSN2(mov,l     ,X4 MEM_DISP(rbx,24), R(eax))
+       INSN2(cmp,l     ,NUM(13), R(eax))
+       INSN1(je,_      ,L(80))
+       INSN2(cmp,l     ,NUM(14), R(eax))
+       INSN1(je,_      ,L(81))
+       INSN2(mov,q     ,X8 MEM_DISP(rcx,8), R(rdx))
+       INSN2(mov,q     ,X8 MEM_DISP(rcx,24), R(r9))
+       INSN2(mov,q     ,X8 MEM_DISP(rcx,16), R(r8))
+       INSN2(mov,q     ,X8 MEM(rcx), R(rcx))
+       INSN1(call,_    ,INDIR(X8 MEM_DISP(rbx,8)))
+       INSN2(mov,l     ,X4 MEM_DISP(rbx,24), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(je,_      ,L(18))
+       INSN2(test,l    ,R(edx), R(edx))
+       INSN1(je,_      ,L(76))
+       INSN2(cmp,l     ,NUM(2), R(edx))
+       INSN1(je,_      ,L(73))
+       INSN2(cmp,l     ,NUM(3), R(edx))
+       INSN1(je,_      ,L(73))
+       INSN2(cmp,l     ,NUM(4), R(edx))
+       INSN1(je,_      ,L(73))
+       INSN2(cmp,l     ,NUM(5), R(edx))
+       INSN1(je,_      ,L(74))
+       INSN2(cmp,l     ,NUM(6), R(edx))
+       INSN1(je,_      ,L(74))
+       INSN2(cmp,l     ,NUM(7), R(edx))
+       INSN1(je,_      ,L(75))
+       INSN2(cmp,l     ,NUM(8), R(edx))
+       INSN1(je,_      ,L(75))
+       INSN2(cmp,l     ,NUM(9), R(edx))
+       INSN1(je,_      ,L(76))
+       INSN2(cmp,l     ,NUM(10), R(edx))
+       INSN1(je,_      ,L(76))
+       INSN2(cmp,l     ,NUM(11), R(edx))
+       INSN1(je,_      ,L(76))
+       INSN2(cmp,l     ,NUM(12), R(edx))
+       INSN1(je,_      ,L(76))
+       INSN2(cmp,l     ,NUM(15), R(edx))
+       INSN1(je,_      ,L(76))
+       INSN2(cmp,l     ,NUM(16), R(edx))
+       INSN1(jne,_     ,L(18))
+       INSN2(test,l    ,NUM(512),X4 MEM(rbx))
+       INSN1(je,_      ,L(18))
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,32), R(r8))
+       INSN2(lea,q     ,X8 MEM_DISP(r8,-4), R(rdx))
+       INSN2(test,q    ,NUM(-5), R(rdx))
+       INSN1(je,_      ,L(35))
+       INSN2(lea,q     ,X8 MEM_DISP(r8,-1), R(rdx))
+       INSN2(cmp,q     ,NUM(1), R(rdx))
+       INSN1(ja,_      ,L(18))
+L(35):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rdx))
+       INSN2(mov,q     ,R(rdx), R(r9))
+       INSN2(and,l     ,NUM(7), R(edx))
+       INSN2(add,q     ,R(rdx), R(r8))
+       INSN2(and,q     ,NUM(-8), R(r9))
+       INSN2(cmp,q     ,NUM(8), R(r8))
+       INSN1(jbe,_     ,L(82))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(0,rdx,8), R(ecx))
+       INSN2(mov,q     ,X8 MEM(r9), R(r10))
+       INSN2(mov,q     ,R(rax), R(rsi))
+       INSN2(mov,q     ,NUM(-1), R(r11))
+       INSN1(neg,l     ,R(edx))
+       INSN2(sal,q     ,R(cl), R(rsi))
+       INSN2(sal,q     ,R(cl), R(r11))
+       INSN2(mov,q     ,R(rsi), R(rcx))
+       INSN2(xor,q     ,R(r10), R(rcx))
+       INSN2(and,q     ,R(r11), R(rcx))
+       INSN2(xor,q     ,R(r10), R(rcx))
+       INSN2(mov,q     ,X8 MEM_DISP(r9,8), R(r10))
+       INSN2(mov,q     ,R(rcx),X8 MEM(r9))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-65,r8,8), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(r8d))
+       INSN2(sal,q     ,R(cl), R(r8))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(64,rdx,8), R(ecx))
+       INSN2(sub,q     ,NUM(1), R(r8))
+       INSN2(sar,q     ,R(cl), R(rax))
+       INSN2(xor,q     ,R(r10), R(rax))
+       INSN2(and,q     ,R(r8), R(rax))
+       INSN2(xor,q     ,R(r10), R(rax))
+       INSN2(mov,q     ,R(rax),X8 MEM_DISP(r9,8))
+L(18):
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-16), R(rsp))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN1(pop,q     ,R(rbx))
+L(CFI3):
+       INSN1(pop,q     ,R(rsi))
+L(CFI4):
+       INSN1(pop,q     ,R(rbp))
+L(CFI5):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(79):
+L(CFI6):
+       INSN2S(movs,d   ,X8 MEM_DISP(rbx,120), R(xmm3))
+       INSN1(jmp,_     ,L(12))
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(78):
+       INSN2S(movs,s   ,X4 MEM_DISP(rbx,88), R(xmm3))
+       INSN1(jmp,_     ,L(7))
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(76):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rdx))
+       INSN2(mov,q     ,R(rax),X8 MEM(rdx))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-16), R(rsp))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN1(pop,q     ,R(rbx))
+L(CFI7):
+       INSN1(pop,q     ,R(rsi))
+L(CFI8):
+       INSN1(pop,q     ,R(rbp))
+L(CFI9):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(73):
+L(CFI10):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rdx))
+       INSN2(mov,b     ,R(al),X1 MEM(rdx))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-16), R(rsp))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN1(pop,q     ,R(rbx))
+L(CFI11):
+       INSN1(pop,q     ,R(rsi))
+L(CFI12):
+       INSN1(pop,q     ,R(rbp))
+L(CFI13):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(81):
+L(CFI14):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rsi))
+       INSN2(mov,q     ,X8 MEM_DISP(rcx,8), R(rdx))
+       INSN2(mov,q     ,X8 MEM_DISP(rcx,24), R(r9))
+       INSN2(mov,q     ,X8 MEM_DISP(rcx,16), R(r8))
+       INSN2(mov,q     ,X8 MEM(rcx), R(rcx))
+       INSN1(call,_    ,INDIR(X8 MEM_DISP(rbx,8)))
+       INSN2S(movs,d   ,R(xmm0),X8 MEM(rsi))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-16), R(rsp))
+       INSN2(xor,l     ,R(eax), R(eax))
+       INSN1(pop,q     ,R(rbx))
+L(CFI15):
+       INSN1(pop,q     ,R(rsi))
+L(CFI16):
+       INSN1(pop,q     ,R(rbp))
+L(CFI17):
+       ret
+L(80):
+L(CFI18):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rsi))
+       INSN2(mov,q     ,X8 MEM_DISP(rcx,8), R(rdx))
+       INSN2(mov,q     ,X8 MEM_DISP(rcx,24), R(r9))
+       INSN2(mov,q     ,X8 MEM_DISP(rcx,16), R(r8))
+       INSN2(mov,q     ,X8 MEM(rcx), R(rcx))
+       INSN1(call,_    ,INDIR(X8 MEM_DISP(rbx,8)))
+       INSN2S(movs,s   ,R(xmm0),X4 MEM(rsi))
+       INSN1(jmp,_     ,L(18))
+L(74):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rdx))
+       INSN2(mov,w     ,R(ax),X2 MEM(rdx))
+       INSN1(jmp,_     ,L(18))
+L(75):
+       INSN2(mov,q     ,X8 MEM_DISP(rbx,16), R(rdx))
+       INSN2(mov,l     ,R(eax),X4 MEM(rdx))
+       INSN1(jmp,_     ,L(18))
+L(82):
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-1,r8,8), R(ecx))
+       INSN2(mov,q     ,X8 MEM(r9), R(r10))
+       INSN2(sal,l     ,NUM(3), R(edx))
+       INSN2(mov,l     ,NUM(2), R(r8d))
+       INSN2(mov,l     ,NUM(1), R(r11d))
+       INSN2(sal,q     ,R(cl), R(r8))
+       INSN2(mov,l     ,R(edx), R(ecx))
+       INSN2(sal,q     ,R(cl), R(r11))
+       INSN2(sal,q     ,R(cl), R(rax))
+       INSN2(sub,q     ,R(r11), R(r8))
+       INSN2(xor,q     ,R(r10), R(rax))
+       INSN2(and,q     ,R(r8), R(rax))
+       INSN2(xor,q     ,R(r10), R(rax))
+       INSN2(mov,q     ,R(rax),X8 MEM(r9))
+       INSN1(jmp,_     ,L(18))
+L(FE0):
+       FUNEND(avcall_call, .-avcall_call)
+#if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__))
+       .section        EH_FRAME_SECTION
+L(frame1):
+       .long   L(ECIE1)-.LSCIE1
+L(SCIE1):
+       .long   0
+       .byte   0x3
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .uleb128 0x10
+       .uleb128 0x1
+       .byte   0x1b
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+L(ECIE1):
+L(SFDE1):
+       .long   L(EFDE1)-.LASFDE1
+L(ASFDE1):
+       .long   L(ASFDE1)-.Lframe1
+       .long   L(FB0)-.
+       .long   L(FE0)-.LFB0
+       .uleb128 0
+       .byte   0x4
+       .long   L(CFI0)-.LFB0
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   L(CFI1)-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   L(CFI2)-.LCFI1
+       .byte   0x84
+       .uleb128 0x3
+       .byte   0x83
+       .uleb128 0x4
+       .byte   0x4
+       .long   L(CFI3)-.LCFI2
+       .byte   0xa
+       .byte   0xc3
+       .byte   0x4
+       .long   L(CFI4)-.LCFI3
+       .byte   0xc4
+       .byte   0x4
+       .long   L(CFI5)-.LCFI4
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI6)-.LCFI5
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI7)-.LCFI6
+       .byte   0xa
+       .byte   0xc3
+       .byte   0x4
+       .long   L(CFI8)-.LCFI7
+       .byte   0xc4
+       .byte   0x4
+       .long   L(CFI9)-.LCFI8
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI10)-.LCFI9
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI11)-.LCFI10
+       .byte   0xa
+       .byte   0xc3
+       .byte   0x4
+       .long   L(CFI12)-.LCFI11
+       .byte   0xc4
+       .byte   0x4
+       .long   L(CFI13)-.LCFI12
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI14)-.LCFI13
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI15)-.LCFI14
+       .byte   0xa
+       .byte   0xc3
+       .byte   0x4
+       .long   L(CFI16)-.LCFI15
+       .byte   0xc4
+       .byte   0x4
+       .long   L(CFI17)-.LCFI16
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI18)-.LCFI17
+       .byte   0xb
+       .align 8
+L(EFDE1):
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/avcall/avcall-x86_64-windows.c b/avcall/avcall-x86_64-windows.c
new file mode 100644 (file)
index 0000000..5d5d43c
--- /dev/null
@@ -0,0 +1,228 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  Foreign function interface for an x86_64 (a.k.a. amd64) with gcc
+  using the Windows ABI ('gcc -mabi=ms').
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  x86_64 Argument Passing Conventions on Windows:
+
+  Documentation is at https://docs.microsoft.com/en-us/cpp/build/calling-convention
+  A summary is at https://en.wikipedia.org/wiki/X86_calling_conventions#x86-64_calling_conventions
+
+  * Arguments:
+    - Up to 4 words are passed in registers:
+             integer/pointer  float/double
+        1.        %rcx           %xmm0
+        2.        %rdx           %xmm1
+        3.        %r8            %xmm2
+        4.        %r9            %xmm3
+    - Integer or pointer arguments:
+      The first 4 integer or pointer arguments get passed in integer
+      registers (%rcx, %rdx, %r8, %r9).
+      The remaining ones (as an entire word each) on the stack.
+    - Floating-point arguments:
+      The float/double arguments among the first 4 words are passed in
+      SSE registers (%xmm0..%xmm3), as shown above.
+      The remaining ones (as an entire word each) on the stack.
+    - Structure arguments:
+      Structure args of size 1, 2, 4, 8 bytes are passed like integers.
+      Structure args of other sizes are passed as pointers to caller-allocated
+      temporary locations.
+  * Return value:
+    Types of size 1, 2, 4, 8 bytes are returned in %rax or (for float/double
+    values) in %xmm0.
+    To return a structure of another size, the called function copies the
+    value to space pointed to by its first argument, and all other arguments
+    are shifted down by one. The function also returns the pointer.
+  * Call-used registers: rax,rdx,rcx,r8-r11
+
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+/*register __avword iarg1 __asm__("rcx");*/
+/*register __avword iarg2 __asm__("rdx");*/
+/*register __avword iarg3 __asm__("r8");*/
+/*register __avword iarg4 __asm__("r9");*/
+
+register float farg1 __asm__("xmm0");
+register float farg2 __asm__("xmm1");
+register float farg3 __asm__("xmm2");
+register float farg4 __asm__("xmm3");
+
+register double darg1 __asm__("xmm0");
+register double darg2 __asm__("xmm1");
+register double darg3 __asm__("xmm2");
+register double darg4 __asm__("xmm3");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("rsp"); /* C names for registers */
+  register __avword    iret    __asm__("rax");
+  register float       fret    __asm__("xmm0");
+  register double      dret    __asm__("xmm0");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  int i;
+
+  for (i = 4; i < arglen; i++)         /* push function args onto stack */
+    argframe[i-4] = l->args[i];
+
+  /* put up to 4 float args into registers */
+  if (l->farg_mask) {
+    if (l->farg_mask & (1<<0))
+      farg1 = l->fargs[0];
+    if (l->farg_mask & (1<<1))
+      farg2 = l->fargs[1];
+    if (l->farg_mask & (1<<2))
+      farg3 = l->fargs[2];
+    if (l->farg_mask & (1<<3))
+      farg4 = l->fargs[3];
+  }
+
+  /* put up to 4 double args into registers */
+  if (l->darg_mask) {
+    if (l->darg_mask & (1<<0))
+      darg1 = l->dargs[0];
+    if (l->darg_mask & (1<<1))
+      darg2 = l->dargs[1];
+    if (l->darg_mask & (1<<2))
+      darg3 = l->dargs[2];
+    if (l->darg_mask & (1<<3))
+      darg4 = l->dargs[3];
+  }
+
+  /* Call function. */
+  if (l->rtype == __AVfloat) {
+    *(float*)l->raddr = (*(float(*)())l->func)(l->args[0], l->args[1], l->args[2], l->args[3]);
+  } else
+  if (l->rtype == __AVdouble) {
+    *(double*)l->raddr = (*(double(*)())l->func)(l->args[0], l->args[1], l->args[2], l->args[3]);
+  } else {
+    __avword iret;
+    iret = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3]);
+
+    /* save return value */
+    if (l->rtype == __AVvoid) {
+    } else
+    if (l->rtype == __AVword) {
+      RETURN(__avword, iret);
+    } else
+    if (l->rtype == __AVchar) {
+      RETURN(char, iret);
+    } else
+    if (l->rtype == __AVschar) {
+      RETURN(signed char, iret);
+    } else
+    if (l->rtype == __AVuchar) {
+      RETURN(unsigned char, iret);
+    } else
+    if (l->rtype == __AVshort) {
+      RETURN(short, iret);
+    } else
+    if (l->rtype == __AVushort) {
+      RETURN(unsigned short, iret);
+    } else
+    if (l->rtype == __AVint) {
+      RETURN(int, iret);
+    } else
+    if (l->rtype == __AVuint) {
+      RETURN(unsigned int, iret);
+    } else
+    if (l->rtype == __AVlong) {
+      RETURN(long, iret);
+    } else
+    if (l->rtype == __AVulong) {
+      RETURN(unsigned long, iret);
+    } else
+    if (l->rtype == __AVlonglong) {
+      RETURN(long long, iret);
+    } else
+    if (l->rtype == __AVulonglong) {
+      RETURN(unsigned long long, iret);
+    } else
+  /* see above
+    if (l->rtype == __AVfloat) {
+    } else
+    if (l->rtype == __AVdouble) {
+    } else
+  */
+    if (l->rtype == __AVvoidp) {
+      RETURN(void*, iret);
+    } else
+    if (l->rtype == __AVstruct) {
+      if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+        /* Return structs of size 1, 2, 4, 8 in registers. */
+        void* raddr = l->raddr;
+        #if 0 /* Unoptimized */
+        if (l->rsize == 1) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+        } else
+        if (l->rsize == 2) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+        } else
+        if (l->rsize == 4) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+        } else
+        if (l->rsize == 8) {
+          ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+          ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+          ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+          ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+          ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56);
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = l->rsize;
+        if (count == 1 || count == 2 || count == 4 || count == 8) {
+          /* 0 < count ≤ sizeof(__avword) */
+          __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+          uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+          uintptr_t end_offset = start_offset + count; /* > 0, < 2*sizeof(__avword) */
+          if (end_offset <= sizeof(__avword)) {
+            /* 0 < end_offset ≤ sizeof(__avword) */
+            __avword mask0 = ((__avword)2 << (end_offset*8-1)) - ((__avword)1 << (start_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+          } else {
+            /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+            __avword mask0 = - ((__avword)1 << (start_offset*8));
+            __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avword)*8-start_offset*8))) & mask1;
+          }
+        }
+        #endif
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall-x86_64-windows.s b/avcall/avcall-x86_64-windows.s
new file mode 100644 (file)
index 0000000..73b140d
--- /dev/null
@@ -0,0 +1,369 @@
+       .file   "avcall-x86_64-windows.c"
+       .text
+       .p2align 4,,15
+       .globl  avcall_call
+       .type   avcall_call, @function
+avcall_call:
+.LFB0:
+       pushq   %rbp
+.LCFI0:
+       movq    %rsp, %rbp
+.LCFI1:
+       pushq   %rsi
+       pushq   %rbx
+.LCFI2:
+       movq    %rcx, %rbx
+       subq    $32, %rsp
+       movq    48(%rcx), %rcx
+       movq    40(%rbx), %rax
+       subq    $2064, %rsp
+       subq    %rcx, %rax
+       sarq    $3, %rax
+       cmpl    $4, %eax
+       jle     .L6
+       leal    -5(%rax), %r8d
+       leaq    32(%rsp), %r9
+       xorl    %eax, %eax
+       addq    $1, %r8
+       .p2align 4,,10
+       .p2align 3
+.L5:
+       movq    32(%rcx,%rax,8), %rdx
+       movq    %rdx, (%r9,%rax,8)
+       addq    $1, %rax
+       cmpq    %r8, %rax
+       jne     .L5
+.L6:
+       movl    68(%rbx), %eax
+       testl   %eax, %eax
+       je      .L7
+       testb   $1, %al
+       je      .L8
+       movss   76(%rbx), %xmm0
+.L8:
+       testb   $2, %al
+       je      .L9
+       movss   80(%rbx), %xmm1
+.L9:
+       testb   $4, %al
+       je      .L10
+       movss   84(%rbx), %xmm2
+.L10:
+       testb   $8, %al
+       jne     .L78
+.L7:
+       movl    72(%rbx), %eax
+       testl   %eax, %eax
+       je      .L12
+       testb   $1, %al
+       je      .L13
+       movsd   96(%rbx), %xmm0
+.L13:
+       testb   $2, %al
+       je      .L14
+       movsd   104(%rbx), %xmm1
+.L14:
+       testb   $4, %al
+       je      .L15
+       movsd   112(%rbx), %xmm2
+.L15:
+       testb   $8, %al
+       jne     .L79
+.L12:
+       movl    24(%rbx), %eax
+       cmpl    $13, %eax
+       je      .L80
+       cmpl    $14, %eax
+       je      .L81
+       movq    8(%rcx), %rdx
+       movq    24(%rcx), %r9
+       movq    16(%rcx), %r8
+       movq    (%rcx), %rcx
+       call    *8(%rbx)
+       movl    24(%rbx), %edx
+       cmpl    $1, %edx
+       je      .L18
+       testl   %edx, %edx
+       je      .L76
+       cmpl    $2, %edx
+       je      .L73
+       cmpl    $3, %edx
+       je      .L73
+       cmpl    $4, %edx
+       je      .L73
+       cmpl    $5, %edx
+       je      .L74
+       cmpl    $6, %edx
+       je      .L74
+       cmpl    $7, %edx
+       je      .L75
+       cmpl    $8, %edx
+       je      .L75
+       cmpl    $9, %edx
+       je      .L76
+       cmpl    $10, %edx
+       je      .L76
+       cmpl    $11, %edx
+       je      .L76
+       cmpl    $12, %edx
+       je      .L76
+       cmpl    $15, %edx
+       je      .L76
+       cmpl    $16, %edx
+       jne     .L18
+       testl   $512, (%rbx)
+       je      .L18
+       movq    32(%rbx), %r8
+       leaq    -4(%r8), %rdx
+       testq   $-5, %rdx
+       je      .L35
+       leaq    -1(%r8), %rdx
+       cmpq    $1, %rdx
+       ja      .L18
+.L35:
+       movq    16(%rbx), %rdx
+       movq    %rdx, %r9
+       andl    $7, %edx
+       addq    %rdx, %r8
+       andq    $-8, %r9
+       cmpq    $8, %r8
+       jbe     .L82
+       leal    0(,%rdx,8), %ecx
+       movq    (%r9), %r10
+       movq    %rax, %rsi
+       movq    $-1, %r11
+       negl    %edx
+       salq    %cl, %rsi
+       salq    %cl, %r11
+       movq    %rsi, %rcx
+       xorq    %r10, %rcx
+       andq    %r11, %rcx
+       xorq    %r10, %rcx
+       movq    8(%r9), %r10
+       movq    %rcx, (%r9)
+       leal    -65(,%r8,8), %ecx
+       movl    $2, %r8d
+       salq    %cl, %r8
+       leal    64(,%rdx,8), %ecx
+       subq    $1, %r8
+       sarq    %cl, %rax
+       xorq    %r10, %rax
+       andq    %r8, %rax
+       xorq    %r10, %rax
+       movq    %rax, 8(%r9)
+.L18:
+       leaq    -16(%rbp), %rsp
+       xorl    %eax, %eax
+       popq    %rbx
+.LCFI3:
+       popq    %rsi
+.LCFI4:
+       popq    %rbp
+.LCFI5:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L79:
+.LCFI6:
+       movsd   120(%rbx), %xmm3
+       jmp     .L12
+       .p2align 4,,10
+       .p2align 3
+.L78:
+       movss   88(%rbx), %xmm3
+       jmp     .L7
+       .p2align 4,,10
+       .p2align 3
+.L76:
+       movq    16(%rbx), %rdx
+       movq    %rax, (%rdx)
+       leaq    -16(%rbp), %rsp
+       xorl    %eax, %eax
+       popq    %rbx
+.LCFI7:
+       popq    %rsi
+.LCFI8:
+       popq    %rbp
+.LCFI9:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L73:
+.LCFI10:
+       movq    16(%rbx), %rdx
+       movb    %al, (%rdx)
+       leaq    -16(%rbp), %rsp
+       xorl    %eax, %eax
+       popq    %rbx
+.LCFI11:
+       popq    %rsi
+.LCFI12:
+       popq    %rbp
+.LCFI13:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L81:
+.LCFI14:
+       movq    16(%rbx), %rsi
+       movq    8(%rcx), %rdx
+       movq    24(%rcx), %r9
+       movq    16(%rcx), %r8
+       movq    (%rcx), %rcx
+       call    *8(%rbx)
+       movsd   %xmm0, (%rsi)
+       leaq    -16(%rbp), %rsp
+       xorl    %eax, %eax
+       popq    %rbx
+.LCFI15:
+       popq    %rsi
+.LCFI16:
+       popq    %rbp
+.LCFI17:
+       ret
+.L80:
+.LCFI18:
+       movq    16(%rbx), %rsi
+       movq    8(%rcx), %rdx
+       movq    24(%rcx), %r9
+       movq    16(%rcx), %r8
+       movq    (%rcx), %rcx
+       call    *8(%rbx)
+       movss   %xmm0, (%rsi)
+       jmp     .L18
+.L74:
+       movq    16(%rbx), %rdx
+       movw    %ax, (%rdx)
+       jmp     .L18
+.L75:
+       movq    16(%rbx), %rdx
+       movl    %eax, (%rdx)
+       jmp     .L18
+.L82:
+       leal    -1(,%r8,8), %ecx
+       movq    (%r9), %r10
+       sall    $3, %edx
+       movl    $2, %r8d
+       movl    $1, %r11d
+       salq    %cl, %r8
+       movl    %edx, %ecx
+       salq    %cl, %r11
+       salq    %cl, %rax
+       subq    %r11, %r8
+       xorq    %r10, %rax
+       andq    %r8, %rax
+       xorq    %r10, %rax
+       movq    %rax, (%r9)
+       jmp     .L18
+.LFE0:
+       .size   avcall_call, .-avcall_call
+       .section        .eh_frame,"a",@progbits
+.Lframe1:
+       .long   .LECIE1-.LSCIE1
+.LSCIE1:
+       .long   0
+       .byte   0x3
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .uleb128 0x10
+       .uleb128 0x1
+       .byte   0x1b
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+.LECIE1:
+.LSFDE1:
+       .long   .LEFDE1-.LASFDE1
+.LASFDE1:
+       .long   .LASFDE1-.Lframe1
+       .long   .LFB0-.
+       .long   .LFE0-.LFB0
+       .uleb128 0
+       .byte   0x4
+       .long   .LCFI0-.LFB0
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI1-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   .LCFI2-.LCFI1
+       .byte   0x84
+       .uleb128 0x3
+       .byte   0x83
+       .uleb128 0x4
+       .byte   0x4
+       .long   .LCFI3-.LCFI2
+       .byte   0xa
+       .byte   0xc3
+       .byte   0x4
+       .long   .LCFI4-.LCFI3
+       .byte   0xc4
+       .byte   0x4
+       .long   .LCFI5-.LCFI4
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI6-.LCFI5
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI7-.LCFI6
+       .byte   0xa
+       .byte   0xc3
+       .byte   0x4
+       .long   .LCFI8-.LCFI7
+       .byte   0xc4
+       .byte   0x4
+       .long   .LCFI9-.LCFI8
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI10-.LCFI9
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI11-.LCFI10
+       .byte   0xa
+       .byte   0xc3
+       .byte   0x4
+       .long   .LCFI12-.LCFI11
+       .byte   0xc4
+       .byte   0x4
+       .long   .LCFI13-.LCFI12
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI14-.LCFI13
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI15-.LCFI14
+       .byte   0xa
+       .byte   0xc3
+       .byte   0x4
+       .long   .LCFI16-.LCFI15
+       .byte   0xc4
+       .byte   0x4
+       .long   .LCFI17-.LCFI16
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI18-.LCFI17
+       .byte   0xb
+       .align 8
+.LEFDE1:
+       .ident  "GCC: (GNU) 5.4.0"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/avcall/avcall-x86_64-x32-linux.s b/avcall/avcall-x86_64-x32-linux.s
new file mode 100644 (file)
index 0000000..8f3931d
--- /dev/null
@@ -0,0 +1,632 @@
+       .file   "avcall-x86_64.c"
+       .section        .text.unlikely,"ax",@progbits
+.LCOLDB1:
+       .text
+.LHOTB1:
+       .p2align 4,,15
+       .globl  avcall_call
+       .type   avcall_call, @function
+avcall_call:
+.LFB0:
+       pushq   %rbp
+.LCFI0:
+       movl    %esp, %ebp
+.LCFI1:
+       pushq   %r12
+       pushq   %rbx
+.LCFI2:
+       movq    %rdi, %rbx
+       movl    24(%edi), %edi
+       movl    20(%ebx), %ecx
+       movl    88(%ebx), %r8d
+       subl    $2064, %esp
+       leal    96(%rbx), %eax
+       leal    15(%rsp), %esi
+       subl    %edi, %ecx
+       subl    %eax, %r8d
+       andl    $-16, %esi
+       sarl    $3, %ecx
+       sarl    $3, %r8d
+       xorl    %eax, %eax
+       testl   %ecx, %ecx
+       jle     .L6
+       .p2align 4,,10
+       .p2align 3
+.L77:
+       movq    (%edi,%eax,8), %rdx
+       movq    %rdx, (%esi,%eax,8)
+       addl    $1, %eax
+       cmpl    %eax, %ecx
+       jne     .L77
+.L6:
+       movl    12(%ebx), %eax
+       cmpl    $13, %eax
+       je      .L95
+       cmpl    $14, %eax
+       je      .L96
+       cmpl    $7, %r8d
+       movl    4(%ebx), %r10d
+       jle     .L39
+       movsd   152(%ebx), %xmm14
+.L40:
+       movsd   144(%ebx), %xmm13
+.L42:
+       movsd   136(%ebx), %xmm12
+.L44:
+       movsd   128(%ebx), %xmm11
+.L46:
+       movsd   120(%ebx), %xmm10
+.L48:
+       movsd   112(%ebx), %xmm9
+.L50:
+       movsd   104(%ebx), %xmm8
+.L52:
+       movsd   96(%ebx), %xmm15
+.L53:
+       movq    64(%ebx), %rcx
+       movq    56(%ebx), %rdx
+       movl    $8, %eax
+       movq    48(%ebx), %rsi
+       movq    40(%ebx), %rdi
+       movapd  %xmm14, %xmm7
+       movapd  %xmm13, %xmm6
+       movapd  %xmm12, %xmm5
+       movq    80(%ebx), %r9
+       movapd  %xmm11, %xmm4
+       movq    72(%ebx), %r8
+       movapd  %xmm10, %xmm3
+       movapd  %xmm9, %xmm2
+       movapd  %xmm8, %xmm1
+       movapd  %xmm15, %xmm0
+       call    *%r10
+       movl    12(%ebx), %ecx
+       cmpl    $1, %ecx
+       je      .L22
+       testl   %ecx, %ecx
+       je      .L92
+       cmpl    $2, %ecx
+       je      .L86
+       cmpl    $3, %ecx
+       je      .L86
+       cmpl    $4, %ecx
+       je      .L86
+       cmpl    $5, %ecx
+       je      .L87
+       cmpl    $6, %ecx
+       je      .L87
+       cmpl    $7, %ecx
+       je      .L91
+       cmpl    $8, %ecx
+       je      .L91
+       cmpl    $9, %ecx
+       je      .L91
+       cmpl    $10, %ecx
+       je      .L91
+       cmpl    $11, %ecx
+       je      .L92
+       cmpl    $12, %ecx
+       je      .L92
+       cmpl    $15, %ecx
+       je      .L91
+       cmpl    $16, %ecx
+       jne     .L22
+       testl   $512, (%ebx)
+       je      .L22
+       movl    16(%ebx), %ecx
+       leal    -1(%rcx), %esi
+       cmpl    $15, %esi
+       ja      .L22
+       movl    8(%ebx), %esi
+       movl    %esi, %edi
+       andl    $7, %esi
+       andl    $-8, %edi
+       cmpl    $8, %ecx
+       leal    (%rcx,%rsi), %r8d
+       ja      .L67
+       cmpl    $8, %r8d
+       ja      .L68
+       leal    -1(,%r8,8), %ecx
+       movq    (%edi), %r9
+       sall    $3, %esi
+       movl    $2, %edx
+       movl    $1, %r8d
+       salq    %cl, %rdx
+       movl    %esi, %ecx
+       salq    %cl, %r8
+       salq    %cl, %rax
+       subq    %r8, %rdx
+       xorq    %r9, %rax
+       andq    %rdx, %rax
+       xorq    %r9, %rax
+       movq    %rax, (%edi)
+.L22:
+       leal    -16(%rbp), %esp
+       xorl    %eax, %eax
+       popq    %rbx
+       popq    %r12
+       popq    %rbp
+.LCFI3:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L39:
+.LCFI4:
+       je      .L97
+       cmpl    $6, %r8d
+       je      .L98
+       cmpl    $5, %r8d
+       je      .L99
+       cmpl    $4, %r8d
+       je      .L100
+       cmpl    $3, %r8d
+       je      .L101
+       cmpl    $2, %r8d
+       je      .L102
+       pxor    %xmm8, %xmm8
+       cmpl    $1, %r8d
+       movapd  %xmm8, %xmm9
+       movapd  %xmm8, %xmm10
+       movapd  %xmm8, %xmm11
+       movapd  %xmm8, %xmm12
+       movapd  %xmm8, %xmm13
+       movapd  %xmm8, %xmm14
+       je      .L52
+       movapd  %xmm8, %xmm15
+       jmp     .L53
+       .p2align 4,,10
+       .p2align 3
+.L95:
+       cmpl    $7, %r8d
+       movl    8(%ebx), %r12d
+       movl    4(%ebx), %r10d
+       jle     .L7
+       movsd   152(%ebx), %xmm14
+.L8:
+       movsd   144(%ebx), %xmm13
+.L10:
+       movsd   136(%ebx), %xmm12
+.L12:
+       movsd   128(%ebx), %xmm11
+.L14:
+       movsd   120(%ebx), %xmm10
+.L16:
+       movsd   112(%ebx), %xmm9
+.L18:
+       movsd   104(%ebx), %xmm8
+.L20:
+       movsd   96(%ebx), %xmm15
+       jmp     .L21
+       .p2align 4,,10
+       .p2align 3
+.L96:
+       cmpl    $7, %r8d
+       movl    8(%ebx), %r12d
+       movl    4(%ebx), %r10d
+       jle     .L24
+       movsd   152(%ebx), %xmm14
+.L25:
+       movsd   144(%ebx), %xmm13
+.L27:
+       movsd   136(%ebx), %xmm12
+.L29:
+       movsd   128(%ebx), %xmm11
+.L31:
+       movsd   120(%ebx), %xmm10
+.L33:
+       movsd   112(%ebx), %xmm9
+.L35:
+       movsd   104(%ebx), %xmm8
+.L37:
+       movsd   96(%ebx), %xmm15
+.L38:
+       movq    64(%ebx), %rcx
+       movq    56(%ebx), %rdx
+       movl    $8, %eax
+       movq    48(%ebx), %rsi
+       movq    40(%ebx), %rdi
+       movq    80(%ebx), %r9
+       movq    72(%ebx), %r8
+       movapd  %xmm14, %xmm7
+       movapd  %xmm13, %xmm6
+       movapd  %xmm12, %xmm5
+       movapd  %xmm11, %xmm4
+       movapd  %xmm10, %xmm3
+       movapd  %xmm9, %xmm2
+       movapd  %xmm8, %xmm1
+       movapd  %xmm15, %xmm0
+       call    *%r10
+       movsd   %xmm0, (%r12d)
+       leal    -16(%rbp), %esp
+       xorl    %eax, %eax
+       popq    %rbx
+       popq    %r12
+       popq    %rbp
+.LCFI5:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L7:
+.LCFI6:
+       je      .L103
+       cmpl    $6, %r8d
+       je      .L104
+       cmpl    $5, %r8d
+       je      .L105
+       cmpl    $4, %r8d
+       je      .L106
+       cmpl    $3, %r8d
+       je      .L107
+       cmpl    $2, %r8d
+       je      .L108
+       pxor    %xmm8, %xmm8
+       cmpl    $1, %r8d
+       movapd  %xmm8, %xmm9
+       movapd  %xmm8, %xmm10
+       movapd  %xmm8, %xmm11
+       movapd  %xmm8, %xmm12
+       movapd  %xmm8, %xmm13
+       movapd  %xmm8, %xmm14
+       movapd  %xmm8, %xmm15
+       je      .L20
+.L21:
+       movq    64(%ebx), %rcx
+       movq    56(%ebx), %rdx
+       movl    $8, %eax
+       movq    48(%ebx), %rsi
+       movq    40(%ebx), %rdi
+       movq    80(%ebx), %r9
+       movq    72(%ebx), %r8
+       movapd  %xmm14, %xmm7
+       movapd  %xmm13, %xmm6
+       movapd  %xmm12, %xmm5
+       movapd  %xmm11, %xmm4
+       movapd  %xmm10, %xmm3
+       movapd  %xmm9, %xmm2
+       movapd  %xmm8, %xmm1
+       movapd  %xmm15, %xmm0
+       call    *%r10
+       movss   %xmm0, (%r12d)
+       leal    -16(%rbp), %esp
+       xorl    %eax, %eax
+       popq    %rbx
+       popq    %r12
+       popq    %rbp
+.LCFI7:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L102:
+.LCFI8:
+       pxor    %xmm9, %xmm9
+       movapd  %xmm9, %xmm10
+       movapd  %xmm9, %xmm11
+       movapd  %xmm9, %xmm12
+       movapd  %xmm9, %xmm13
+       movapd  %xmm9, %xmm14
+       jmp     .L50
+.L24:
+       je      .L109
+       cmpl    $6, %r8d
+       je      .L110
+       cmpl    $5, %r8d
+       je      .L111
+       cmpl    $4, %r8d
+       je      .L112
+       cmpl    $3, %r8d
+       je      .L113
+       cmpl    $2, %r8d
+       je      .L114
+       pxor    %xmm8, %xmm8
+       cmpl    $1, %r8d
+       movapd  %xmm8, %xmm9
+       movapd  %xmm8, %xmm10
+       movapd  %xmm8, %xmm11
+       movapd  %xmm8, %xmm12
+       movapd  %xmm8, %xmm13
+       movapd  %xmm8, %xmm14
+       movapd  %xmm8, %xmm15
+       jne     .L38
+       jmp     .L37
+       .p2align 4,,10
+       .p2align 3
+.L86:
+       movl    8(%ebx), %edx
+       movb    %al, (%edx)
+       leal    -16(%rbp), %esp
+       xorl    %eax, %eax
+       popq    %rbx
+       popq    %r12
+       popq    %rbp
+.LCFI9:
+       ret
+.L91:
+.LCFI10:
+       movl    8(%ebx), %edx
+       movl    %eax, (%edx)
+       jmp     .L22
+       .p2align 4,,10
+       .p2align 3
+.L92:
+       movl    8(%ebx), %edx
+       movq    %rax, (%edx)
+       leal    -16(%rbp), %esp
+       xorl    %eax, %eax
+       popq    %rbx
+       popq    %r12
+       popq    %rbp
+.LCFI11:
+       ret
+.L108:
+.LCFI12:
+       pxor    %xmm9, %xmm9
+       movapd  %xmm9, %xmm10
+       movapd  %xmm9, %xmm11
+       movapd  %xmm9, %xmm12
+       movapd  %xmm9, %xmm13
+       movapd  %xmm9, %xmm14
+       jmp     .L18
+.L87:
+       movl    8(%ebx), %edx
+       movw    %ax, (%edx)
+       jmp     .L22
+.L114:
+       pxor    %xmm9, %xmm9
+       movapd  %xmm9, %xmm10
+       movapd  %xmm9, %xmm11
+       movapd  %xmm9, %xmm12
+       movapd  %xmm9, %xmm13
+       movapd  %xmm9, %xmm14
+       jmp     .L35
+.L68:
+       leal    0(,%rsi,8), %ecx
+       movq    $-1, %rdx
+       movq    (%edi), %r9
+       negl    %esi
+       salq    %cl, %rdx
+       movq    %rdx, %r10
+       movq    %rax, %rdx
+       salq    %cl, %rdx
+       leal    -65(,%r8,8), %ecx
+       xorq    %r9, %rdx
+       andq    %r10, %rdx
+       xorq    %r9, %rdx
+       movq    8(%edi), %r9
+       movq    %rdx, (%edi)
+       movl    $2, %edx
+       salq    %cl, %rdx
+       leal    64(,%rsi,8), %ecx
+       subq    $1, %rdx
+       sarq    %cl, %rax
+       xorq    %r9, %rax
+       andq    %rdx, %rax
+       xorq    %r9, %rax
+       movq    %rax, 8(%edi)
+       jmp     .L22
+.L67:
+       leal    0(,%rsi,8), %r10d
+       movq    (%edi), %r9
+       movq    %rax, %rbx
+       movq    $-1, %r11
+       movl    %r10d, %ecx
+       salq    %cl, %rbx
+       salq    %cl, %r11
+       movq    %rbx, %rcx
+       xorq    %r9, %rcx
+       andq    %r11, %rcx
+       xorq    %r9, %rcx
+       cmpl    $16, %r8d
+       movq    %rcx, (%edi)
+       jbe     .L115
+       negl    %esi
+       movq    16(%edi), %r9
+       leal    64(,%rsi,8), %r11d
+       movq    %rdx, %rsi
+       movl    %r11d, %ecx
+       sarq    %cl, %rax
+       movl    %r10d, %ecx
+       salq    %cl, %rsi
+       leal    -129(,%r8,8), %ecx
+       orq     %rsi, %rax
+       movq    %rax, 8(%edi)
+       movl    $2, %eax
+       salq    %cl, %rax
+       movl    %r11d, %ecx
+       leaq    -1(%rax), %rsi
+       movq    %rdx, %rax
+       sarq    %cl, %rax
+       xorq    %r9, %rax
+       andq    %rsi, %rax
+       xorq    %r9, %rax
+       movq    %rax, 16(%edi)
+       jmp     .L22
+.L101:
+       pxor    %xmm10, %xmm10
+       movapd  %xmm10, %xmm11
+       movapd  %xmm10, %xmm12
+       movapd  %xmm10, %xmm13
+       movapd  %xmm10, %xmm14
+       jmp     .L48
+.L115:
+       negl    %esi
+       leal    -65(,%r8,8), %ecx
+       movq    8(%edi), %r9
+       leal    32(,%rsi,4), %r11d
+       movl    $2, %esi
+       salq    %cl, %rsi
+       movl    %r11d, %ecx
+       subq    $1, %rsi
+       sarq    %cl, %rax
+       sarq    %cl, %rax
+       movl    %r10d, %ecx
+       salq    %cl, %rdx
+       orq     %rdx, %rax
+       xorq    %r9, %rax
+       andq    %rsi, %rax
+       xorq    %r9, %rax
+       movq    %rax, 8(%edi)
+       jmp     .L22
+.L113:
+       pxor    %xmm10, %xmm10
+       movapd  %xmm10, %xmm11
+       movapd  %xmm10, %xmm12
+       movapd  %xmm10, %xmm13
+       movapd  %xmm10, %xmm14
+       jmp     .L33
+.L112:
+       pxor    %xmm11, %xmm11
+       movapd  %xmm11, %xmm12
+       movapd  %xmm11, %xmm13
+       movapd  %xmm11, %xmm14
+       jmp     .L31
+.L97:
+       pxor    %xmm14, %xmm14
+       jmp     .L40
+.L98:
+       pxor    %xmm13, %xmm13
+       movapd  %xmm13, %xmm14
+       jmp     .L42
+.L99:
+       pxor    %xmm12, %xmm12
+       movapd  %xmm12, %xmm13
+       movapd  %xmm12, %xmm14
+       jmp     .L44
+.L100:
+       pxor    %xmm11, %xmm11
+       movapd  %xmm11, %xmm12
+       movapd  %xmm11, %xmm13
+       movapd  %xmm11, %xmm14
+       jmp     .L46
+.L111:
+       pxor    %xmm12, %xmm12
+       movapd  %xmm12, %xmm13
+       movapd  %xmm12, %xmm14
+       jmp     .L29
+.L110:
+       pxor    %xmm13, %xmm13
+       movapd  %xmm13, %xmm14
+       jmp     .L27
+.L109:
+       pxor    %xmm14, %xmm14
+       jmp     .L25
+.L107:
+       pxor    %xmm10, %xmm10
+       movapd  %xmm10, %xmm11
+       movapd  %xmm10, %xmm12
+       movapd  %xmm10, %xmm13
+       movapd  %xmm10, %xmm14
+       jmp     .L16
+.L106:
+       pxor    %xmm11, %xmm11
+       movapd  %xmm11, %xmm12
+       movapd  %xmm11, %xmm13
+       movapd  %xmm11, %xmm14
+       jmp     .L14
+.L105:
+       pxor    %xmm12, %xmm12
+       movapd  %xmm12, %xmm13
+       movapd  %xmm12, %xmm14
+       jmp     .L12
+.L104:
+       pxor    %xmm13, %xmm13
+       movapd  %xmm13, %xmm14
+       jmp     .L10
+.L103:
+       pxor    %xmm14, %xmm14
+       jmp     .L8
+.LFE0:
+       .size   avcall_call, .-avcall_call
+       .section        .text.unlikely
+.LCOLDE1:
+       .text
+.LHOTE1:
+       .section        .eh_frame,"a",@progbits
+.Lframe1:
+       .long   .LECIE1-.LSCIE1
+.LSCIE1:
+       .long   0
+       .byte   0x3
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .uleb128 0x10
+       .uleb128 0x1
+       .byte   0x1b
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 4
+.LECIE1:
+.LSFDE1:
+       .long   .LEFDE1-.LASFDE1
+.LASFDE1:
+       .long   .LASFDE1-.Lframe1
+       .long   .LFB0-.
+       .long   .LFE0-.LFB0
+       .uleb128 0
+       .byte   0x4
+       .long   .LCFI0-.LFB0
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI1-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   .LCFI2-.LCFI1
+       .byte   0x8c
+       .uleb128 0x3
+       .byte   0x83
+       .uleb128 0x4
+       .byte   0x4
+       .long   .LCFI3-.LCFI2
+       .byte   0xa
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI4-.LCFI3
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI5-.LCFI4
+       .byte   0xa
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI6-.LCFI5
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI7-.LCFI6
+       .byte   0xa
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI8-.LCFI7
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI9-.LCFI8
+       .byte   0xa
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI10-.LCFI9
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI11-.LCFI10
+       .byte   0xa
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI12-.LCFI11
+       .byte   0xb
+       .align 4
+.LEFDE1:
+       .ident  "GCC: (GNU) 5.4.0"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/avcall/avcall-x86_64.c b/avcall/avcall-x86_64.c
new file mode 100644 (file)
index 0000000..e3b2627
--- /dev/null
@@ -0,0 +1,342 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  Foreign function interface for an x86_64 (a.k.a. amd64) with gcc
+  using the Unix ABI ('gcc -mabi=sysv').
+
+  This calls a C function with an argument list built up using macros
+  defined in avcall.h.
+
+  x86_64 Argument Passing Conventions on Unix:
+
+  Documentation is at https://github.com/hjl-tools/x86-psABI/wiki/X86-psABI
+
+  * Arguments:
+    - Integer or pointer arguments:
+      The first 6 integer or pointer arguments get passed in integer
+      registers (%rdi, %rsi, %rdx, %rcx, %r8, %r9).
+      The remaining ones (as an entire word each) on the stack.
+    - Floating-point arguments:
+      Up to 8 float/double arguments are passed in SSE registers
+      (%xmm0..%xmm7).
+      The remaining ones (as an entire word each) on the stack.
+    - Structure arguments:
+      Structure args are passed as true structures embedded in the
+      argument stack.
+  * Return value:
+    Integers are returned in %rax, %rdx. Float/double values are returned
+    in %xmm0, %xmm1. To return a structure larger than 16 bytes, the called
+    function copies the value to space pointed to by its first argument,
+    and all other arguments are shifted down by one.
+  * Call-used registers: rax,rdx,rcx,rsi,rdi,r8-r11
+
+  ----------------------------------------------------------------------*/
+#include "avcall-internal.h"
+
+#define RETURN(TYPE,VAL)       (*(TYPE*)l->raddr = (TYPE)(VAL))
+
+/*register __avword iarg1 __asm__("rdi");*/
+/*register __avword iarg2 __asm__("rsi");*/
+/*register __avword iarg3 __asm__("rdx");*/
+/*register __avword iarg4 __asm__("rcx");*/
+/*register __avword iarg5 __asm__("r8");*/
+/*register __avword iarg6 __asm__("r9");*/
+
+register double farg1 __asm__("xmm0");
+register double farg2 __asm__("xmm1");
+register double farg3 __asm__("xmm2");
+register double farg4 __asm__("xmm3");
+register double farg5 __asm__("xmm4");
+register double farg6 __asm__("xmm5");
+register double farg7 __asm__("xmm6");
+register double farg8 __asm__("xmm7");
+
+int
+avcall_call(av_alist* list)
+{
+  register __avword*   sp      __asm__("rsp"); /* C names for registers */
+/*register __avword    iretreg  __asm__("rax");*/
+  register __avword    iret2reg __asm__("rdx");
+  register double      dret    __asm__("xmm0");
+
+  __av_alist* l = &AV_LIST_INNER(list);
+
+  __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */
+  int arglen = l->aptr - l->args;
+  int farglen = l->faptr - l->fargs;
+  __avword iret, iret2;
+
+  {
+    int i;
+    for (i = 0; i < arglen; i++)       /* push function args onto stack */
+      argframe[i] = l->args[i];
+  }
+
+  /* Call function.
+     It's OK to pass 8 values in SSE registers even if the called function takes
+     less than 8 float/double arguments. Similarly for the integer arguments. */
+  if (l->rtype == __AVfloat) {
+    *(float*)l->raddr =
+      (*(float(*)())l->func)(l->iargs[0],
+                             l->iargs[1],
+                             l->iargs[2],
+                             l->iargs[3],
+                             l->iargs[4],
+                             l->iargs[5],
+                             farglen > 0 ? l->fargs[0] : 0.0,
+                             farglen > 1 ? l->fargs[1] : 0.0,
+                             farglen > 2 ? l->fargs[2] : 0.0,
+                             farglen > 3 ? l->fargs[3] : 0.0,
+                             farglen > 4 ? l->fargs[4] : 0.0,
+                             farglen > 5 ? l->fargs[5] : 0.0,
+                             farglen > 6 ? l->fargs[6] : 0.0,
+                             farglen > 7 ? l->fargs[7] : 0.0);
+  } else
+  if (l->rtype == __AVdouble) {
+    *(double*)l->raddr =
+      (*(double(*)())l->func)(l->iargs[0],
+                              l->iargs[1],
+                              l->iargs[2],
+                              l->iargs[3],
+                              l->iargs[4],
+                              l->iargs[5],
+                              farglen > 0 ? l->fargs[0] : 0.0,
+                              farglen > 1 ? l->fargs[1] : 0.0,
+                              farglen > 2 ? l->fargs[2] : 0.0,
+                              farglen > 3 ? l->fargs[3] : 0.0,
+                              farglen > 4 ? l->fargs[4] : 0.0,
+                              farglen > 5 ? l->fargs[5] : 0.0,
+                              farglen > 6 ? l->fargs[6] : 0.0,
+                              farglen > 7 ? l->fargs[7] : 0.0);
+  } else {
+    iret = (*l->func)(l->iargs[0],
+                      l->iargs[1],
+                      l->iargs[2],
+                      l->iargs[3],
+                      l->iargs[4],
+                      l->iargs[5],
+                      farglen > 0 ? l->fargs[0] : 0.0,
+                      farglen > 1 ? l->fargs[1] : 0.0,
+                      farglen > 2 ? l->fargs[2] : 0.0,
+                      farglen > 3 ? l->fargs[3] : 0.0,
+                      farglen > 4 ? l->fargs[4] : 0.0,
+                      farglen > 5 ? l->fargs[5] : 0.0,
+                      farglen > 6 ? l->fargs[6] : 0.0,
+                      farglen > 7 ? l->fargs[7] : 0.0);
+    iret2 = iret2reg;
+
+    /* save return value */
+    if (l->rtype == __AVvoid) {
+    } else
+    if (l->rtype == __AVword) {
+      RETURN(__avword, iret);
+    } else
+    if (l->rtype == __AVchar) {
+      RETURN(char, iret);
+    } else
+    if (l->rtype == __AVschar) {
+      RETURN(signed char, iret);
+    } else
+    if (l->rtype == __AVuchar) {
+      RETURN(unsigned char, iret);
+    } else
+    if (l->rtype == __AVshort) {
+      RETURN(short, iret);
+    } else
+    if (l->rtype == __AVushort) {
+      RETURN(unsigned short, iret);
+    } else
+    if (l->rtype == __AVint) {
+      RETURN(int, iret);
+    } else
+    if (l->rtype == __AVuint) {
+      RETURN(unsigned int, iret);
+    } else
+    if (l->rtype == __AVlong) {
+      RETURN(long, iret);
+    } else
+    if (l->rtype == __AVulong) {
+      RETURN(unsigned long, iret);
+    } else
+    if (l->rtype == __AVlonglong) {
+      RETURN(long long, iret);
+    } else
+    if (l->rtype == __AVulonglong) {
+      RETURN(unsigned long long, iret);
+    } else
+  /* see above
+    if (l->rtype == __AVfloat) {
+    } else
+    if (l->rtype == __AVdouble) {
+    } else
+  */
+    if (l->rtype == __AVvoidp) {
+      RETURN(void*, iret);
+    } else
+    if (l->rtype == __AVstruct) {
+      if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
+        /* Return structs of size <= 16 in registers. */
+        if (l->rsize > 0 && l->rsize <= 16) {
+          void* raddr = l->raddr;
+          #if 0 /* Unoptimized */
+          if (l->rsize == 1) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+          } else
+          if (l->rsize == 2) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+          } else
+          if (l->rsize == 3) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+          } else
+          if (l->rsize == 4) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+          } else
+          if (l->rsize == 5) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+          } else
+          if (l->rsize == 6) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+          } else
+          if (l->rsize == 7) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+          } else
+          if (l->rsize >= 8 && l->rsize <= 16) {
+            ((unsigned char *)raddr)[0] = (unsigned char)(iret);
+            ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8);
+            ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16);
+            ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24);
+            ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32);
+            ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40);
+            ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48);
+            ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56);
+            if (l->rsize == 8) {
+            } else
+            if (l->rsize == 9) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+            } else
+            if (l->rsize == 10) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+            } else
+            if (l->rsize == 11) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+            } else
+            if (l->rsize == 12) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+            } else
+            if (l->rsize == 13) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+            } else
+            if (l->rsize == 14) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+            } else
+            if (l->rsize == 15) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+            } else
+            if (l->rsize == 16) {
+              ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2);
+              ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8);
+              ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16);
+              ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24);
+              ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32);
+              ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40);
+              ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48);
+              ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56);
+            }
+          }
+          #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+          uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avword) */
+          __avword* wordaddr = (__avword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avword)-1));
+          uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avword)-1); /* ≥ 0, < sizeof(__avword) */
+          uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avword) */
+          if (count <= sizeof(__avword)) {
+            /* Use iret. */
+            if (end_offset <= sizeof(__avword)) {
+              /* 0 < end_offset ≤ sizeof(__avword) */
+              __avword mask0 = ((__avword)2 << (end_offset*8-1)) - ((__avword)1 << (start_offset*8));
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            } else {
+              /* sizeof(__avword) < end_offset < 2*sizeof(__avword), start_offset > 0 */
+              __avword mask0 = - ((__avword)1 << (start_offset*8));
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+              wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avword)*8-start_offset*8))) & mask1;
+            }
+          } else {
+            /* Use iret, iret2. */
+            __avword mask0 = - ((__avword)1 << (start_offset*8));
+            wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0;
+            if (end_offset <= 2*sizeof(__avword)) {
+              /* sizeof(__avword) < end_offset ≤ 2*sizeof(__avword) */
+              __avword mask1 = ((__avword)2 << (end_offset*8-sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avword)*4-start_offset*4) >> (sizeof(__avword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1;
+            } else {
+              /* 2*sizeof(__avword) < end_offset < 3*sizeof(__avword), start_offset > 0 */
+              __avword mask2 = ((__avword)2 << (end_offset*8-2*sizeof(__avword)*8-1)) - 1;
+              wordaddr[1] = (iret >> (sizeof(__avword)*8-start_offset*8)) | (iret2 << (start_offset*8));
+              wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avword)*8-start_offset*8))) & mask2;
+            }
+          }
+          #endif
+        }
+      }
+    }
+  }
+  return 0;
+}
diff --git a/avcall/avcall.3 b/avcall/avcall.3
new file mode 100644 (file)
index 0000000..c297248
--- /dev/null
@@ -0,0 +1,280 @@
+.\" Copyright (C) 1993 Bill Triggs
+.\" Copyright (C) 1995-2017 Bruno Haible
+.\"
+.\" This manual is covered by the GNU GPL.  You can redistribute it and/or
+.\" modify it under the terms of the GNU General Public License (GPL), either
+.\" version 2 of the License, or (at your option) any later version published
+.\" by the Free Software Foundation (FSF).
+.\" A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
+.\"
+.TH AVCALL 3 "23 July 2017"
+.SH NAME
+avcall \- build a C argument list incrementally and call a C function on it.
+.SH SYNOPSIS
+.B #include <avcall.h>
+.LP
+.BI "av_alist " alist ";"
+.LP
+.BI av_start_ type "(" alist ", " "&func"
+.RI "[["\c
+.BI ", "\c
+.I return_type\c
+.RB "]" ", "\c
+.I "&return_value"\c
+.RB "]" ");"
+.LP
+.BI av_ type "(" alist ", "\c
+.RI "["\c
+.IB arg_type ","\c
+.RI "] "\c
+.IB value ");"
+.LP
+.BI "av_call(" alist ");"
+.IX  "av_alist"  ""  "\fLav_alist\fP \(em avcall argument list declaration"
+.IX  "av_start_type()"  ""  "\fLav_start_type()\fP \(em initialize avcall function"
+.IX  "av_type()"  ""  "\fLav_type()\fP \(em push next argument in avcall list"
+.IX  "av_call()"  ""  "\fLav_call()\fP \(em finish avcall argument list and call function"
+.SH DESCRIPTION
+.LP
+This set of macros builds an argument list for a C function and calls
+the function on it. It significantly reduces the amount of `glue' code
+required for parsers, debuggers, imbedded interpreters, C extensions to
+application programs and other situations where collections of functions
+need to be called on lists of externally-supplied arguments.
+
+Function calling conventions differ considerably on different
+machines and
+.I avcall
+attempts to provide some degree of isolation from such architecture
+dependencies.
+
+The interface is like 
+.BR stdarg (3)
+in reverse. All of the macros return 0 for success, < 0 for failure (e.g., 
+argument list overflow or type-not-supported).
+.RS 0
+.TP
+(1)
+.B #include <avcall.h>
+.nf
+and declare the argument list structure
+.BI "av_alist " alist ;
+.fi
+.TP
+(2)
+Set any special flags. This is architecture and compiler dependent.
+Compiler options that affect passing conventions may need to be flagged
+by
+.BR "#define" s
+before the
+.B "#include <avcall.h>"
+statement. However, the
+.I configure
+script should have determined which
+.BR "#define" s
+are needed and put them
+at the top of
+.BR avcall.h .
+.TP
+(3)
+Initialize the alist with the function address and return value
+pointer (if any). There is a separate macro for each simple return type
+([u]char, [u]short, [u]int, [u]long, [u]longlong, float, double, where `u'
+indicates `unsigned'). The macros for functions returning structures or
+pointers require an explicit type argument.
+.LP
+E.g.,
+.LP
+.BI "av_start_int (" alist ", " &func ", " &int_return );
+.LP
+.BI "av_start_double (" alist ", " &func ", " &double_return );
+.LP
+.BI "av_start_void (" alist ", " &func );
+.LP
+.nf
+.BI "av_start_struct (" alist ", " &func ", " struct_type ", " splittable ", "
+.BI "                 " &struct_return );
+.fi
+.LP
+.nf
+.BI "av_start_ptr (" alist ", " &func ", " pointer_type ", "
+.BI "              " &pointer_return );
+.fi
+.LP
+The
+.I splittable
+flag specifies whether the
+.I struct_type
+can be returned in registers such that every struct field fits entirely in
+a single register. This needs to be specified for structs of size
+2*sizeof(long). For structs of size <= sizeof(long),
+.I splittable
+is ignored and assumed to be 1. For structs of size > 2*sizeof(long),
+.I splittable
+is ignored and assumed to be 0. There are some handy macros for this:
+.nf
+.BI "av_word_splittable_1 (" type1 )
+.BI "av_word_splittable_2 (" type1 ", " type2 )
+.BI "av_word_splittable_3 (" type1 ", " type2 ", " type3 )
+.BI "av_word_splittable_4 (" type1 ", " type2 ", " type3 ", " type4 )
+.fi
+For a struct with three slots
+.nf
+.BI "struct { " "type1 id1" "; " "type2 id2" "; " "type3 id3" "; }"
+.fi
+you can specify
+.I splittable
+as
+.BI "av_word_splittable_3 (" type1 ", " type2 ", " type3 )
+.RB .
+.TP
+(4)
+Push the arguments on to the list in order. Again there is a macro
+for each simple built-in type, and the macros for structure and pointer
+arguments require an extra type argument:
+.LP
+.BI "av_int (" alist ", " int_value );
+.LP
+.BI "av_double (" alist ", " double_value );
+.LP
+.BI "av_struct (" alist ", " struct_or_union_type ", " struct_value );
+.LP
+.BI "av_ptr (" alist ", " pointer_type ", " pointer_value );
+.TP
+(5)
+Call the function, set the return value, and tidy up:
+.LP
+.BI "av_call (" alist );
+.RE
+
+.SH NOTES
+
+(1) Functions whose first declaration is in Kernighan & Ritchie style (i.e.,
+without a typed argument list) MUST use default K&R C expression promotions
+(char and short to int, float to double) whether they are compiled by a K&R
+or an ANSI compiler, because the true argument types may not be known at the
+call point. Such functions typically back-convert their arguments to the 
+declared types on function entry. (In fact, the only way to pass a true char,
+short or float in K&R C is by an explicit cast: 
+.B func((char)c,(float)f)
+). 
+Similarly, some K&R compilers (such as Sun cc on the sparc) actually
+return a float as a double.
+
+Hence, for arguments of functions declared in K&R style you should use
+.B av_int(\|)
+and
+.B av_double(\|)
+rather than 
+.B av_char(\|),
+.B av_short(\|)
+or
+.B av_float(\|).
+If you use a K&R compiler, the avcall header files may be able to
+detect this and define 
+.B av_float(\|),
+etc, appropriately, but with an ANSI compiler there is no way 
+.I avcall
+can know how a function was declared, so you have to correct the
+argument types yourself.
+
+(2) The explicit type arguments of the 
+.B av_struct(\|) 
+and 
+.B av_ptr(\|) 
+macros are typically used to calculate size, alignment, and passing
+conventions.  This may not be sufficient for some machines with unusual
+structure and pointer handling: in this case additional 
+.B av_start_\c
+.I type\c
+.B (\|)
+and 
+.B av_\c
+.I type\c
+.B (\|)
+macros may be defined.
+
+(3) The macros
+.BR av_start_longlong(\|) ,
+.BR av_start_ulonglong(\|) ,
+.B av_longlong(\|)
+and
+.B av_ulonglong(\|)
+work only if the C compiler has a working
+.B long long
+64-bit integer type.
+
+(4) The struct types used in
+.B av_start_struct(\|)
+and
+.B av_struct(\|)
+must only contain (signed or unsigned) int, long, long long or pointer fields.
+Struct types containing (signed or unsigned) char, short, float, double or
+other structs are not supported.
+
+.SH SEE ALSO
+.BR stdarg (3),
+.BR varargs (3).
+
+.SH BUGS
+
+The current implementations have been tested on a selection of common
+cases but there are probably still many bugs.
+
+There are typically built-in limits on the size of the argument-list,
+which may also include the size of any structure arguments.
+
+The decision whether a struct is to be returned in registers or in memory
+considers only the struct's size and alignment. This is inaccurate: for
+example, gcc on m68k-next returns
+.B "struct { char a,b,c; }"
+in registers and
+.B "struct { char a[3]; }"
+in memory, although both types have the same size and the same alignment.
+
+.SH NON-BUGS
+
+All information is passed in CPU registers and the stack. The
+.B avcall
+package is therefore multithread-safe.
+
+.SH PORTING AVCALL
+
+Ports, bug-fixes, and suggestions are most welcome. The macros required
+for argument pushing are pretty grungy, but it does seem to be possible
+to port avcall to a range of machines. Ports to non-standard or
+non-32-bit machines are especially welcome so we can sort the interface
+out before it's too late.
+
+Knowledge about argument passing conventions can be found in the gcc
+source, file
+.RI gcc-2.6.3/config/ cpu / cpu .h,
+section "Stack layout; function entry, exit and calling."
+
+Some of the grunge is usually handled by a C or assembly level glue
+routine that actually pushes the arguments, calls the function and
+unpacks any return value.
+This is called avcall_call(\|). A precompiled assembler version for
+people without gcc is also made available. The routine should ideally
+have flags for the passing conventions of other compilers.
+
+Many of the current routines waste a lot of stack space and generally do
+hairy things to stack frames - a bit more assembly code would probably
+help things along quite a bit here.
+
+.SH AUTHOR
+
+Bill Triggs <Bill.Triggs@inrialpes.fr>. 
+
+.SH ACKNOWLEDGEMENTS
+
+Some initial ideas were stolen from the C interface to the Zelk
+extensions to Oliver Laumann's Elk scheme interpreter by J.P.Lewis, NEC
+C&C Research, <zilla@ccrl.nj.nec.com> (for Sun4 & SGI), and Roy
+Featherstone's <roy@robots.oxford.ac.uk> personal C interface library
+for Sun[34] & SGI.  I also looked at the machine-dependent parts of the
+GCC and GDB distributions, and put the gcc asm(\|) extensions to good
+use. Thanks guys!
+
+This work was partly supported by EC-ESPRIT Basic Research Action SECOND.
+
diff --git a/avcall/avcall.h b/avcall/avcall.h
new file mode 100644 (file)
index 0000000..f429dc8
--- /dev/null
@@ -0,0 +1,462 @@
+/*
+ * Copyright 1993-1995 Bill Triggs <Bill.Triggs@inrialpes.fr>
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#ifndef _AVCALL_H
+#define _AVCALL_H
+/*----------------------------------------------------------------------
+  av_call() foreign function interface.
+
+  Varargs-style macros to build a C argument list incrementally
+  and call a function on it.
+ ----------------------------------------------------------------------*/
+
+#include <stddef.h>
+
+#include "ffcall-version.h"
+#include "ffcall-abi.h"
+
+
+/* Max # words in argument-list and temporary structure storage.
+ * If defined(__hppa__) && !defined(__hppa64__), this must be a multiple of 2.
+ */
+#ifndef __AV_ALIST_WORDS
+#define __AV_ALIST_WORDS  256
+#endif
+
+/* Determine whether the current ABI is LLP64
+   ('long' = 32-bit, 'long long' = 'void*' = 64-bit). */
+#if defined(__x86_64__) && defined(_WIN32) && !defined(__CYGWIN__)
+#define __AV_LLP64 1
+#endif
+
+/* Determine the alignment of a type at compile time.
+ */
+#if defined(__GNUC__) || defined(__IBM__ALIGNOF__)
+#define __AV_alignof __alignof__
+#elif defined(__cplusplus)
+template <class type> struct __AV_alignof_helper { char __slot1; type __slot2; };
+#define __AV_alignof(type) offsetof (__AV_alignof_helper<type>, __slot2)
+#elif defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) /* SGI compiler */
+#define __AV_alignof __builtin_alignof
+#else
+#define __AV_offsetof(type,ident)  ((unsigned long)&(((type*)0)->ident))
+#define __AV_alignof(type)  __AV_offsetof(struct { char __slot1; type __slot2; }, __slot2)
+#endif
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+/* C builtin types.
+ */
+#if defined(__mipsn32__) || defined(__x86_64_x32__) || defined(__AV_LLP64)
+typedef long long __avword;
+#else
+typedef long __avword;
+#endif
+
+enum __AVtype
+{
+  __AVword,
+  __AVvoid,
+  __AVchar,
+  __AVschar,
+  __AVuchar,
+  __AVshort,
+  __AVushort,
+  __AVint,
+  __AVuint,
+  __AVlong,
+  __AVulong,
+  __AVlonglong,
+  __AVulonglong,
+  __AVfloat,
+  __AVdouble,
+  __AVvoidp,
+  __AVstruct
+};
+
+enum __AV_alist_flags
+{
+
+  /* how to return structs */
+  /* There are basically 3 ways to return structs:
+   * a. The called function returns a pointer to static data. Not reentrant.
+   *    Not supported any more.
+   * b. The caller passes the return structure address in a dedicated register
+   *    or as a first (or last), invisible argument. The called function stores
+   *    its result there.
+   * c. Like b, and the called function also returns the return structure
+   *    address in the return value register. (This is not very distinguishable
+   *    from b.)
+   * Independently of this,
+   * r. small structures (<= 4 or <= 8 bytes) may be returned in the return
+   *    value register(s), or
+   * m. even small structures are passed in memory.
+   */
+  /* gcc-2.6.3 employs the following strategy:
+   *   - If PCC_STATIC_STRUCT_RETURN is defined in the machine description
+   *     it uses method a, else method c.
+   *   - If flag_pcc_struct_return is set (either by -fpcc-struct-return or if
+   *     DEFAULT_PCC_STRUCT_RETURN is defined to 1 in the machine description)
+   *     it uses method m, else (either by -freg-struct-return or if
+   *     DEFAULT_PCC_STRUCT_RETURN is defined to 0 in the machine description)
+   *     method r.
+   */
+  __AV_SMALL_STRUCT_RETURN     = 1<<1, /* r: special case for small structs */
+  __AV_GCC_STRUCT_RETURN       = 1<<2, /* consider 8 byte structs as small */
+#if defined(__sparc__) && !defined(__sparc64__)
+  __AV_SUNCC_STRUCT_RETURN     = 1<<3,
+  __AV_SUNPROCC_STRUCT_RETURN  = 1<<4,
+#endif
+#if defined(__i386__)
+  __AV_MSVC_STRUCT_RETURN      = 1<<4,
+#endif
+  /* the default way to return structs */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another struct returning convention,
+   * just  #define __AV_STRUCT_RETURN ...
+   * before or after #including <avcall.h>.
+   */
+#ifndef __AV_STRUCT_RETURN
+  __AV_STRUCT_RETURN           =
+#if defined(__sparc__) && !defined(__sparc64__) && defined(__sun) && (defined(__SUNPRO_C) || defined(__SUNPRO_CC)) /* SUNWspro cc or CC */
+                                 __AV_SUNPROCC_STRUCT_RETURN,
+#else
+#if (defined(__i386__) && (defined(_WIN32) || defined(__CYGWIN__) || (defined(__MACH__) && defined(__APPLE__)) || defined(__FreeBSD__) || defined(__DragonFly__) || defined(__OpenBSD__))) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__hppa__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || defined(__powerpc64_elfv2__) || defined(__ia64__) || defined(__x86_64__) || defined(__riscv32__) || defined(__riscv64__)
+                                 __AV_SMALL_STRUCT_RETURN |
+#endif
+#if defined(__GNUC__) && !((defined(__mipsn32__) || defined(__mips64__)) && ((__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3)))
+                                 __AV_GCC_STRUCT_RETURN |
+#endif
+#if defined(__i386__) && defined(_WIN32) && !defined(__CYGWIN__) /* native Windows */
+                                 __AV_MSVC_STRUCT_RETURN |
+#endif
+                                 0,
+#endif
+#endif
+
+  /* how to return floats */
+#if defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__))
+  __AV_SUNCC_FLOAT_RETURN      = 1<<5,
+#endif
+#if defined(__m68k__)
+  __AV_FREG_FLOAT_RETURN       = 1<<6,
+#endif
+  /* the default way to return floats */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another float returning convention,
+   * just  #define __AV_FLOAT_RETURN ...
+   * before or after #including <avcall.h>.
+   */
+#ifndef __AV_FLOAT_RETURN
+#if (defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__))) && !defined(__GNUC__) && defined(__sun) && !(defined(__SUNPRO_C) || defined(__SUNPRO_CC))  /* Sun cc or CC */
+  __AV_FLOAT_RETURN            = __AV_SUNCC_FLOAT_RETURN,
+#elif defined(__m68k__)
+  __AV_FLOAT_RETURN            = __AV_FREG_FLOAT_RETURN,
+#else
+  __AV_FLOAT_RETURN            = 0,
+#endif
+#endif
+
+  /* how to pass structs */
+#if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__)
+  __AV_SGICC_STRUCT_ARGS       = 1<<7,
+#endif
+#if defined(__powerpc__) || defined(__powerpc64__)
+  __AV_AIXCC_STRUCT_ARGS       = 1<<7,
+#endif
+#if defined(__ia64__)
+  __AV_OLDGCC_STRUCT_ARGS      = 1<<7,
+#endif
+  /* the default way to pass structs */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another struct passing convention,
+   * just  #define __AV_STRUCT_ARGS ...
+   * before or after #including <avcall.h>.
+   */
+#ifndef __AV_STRUCT_ARGS
+#if (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) && !defined(__GNUC__) /* SGI mips cc */
+  __AV_STRUCT_ARGS             = __AV_SGICC_STRUCT_ARGS,
+#else
+#if (defined(__mipsn32__) || defined(__mips64__)) && (!defined(__GNUC__) || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3)) /* SGI mips cc or gcc >= 3.4 */
+  __AV_STRUCT_ARGS             = __AV_SGICC_STRUCT_ARGS,
+#else
+#if defined(__powerpc__) && !defined(__powerpc64__) && defined(_AIX) && !defined(__GNUC__) /* AIX 32-bit cc, xlc */
+  __AV_STRUCT_ARGS             = __AV_AIXCC_STRUCT_ARGS,
+#else
+#if defined(__powerpc64__) && defined(_AIX) /* AIX 64-bit cc, xlc, gcc */
+  __AV_STRUCT_ARGS             = __AV_AIXCC_STRUCT_ARGS,
+#else
+#if defined(__ia64__) && !(defined(__GNUC__) && (__GNUC__ >= 3))
+  __AV_STRUCT_ARGS             = __AV_OLDGCC_STRUCT_ARGS,
+#else
+  __AV_STRUCT_ARGS             = 0,
+#endif
+#endif
+#endif
+#endif
+#endif
+#endif
+
+  /* how to pass floats */
+  /* ANSI C compilers and GNU gcc pass floats as floats.
+   * K&R C compilers pass floats as doubles. We don't support them any more.
+   */
+#if defined(__powerpc64__)
+  __AV_AIXCC_FLOAT_ARGS         = 1<<8,      /* pass floats in the low 4 bytes of an 8-bytes word */
+#endif
+  /* the default way to pass floats */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another float passing convention,
+   * just  #define __AV_FLOAT_ARGS ...
+   * before or after #including <avcall.h>.
+   */
+#ifndef __AV_FLOAT_ARGS
+#if defined(__powerpc64__) && defined(_AIX) && !defined(__GNUC__) /* AIX 64-bit xlc */
+  __AV_FLOAT_ARGS              = __AV_AIXCC_FLOAT_ARGS,
+#else
+  __AV_FLOAT_ARGS              = 0,
+#endif
+#endif
+
+  /* how to pass and return small integer arguments */
+  __AV_ANSI_INTEGERS           = 0, /* no promotions */
+  __AV_TRADITIONAL_INTEGERS    = 0, /* promote [u]char, [u]short to [u]int */
+  /* Fortunately these two methods are compatible. Our macros work with both. */
+
+  /* stack cleanup policy */
+  __AV_CDECL_CLEANUP           = 0, /* caller pops args after return */
+  __AV_STDCALL_CLEANUP         = 0, /* callee pops args before return */
+                                    /* currently only supported on __i386__ */
+#ifndef __AV_CLEANUP
+  __AV_CLEANUP                 = __AV_CDECL_CLEANUP,
+#endif
+
+  /* These are for internal use only */
+#if defined(__i386__) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || defined(__powerpc__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv64__)
+  __AV_REGISTER_STRUCT_RETURN  = 1<<9,
+#endif
+
+  __AV_flag_for_broken_compilers_that_dont_like_trailing_commas
+};
+
+#ifdef _AVCALL_INTERNAL_H
+#include "avcall-alist.h"
+#endif
+
+/* An upper bound for sizeof(__av_alist).
+   The total size of the __av_alist fields, ignoring alignment of fields,
+   varies from
+     40 bytes (for __i386__, __m68k__, __sparc__, __hppa__, __arm__)
+   to
+     232 bytes (for __arm64__). */
+#define __AV_ALIST_SIZE_BOUND 256
+
+typedef struct
+{
+  /* First part: Fixed size __av_alist. */
+  union {
+    char _av_m_room[__AV_ALIST_SIZE_BOUND];
+#ifdef _AVCALL_INTERNAL_H
+    __av_alist _av_m_alist;
+#endif
+/* GNU clisp pokes in internals of the alist!
+   When used by GNU clisp, assume a C compiler that supports anonymous unions
+   (GCC or an ISO C 11 compiler). */
+#ifdef LISPFUN
+    int flags;
+#endif
+    /* For alignment. */
+    long align1;
+    double align2;
+    long long align3;
+    long double align4;
+  }
+#ifndef LISPFUN
+  _av_alist_head
+#endif
+  ;
+  /* Second part: An array whose size depends on __AV_ALIST_WORDS. */
+  union {
+    __avword _av_m_args[__AV_ALIST_WORDS];
+    /* For alignment. */
+    long align1;
+    double align2;
+    long long align3;
+    long double align4;
+  } _av_alist_flexarray;
+} av_alist;
+
+
+/* Delayed overflow detection */
+extern int avcall_overflown (av_alist* /* LIST */);
+#define av_overflown(LIST) avcall_overflown(&(LIST))
+
+
+/*
+ *  av_start_<type> macros which specify the return type
+ */
+
+#define __AV_START_FLAGS  \
+  __AV_STRUCT_RETURN | __AV_FLOAT_RETURN | __AV_STRUCT_ARGS | __AV_FLOAT_ARGS | __AV_CLEANUP
+
+extern void avcall_start (av_alist* /* LIST */, __avword* /* LIST_ARGS */, __avword* /* LIST_ARGS_END */, __avword(* /* FUNC */)(), void* /* RADDR */, int /* RETTYPE */, int /* FLAGS */);
+
+#define av_start_void(LIST,FUNC)                                       \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),0,    __AVvoid,     __AV_START_FLAGS)
+#define av_start_char(LIST,FUNC,RADDR)                                 \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVchar,     __AV_START_FLAGS)
+#define av_start_schar(LIST,FUNC,RADDR)                                        \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVschar,    __AV_START_FLAGS)
+#define av_start_uchar(LIST,FUNC,RADDR)                                        \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVuchar,    __AV_START_FLAGS)
+#define av_start_short(LIST,FUNC,RADDR)                                        \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVshort,    __AV_START_FLAGS)
+#define av_start_ushort(LIST,FUNC,RADDR)                               \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVushort,   __AV_START_FLAGS)
+#define av_start_int(LIST,FUNC,RADDR)                                  \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVint,      __AV_START_FLAGS)
+#define av_start_uint(LIST,FUNC,RADDR)                                 \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVuint,     __AV_START_FLAGS)
+#define av_start_long(LIST,FUNC,RADDR)                                 \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVlong,     __AV_START_FLAGS)
+#define av_start_ulong(LIST,FUNC,RADDR)                                        \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVulong,    __AV_START_FLAGS)
+#define av_start_longlong(LIST,FUNC,RADDR)                             \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVlonglong, __AV_START_FLAGS)
+#define av_start_ulonglong(LIST,FUNC,RADDR)                            \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVulonglong,__AV_START_FLAGS)
+#define av_start_float(LIST,FUNC,RADDR)                                        \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVfloat,    __AV_START_FLAGS)
+#define av_start_double(LIST,FUNC,RADDR)                               \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVdouble,   __AV_START_FLAGS)
+#define av_start_ptr(LIST,FUNC,TYPE,RADDR)                             \
+  avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),RADDR,__AVvoidp,    __AV_START_FLAGS)
+
+extern void avcall_start_struct (av_alist* /* LIST */, __avword* /* LIST_ARGS */, __avword* /* LIST_ARGS_END */, __avword(* /* FUNC */)(), size_t /* TYPE_SIZE */, int /* TYPE_SPLITTABLE */, void* /* RADDR */, int /* FLAGS */);
+
+#define av_start_struct(LIST,FUNC,TYPE,TYPE_SPLITTABLE,RADDR)          \
+  _av_start_struct(LIST,FUNC,sizeof(TYPE),TYPE_SPLITTABLE,RADDR)
+/* Undocumented, but used by GNU clisp. */
+#define _av_start_struct(LIST,FUNC,TYPE_SIZE,TYPE_SPLITTABLE,RADDR)    \
+  avcall_start_struct(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avword(*)())(FUNC),TYPE_SIZE,TYPE_SPLITTABLE,RADDR,__AV_START_FLAGS)
+
+
+/*
+ * av_<type> macros which specify the argument and its type
+ */
+
+/* integer argument types */
+
+extern int avcall_arg_long (av_alist* /* LIST */, long /* VAL */);
+extern int avcall_arg_ulong (av_alist* /* LIST */, unsigned long /* VAL */);
+
+#define av_char(LIST,VAL)      avcall_arg_long(&(LIST),(char)(VAL))
+#define av_schar(LIST,VAL)     avcall_arg_long(&(LIST),(signed char)(VAL))
+#define av_short(LIST,VAL)     avcall_arg_long(&(LIST),(short)(VAL))
+#define av_int(LIST,VAL)       avcall_arg_long(&(LIST),(int)(VAL))
+#define av_long(LIST,VAL)      avcall_arg_long(&(LIST),(long)(VAL))
+#define av_uchar(LIST,VAL)     avcall_arg_ulong(&(LIST),(unsigned char)(VAL))
+#define av_ushort(LIST,VAL)    avcall_arg_ulong(&(LIST),(unsigned short)(VAL))
+#define av_uint(LIST,VAL)      avcall_arg_ulong(&(LIST),(unsigned int)(VAL))
+#define av_ulong(LIST,VAL)     avcall_arg_ulong(&(LIST),(unsigned long)(VAL))
+
+extern int avcall_arg_ptr (av_alist* /* LIST */, void* /* VAL */);
+
+#define av_ptr(LIST,TYPE,VAL)  avcall_arg_ptr(&(LIST),(TYPE)(VAL))
+
+extern int avcall_arg_longlong (av_alist* /* LIST */, long long /* VAL */);
+extern int avcall_arg_ulonglong (av_alist* /* LIST */, unsigned long long /* VAL */);
+
+#define av_longlong(LIST,VAL)  avcall_arg_longlong(&(LIST),VAL)
+#define av_ulonglong(LIST,VAL) avcall_arg_ulonglong(&(LIST),VAL)
+
+/* floating-point argument types */
+
+extern int avcall_arg_float (av_alist* /* LIST */, float /* VAL */);
+#define av_float(LIST,VAL)     avcall_arg_float(&(LIST),VAL)
+
+extern int avcall_arg_double (av_alist* /* LIST */, double /* VAL */);
+#define av_double(LIST,VAL)    avcall_arg_double(&(LIST),VAL)
+
+/*
+ * structure argument types
+ */
+
+extern int avcall_arg_struct (av_alist* /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */, const void* /* VAL_ADDR */);
+
+#define av_struct(LIST,TYPE,VAL)                                       \
+  avcall_arg_struct(&(LIST),sizeof(TYPE),__AV_alignof(TYPE),&(VAL))
+/* _av_struct() is like av_struct(), except that you pass the type's size and alignment
+ * and the value's address instead of the type and the value themselves.
+ * Undocumented, but used by GNU clisp.
+ */
+#define _av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR)                 \
+  avcall_arg_struct(&(LIST),TYPE_SIZE,TYPE_ALIGN,VAL_ADDR)
+
+/*
+ * calling the function
+ */
+
+extern int avcall_call (av_alist* /* LIST */);
+#define av_call(LIST) avcall_call(&(LIST))
+
+/* Determine whether a struct type is word-splittable, i.e. whether each of
+ * its components fit into a register.
+ * The entire computation is done at compile time.
+ */
+#define av_word_splittable_1(slot1)  \
+  (__av_offset1(slot1)/sizeof(__avword) == (__av_offset1(slot1)+sizeof(slot1)-1)/sizeof(__avword))
+#define av_word_splittable_2(slot1,slot2)  \
+  ((__av_offset1(slot1)/sizeof(__avword) == (__av_offset1(slot1)+sizeof(slot1)-1)/sizeof(__avword)) \
+   && (__av_offset2(slot1,slot2)/sizeof(__avword) == (__av_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__avword)) \
+  )
+#define av_word_splittable_3(slot1,slot2,slot3)  \
+  ((__av_offset1(slot1)/sizeof(__avword) == (__av_offset1(slot1)+sizeof(slot1)-1)/sizeof(__avword)) \
+   && (__av_offset2(slot1,slot2)/sizeof(__avword) == (__av_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__avword)) \
+   && (__av_offset3(slot1,slot2,slot3)/sizeof(__avword) == (__av_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__avword)) \
+  )
+#define av_word_splittable_4(slot1,slot2,slot3,slot4)  \
+  ((__av_offset1(slot1)/sizeof(__avword) == (__av_offset1(slot1)+sizeof(slot1)-1)/sizeof(__avword)) \
+   && (__av_offset2(slot1,slot2)/sizeof(__avword) == (__av_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__avword)) \
+   && (__av_offset3(slot1,slot2,slot3)/sizeof(__avword) == (__av_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__avword)) \
+   && (__av_offset4(slot1,slot2,slot3,slot4)/sizeof(__avword) == (__av_offset4(slot1,slot2,slot3,slot4)+sizeof(slot4)-1)/sizeof(__avword)) \
+  )
+#define __av_offset1(slot1)  \
+  0
+#define __av_offset2(slot1,slot2)  \
+  ((__av_offset1(slot1)+sizeof(slot1)+__AV_alignof(slot2)-1) & -(long)__AV_alignof(slot2))
+#define __av_offset3(slot1,slot2,slot3)  \
+  ((__av_offset2(slot1,slot2)+sizeof(slot2)+__AV_alignof(slot3)-1) & -(long)__AV_alignof(slot3))
+#define __av_offset4(slot1,slot2,slot3,slot4)  \
+  ((__av_offset3(slot1,slot2,slot3)+sizeof(slot3)+__AV_alignof(slot4)-1) & -(long)__AV_alignof(slot4))
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* _AVCALL_H */
diff --git a/avcall/avcall.html b/avcall/avcall.html
new file mode 100644 (file)
index 0000000..9fcd138
--- /dev/null
@@ -0,0 +1,277 @@
+<HTML>
+<HEAD>
+<META http-equiv="Content-Type" content="text/html; charset=UTF-8">
+<!--
+Copyright (C) 1993 Bill Triggs
+Copyright (C) 1995-2017 Bruno Haible
+
+This manual is covered by the GNU GPL.  You can redistribute it and/or
+modify it under the terms of the GNU General Public License (GPL), either
+version 2 of the License, or (at your option) any later version published
+by the Free Software Foundation (FSF).
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
+-->
+<TITLE> AVCALL manual page </TITLE>
+</HEAD>
+<BODY>
+<H1>AVCALL manual page</H1>
+
+<UL>
+<LI> <A HREF="#Name">Name</A>
+<LI> <A HREF="#Synopsis">Synopsis</A>
+<LI> <A HREF="#Description">Description</A>
+<LI> <A HREF="#Notes">Notes</A>
+<LI> <A HREF="#See also">See also</A>
+<LI> <A HREF="#Bugs">Bugs</A>
+<LI> <A HREF="#Non-Bugs">Non-Bugs</A>
+<LI> <A HREF="#Porting AVCALL">Porting AVCALL</A>
+<LI> <A HREF="#Author">Author</A>
+<LI> <A HREF="#Acknowledgements">Acknowledgements</A>
+</UL>
+<P>
+
+<HR>
+
+<A NAME="Name">
+<H2>Name</H2>
+</A>
+
+avcall  -  build a C argument list incrementally and call a
+C function on it.
+
+<A NAME="Synopsis">
+<H2>Synopsis</H2>
+</A>
+
+<PRE>
+<CODE>#include &lt;avcall.h&gt;</CODE>
+<CODE>av_alist <VAR>alist</VAR>;</CODE>
+<CODE>av_start_<VAR>type</VAR> (<VAR>alist</VAR>, &amp;<VAR>func</VAR>, [[<VAR>return_type</VAR>,] &amp;<VAR>return_value</VAR>]);</CODE>
+<CODE>av_<VAR>type</VAR> (<VAR>alist</VAR>, [<VAR>arg_type</VAR>,] <VAR>value</VAR>);</CODE>
+<CODE>av_call(<VAR>alist</VAR>);</CODE>
+</PRE>
+
+<A NAME="Description">
+<H2>Description</H2>
+</A>
+
+This  set  of macros builds an argument list for a C function
+and  calls  the  function  on  it.  It  significantly
+reduces  the  amount  of ‘glue’ code required for parsers,
+debuggers, imbedded interpreters, C extensions to application
+programs  and  other situations where collections of
+functions need  to  be  called  on  lists  of  externally-
+supplied arguments.
+<P>
+Function  calling  conventions differ considerably on different
+machines and <CODE>avcall</CODE> attempts to provide some degree
+of isolation from such architecture dependencies.
+<P>
+The  interface  is  like <A HREF="stdarg(3)"><CODE><B>stdarg</B></CODE></A>(3) in reverse. All of the
+macros return 0 for success, < 0 for failure (e.g.,  argument
+list overflow or type-not-supported).
+<P>
+<OL>
+<LI> <CODE>#include  &lt;avcall.h&gt;</CODE>  and  declare  the argument list
+structure <CODE>av_alist <VAR>alist</VAR>;</CODE>
+<P>
+<LI> Set  any special flags. This is architecture and compiler
+dependent.
+Compiler  options that affect passing conventions may need
+to be flagged by <CODE>#define</CODE>s before the <CODE>#include &lt;avcall.h&gt;</CODE>
+statement. However, the <SAMP>configure</SAMP> script should have
+determined which <CODE>#define</CODE>s are needed and put them
+at the top of <SAMP>avcall.h</SAMP>.
+<P>
+<LI> Initialize the alist with  the  function  address  and
+return  value  pointer (if any). There is a separate macro
+for each simple return type  ([u]char,  [u]short,  [u]int,
+[u]long,  [u]longlong, float,  double, where ‘u’ indicates
+‘unsigned’). The macros for functions returning structures
+or pointers require an explicit type argument.
+<P>
+E.g.,
+<PRE>
+<CODE>av_start_int (<VAR>alist</VAR>, &amp;<VAR>func</VAR>, &amp;<VAR>int_return</VAR>);</CODE>
+<CODE>av_start_double (<VAR>alist</VAR>, &amp;<VAR>func</VAR>, &amp;<VAR>double_return</VAR>);</CODE>
+<CODE>av_start_void (<VAR>alist</VAR>, &amp;<VAR>func</VAR>);</CODE>
+<CODE>av_start_struct (<VAR>alist</VAR>, &amp;<VAR>func</VAR>, <VAR>struct_type</VAR>, <VAR>splittable</VAR>, &amp;<VAR>struct_return</VAR>);</CODE>
+<CODE>av_start_ptr (<VAR>alist</VAR>, &amp;<VAR>func</VAR>, <VAR>pointer_type</VAR>, &amp;<VAR>pointer_return</VAR>);</CODE>
+</PRE>
+The  <VAR>splittable</VAR> flag specifies whether the <VAR>struct_type</VAR> can
+be returned in registers such that every struct field fits
+entirely  in a single register. This needs to be specified
+for structs of size <SAMP>2*sizeof(long)</SAMP>. For structs of size
+&lt;= <SAMP>sizeof(long)</SAMP>,  splittable  is ignored and assumed to be 1.
+For  structs  of  size  &gt; <SAMP>2*sizeof(long)</SAMP>,  splittable  is
+ignored  and  assumed to be 0. There are some handy macros
+for this:
+<PRE>
+<CODE>av_word_splittable_1 (<VAR>type1</VAR>)</CODE>
+<CODE>av_word_splittable_2 (<VAR>type1</VAR>, <VAR>type2</VAR>)</CODE>
+<CODE>av_word_splittable_3 (<VAR>type1</VAR>, <VAR>type2</VAR>, <VAR>type3</VAR>)</CODE>
+<CODE>av_word_splittable_4 (<VAR>type1</VAR>, <VAR>type2</VAR>, <VAR>type3</VAR>, <VAR>type4</VAR>)</CODE>
+</PRE>
+For a struct with three slots
+<PRE>
+<CODE>struct { <VAR>type1 id1</VAR>; <VAR>type2 id2</VAR>; <VAR>type3 id3</VAR>; }</CODE>
+</PRE>
+you can specify <VAR>splittable</VAR> as
+<CODE>av_word_splittable_3 (<VAR>type1</VAR>, <VAR>type2</VAR>, <VAR>type3</VAR>)</CODE>.
+<P>
+<LI> Push  the  arguments  on  to the list in order. Again
+there is a macro for each simple built-in  type,  and  the
+macros  for  structure  and  pointer  arguments require an
+extra type argument:
+<PRE>
+<CODE>av_int (<VAR>alist</VAR>, <VAR>int_value</VAR>);</CODE>
+<CODE>av_double (<VAR>alist</VAR>, <VAR>double_value</VAR>);</CODE>
+<CODE>av_struct (<VAR>alist</VAR>, <VAR>struct_or_union_type</VAR>, <VAR>struct_value</VAR>);</CODE>
+<CODE>av_ptr (<VAR>alist</VAR>, <VAR>pointer_type</VAR>, <VAR>pointer_value</VAR>);</CODE>
+</PRE>
+<LI> Call the function, set the return value, and tidy up:
+<CODE>av_call (<VAR>alist</VAR>);</CODE>
+</OL>
+
+<A NAME="Notes">
+<H2>Notes</H2>
+</A>
+
+<OL>
+<LI> Functions whose first declaration is  in  Kernighan  &amp;
+Ritchie  style  (i.e., without a typed argument list) MUST
+use default K&amp;R C expression promotions (<CODE>char</CODE> and <CODE>short</CODE> to
+<CODE>int</CODE>,  <CODE>float</CODE>  to <CODE>double</CODE>) whether they are compiled by a K&amp;R
+or an ANSI compiler, because the true argument  types  may
+not  be  known at the call point. Such functions typically
+back-convert their arguments  to  the  declared  types  on
+function  entry.  (In  fact,  the  only way to pass a true
+<CODE>char</CODE>, <CODE>short</CODE> or <CODE>float</CODE> in K&amp;R C  is  by  an  explicit  cast:
+<CODE>func((char)c,(float)f)</CODE>  ).   Similarly, some K&amp;R compilers
+(such as Sun <SAMP>cc</SAMP> on the sparc) actually return a <CODE>float</CODE> as a
+<CODE>double</CODE>.
+<P>
+Hence,  for  arguments  of functions declared in K&amp;R style
+you  should  use  <CODE>av_int()</CODE>  and  </CODE>av_double()</CODE>  rather  than
+<CODE>av_char()</CODE>,  <CODE>av_short()</CODE>  or  <CODE>av_float()</CODE>.   If you use a K&amp;R
+compiler, the avcall header files may be  able  to  detect
+this  and  define <CODE>av_float()</CODE>, etc, appropriately, but with
+an ANSI compiler there is no way <B>avcall</B> can  know  how  a
+function was declared, so you have to correct the argument
+types yourself.
+<P>
+<LI> The explicit type arguments  of  the  <CODE>av_struct()</CODE>  and
+<CODE>av_ptr()</CODE>  macros  are  typically  used  to calculate size,
+alignment, and passing conventions.  This may not be  sufficient  for  some  machines  with  unusual  structure and
+pointer handling: in this case additional  <CODE>av_start_<VAR>type</VAR>()</CODE>
+and <CODE>av_<VAR>type</VAR>()</CODE> macros may be defined.
+<P>
+<LI> The macros <CODE>av_start_longlong()</CODE>,
+<CODE>av_start_ulonglong()</CODE>, <CODE>av_longlong()</CODE>  and
+<CODE>av_ulonglong()</CODE> work only if the C compiler has a working
+<CODE>long long</CODE> 64-bit integer type.
+<P>
+<LI> The struct types used in <CODE>av_start_struct()</CODE> and
+<CODE>av_struct()</CODE> must only contain (signed or unsigned) int,
+long, long long or pointer fields. Struct types containing
+(signed or unsigned) char, short, float, double or other
+structs are not supported.
+<P>
+</OL>
+
+<A NAME="See also">
+<H2>See also</H2>
+</A>
+<A HREF="stdarg(3)"><CODE><B>stdarg</B></CODE></A>(3), <A HREF="varargs(3)"><CODE><B>varargs</B></CODE></A>(3).
+
+<A NAME="Bugs">
+<H2>Bugs</H2>
+</A>
+
+<UL>
+<LI>
+The  current  implementations have been tested on a selection
+of common cases but there  are  probably  still  many
+bugs.
+<LI>
+There  are  typically  built-in  limits on the size of the
+argument-list, which may also  include  the  size  of  any
+structure arguments.
+<LI>
+The decision whether a struct is to be returned in registers or in memory
+considers only the struct's size and alignment. This is inaccurate: for
+example, gcc on m68k-next returns
+<CODE>struct { char a,b,c; }</CODE>
+in registers and
+<CODE>struct { char a[3]; }</CODE>
+in memory, although both types have the same size and the same alignment.
+</UL>
+
+<A NAME="Non-Bugs">
+<H2>Non-Bugs</H2>
+</A>
+
+All  information is passed in CPU registers and the stack.
+The <CODE><B>avcall</B></CODE> package is therefore multithread-safe.
+
+<A NAME="Porting AVCALL">
+<H2>Porting AVCALL</H2>
+</A>
+
+Ports,  bug-fixes,  and  suggestions are most welcome. The
+macros required for argument pushing  are  pretty  grungy,
+but  it does seem to be possible to port avcall to a range
+of machines. Ports to non-standard or non-32-bit  machines
+are  especially  welcome  so we can sort the interface out
+before it's too late.
+<P>
+Knowledge about argument passing conventions can be  found
+in  the  gcc source, file <SAMP>gcc-2.6.3/config/<VAR>cpu</VAR>/<VAR>cpu</VAR>.h</SAMP>, section
+<SAMP>"Stack layout; function entry, exit and calling."</SAMP>
+<P>
+Some of the grunge is usually handled by a C  or  assembly
+level  glue  routine  that  actually pushes the arguments,
+calls the function and unpacks  any  return  value. This is
+called <CODE>avcall_call()</CODE>. A precompiled assembler version for
+people without gcc is also made available. The routine should ideally
+have flags for the passing conventions of other compilers.
+<P>
+Many  of  the  current routines waste a lot of stack space
+and generally do hairy things to stack frames - a bit more
+assembly code would probably help things along quite a bit
+here.
+<P>
+
+<A NAME="Author">
+<H2>Author</H2>
+</A>
+
+Bill Triggs &lt;Bill.Triggs@inrialpes.fr&gt;, &lt;Bill.Triggs@imag.fr&gt;.
+
+<A NAME="Acknowledgements">
+<H2>Acknowledgements</H2>
+</A>
+
+Some initial ideas were stolen from the C interface to the
+Zelk extensions to Oliver Laumann's Elk scheme interpreter
+by J.P.Lewis, NEC  C&amp;C  Research,  &lt;zilla@ccrl.nj.nec.com&gt;
+(for    Sun4    &amp;    SGI),    and    Roy    Featherstone's
+&lt;roy@robots.oxford.ac.uk&gt; personal C interface library for
+Sun3, Sun4  &amp;  SGI.   I  also looked at the machine-dependent
+parts of the GCC and GDB distributions, and  put  the  gcc
+<CODE>asm()</CODE> extensions to good use. Thanks guys!
+<P>
+This work was partly supported by EC-ESPRIT Basic Research
+Action SECOND.
+<P>
+
+<HR>
+
+<ADDRESS>AVCALL manual page<BR>
+Bruno Haible &lt;bruno@clisp.org&gt;
+</ADDRESS>
+<P>
+Last modified: 14 January 2001.
+
+</BODY>
+</HTML>
diff --git a/avcall/avcall.man b/avcall/avcall.man
new file mode 100644 (file)
index 0000000..20f7c03
--- /dev/null
@@ -0,0 +1,198 @@
+AVCALL(3)                  Library Functions Manual                  AVCALL(3)
+
+
+
+\e[1mNAME\e[0m
+       avcall - build a C argument list incrementally and call a C function on
+       it.
+
+\e[1mSYNOPSIS\e[0m
+       \e[1m#include <avcall.h>\e[0m
+
+       \e[1mav_alist \e[4m\e[22malist\e[24m\e[1m;\e[0m
+
+       \e[1mav_start_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22m&func\e[24m [[\e[1m, \e[4m\e[22mreturn_type\e[24m]\e[1m, \e[4m\e[22m&return_value\e[24m ]\e[1m);\e[0m
+
+       \e[1mav_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m, \e[22m[\e[4marg_type\e[24m\e[1m,\e[22m] \e[4mvalue\e[24m\e[1m);\e[0m
+
+       \e[1mav_call(\e[4m\e[22malist\e[24m\e[1m);\e[0m
+
+\e[1mDESCRIPTION\e[0m
+       This set of macros builds an argument list for a C function  and  calls
+       the  function on it. It significantly reduces the amount of `glue' code
+       required for parsers, debuggers, imbedded interpreters, C extensions to
+       application  programs  and  other situations where collections of func‐
+       tions need to be called on lists of externally-supplied arguments.
+
+       Function calling conventions differ considerably on different  machines
+       and  \e[4mavcall\e[24m  attempts  to  provide  some  degree of isolation from such
+       architecture dependencies.
+
+       The interface is like \e[1mstdarg\e[22m(3) in reverse. All of the macros return  0
+       for success, < 0 for failure (e.g., argument list overflow or type-not-
+       supported).
+
+       (1)    \e[1m#include <avcall.h>\e[0m
+              and declare the argument list structure
+              \e[1mav_alist \e[4m\e[22malist\e[24m\e[1m;\e[0m
+
+       (2)    Set any special flags. This is architecture and compiler  depen‐
+              dent.  Compiler options that affect passing conventions may need
+              to be flagged by \e[1m#define\e[22ms before the \e[1m#include <avcall.h>  \e[22mstate‐
+              ment. However, the \e[4mconfigure\e[24m script should have determined which
+              \e[1m#define\e[22ms are needed and put them at the top of \e[1mavcall.h\e[22m.
+
+       (3)    Initialize the alist with the function address and return  value
+              pointer  (if  any).  There  is  a separate macro for each simple
+              return type ([u]char, [u]short,  [u]int,  [u]long,  [u]longlong,
+              float,  double,  where `u' indicates `unsigned'). The macros for
+              functions returning structures or pointers require  an  explicit
+              type argument.
+
+       E.g.,
+
+       \e[1mav_start_int (\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22m&func\e[24m\e[1m, \e[4m\e[22m&int_return\e[24m\e[1m);\e[0m
+
+       \e[1mav_start_double (\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22m&func\e[24m\e[1m, \e[4m\e[22m&double_return\e[24m\e[1m);\e[0m
+
+       \e[1mav_start_void (\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22m&func\e[24m\e[1m);\e[0m
+
+       \e[1mav_start_struct (\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22m&func\e[24m\e[1m, \e[4m\e[22mstruct_type\e[24m\e[1m, \e[4m\e[22msplittable\e[24m\e[1m,\e[0m
+                        \e[4m&struct_return\e[24m\e[1m);\e[0m
+
+       \e[1mav_start_ptr (\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22m&func\e[24m\e[1m, \e[4m\e[22mpointer_type\e[24m\e[1m,\e[0m
+                     \e[4m&pointer_return\e[24m\e[1m);\e[0m
+
+       The  \e[4msplittable\e[24m  flag specifies whether the \e[4mstruct_type\e[24m can be returned
+       in registers such that every struct field fits  entirely  in  a  single
+       register.   This   needs   to   be   specified   for  structs  of  size
+       2*sizeof(long). For structs of  size  <=  sizeof(long),  \e[4msplittable\e[24m  is
+       ignored  and  assumed  to  be  1. For structs of size > 2*sizeof(long),
+       \e[4msplittable\e[24m is ignored and assumed to be 0. There are some handy  macros
+       for this:
+       \e[1mav_word_splittable_1 (\e[4m\e[22mtype1\e[24m\e[1m)\e[0m
+       \e[1mav_word_splittable_2 (\e[4m\e[22mtype1\e[24m\e[1m, \e[4m\e[22mtype2\e[24m\e[1m)\e[0m
+       \e[1mav_word_splittable_3 (\e[4m\e[22mtype1\e[24m\e[1m, \e[4m\e[22mtype2\e[24m\e[1m, \e[4m\e[22mtype3\e[24m\e[1m)\e[0m
+       \e[1mav_word_splittable_4 (\e[4m\e[22mtype1\e[24m\e[1m, \e[4m\e[22mtype2\e[24m\e[1m, \e[4m\e[22mtype3\e[24m\e[1m, \e[4m\e[22mtype4\e[24m\e[1m)\e[0m
+       For a struct with three slots
+       \e[1mstruct { \e[4m\e[22mtype1\e[24m \e[4mid1\e[24m\e[1m; \e[4m\e[22mtype2\e[24m \e[4mid2\e[24m\e[1m; \e[4m\e[22mtype3\e[24m \e[4mid3\e[24m\e[1m; }\e[0m
+       you  can  specify  \e[4msplittable\e[24m  as  \e[1mav_word_splittable_3  (\e[4m\e[22mtype1\e[24m\e[1m, \e[4m\e[22mtype2\e[24m\e[1m,\e[0m
+       \e[4mtype3\e[24m\e[1m) \e[22m.
+
+       (4)    Push the arguments on to the list in order.  Again  there  is  a
+              macro  for  each simple built-in type, and the macros for struc‐
+              ture and pointer arguments require an extra type argument:
+
+       \e[1mav_int (\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22mint_value\e[24m\e[1m);\e[0m
+
+       \e[1mav_double (\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22mdouble_value\e[24m\e[1m);\e[0m
+
+       \e[1mav_struct (\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22mstruct_or_union_type\e[24m\e[1m, \e[4m\e[22mstruct_value\e[24m\e[1m);\e[0m
+
+       \e[1mav_ptr (\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22mpointer_type\e[24m\e[1m, \e[4m\e[22mpointer_value\e[24m\e[1m);\e[0m
+
+       (5)    Call the function, set the return value, and tidy up:
+
+       \e[1mav_call (\e[4m\e[22malist\e[24m\e[1m);\e[0m
+
+
+\e[1mNOTES\e[0m
+       (1) Functions whose first declaration is in Kernighan &  Ritchie  style
+       (i.e., without a typed argument list) MUST use default K&R C expression
+       promotions (char and short to int, float to double)  whether  they  are
+       compiled  by a K&R or an ANSI compiler, because the true argument types
+       may not be known at the call point. Such functions typically  back-con‐
+       vert their arguments to the declared types on function entry. (In fact,
+       the only way to pass a true char, short or float in  K&R  C  is  by  an
+       explicit cast: \e[1mfunc((char)c,(float)f) \e[22m).  Similarly, some K&R compilers
+       (such as Sun cc on the sparc) actually return a float as a double.
+
+       Hence, for arguments of functions declared in K&R style you should  use
+       \e[1mav_int()   \e[22mand   \e[1mav_double()   \e[22mrather  than  \e[1mav_char(),  av_short()  \e[22mor
+       \e[1mav_float().  \e[22mIf you use a K&R compiler, the avcall header files may  be
+       able to detect this and define \e[1mav_float(), \e[22metc, appropriately, but with
+       an ANSI compiler there is no way \e[4mavcall\e[24m can know  how  a  function  was
+       declared, so you have to correct the argument types yourself.
+
+       (2)  The explicit type arguments of the \e[1mav_struct() \e[22mand \e[1mav_ptr() \e[22mmacros
+       are typically used to calculate size, alignment,  and  passing  conven‐
+       tions.   This  may  not  be  sufficient  for some machines with unusual
+       structure and pointer handling: in this case additional \e[1mav_start_\e[4m\e[22mtype\e[24m\e[1m()\e[0m
+       and \e[1mav_\e[4m\e[22mtype\e[24m\e[1m() \e[22mmacros may be defined.
+
+       (3) The macros \e[1mav_start_longlong()\e[22m, \e[1mav_start_ulonglong()\e[22m, \e[1mav_longlong()\e[0m
+       and \e[1mav_ulonglong() \e[22mwork only if the C compiler has a working \e[1mlong  long\e[0m
+       64-bit integer type.
+
+       (4)  The  struct  types  used in \e[1mav_start_struct() \e[22mand \e[1mav_struct() \e[22mmust
+       only contain (signed or unsigned)  int,  long,  long  long  or  pointer
+       fields.   Struct  types  containing  (signed  or unsigned) char, short,
+       float, double or other structs are not supported.
+
+
+\e[1mSEE ALSO\e[0m
+       \e[1mstdarg\e[22m(3), \e[1mvarargs\e[22m(3).
+
+
+\e[1mBUGS\e[0m
+       The current implementations have been tested on a selection  of  common
+       cases but there are probably still many bugs.
+
+       There  are  typically built-in limits on the size of the argument-list,
+       which may also include the size of any structure arguments.
+
+       The decision whether a struct is to be returned in registers or in mem‐
+       ory considers only the struct's size and alignment. This is inaccurate:
+       for example, gcc on m68k-next returns \e[1mstruct { char a,b,c; } \e[22min  regis‐
+       ters  and \e[1mstruct { char a[3]; } \e[22min memory, although both types have the
+       same size and the same alignment.
+
+
+\e[1mNON-BUGS\e[0m
+       All information is passed in CPU registers and the  stack.  The  \e[1mavcall\e[0m
+       package is therefore multithread-safe.
+
+
+\e[1mPORTING AVCALL\e[0m
+       Ports, bug-fixes, and suggestions are most welcome. The macros required
+       for argument pushing are pretty grungy, but it does seem to be possible
+       to  port  avcall  to  a  range  of  machines.  Ports to non-standard or
+       non-32-bit machines are especially welcome so we can sort the interface
+       out before it's too late.
+
+       Knowledge  about  argument  passing conventions can be found in the gcc
+       source, file gcc-2.6.3/config/\e[4mcpu\e[24m/\e[4mcpu\e[24m.h, section "Stack  layout;  func‐
+       tion entry, exit and calling."
+
+       Some  of  the  grunge  is usually handled by a C or assembly level glue
+       routine that actually pushes the  arguments,  calls  the  function  and
+       unpacks  any return value.  This is called avcall_call(). A precompiled
+       assembler version for people without gcc is also  made  available.  The
+       routine  should ideally have flags for the passing conventions of other
+       compilers.
+
+       Many of the current routines waste a lot of stack space  and  generally
+       do hairy things to stack frames - a bit more assembly code would proba‐
+       bly help things along quite a bit here.
+
+
+\e[1mAUTHOR\e[0m
+       Bill Triggs <Bill.Triggs@inrialpes.fr>.
+
+
+\e[1mACKNOWLEDGEMENTS\e[0m
+       Some initial ideas were stolen from the C interface to the Zelk  exten‐
+       sions  to Oliver Laumann's Elk scheme interpreter by J.P.Lewis, NEC C&C
+       Research, <zilla@ccrl.nj.nec.com> (for Sun4 & SGI),  and  Roy  Feather‐
+       stone's  <roy@robots.oxford.ac.uk>  personal  C  interface  library for
+       Sun[34] & SGI.  I also looked at the machine-dependent parts of the GCC
+       and  GDB  distributions,  and put the gcc asm() extensions to good use.
+       Thanks guys!
+
+       This work was partly supported by EC-ESPRIT Basic Research Action  SEC‐
+       OND.
+
+
+
+
+                                 23 July 2017                        AVCALL(3)
diff --git a/avcall/minitests-c++.cc b/avcall/minitests-c++.cc
new file mode 100644 (file)
index 0000000..1738e11
--- /dev/null
@@ -0,0 +1,18 @@
+/*
+ * Copyright 2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "minitests.c"
diff --git a/avcall/minitests.c b/avcall/minitests.c
new file mode 100644 (file)
index 0000000..b0f50fe
--- /dev/null
@@ -0,0 +1,19 @@
+/*
+ * Copyright 1999-2001 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#define SKIP_EXTRA_STRUCTS
+#include "tests.c"
diff --git a/avcall/tests.c b/avcall/tests.c
new file mode 100644 (file)
index 0000000..427a9e9
--- /dev/null
@@ -0,0 +1,1548 @@
+/**
+  Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+  Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+
+  This program is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+**/
+/*----------------------------------------------------------------------
+  Some test routines for avcall foreign function interface.
+  The coverage is entirely random, this just contains some of the things
+  that I think are likely to break.
+
+  We really need to add some more pointer (void* / char* / func*) tests
+  and some varargs ones, and also try to test structure alignment more
+  throughly.
+ ----------------------------------------------------------------------*/
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include "avcall.h"
+
+#include "testcases.c"
+
+#if defined(__hppa__) && defined(__GNUC__)
+#if (__GNUC__ == 2 && __GNUC_MINOR__ < 6)
+/* gcc-2.5.2 bugs prevent the T test from working. */
+#define SKIP_T
+#endif
+#endif
+#if defined(__m68k__) && defined(__GNUC__)
+/* "gcc-2.6.3 -freg-struct-return" returns  T = struct { char c[3]; }  (which
+ * has size 4 !) in memory, in contrast to  struct { char a,b,c; }  and
+ * struct { char c[4]; }  and  struct { char a,b,c,d; }  which have the same
+ * size and the same alignment but are returned in registers. I don't know why.
+ */
+#define SKIP_T
+#endif
+
+
+/*
+ * The way we run these tests - first call the function directly, then
+ * through av_call() - there is the danger that arguments or results seem
+ * to be passed correctly, but what we are seeing are in fact the vestiges
+ * (traces) or the previous call. This may seriously fake the test.
+ * Avoid this by clearing the registers between the first and the second call.
+ */
+long clear_traces_i (long a, long b, long c, long d, long e, long f, long g, long h,
+                     long i, long j, long k, long l, long m, long n, long o, long p)
+{ return 0; }
+float clear_traces_f (float a, float b, float c, float d, float e, float f, float g,
+                      float h, float i, float j, float k, float l, float m, float n,
+                      float o, float p)
+{ return 0.0; }
+double clear_traces_d (double a, double b, double c, double d, double e, double f, double g,
+                       double h, double i, double j, double k, double l, double m, double n,
+                       double o, double p)
+{ return 0.0; }
+J clear_traces_J (void)
+{ J j; j.l1 = j.l2 = 0; return j; }
+void clear_traces (void)
+{ clear_traces_i(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0);
+  clear_traces_f(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0);
+  clear_traces_d(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0);
+  clear_traces_J();
+}
+
+void
+  void_tests (void)
+{
+  av_alist a;
+  v_v();
+  clear_traces();
+  av_start_void(a,v_v);
+  av_call(a);
+  return;
+}
+void
+  int_tests (void)
+{
+  av_alist a;
+  int ir;
+
+  ir = i_v();
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+  ir = 0; clear_traces();
+  av_start_int(a,i_v,&ir);
+  av_call(a);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+
+  ir = i_i(i1);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+  ir = 0; clear_traces();
+  av_start_int(a,i_i,&ir);
+  av_int(a,i1);
+  av_call(a);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+
+  ir = i_i2(i1,i2);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+  ir = 0; clear_traces();
+  av_start_int(a,i_i2,&ir);
+  av_int(a,i1);
+  av_int(a,i2);
+  av_call(a);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+
+  ir = i_i4(i1,i2,i3,i4);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+  ir = 0; clear_traces();
+  av_start_int(a,i_i4,&ir);
+  av_int(a,i1);
+  av_int(a,i2);
+  av_int(a,i3);
+  av_int(a,i4);
+  av_call(a);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+
+  ir = i_i8(i1,i2,i3,i4,i5,i6,i7,i8);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+  ir = 0; clear_traces();
+  av_start_int(a,i_i8,&ir);
+  av_int(a,i1);
+  av_int(a,i2);
+  av_int(a,i3);
+  av_int(a,i4);
+  av_int(a,i5);
+  av_int(a,i6);
+  av_int(a,i7);
+  av_int(a,i8);
+  av_call(a);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+
+  ir = i_i16(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+  ir = 0; clear_traces();
+  av_start_int(a,i_i16,&ir);
+  av_int(a,i1);
+  av_int(a,i2);
+  av_int(a,i3);
+  av_int(a,i4);
+  av_int(a,i5);
+  av_int(a,i6);
+  av_int(a,i7);
+  av_int(a,i8);
+  av_int(a,i9);
+  av_int(a,i10);
+  av_int(a,i11);
+  av_int(a,i12);
+  av_int(a,i13);
+  av_int(a,i14);
+  av_int(a,i15);
+  av_int(a,i16);
+  av_call(a);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+
+  ir = i_i32(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16,i17,i18,i19,i20,i21,i22,i23,i24,i25,i26,i27,i28,i29,i30,i31,i32);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+  ir = 0; clear_traces();
+  av_start_int(a,i_i32,&ir);
+  av_int(a,i1);
+  av_int(a,i2);
+  av_int(a,i3);
+  av_int(a,i4);
+  av_int(a,i5);
+  av_int(a,i6);
+  av_int(a,i7);
+  av_int(a,i8);
+  av_int(a,i9);
+  av_int(a,i10);
+  av_int(a,i11);
+  av_int(a,i12);
+  av_int(a,i13);
+  av_int(a,i14);
+  av_int(a,i15);
+  av_int(a,i16);
+  av_int(a,i17);
+  av_int(a,i18);
+  av_int(a,i19);
+  av_int(a,i20);
+  av_int(a,i21);
+  av_int(a,i22);
+  av_int(a,i23);
+  av_int(a,i24);
+  av_int(a,i25);
+  av_int(a,i26);
+  av_int(a,i27);
+  av_int(a,i28);
+  av_int(a,i29);
+  av_int(a,i30);
+  av_int(a,i31);
+  av_int(a,i32);
+  av_call(a);
+  fprintf(out,"->%d\n",ir);
+  fflush(out);
+
+  return;
+}
+void
+  float_tests (void)
+{
+  av_alist a;
+  float fr;
+
+  fr = f_f(f1);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f,&fr);
+  av_float(a,f1);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f2(f1,f2);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f2,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f4(f1,f2,f3,f4);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f4,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_float(a,f3);
+  av_float(a,f4);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f8(f1,f2,f3,f4,f5,f6,f7,f8);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f8,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_float(a,f3);
+  av_float(a,f4);
+  av_float(a,f5);
+  av_float(a,f6);
+  av_float(a,f7);
+  av_float(a,f8);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f16(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f16,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_float(a,f3);
+  av_float(a,f4);
+  av_float(a,f5);
+  av_float(a,f6);
+  av_float(a,f7);
+  av_float(a,f8);
+  av_float(a,f9);
+  av_float(a,f10);
+  av_float(a,f11);
+  av_float(a,f12);
+  av_float(a,f13);
+  av_float(a,f14);
+  av_float(a,f15);
+  av_float(a,f16);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f24(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f24,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_float(a,f3);
+  av_float(a,f4);
+  av_float(a,f5);
+  av_float(a,f6);
+  av_float(a,f7);
+  av_float(a,f8);
+  av_float(a,f9);
+  av_float(a,f10);
+  av_float(a,f11);
+  av_float(a,f12);
+  av_float(a,f13);
+  av_float(a,f14);
+  av_float(a,f15);
+  av_float(a,f16);
+  av_float(a,f17);
+  av_float(a,f18);
+  av_float(a,f19);
+  av_float(a,f20);
+  av_float(a,f21);
+  av_float(a,f22);
+  av_float(a,f23);
+  av_float(a,f24);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+}
+void
+  double_tests (void)
+{
+  av_alist a;
+  double dr;
+
+  dr = d_d(d1);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d,&dr);
+  av_double(a,d1);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_d2(d1,d2);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d2,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_d4(d1,d2,d3,d4);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d4,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_double(a,d3);
+  av_double(a,d4);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_d8(d1,d2,d3,d4,d5,d6,d7,d8);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d8,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_double(a,d3);
+  av_double(a,d4);
+  av_double(a,d5);
+  av_double(a,d6);
+  av_double(a,d7);
+  av_double(a,d8);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_d16(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d16,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_double(a,d3);
+  av_double(a,d4);
+  av_double(a,d5);
+  av_double(a,d6);
+  av_double(a,d7);
+  av_double(a,d8);
+  av_double(a,d9);
+  av_double(a,d10);
+  av_double(a,d11);
+  av_double(a,d12);
+  av_double(a,d13);
+  av_double(a,d14);
+  av_double(a,d15);
+  av_double(a,d16);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  return;
+}
+void
+  pointer_tests (void)
+{
+  av_alist a;
+  void* vpr;
+
+  vpr = vp_vpdpcpsp(&uc1,&d2,str3,&I4);
+  fprintf(out,"->0x%p\n",vpr);
+  fflush(out);
+  vpr = 0; clear_traces();
+  av_start_ptr(a,vp_vpdpcpsp,void*,&vpr);
+  av_ptr(a,void*,&uc1);
+  av_ptr(a,double*,&d2);
+  av_ptr(a,char*,str3);
+  av_ptr(a,Int*,&I4);
+  av_call(a);
+  fprintf(out,"->0x%p\n",vpr);
+  fflush(out);
+
+  return;
+}
+void
+  mixed_number_tests (void)
+{
+  av_alist a;
+  uchar ucr;
+  ushort usr;
+  float fr;
+  double dr;
+  long long llr;
+
+  /* Unsigned types.
+   */
+  ucr = uc_ucsil(uc1,us2,ui3,ul4);
+  fprintf(out,"->%u\n",ucr);
+  fflush(out);
+  ucr = 0; clear_traces();
+  av_start_uchar(a,uc_ucsil,&ucr);
+  av_uchar(a,uc1);
+  av_ushort(a,us2);
+  av_uint(a,ui3);
+  av_ulong(a,ul4);
+  av_call(a);
+  fprintf(out,"->%u\n",ucr);
+  fflush(out);
+
+  /* Mixed int & float types.
+   */
+  dr = d_iidd(i1,i2,d3,d4);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_iidd,&dr);
+  av_int(a,i1);
+  av_int(a,i2);
+  av_double(a,d3);
+  av_double(a,d4);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_iiidi(i1,i2,i3,d4,i5);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_iiidi,&dr);
+  av_int(a,i1);
+  av_int(a,i2);
+  av_int(a,i3);
+  av_double(a,d4);
+  av_int(a,i5);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_idid(i1,d2,i3,d4);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_idid,&dr);
+  av_int(a,i1);
+  av_double(a,d2);
+  av_int(a,i3);
+  av_double(a,d4);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_fdi(f1,d2,i3);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_fdi,&dr);
+  av_float(a,f1);
+  av_double(a,d2);
+  av_int(a,i3);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  usr = us_cdcd(c1,d2,c3,d4);
+  fprintf(out,"->%u\n",usr);
+  fflush(out);
+  usr = 0; clear_traces();
+  av_start_ushort(a,us_cdcd,&usr);
+  av_char(a,c1);
+  av_double(a,d2);
+  av_char(a,c3);
+  av_double(a,d4);
+  av_call(a);
+  fprintf(out,"->%u\n",usr);
+  fflush(out);
+
+  /* Long long types.
+   */
+  llr = ll_iiilli(i1,i2,i3,ll1,i13);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+  llr = 0; clear_traces();
+  av_start_longlong(a,ll_iiilli,&llr);
+  av_int(a,i1);
+  av_int(a,i2);
+  av_int(a,i3);
+  av_longlong(a,ll1);
+  av_int(a,i13);
+  av_call(a);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+
+  llr = ll_flli(f13,ll1,i13);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+  llr = 0; clear_traces();
+  av_start_longlong(a,ll_flli,&llr);
+  av_float(a,f13);
+  av_longlong(a,ll1);
+  av_int(a,i13);
+  av_call(a);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+
+  fr = f_fi(f1,i9);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_fi,&fr);
+  av_float(a,f1);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f2i(f1,f2,i9);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f2i,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f3i(f1,f2,f3,i9);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f3i,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_float(a,f3);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f4i(f1,f2,f3,f4,i9);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f4i,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_float(a,f3);
+  av_float(a,f4);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f7i(f1,f2,f3,f4,f5,f6,f7,i9);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f7i,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_float(a,f3);
+  av_float(a,f4);
+  av_float(a,f5);
+  av_float(a,f6);
+  av_float(a,f7);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f8i(f1,f2,f3,f4,f5,f6,f7,f8,i9);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f8i,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_float(a,f3);
+  av_float(a,f4);
+  av_float(a,f5);
+  av_float(a,f6);
+  av_float(a,f7);
+  av_float(a,f8);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f12i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,i9);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f12i,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_float(a,f3);
+  av_float(a,f4);
+  av_float(a,f5);
+  av_float(a,f6);
+  av_float(a,f7);
+  av_float(a,f8);
+  av_float(a,f9);
+  av_float(a,f10);
+  av_float(a,f11);
+  av_float(a,f12);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  fr = f_f13i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,i9);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f13i,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_float(a,f3);
+  av_float(a,f4);
+  av_float(a,f5);
+  av_float(a,f6);
+  av_float(a,f7);
+  av_float(a,f8);
+  av_float(a,f9);
+  av_float(a,f10);
+  av_float(a,f11);
+  av_float(a,f12);
+  av_float(a,f13);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  dr = d_di(d1,i9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_di,&dr);
+  av_double(a,d1);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_d2i(d1,d2,i9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d2i,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_d3i(d1,d2,d3,i9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d3i,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_double(a,d3);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_d4i(d1,d2,d3,d4,i9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d4i,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_double(a,d3);
+  av_double(a,d4);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_d7i(d1,d2,d3,d4,d5,d6,d7,i9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d7i,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_double(a,d3);
+  av_double(a,d4);
+  av_double(a,d5);
+  av_double(a,d6);
+  av_double(a,d7);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_d8i(d1,d2,d3,d4,d5,d6,d7,d8,i9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d8i,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_double(a,d3);
+  av_double(a,d4);
+  av_double(a,d5);
+  av_double(a,d6);
+  av_double(a,d7);
+  av_double(a,d8);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_d12i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,i9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d12i,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_double(a,d3);
+  av_double(a,d4);
+  av_double(a,d5);
+  av_double(a,d6);
+  av_double(a,d7);
+  av_double(a,d8);
+  av_double(a,d9);
+  av_double(a,d10);
+  av_double(a,d11);
+  av_double(a,d12);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_d13i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,i9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d13i,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_double(a,d3);
+  av_double(a,d4);
+  av_double(a,d5);
+  av_double(a,d6);
+  av_double(a,d7);
+  av_double(a,d8);
+  av_double(a,d9);
+  av_double(a,d10);
+  av_double(a,d11);
+  av_double(a,d12);
+  av_double(a,d13);
+  av_int(a,i9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  return;
+}
+void
+  small_structure_return_tests (void)
+{
+  av_alist a;
+
+  {
+    Size1 r = S1_v();
+    fprintf(out,"->{%c}\n",r.x1);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    av_start_struct(a,S1_v,Size1,1,&r);
+    av_call(a);
+    fprintf(out,"->{%c}\n",r.x1);
+    fflush(out);
+  }
+  {
+    Size2 r = S2_v();
+    fprintf(out,"->{%c%c}\n",r.x1,r.x2);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    av_start_struct(a,S2_v,Size2,1,&r);
+    av_call(a);
+    fprintf(out,"->{%c%c}\n",r.x1,r.x2);
+    fflush(out);
+  }
+  {
+    Size3 r = S3_v();
+    fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    av_start_struct(a,S3_v,Size3,1,&r);
+    av_call(a);
+    fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3);
+    fflush(out);
+  }
+  {
+    Size4 r = S4_v();
+    fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    av_start_struct(a,S4_v,Size4,1,&r);
+    av_call(a);
+    fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4);
+    fflush(out);
+  }
+  {
+    Size7 r = S7_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    av_start_struct(a,S7_v,Size7,1,&r);
+    av_call(a);
+    fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7);
+    fflush(out);
+  }
+  {
+    Size8 r = S8_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    av_start_struct(a,S8_v,Size8,1,&r);
+    av_call(a);
+    fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8);
+    fflush(out);
+  }
+  {
+    Size12 r = S12_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    av_start_struct(a,S12_v,Size12,1,&r);
+    av_call(a);
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12);
+    fflush(out);
+  }
+  {
+    Size15 r = S15_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    av_start_struct(a,S15_v,Size15,1,&r);
+    av_call(a);
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15);
+    fflush(out);
+  }
+  {
+    Size16 r = S16_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    av_start_struct(a,S16_v,Size16,1,&r);
+    av_call(a);
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16);
+    fflush(out);
+  }
+}
+void
+  structure_tests (void)
+{
+  av_alist a;
+  Int Ir;
+  Char Cr;
+  Float Fr;
+  Double Dr;
+  J Jr;
+  T Tr;
+  X Xr;
+
+  Ir = I_III(I1,I2,I3);
+  fprintf(out,"->{%d}\n",Ir.x);
+  fflush(out);
+  Ir.x = 0; clear_traces();
+  av_start_struct(a,I_III,Int,1,&Ir);
+  av_struct(a,Int,I1);
+  av_struct(a,Int,I2);
+  av_struct(a,Int,I3);
+  av_call(a);
+  fprintf(out,"->{%d}\n",Ir.x);
+  fflush(out);
+
+#ifndef SKIP_EXTRA_STRUCTS
+  Cr = C_CdC(C1,d2,C3);
+  fprintf(out,"->{'%c'}\n",Cr.x);
+  fflush(out);
+  Cr.x = '\0'; clear_traces();
+  av_start_struct(a,C_CdC,Char,1,&Cr);
+  av_struct(a,Char,C1);
+  av_double(a,d2);
+  av_struct(a,Char,C3);
+  av_call(a);
+  fprintf(out,"->{'%c'}\n",Cr.x);
+  fflush(out);
+
+  Fr = F_Ffd(F1,f2,d3);
+  fprintf(out,"->{%g}\n",Fr.x);
+  fflush(out);
+  Fr.x = 0.0; clear_traces();
+  av_start_struct(a,F_Ffd,Float,av_word_splittable_1(float),&Fr);
+  av_struct(a,Float,F1);
+  av_float(a,f2);
+  av_double(a,d3);
+  av_call(a);
+  fprintf(out,"->{%g}\n",Fr.x);
+  fflush(out);
+
+  Dr = D_fDd(f1,D2,d3);
+  fprintf(out,"->{%g}\n",Dr.x);
+  fflush(out);
+  Dr.x = 0.0; clear_traces();
+  av_start_struct(a,D_fDd,Double,av_word_splittable_1(double),&Dr);
+  av_float(a,f1);
+  av_struct(a,Double,D2);
+  av_double(a,d3);
+  av_call(a);
+  fprintf(out,"->{%g}\n",Dr.x);
+  fflush(out);
+
+  Dr = D_Dfd(D1,f2,d3);
+  fprintf(out,"->{%g}\n",Dr.x);
+  fflush(out);
+  Dr.x = 0.0; clear_traces();
+  av_start_struct(a,D_Dfd,Double,av_word_splittable_1(double),&Dr);
+  av_struct(a,Double,D1);
+  av_float(a,f2);
+  av_double(a,d3);
+  av_call(a);
+  fprintf(out,"->{%g}\n",Dr.x);
+  fflush(out);
+#endif
+
+  Jr = J_JiJ(J1,i2,J2);
+  fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2);
+  fflush(out);
+  Jr.l1 = Jr.l2 = 0; clear_traces();
+  av_start_struct(a,J_JiJ,J,av_word_splittable_2(long,long),&Jr);
+  av_struct(a,J,J1);
+  av_int(a,i2);
+  av_struct(a,J,J2);
+  av_call(a);
+  fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2);
+  fflush(out);
+
+#ifndef SKIP_EXTRA_STRUCTS
+#ifndef SKIP_T
+  Tr = T_TcT(T1,' ',T2);
+  fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]);
+  fflush(out);
+  Tr.c[0] = Tr.c[1] = Tr.c[2] = 0; clear_traces();
+  av_start_struct(a,T_TcT,T,1,&Tr);
+  av_struct(a,T,T1);
+  av_char(a,' ');
+  av_struct(a,T,T2);
+  av_call(a);
+  fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]);
+  fflush(out);
+#endif
+
+  Xr = X_BcdB(B1,c2,d3,B2);
+  fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1);
+  fflush(out);
+  Xr.c[0]=Xr.c1='\0'; clear_traces();
+  av_start_struct(a,X_BcdB,X,0,&Xr);
+  av_struct(a,B,B1);
+  av_char(a,c2);
+  av_double(a,d3);
+  av_struct(a,B,B2);
+  av_call(a);
+  fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1);
+  fflush(out);
+#endif
+
+  return;
+}
+
+void
+  gpargs_boundary_tests (void)
+{
+  av_alist a;
+  long lr;
+  long long llr;
+  float fr;
+  double dr;
+
+  lr = l_l0J(J1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l0J,&lr);
+  av_struct(a,J,J1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l1J(l1,J1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l1J,&lr);
+  av_long(a,l1);
+  av_struct(a,J,J1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l2J(l1,l2,J1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l2J,&lr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_struct(a,J,J1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l3J(l1,l2,l3,J1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l3J,&lr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_struct(a,J,J1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l4J(l1,l2,l3,l4,J1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l4J,&lr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_struct(a,J,J1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l5J(l1,l2,l3,l4,l5,J1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l5J,&lr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_long(a,l5);
+  av_struct(a,J,J1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l6J(l1,l2,l3,l4,l5,l6,J1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l6J,&lr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_long(a,l5);
+  av_long(a,l6);
+  av_struct(a,J,J1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l7J(l1,l2,l3,l4,l5,l6,l7,J1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l7J,&lr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_long(a,l5);
+  av_long(a,l6);
+  av_long(a,l7);
+  av_struct(a,J,J1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l0K(K1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l0K,&lr);
+  av_struct(a,K,K1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l1K(l1,K1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l1K,&lr);
+  av_long(a,l1);
+  av_struct(a,K,K1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l2K(l1,l2,K1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l2K,&lr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_struct(a,K,K1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l3K(l1,l2,l3,K1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l3K,&lr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_struct(a,K,K1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l4K(l1,l2,l3,l4,K1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l4K,&lr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_struct(a,K,K1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l5K(l1,l2,l3,l4,l5,K1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l5K,&lr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_long(a,l5);
+  av_struct(a,K,K1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  lr = l_l6K(l1,l2,l3,l4,l5,l6,K1,l9);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+  lr = 0; clear_traces();
+  av_start_long(a,l_l6K,&lr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_long(a,l5);
+  av_long(a,l6);
+  av_struct(a,K,K1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%ld\n",lr);
+  fflush(out);
+
+  fr = f_f17l3L(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,l6,l7,l8,L1);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+  fr = 0.0; clear_traces();
+  av_start_float(a,f_f17l3L,&fr);
+  av_float(a,f1);
+  av_float(a,f2);
+  av_float(a,f3);
+  av_float(a,f4);
+  av_float(a,f5);
+  av_float(a,f6);
+  av_float(a,f7);
+  av_float(a,f8);
+  av_float(a,f9);
+  av_float(a,f10);
+  av_float(a,f11);
+  av_float(a,f12);
+  av_float(a,f13);
+  av_float(a,f14);
+  av_float(a,f15);
+  av_float(a,f16);
+  av_float(a,f17);
+  av_long(a,l6);
+  av_long(a,l7);
+  av_long(a,l8);
+  av_struct(a,L,L1);
+  av_call(a);
+  fprintf(out,"->%g\n",fr);
+  fflush(out);
+
+  dr = d_d17l3L(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16,d17,l6,l7,l8,L1);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_d17l3L,&dr);
+  av_double(a,d1);
+  av_double(a,d2);
+  av_double(a,d3);
+  av_double(a,d4);
+  av_double(a,d5);
+  av_double(a,d6);
+  av_double(a,d7);
+  av_double(a,d8);
+  av_double(a,d9);
+  av_double(a,d10);
+  av_double(a,d11);
+  av_double(a,d12);
+  av_double(a,d13);
+  av_double(a,d14);
+  av_double(a,d15);
+  av_double(a,d16);
+  av_double(a,d17);
+  av_long(a,l6);
+  av_long(a,l7);
+  av_long(a,l8);
+  av_struct(a,L,L1);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  llr = ll_l2ll(l1,l2,ll1,l9);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+  llr = 0; clear_traces();
+  av_start_longlong(a,ll_l2ll,&llr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_longlong(a,ll1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+
+  llr = ll_l3ll(l1,l2,l3,ll1,l9);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+  llr = 0; clear_traces();
+  av_start_longlong(a,ll_l3ll,&llr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_longlong(a,ll1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+
+  llr = ll_l4ll(l1,l2,l3,l4,ll1,l9);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+  llr = 0; clear_traces();
+  av_start_longlong(a,ll_l4ll,&llr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_longlong(a,ll1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+
+  llr = ll_l5ll(l1,l2,l3,l4,l5,ll1,l9);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+  llr = 0; clear_traces();
+  av_start_longlong(a,ll_l5ll,&llr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_long(a,l5);
+  av_longlong(a,ll1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+
+  llr = ll_l6ll(l1,l2,l3,l4,l5,l6,ll1,l9);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+  llr = 0; clear_traces();
+  av_start_longlong(a,ll_l6ll,&llr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_long(a,l5);
+  av_long(a,l6);
+  av_longlong(a,ll1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+
+  llr = ll_l7ll(l1,l2,l3,l4,l5,l6,l7,ll1,l9);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+  llr = 0; clear_traces();
+  av_start_longlong(a,ll_l7ll,&llr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_long(a,l5);
+  av_long(a,l6);
+  av_long(a,l7);
+  av_longlong(a,ll1);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+  fflush(out);
+
+  dr = d_l2d(l1,l2,d2,l9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_l2d,&dr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_double(a,d2);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_l3d(l1,l2,l3,d2,l9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_l3d,&dr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_double(a,d2);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_l4d(l1,l2,l3,l4,d2,l9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_l4d,&dr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_double(a,d2);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_l5d(l1,l2,l3,l4,l5,d2,l9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_l5d,&dr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_long(a,l5);
+  av_double(a,d2);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_l6d(l1,l2,l3,l4,l5,l6,d2,l9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_l6d,&dr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_long(a,l5);
+  av_long(a,l6);
+  av_double(a,d2);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  dr = d_l7d(l1,l2,l3,l4,l5,l6,l7,d2,l9);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+  dr = 0.0; clear_traces();
+  av_start_double(a,d_l7d,&dr);
+  av_long(a,l1);
+  av_long(a,l2);
+  av_long(a,l3);
+  av_long(a,l4);
+  av_long(a,l5);
+  av_long(a,l6);
+  av_long(a,l7);
+  av_double(a,d2);
+  av_long(a,l9);
+  av_call(a);
+  fprintf(out,"->%g\n",dr);
+  fflush(out);
+
+  return;
+}
+
+/* Verify that structs larger than 2 words are really
+   passed by value, not accidentally by reference.  */
+void
+  by_value_tests (void)
+{
+  av_alist a;
+  K k;
+
+  k.l1 = l1;
+  k.l2 = l2;
+  k.l3 = l3;
+  k.l4 = l4;
+  fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4);
+  fflush(out);
+  clear_traces();
+  av_start_void(a,v_clobber_K);
+  av_struct(a,K,k);
+  av_call(a);
+  fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4);
+  fflush(out);
+}
+
+int
+  main (void)
+{
+  out = stdout;
+  void_tests();
+  int_tests();
+  float_tests();
+  double_tests();
+  pointer_tests();
+  mixed_number_tests();
+  small_structure_return_tests();
+  structure_tests();
+  gpargs_boundary_tests();
+  by_value_tests();
+
+  exit(0);
+}
diff --git a/build-aux/ar-lib b/build-aux/ar-lib
new file mode 100755 (executable)
index 0000000..f64465e
--- /dev/null
@@ -0,0 +1,271 @@
+#! /bin/sh
+# Wrapper for Microsoft lib.exe
+
+me=ar-lib
+scriptversion=2019-07-04.01; # UTC
+
+# Copyright (C) 2010-2019 Free Software Foundation, Inc.
+# Written by Peter Rosin <peda@lysator.liu.se>.
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2, or (at your option)
+# any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+# As a special exception to the GNU General Public License, if you
+# distribute this file as part of a program that contains a
+# configuration script generated by Autoconf, you may include it under
+# the same distribution terms that you use for the rest of that program.
+
+# This file is maintained in Automake, please report
+# bugs to <bug-automake@gnu.org> or send patches to
+# <automake-patches@gnu.org>.
+
+
+# func_error message
+func_error ()
+{
+  echo "$me: $1" 1>&2
+  exit 1
+}
+
+file_conv=
+
+# func_file_conv build_file
+# Convert a $build file to $host form and store it in $file
+# Currently only supports Windows hosts.
+func_file_conv ()
+{
+  file=$1
+  case $file in
+    / | /[!/]*) # absolute file, and not a UNC file
+      if test -z "$file_conv"; then
+       # lazily determine how to convert abs files
+       case `uname -s` in
+         MINGW*)
+           file_conv=mingw
+           ;;
+         CYGWIN*)
+           file_conv=cygwin
+           ;;
+         *)
+           file_conv=wine
+           ;;
+       esac
+      fi
+      case $file_conv in
+       mingw)
+         file=`cmd //C echo "$file " | sed -e 's/"\(.*\) " *$/\1/'`
+         ;;
+       cygwin)
+         file=`cygpath -m "$file" || echo "$file"`
+         ;;
+       wine)
+         file=`winepath -w "$file" || echo "$file"`
+         ;;
+      esac
+      ;;
+  esac
+}
+
+# func_at_file at_file operation archive
+# Iterate over all members in AT_FILE performing OPERATION on ARCHIVE
+# for each of them.
+# When interpreting the content of the @FILE, do NOT use func_file_conv,
+# since the user would need to supply preconverted file names to
+# binutils ar, at least for MinGW.
+func_at_file ()
+{
+  operation=$2
+  archive=$3
+  at_file_contents=`cat "$1"`
+  eval set x "$at_file_contents"
+  shift
+
+  for member
+  do
+    $AR -NOLOGO $operation:"$member" "$archive" || exit $?
+  done
+}
+
+case $1 in
+  '')
+     func_error "no command.  Try '$0 --help' for more information."
+     ;;
+  -h | --h*)
+    cat <<EOF
+Usage: $me [--help] [--version] PROGRAM ACTION ARCHIVE [MEMBER...]
+
+Members may be specified in a file named with @FILE.
+EOF
+    exit $?
+    ;;
+  -v | --v*)
+    echo "$me, version $scriptversion"
+    exit $?
+    ;;
+esac
+
+if test $# -lt 3; then
+  func_error "you must specify a program, an action and an archive"
+fi
+
+AR=$1
+shift
+while :
+do
+  if test $# -lt 2; then
+    func_error "you must specify a program, an action and an archive"
+  fi
+  case $1 in
+    -lib | -LIB \
+    | -ltcg | -LTCG \
+    | -machine* | -MACHINE* \
+    | -subsystem* | -SUBSYSTEM* \
+    | -verbose | -VERBOSE \
+    | -wx* | -WX* )
+      AR="$AR $1"
+      shift
+      ;;
+    *)
+      action=$1
+      shift
+      break
+      ;;
+  esac
+done
+orig_archive=$1
+shift
+func_file_conv "$orig_archive"
+archive=$file
+
+# strip leading dash in $action
+action=${action#-}
+
+delete=
+extract=
+list=
+quick=
+replace=
+index=
+create=
+
+while test -n "$action"
+do
+  case $action in
+    d*) delete=yes  ;;
+    x*) extract=yes ;;
+    t*) list=yes    ;;
+    q*) quick=yes   ;;
+    r*) replace=yes ;;
+    s*) index=yes   ;;
+    S*)             ;; # the index is always updated implicitly
+    c*) create=yes  ;;
+    u*)             ;; # TODO: don't ignore the update modifier
+    v*)             ;; # TODO: don't ignore the verbose modifier
+    *)
+      func_error "unknown action specified"
+      ;;
+  esac
+  action=${action#?}
+done
+
+case $delete$extract$list$quick$replace,$index in
+  yes,* | ,yes)
+    ;;
+  yesyes*)
+    func_error "more than one action specified"
+    ;;
+  *)
+    func_error "no action specified"
+    ;;
+esac
+
+if test -n "$delete"; then
+  if test ! -f "$orig_archive"; then
+    func_error "archive not found"
+  fi
+  for member
+  do
+    case $1 in
+      @*)
+        func_at_file "${1#@}" -REMOVE "$archive"
+        ;;
+      *)
+        func_file_conv "$1"
+        $AR -NOLOGO -REMOVE:"$file" "$archive" || exit $?
+        ;;
+    esac
+  done
+
+elif test -n "$extract"; then
+  if test ! -f "$orig_archive"; then
+    func_error "archive not found"
+  fi
+  if test $# -gt 0; then
+    for member
+    do
+      case $1 in
+        @*)
+          func_at_file "${1#@}" -EXTRACT "$archive"
+          ;;
+        *)
+          func_file_conv "$1"
+          $AR -NOLOGO -EXTRACT:"$file" "$archive" || exit $?
+          ;;
+      esac
+    done
+  else
+    $AR -NOLOGO -LIST "$archive" | tr -d '\r' | sed -e 's/\\/\\\\/g' \
+      | while read member
+        do
+          $AR -NOLOGO -EXTRACT:"$member" "$archive" || exit $?
+        done
+  fi
+
+elif test -n "$quick$replace"; then
+  if test ! -f "$orig_archive"; then
+    if test -z "$create"; then
+      echo "$me: creating $orig_archive"
+    fi
+    orig_archive=
+  else
+    orig_archive=$archive
+  fi
+
+  for member
+  do
+    case $1 in
+    @*)
+      func_file_conv "${1#@}"
+      set x "$@" "@$file"
+      ;;
+    *)
+      func_file_conv "$1"
+      set x "$@" "$file"
+      ;;
+    esac
+    shift
+    shift
+  done
+
+  if test -n "$orig_archive"; then
+    $AR -NOLOGO -OUT:"$archive" "$orig_archive" "$@" || exit $?
+  else
+    $AR -NOLOGO -OUT:"$archive" "$@" || exit $?
+  fi
+
+elif test -n "$list"; then
+  if test ! -f "$orig_archive"; then
+    func_error "archive not found"
+  fi
+  $AR -NOLOGO -LIST "$archive" || exit $?
+fi
diff --git a/build-aux/compile b/build-aux/compile
new file mode 100755 (executable)
index 0000000..99e5052
--- /dev/null
@@ -0,0 +1,348 @@
+#! /bin/sh
+# Wrapper for compilers which do not understand '-c -o'.
+
+scriptversion=2018-03-07.03; # UTC
+
+# Copyright (C) 1999-2018 Free Software Foundation, Inc.
+# Written by Tom Tromey <tromey@cygnus.com>.
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2, or (at your option)
+# any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+# As a special exception to the GNU General Public License, if you
+# distribute this file as part of a program that contains a
+# configuration script generated by Autoconf, you may include it under
+# the same distribution terms that you use for the rest of that program.
+
+# This file is maintained in Automake, please report
+# bugs to <bug-automake@gnu.org> or send patches to
+# <automake-patches@gnu.org>.
+
+nl='
+'
+
+# We need space, tab and new line, in precisely that order.  Quoting is
+# there to prevent tools from complaining about whitespace usage.
+IFS=" ""       $nl"
+
+file_conv=
+
+# func_file_conv build_file lazy
+# Convert a $build file to $host form and store it in $file
+# Currently only supports Windows hosts. If the determined conversion
+# type is listed in (the comma separated) LAZY, no conversion will
+# take place.
+func_file_conv ()
+{
+  file=$1
+  case $file in
+    / | /[!/]*) # absolute file, and not a UNC file
+      if test -z "$file_conv"; then
+       # lazily determine how to convert abs files
+       case `uname -s` in
+         MINGW*)
+           file_conv=mingw
+           ;;
+         CYGWIN*)
+           file_conv=cygwin
+           ;;
+         *)
+           file_conv=wine
+           ;;
+       esac
+      fi
+      case $file_conv/,$2, in
+       *,$file_conv,*)
+         ;;
+       mingw/*)
+         file=`cmd //C echo "$file " | sed -e 's/"\(.*\) " *$/\1/'`
+         ;;
+       cygwin/*)
+         file=`cygpath -m "$file" || echo "$file"`
+         ;;
+       wine/*)
+         file=`winepath -w "$file" || echo "$file"`
+         ;;
+      esac
+      ;;
+  esac
+}
+
+# func_cl_dashL linkdir
+# Make cl look for libraries in LINKDIR
+func_cl_dashL ()
+{
+  func_file_conv "$1"
+  if test -z "$lib_path"; then
+    lib_path=$file
+  else
+    lib_path="$lib_path;$file"
+  fi
+  linker_opts="$linker_opts -LIBPATH:$file"
+}
+
+# func_cl_dashl library
+# Do a library search-path lookup for cl
+func_cl_dashl ()
+{
+  lib=$1
+  found=no
+  save_IFS=$IFS
+  IFS=';'
+  for dir in $lib_path $LIB
+  do
+    IFS=$save_IFS
+    if $shared && test -f "$dir/$lib.dll.lib"; then
+      found=yes
+      lib=$dir/$lib.dll.lib
+      break
+    fi
+    if test -f "$dir/$lib.lib"; then
+      found=yes
+      lib=$dir/$lib.lib
+      break
+    fi
+    if test -f "$dir/lib$lib.a"; then
+      found=yes
+      lib=$dir/lib$lib.a
+      break
+    fi
+  done
+  IFS=$save_IFS
+
+  if test "$found" != yes; then
+    lib=$lib.lib
+  fi
+}
+
+# func_cl_wrapper cl arg...
+# Adjust compile command to suit cl
+func_cl_wrapper ()
+{
+  # Assume a capable shell
+  lib_path=
+  shared=:
+  linker_opts=
+  for arg
+  do
+    if test -n "$eat"; then
+      eat=
+    else
+      case $1 in
+       -o)
+         # configure might choose to run compile as 'compile cc -o foo foo.c'.
+         eat=1
+         case $2 in
+           *.o | *.[oO][bB][jJ])
+             func_file_conv "$2"
+             set x "$@" -Fo"$file"
+             shift
+             ;;
+           *)
+             func_file_conv "$2"
+             set x "$@" -Fe"$file"
+             shift
+             ;;
+         esac
+         ;;
+       -I)
+         eat=1
+         func_file_conv "$2" mingw
+         set x "$@" -I"$file"
+         shift
+         ;;
+       -I*)
+         func_file_conv "${1#-I}" mingw
+         set x "$@" -I"$file"
+         shift
+         ;;
+       -l)
+         eat=1
+         func_cl_dashl "$2"
+         set x "$@" "$lib"
+         shift
+         ;;
+       -l*)
+         func_cl_dashl "${1#-l}"
+         set x "$@" "$lib"
+         shift
+         ;;
+       -L)
+         eat=1
+         func_cl_dashL "$2"
+         ;;
+       -L*)
+         func_cl_dashL "${1#-L}"
+         ;;
+       -static)
+         shared=false
+         ;;
+       -Wl,*)
+         arg=${1#-Wl,}
+         save_ifs="$IFS"; IFS=','
+         for flag in $arg; do
+           IFS="$save_ifs"
+           linker_opts="$linker_opts $flag"
+         done
+         IFS="$save_ifs"
+         ;;
+       -Xlinker)
+         eat=1
+         linker_opts="$linker_opts $2"
+         ;;
+       -*)
+         set x "$@" "$1"
+         shift
+         ;;
+       *.cc | *.CC | *.cxx | *.CXX | *.[cC]++)
+         func_file_conv "$1"
+         set x "$@" -Tp"$file"
+         shift
+         ;;
+       *.c | *.cpp | *.CPP | *.lib | *.LIB | *.Lib | *.OBJ | *.obj | *.[oO])
+         func_file_conv "$1" mingw
+         set x "$@" "$file"
+         shift
+         ;;
+       *)
+         set x "$@" "$1"
+         shift
+         ;;
+      esac
+    fi
+    shift
+  done
+  if test -n "$linker_opts"; then
+    linker_opts="-link$linker_opts"
+  fi
+  exec "$@" $linker_opts
+  exit 1
+}
+
+eat=
+
+case $1 in
+  '')
+     echo "$0: No command.  Try '$0 --help' for more information." 1>&2
+     exit 1;
+     ;;
+  -h | --h*)
+    cat <<\EOF
+Usage: compile [--help] [--version] PROGRAM [ARGS]
+
+Wrapper for compilers which do not understand '-c -o'.
+Remove '-o dest.o' from ARGS, run PROGRAM with the remaining
+arguments, and rename the output as expected.
+
+If you are trying to build a whole package this is not the
+right script to run: please start by reading the file 'INSTALL'.
+
+Report bugs to <bug-automake@gnu.org>.
+EOF
+    exit $?
+    ;;
+  -v | --v*)
+    echo "compile $scriptversion"
+    exit $?
+    ;;
+  cl | *[/\\]cl | cl.exe | *[/\\]cl.exe | \
+  icl | *[/\\]icl | icl.exe | *[/\\]icl.exe )
+    func_cl_wrapper "$@"      # Doesn't return...
+    ;;
+esac
+
+ofile=
+cfile=
+
+for arg
+do
+  if test -n "$eat"; then
+    eat=
+  else
+    case $1 in
+      -o)
+       # configure might choose to run compile as 'compile cc -o foo foo.c'.
+       # So we strip '-o arg' only if arg is an object.
+       eat=1
+       case $2 in
+         *.o | *.obj)
+           ofile=$2
+           ;;
+         *)
+           set x "$@" -o "$2"
+           shift
+           ;;
+       esac
+       ;;
+      *.c)
+       cfile=$1
+       set x "$@" "$1"
+       shift
+       ;;
+      *)
+       set x "$@" "$1"
+       shift
+       ;;
+    esac
+  fi
+  shift
+done
+
+if test -z "$ofile" || test -z "$cfile"; then
+  # If no '-o' option was seen then we might have been invoked from a
+  # pattern rule where we don't need one.  That is ok -- this is a
+  # normal compilation that the losing compiler can handle.  If no
+  # '.c' file was seen then we are probably linking.  That is also
+  # ok.
+  exec "$@"
+fi
+
+# Name of file we expect compiler to create.
+cofile=`echo "$cfile" | sed 's|^.*[\\/]||; s|^[a-zA-Z]:||; s/\.c$/.o/'`
+
+# Create the lock directory.
+# Note: use '[/\\:.-]' here to ensure that we don't use the same name
+# that we are using for the .o file.  Also, base the name on the expected
+# object file name, since that is what matters with a parallel build.
+lockdir=`echo "$cofile" | sed -e 's|[/\\:.-]|_|g'`.d
+while true; do
+  if mkdir "$lockdir" >/dev/null 2>&1; then
+    break
+  fi
+  sleep 1
+done
+# FIXME: race condition here if user kills between mkdir and trap.
+trap "rmdir '$lockdir'; exit 1" 1 2 15
+
+# Run the compile.
+"$@"
+ret=$?
+
+if test -f "$cofile"; then
+  test "$cofile" = "$ofile" || mv "$cofile" "$ofile"
+elif test -f "${cofile}bj"; then
+  test "${cofile}bj" = "$ofile" || mv "${cofile}bj" "$ofile"
+fi
+
+rmdir "$lockdir"
+exit $ret
+
+# Local Variables:
+# mode: shell-script
+# sh-indentation: 2
+# eval: (add-hook 'before-save-hook 'time-stamp)
+# time-stamp-start: "scriptversion="
+# time-stamp-format: "%:y-%02m-%02d.%02H"
+# time-stamp-time-zone: "UTC0"
+# time-stamp-end: "; # UTC"
+# End:
diff --git a/build-aux/config.guess b/build-aux/config.guess
new file mode 100755 (executable)
index 0000000..97ad073
--- /dev/null
@@ -0,0 +1,1662 @@
+#! /bin/sh
+# Attempt to guess a canonical system name.
+#   Copyright 1992-2019 Free Software Foundation, Inc.
+
+timestamp='2019-07-24'
+
+# This file is free software; you can redistribute it and/or modify it
+# under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, see <https://www.gnu.org/licenses/>.
+#
+# As a special exception to the GNU General Public License, if you
+# distribute this file as part of a program that contains a
+# configuration script generated by Autoconf, you may include it under
+# the same distribution terms that you use for the rest of that
+# program.  This Exception is an additional permission under section 7
+# of the GNU General Public License, version 3 ("GPLv3").
+#
+# Originally written by Per Bothner; maintained since 2000 by Ben Elliston.
+#
+# You can get the latest version of this script from:
+# https://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=config.guess
+#
+# Please send patches to <config-patches@gnu.org>.
+
+
+me=`echo "$0" | sed -e 's,.*/,,'`
+
+usage="\
+Usage: $0 [OPTION]
+
+Output the configuration name of the system \`$me' is run on.
+
+Options:
+  -h, --help         print this help, then exit
+  -t, --time-stamp   print date of last modification, then exit
+  -v, --version      print version number, then exit
+
+Report bugs and patches to <config-patches@gnu.org>."
+
+version="\
+GNU config.guess ($timestamp)
+
+Originally written by Per Bothner.
+Copyright 1992-2019 Free Software Foundation, Inc.
+
+This is free software; see the source for copying conditions.  There is NO
+warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE."
+
+help="
+Try \`$me --help' for more information."
+
+# Parse command line
+while test $# -gt 0 ; do
+  case $1 in
+    --time-stamp | --time* | -t )
+       echo "$timestamp" ; exit ;;
+    --version | -v )
+       echo "$version" ; exit ;;
+    --help | --h* | -h )
+       echo "$usage"; exit ;;
+    -- )     # Stop option processing
+       shift; break ;;
+    - )        # Use stdin as input.
+       break ;;
+    -* )
+       echo "$me: invalid option $1$help" >&2
+       exit 1 ;;
+    * )
+       break ;;
+  esac
+done
+
+if test $# != 0; then
+  echo "$me: too many arguments$help" >&2
+  exit 1
+fi
+
+# CC_FOR_BUILD -- compiler used by this script. Note that the use of a
+# compiler to aid in system detection is discouraged as it requires
+# temporary files to be created and, as you can see below, it is a
+# headache to deal with in a portable fashion.
+
+# Historically, `CC_FOR_BUILD' used to be named `HOST_CC'. We still
+# use `HOST_CC' if defined, but it is deprecated.
+
+# Portable tmp directory creation inspired by the Autoconf team.
+
+tmp=
+# shellcheck disable=SC2172
+trap 'test -z "$tmp" || rm -fr "$tmp"' 0 1 2 13 15
+
+set_cc_for_build() {
+    : "${TMPDIR=/tmp}"
+    # shellcheck disable=SC2039
+    { tmp=`(umask 077 && mktemp -d "$TMPDIR/cgXXXXXX") 2>/dev/null` && test -n "$tmp" && test -d "$tmp" ; } ||
+       { test -n "$RANDOM" && tmp=$TMPDIR/cg$$-$RANDOM && (umask 077 && mkdir "$tmp" 2>/dev/null) ; } ||
+       { tmp=$TMPDIR/cg-$$ && (umask 077 && mkdir "$tmp" 2>/dev/null) && echo "Warning: creating insecure temp directory" >&2 ; } ||
+       { echo "$me: cannot create a temporary directory in $TMPDIR" >&2 ; exit 1 ; }
+    dummy=$tmp/dummy
+    case ${CC_FOR_BUILD-},${HOST_CC-},${CC-} in
+       ,,)    echo "int x;" > "$dummy.c"
+              for driver in cc gcc c89 c99 ; do
+                  if ($driver -c -o "$dummy.o" "$dummy.c") >/dev/null 2>&1 ; then
+                      CC_FOR_BUILD="$driver"
+                      break
+                  fi
+              done
+              if test x"$CC_FOR_BUILD" = x ; then
+                  CC_FOR_BUILD=no_compiler_found
+              fi
+              ;;
+       ,,*)   CC_FOR_BUILD=$CC ;;
+       ,*,*)  CC_FOR_BUILD=$HOST_CC ;;
+    esac
+}
+
+# This is needed to find uname on a Pyramid OSx when run in the BSD universe.
+# (ghazi@noc.rutgers.edu 1994-08-24)
+if test -f /.attbin/uname ; then
+       PATH=$PATH:/.attbin ; export PATH
+fi
+
+UNAME_MACHINE=`(uname -m) 2>/dev/null` || UNAME_MACHINE=unknown
+UNAME_RELEASE=`(uname -r) 2>/dev/null` || UNAME_RELEASE=unknown
+UNAME_SYSTEM=`(uname -s) 2>/dev/null`  || UNAME_SYSTEM=unknown
+UNAME_VERSION=`(uname -v) 2>/dev/null` || UNAME_VERSION=unknown
+
+case "$UNAME_SYSTEM" in
+Linux|GNU|GNU/*)
+       # If the system lacks a compiler, then just pick glibc.
+       # We could probably try harder.
+       LIBC=gnu
+
+       set_cc_for_build
+       cat <<-EOF > "$dummy.c"
+       #include <features.h>
+       #if defined(__UCLIBC__)
+       LIBC=uclibc
+       #elif defined(__dietlibc__)
+       LIBC=dietlibc
+       #else
+       LIBC=gnu
+       #endif
+       EOF
+       eval "`$CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^LIBC' | sed 's, ,,g'`"
+
+       # If ldd exists, use it to detect musl libc.
+       if command -v ldd >/dev/null && \
+               ldd --version 2>&1 | grep -q ^musl
+       then
+           LIBC=musl
+       fi
+       ;;
+esac
+
+# Note: order is significant - the case branches are not exclusive.
+
+case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in
+    *:NetBSD:*:*)
+       # NetBSD (nbsd) targets should (where applicable) match one or
+       # more of the tuples: *-*-netbsdelf*, *-*-netbsdaout*,
+       # *-*-netbsdecoff* and *-*-netbsd*.  For targets that recently
+       # switched to ELF, *-*-netbsd* would select the old
+       # object file format.  This provides both forward
+       # compatibility and a consistent mechanism for selecting the
+       # object file format.
+       #
+       # Note: NetBSD doesn't particularly care about the vendor
+       # portion of the name.  We always set it to "unknown".
+       sysctl="sysctl -n hw.machine_arch"
+       UNAME_MACHINE_ARCH=`(uname -p 2>/dev/null || \
+           "/sbin/$sysctl" 2>/dev/null || \
+           "/usr/sbin/$sysctl" 2>/dev/null || \
+           echo unknown)`
+       case "$UNAME_MACHINE_ARCH" in
+           armeb) machine=armeb-unknown ;;
+           arm*) machine=arm-unknown ;;
+           sh3el) machine=shl-unknown ;;
+           sh3eb) machine=sh-unknown ;;
+           sh5el) machine=sh5le-unknown ;;
+           earmv*)
+               arch=`echo "$UNAME_MACHINE_ARCH" | sed -e 's,^e\(armv[0-9]\).*$,\1,'`
+               endian=`echo "$UNAME_MACHINE_ARCH" | sed -ne 's,^.*\(eb\)$,\1,p'`
+               machine="${arch}${endian}"-unknown
+               ;;
+           *) machine="$UNAME_MACHINE_ARCH"-unknown ;;
+       esac
+       # The Operating System including object format, if it has switched
+       # to ELF recently (or will in the future) and ABI.
+       case "$UNAME_MACHINE_ARCH" in
+           earm*)
+               os=netbsdelf
+               ;;
+           arm*|i386|m68k|ns32k|sh3*|sparc|vax)
+               set_cc_for_build
+               if echo __ELF__ | $CC_FOR_BUILD -E - 2>/dev/null \
+                       | grep -q __ELF__
+               then
+                   # Once all utilities can be ECOFF (netbsdecoff) or a.out (netbsdaout).
+                   # Return netbsd for either.  FIX?
+                   os=netbsd
+               else
+                   os=netbsdelf
+               fi
+               ;;
+           *)
+               os=netbsd
+               ;;
+       esac
+       # Determine ABI tags.
+       case "$UNAME_MACHINE_ARCH" in
+           earm*)
+               expr='s/^earmv[0-9]/-eabi/;s/eb$//'
+               abi=`echo "$UNAME_MACHINE_ARCH" | sed -e "$expr"`
+               ;;
+       esac
+       # The OS release
+       # Debian GNU/NetBSD machines have a different userland, and
+       # thus, need a distinct triplet. However, they do not need
+       # kernel version information, so it can be replaced with a
+       # suitable tag, in the style of linux-gnu.
+       case "$UNAME_VERSION" in
+           Debian*)
+               release='-gnu'
+               ;;
+           *)
+               release=`echo "$UNAME_RELEASE" | sed -e 's/[-_].*//' | cut -d. -f1,2`
+               ;;
+       esac
+       # Since CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM:
+       # contains redundant information, the shorter form:
+       # CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM is used.
+       echo "$machine-${os}${release}${abi-}"
+       exit ;;
+    *:Bitrig:*:*)
+       UNAME_MACHINE_ARCH=`arch | sed 's/Bitrig.//'`
+       echo "$UNAME_MACHINE_ARCH"-unknown-bitrig"$UNAME_RELEASE"
+       exit ;;
+    *:OpenBSD:*:*)
+       UNAME_MACHINE_ARCH=`arch | sed 's/OpenBSD.//'`
+       echo "$UNAME_MACHINE_ARCH"-unknown-openbsd"$UNAME_RELEASE"
+       exit ;;
+    *:LibertyBSD:*:*)
+       UNAME_MACHINE_ARCH=`arch | sed 's/^.*BSD\.//'`
+       echo "$UNAME_MACHINE_ARCH"-unknown-libertybsd"$UNAME_RELEASE"
+       exit ;;
+    *:MidnightBSD:*:*)
+       echo "$UNAME_MACHINE"-unknown-midnightbsd"$UNAME_RELEASE"
+       exit ;;
+    *:ekkoBSD:*:*)
+       echo "$UNAME_MACHINE"-unknown-ekkobsd"$UNAME_RELEASE"
+       exit ;;
+    *:SolidBSD:*:*)
+       echo "$UNAME_MACHINE"-unknown-solidbsd"$UNAME_RELEASE"
+       exit ;;
+    *:OS108:*:*)
+       echo "$UNAME_MACHINE"-unknown-os108_"$UNAME_RELEASE"
+       exit ;;
+    macppc:MirBSD:*:*)
+       echo powerpc-unknown-mirbsd"$UNAME_RELEASE"
+       exit ;;
+    *:MirBSD:*:*)
+       echo "$UNAME_MACHINE"-unknown-mirbsd"$UNAME_RELEASE"
+       exit ;;
+    *:Sortix:*:*)
+       echo "$UNAME_MACHINE"-unknown-sortix
+       exit ;;
+    *:Redox:*:*)
+       echo "$UNAME_MACHINE"-unknown-redox
+       exit ;;
+    mips:OSF1:*.*)
+       echo mips-dec-osf1
+       exit ;;
+    alpha:OSF1:*:*)
+       case $UNAME_RELEASE in
+       *4.0)
+               UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $3}'`
+               ;;
+       *5.*)
+               UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $4}'`
+               ;;
+       esac
+       # According to Compaq, /usr/sbin/psrinfo has been available on
+       # OSF/1 and Tru64 systems produced since 1995.  I hope that
+       # covers most systems running today.  This code pipes the CPU
+       # types through head -n 1, so we only detect the type of CPU 0.
+       ALPHA_CPU_TYPE=`/usr/sbin/psrinfo -v | sed -n -e 's/^  The alpha \(.*\) processor.*$/\1/p' | head -n 1`
+       case "$ALPHA_CPU_TYPE" in
+           "EV4 (21064)")
+               UNAME_MACHINE=alpha ;;
+           "EV4.5 (21064)")
+               UNAME_MACHINE=alpha ;;
+           "LCA4 (21066/21068)")
+               UNAME_MACHINE=alpha ;;
+           "EV5 (21164)")
+               UNAME_MACHINE=alphaev5 ;;
+           "EV5.6 (21164A)")
+               UNAME_MACHINE=alphaev56 ;;
+           "EV5.6 (21164PC)")
+               UNAME_MACHINE=alphapca56 ;;
+           "EV5.7 (21164PC)")
+               UNAME_MACHINE=alphapca57 ;;
+           "EV6 (21264)")
+               UNAME_MACHINE=alphaev6 ;;
+           "EV6.7 (21264A)")
+               UNAME_MACHINE=alphaev67 ;;
+           "EV6.8CB (21264C)")
+               UNAME_MACHINE=alphaev68 ;;
+           "EV6.8AL (21264B)")
+               UNAME_MACHINE=alphaev68 ;;
+           "EV6.8CX (21264D)")
+               UNAME_MACHINE=alphaev68 ;;
+           "EV6.9A (21264/EV69A)")
+               UNAME_MACHINE=alphaev69 ;;
+           "EV7 (21364)")
+               UNAME_MACHINE=alphaev7 ;;
+           "EV7.9 (21364A)")
+               UNAME_MACHINE=alphaev79 ;;
+       esac
+       # A Pn.n version is a patched version.
+       # A Vn.n version is a released version.
+       # A Tn.n version is a released field test version.
+       # A Xn.n version is an unreleased experimental baselevel.
+       # 1.2 uses "1.2" for uname -r.
+       echo "$UNAME_MACHINE"-dec-osf"`echo "$UNAME_RELEASE" | sed -e 's/^[PVTX]//' | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz`"
+       # Reset EXIT trap before exiting to avoid spurious non-zero exit code.
+       exitcode=$?
+       trap '' 0
+       exit $exitcode ;;
+    Amiga*:UNIX_System_V:4.0:*)
+       echo m68k-unknown-sysv4
+       exit ;;
+    *:[Aa]miga[Oo][Ss]:*:*)
+       echo "$UNAME_MACHINE"-unknown-amigaos
+       exit ;;
+    *:[Mm]orph[Oo][Ss]:*:*)
+       echo "$UNAME_MACHINE"-unknown-morphos
+       exit ;;
+    *:OS/390:*:*)
+       echo i370-ibm-openedition
+       exit ;;
+    *:z/VM:*:*)
+       echo s390-ibm-zvmoe
+       exit ;;
+    *:OS400:*:*)
+       echo powerpc-ibm-os400
+       exit ;;
+    arm:RISC*:1.[012]*:*|arm:riscix:1.[012]*:*)
+       echo arm-acorn-riscix"$UNAME_RELEASE"
+       exit ;;
+    arm*:riscos:*:*|arm*:RISCOS:*:*)
+       echo arm-unknown-riscos
+       exit ;;
+    SR2?01:HI-UX/MPP:*:* | SR8000:HI-UX/MPP:*:*)
+       echo hppa1.1-hitachi-hiuxmpp
+       exit ;;
+    Pyramid*:OSx*:*:* | MIS*:OSx*:*:* | MIS*:SMP_DC-OSx*:*:*)
+       # akee@wpdis03.wpafb.af.mil (Earle F. Ake) contributed MIS and NILE.
+       if test "`(/bin/universe) 2>/dev/null`" = att ; then
+               echo pyramid-pyramid-sysv3
+       else
+               echo pyramid-pyramid-bsd
+       fi
+       exit ;;
+    NILE*:*:*:dcosx)
+       echo pyramid-pyramid-svr4
+       exit ;;
+    DRS?6000:unix:4.0:6*)
+       echo sparc-icl-nx6
+       exit ;;
+    DRS?6000:UNIX_SV:4.2*:7* | DRS?6000:isis:4.2*:7*)
+       case `/usr/bin/uname -p` in
+           sparc) echo sparc-icl-nx7; exit ;;
+       esac ;;
+    s390x:SunOS:*:*)
+       echo "$UNAME_MACHINE"-ibm-solaris2"`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'`"
+       exit ;;
+    sun4H:SunOS:5.*:*)
+       echo sparc-hal-solaris2"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`"
+       exit ;;
+    sun4*:SunOS:5.*:* | tadpole*:SunOS:5.*:*)
+       echo sparc-sun-solaris2"`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'`"
+       exit ;;
+    i86pc:AuroraUX:5.*:* | i86xen:AuroraUX:5.*:*)
+       echo i386-pc-auroraux"$UNAME_RELEASE"
+       exit ;;
+    i86pc:SunOS:5.*:* | i86xen:SunOS:5.*:*)
+       set_cc_for_build
+       SUN_ARCH=i386
+       # If there is a compiler, see if it is configured for 64-bit objects.
+       # Note that the Sun cc does not turn __LP64__ into 1 like gcc does.
+       # This test works for both compilers.
+       if [ "$CC_FOR_BUILD" != no_compiler_found ]; then
+           if (echo '#ifdef __amd64'; echo IS_64BIT_ARCH; echo '#endif') | \
+               (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \
+               grep IS_64BIT_ARCH >/dev/null
+           then
+               SUN_ARCH=x86_64
+           fi
+       fi
+       echo "$SUN_ARCH"-pc-solaris2"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`"
+       exit ;;
+    sun4*:SunOS:6*:*)
+       # According to config.sub, this is the proper way to canonicalize
+       # SunOS6.  Hard to guess exactly what SunOS6 will be like, but
+       # it's likely to be more like Solaris than SunOS4.
+       echo sparc-sun-solaris3"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`"
+       exit ;;
+    sun4*:SunOS:*:*)
+       case "`/usr/bin/arch -k`" in
+           Series*|S4*)
+               UNAME_RELEASE=`uname -v`
+               ;;
+       esac
+       # Japanese Language versions have a version number like `4.1.3-JL'.
+       echo sparc-sun-sunos"`echo "$UNAME_RELEASE"|sed -e 's/-/_/'`"
+       exit ;;
+    sun3*:SunOS:*:*)
+       echo m68k-sun-sunos"$UNAME_RELEASE"
+       exit ;;
+    sun*:*:4.2BSD:*)
+       UNAME_RELEASE=`(sed 1q /etc/motd | awk '{print substr($5,1,3)}') 2>/dev/null`
+       test "x$UNAME_RELEASE" = x && UNAME_RELEASE=3
+       case "`/bin/arch`" in
+           sun3)
+               echo m68k-sun-sunos"$UNAME_RELEASE"
+               ;;
+           sun4)
+               echo sparc-sun-sunos"$UNAME_RELEASE"
+               ;;
+       esac
+       exit ;;
+    aushp:SunOS:*:*)
+       echo sparc-auspex-sunos"$UNAME_RELEASE"
+       exit ;;
+    # The situation for MiNT is a little confusing.  The machine name
+    # can be virtually everything (everything which is not
+    # "atarist" or "atariste" at least should have a processor
+    # > m68000).  The system name ranges from "MiNT" over "FreeMiNT"
+    # to the lowercase version "mint" (or "freemint").  Finally
+    # the system name "TOS" denotes a system which is actually not
+    # MiNT.  But MiNT is downward compatible to TOS, so this should
+    # be no problem.
+    atarist[e]:*MiNT:*:* | atarist[e]:*mint:*:* | atarist[e]:*TOS:*:*)
+       echo m68k-atari-mint"$UNAME_RELEASE"
+       exit ;;
+    atari*:*MiNT:*:* | atari*:*mint:*:* | atarist[e]:*TOS:*:*)
+       echo m68k-atari-mint"$UNAME_RELEASE"
+       exit ;;
+    *falcon*:*MiNT:*:* | *falcon*:*mint:*:* | *falcon*:*TOS:*:*)
+       echo m68k-atari-mint"$UNAME_RELEASE"
+       exit ;;
+    milan*:*MiNT:*:* | milan*:*mint:*:* | *milan*:*TOS:*:*)
+       echo m68k-milan-mint"$UNAME_RELEASE"
+       exit ;;
+    hades*:*MiNT:*:* | hades*:*mint:*:* | *hades*:*TOS:*:*)
+       echo m68k-hades-mint"$UNAME_RELEASE"
+       exit ;;
+    *:*MiNT:*:* | *:*mint:*:* | *:*TOS:*:*)
+       echo m68k-unknown-mint"$UNAME_RELEASE"
+       exit ;;
+    m68k:machten:*:*)
+       echo m68k-apple-machten"$UNAME_RELEASE"
+       exit ;;
+    powerpc:machten:*:*)
+       echo powerpc-apple-machten"$UNAME_RELEASE"
+       exit ;;
+    RISC*:Mach:*:*)
+       echo mips-dec-mach_bsd4.3
+       exit ;;
+    RISC*:ULTRIX:*:*)
+       echo mips-dec-ultrix"$UNAME_RELEASE"
+       exit ;;
+    VAX*:ULTRIX*:*:*)
+       echo vax-dec-ultrix"$UNAME_RELEASE"
+       exit ;;
+    2020:CLIX:*:* | 2430:CLIX:*:*)
+       echo clipper-intergraph-clix"$UNAME_RELEASE"
+       exit ;;
+    mips:*:*:UMIPS | mips:*:*:RISCos)
+       set_cc_for_build
+       sed 's/^        //' << EOF > "$dummy.c"
+#ifdef __cplusplus
+#include <stdio.h>  /* for printf() prototype */
+       int main (int argc, char *argv[]) {
+#else
+       int main (argc, argv) int argc; char *argv[]; {
+#endif
+       #if defined (host_mips) && defined (MIPSEB)
+       #if defined (SYSTYPE_SYSV)
+         printf ("mips-mips-riscos%ssysv\\n", argv[1]); exit (0);
+       #endif
+       #if defined (SYSTYPE_SVR4)
+         printf ("mips-mips-riscos%ssvr4\\n", argv[1]); exit (0);
+       #endif
+       #if defined (SYSTYPE_BSD43) || defined(SYSTYPE_BSD)
+         printf ("mips-mips-riscos%sbsd\\n", argv[1]); exit (0);
+       #endif
+       #endif
+         exit (-1);
+       }
+EOF
+       $CC_FOR_BUILD -o "$dummy" "$dummy.c" &&
+         dummyarg=`echo "$UNAME_RELEASE" | sed -n 's/\([0-9]*\).*/\1/p'` &&
+         SYSTEM_NAME=`"$dummy" "$dummyarg"` &&
+           { echo "$SYSTEM_NAME"; exit; }
+       echo mips-mips-riscos"$UNAME_RELEASE"
+       exit ;;
+    Motorola:PowerMAX_OS:*:*)
+       echo powerpc-motorola-powermax
+       exit ;;
+    Motorola:*:4.3:PL8-*)
+       echo powerpc-harris-powermax
+       exit ;;
+    Night_Hawk:*:*:PowerMAX_OS | Synergy:PowerMAX_OS:*:*)
+       echo powerpc-harris-powermax
+       exit ;;
+    Night_Hawk:Power_UNIX:*:*)
+       echo powerpc-harris-powerunix
+       exit ;;
+    m88k:CX/UX:7*:*)
+       echo m88k-harris-cxux7
+       exit ;;
+    m88k:*:4*:R4*)
+       echo m88k-motorola-sysv4
+       exit ;;
+    m88k:*:3*:R3*)
+       echo m88k-motorola-sysv3
+       exit ;;
+    AViiON:dgux:*:*)
+       # DG/UX returns AViiON for all architectures
+       UNAME_PROCESSOR=`/usr/bin/uname -p`
+       if [ "$UNAME_PROCESSOR" = mc88100 ] || [ "$UNAME_PROCESSOR" = mc88110 ]
+       then
+           if [ "$TARGET_BINARY_INTERFACE"x = m88kdguxelfx ] || \
+              [ "$TARGET_BINARY_INTERFACE"x = x ]
+           then
+               echo m88k-dg-dgux"$UNAME_RELEASE"
+           else
+               echo m88k-dg-dguxbcs"$UNAME_RELEASE"
+           fi
+       else
+           echo i586-dg-dgux"$UNAME_RELEASE"
+       fi
+       exit ;;
+    M88*:DolphinOS:*:*)        # DolphinOS (SVR3)
+       echo m88k-dolphin-sysv3
+       exit ;;
+    M88*:*:R3*:*)
+       # Delta 88k system running SVR3
+       echo m88k-motorola-sysv3
+       exit ;;
+    XD88*:*:*:*) # Tektronix XD88 system running UTekV (SVR3)
+       echo m88k-tektronix-sysv3
+       exit ;;
+    Tek43[0-9][0-9]:UTek:*:*) # Tektronix 4300 system running UTek (BSD)
+       echo m68k-tektronix-bsd
+       exit ;;
+    *:IRIX*:*:*)
+       echo mips-sgi-irix"`echo "$UNAME_RELEASE"|sed -e 's/-/_/g'`"
+       exit ;;
+    ????????:AIX?:[12].1:2)   # AIX 2.2.1 or AIX 2.1.1 is RT/PC AIX.
+       echo romp-ibm-aix     # uname -m gives an 8 hex-code CPU id
+       exit ;;               # Note that: echo "'`uname -s`'" gives 'AIX '
+    i*86:AIX:*:*)
+       echo i386-ibm-aix
+       exit ;;
+    ia64:AIX:*:*)
+       if [ -x /usr/bin/oslevel ] ; then
+               IBM_REV=`/usr/bin/oslevel`
+       else
+               IBM_REV="$UNAME_VERSION.$UNAME_RELEASE"
+       fi
+       echo "$UNAME_MACHINE"-ibm-aix"$IBM_REV"
+       exit ;;
+    *:AIX:2:3)
+       if grep bos325 /usr/include/stdio.h >/dev/null 2>&1; then
+               set_cc_for_build
+               sed 's/^                //' << EOF > "$dummy.c"
+               #include <sys/systemcfg.h>
+
+               main()
+                       {
+                       if (!__power_pc())
+                               exit(1);
+                       puts("powerpc-ibm-aix3.2.5");
+                       exit(0);
+                       }
+EOF
+               if $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=`"$dummy"`
+               then
+                       echo "$SYSTEM_NAME"
+               else
+                       echo rs6000-ibm-aix3.2.5
+               fi
+       elif grep bos324 /usr/include/stdio.h >/dev/null 2>&1; then
+               echo rs6000-ibm-aix3.2.4
+       else
+               echo rs6000-ibm-aix3.2
+       fi
+       exit ;;
+    *:AIX:*:[4567])
+       IBM_CPU_ID=`/usr/sbin/lsdev -C -c processor -S available | sed 1q | awk '{ print $1 }'`
+       if /usr/sbin/lsattr -El "$IBM_CPU_ID" | grep ' POWER' >/dev/null 2>&1; then
+               IBM_ARCH=rs6000
+       else
+               IBM_ARCH=powerpc
+       fi
+       if [ -x /usr/bin/lslpp ] ; then
+               IBM_REV=`/usr/bin/lslpp -Lqc bos.rte.libc |
+                          awk -F: '{ print $3 }' | sed s/[0-9]*$/0/`
+       else
+               IBM_REV="$UNAME_VERSION.$UNAME_RELEASE"
+       fi
+       echo "$IBM_ARCH"-ibm-aix"$IBM_REV"
+       exit ;;
+    *:AIX:*:*)
+       echo rs6000-ibm-aix
+       exit ;;
+    ibmrt:4.4BSD:*|romp-ibm:4.4BSD:*)
+       echo romp-ibm-bsd4.4
+       exit ;;
+    ibmrt:*BSD:*|romp-ibm:BSD:*)            # covers RT/PC BSD and
+       echo romp-ibm-bsd"$UNAME_RELEASE"   # 4.3 with uname added to
+       exit ;;                             # report: romp-ibm BSD 4.3
+    *:BOSX:*:*)
+       echo rs6000-bull-bosx
+       exit ;;
+    DPX/2?00:B.O.S.:*:*)
+       echo m68k-bull-sysv3
+       exit ;;
+    9000/[34]??:4.3bsd:1.*:*)
+       echo m68k-hp-bsd
+       exit ;;
+    hp300:4.4BSD:*:* | 9000/[34]??:4.3bsd:2.*:*)
+       echo m68k-hp-bsd4.4
+       exit ;;
+    9000/[34678]??:HP-UX:*:*)
+       HPUX_REV=`echo "$UNAME_RELEASE"|sed -e 's/[^.]*.[0B]*//'`
+       case "$UNAME_MACHINE" in
+           9000/31?)            HP_ARCH=m68000 ;;
+           9000/[34]??)         HP_ARCH=m68k ;;
+           9000/[678][0-9][0-9])
+               if [ -x /usr/bin/getconf ]; then
+                   sc_cpu_version=`/usr/bin/getconf SC_CPU_VERSION 2>/dev/null`
+                   sc_kernel_bits=`/usr/bin/getconf SC_KERNEL_BITS 2>/dev/null`
+                   case "$sc_cpu_version" in
+                     523) HP_ARCH=hppa1.0 ;; # CPU_PA_RISC1_0
+                     528) HP_ARCH=hppa1.1 ;; # CPU_PA_RISC1_1
+                     532)                      # CPU_PA_RISC2_0
+                       case "$sc_kernel_bits" in
+                         32) HP_ARCH=hppa2.0n ;;
+                         64) HP_ARCH=hppa2.0w ;;
+                         '') HP_ARCH=hppa2.0 ;;   # HP-UX 10.20
+                       esac ;;
+                   esac
+               fi
+               if [ "$HP_ARCH" = "" ]; then
+                   set_cc_for_build
+                   sed 's/^            //' << EOF > "$dummy.c"
+
+               #define _HPUX_SOURCE
+               #include <stdlib.h>
+               #include <unistd.h>
+
+               int main ()
+               {
+               #if defined(_SC_KERNEL_BITS)
+                   long bits = sysconf(_SC_KERNEL_BITS);
+               #endif
+                   long cpu  = sysconf (_SC_CPU_VERSION);
+
+                   switch (cpu)
+                       {
+                       case CPU_PA_RISC1_0: puts ("hppa1.0"); break;
+                       case CPU_PA_RISC1_1: puts ("hppa1.1"); break;
+                       case CPU_PA_RISC2_0:
+               #if defined(_SC_KERNEL_BITS)
+                           switch (bits)
+                               {
+                               case 64: puts ("hppa2.0w"); break;
+                               case 32: puts ("hppa2.0n"); break;
+                               default: puts ("hppa2.0"); break;
+                               } break;
+               #else  /* !defined(_SC_KERNEL_BITS) */
+                           puts ("hppa2.0"); break;
+               #endif
+                       default: puts ("hppa1.0"); break;
+                       }
+                   exit (0);
+               }
+EOF
+                   (CCOPTS="" $CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null) && HP_ARCH=`"$dummy"`
+                   test -z "$HP_ARCH" && HP_ARCH=hppa
+               fi ;;
+       esac
+       if [ "$HP_ARCH" = hppa2.0w ]
+       then
+           set_cc_for_build
+
+           # hppa2.0w-hp-hpux* has a 64-bit kernel and a compiler generating
+           # 32-bit code.  hppa64-hp-hpux* has the same kernel and a compiler
+           # generating 64-bit code.  GNU and HP use different nomenclature:
+           #
+           # $ CC_FOR_BUILD=cc ./config.guess
+           # => hppa2.0w-hp-hpux11.23
+           # $ CC_FOR_BUILD="cc +DA2.0w" ./config.guess
+           # => hppa64-hp-hpux11.23
+
+           if echo __LP64__ | (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) |
+               grep -q __LP64__
+           then
+               HP_ARCH=hppa2.0w
+           else
+               HP_ARCH=hppa64
+           fi
+       fi
+       echo "$HP_ARCH"-hp-hpux"$HPUX_REV"
+       exit ;;
+    ia64:HP-UX:*:*)
+       HPUX_REV=`echo "$UNAME_RELEASE"|sed -e 's/[^.]*.[0B]*//'`
+       echo ia64-hp-hpux"$HPUX_REV"
+       exit ;;
+    3050*:HI-UX:*:*)
+       set_cc_for_build
+       sed 's/^        //' << EOF > "$dummy.c"
+       #include <unistd.h>
+       int
+       main ()
+       {
+         long cpu = sysconf (_SC_CPU_VERSION);
+         /* The order matters, because CPU_IS_HP_MC68K erroneously returns
+            true for CPU_PA_RISC1_0.  CPU_IS_PA_RISC returns correct
+            results, however.  */
+         if (CPU_IS_PA_RISC (cpu))
+           {
+             switch (cpu)
+               {
+                 case CPU_PA_RISC1_0: puts ("hppa1.0-hitachi-hiuxwe2"); break;
+                 case CPU_PA_RISC1_1: puts ("hppa1.1-hitachi-hiuxwe2"); break;
+                 case CPU_PA_RISC2_0: puts ("hppa2.0-hitachi-hiuxwe2"); break;
+                 default: puts ("hppa-hitachi-hiuxwe2"); break;
+               }
+           }
+         else if (CPU_IS_HP_MC68K (cpu))
+           puts ("m68k-hitachi-hiuxwe2");
+         else puts ("unknown-hitachi-hiuxwe2");
+         exit (0);
+       }
+EOF
+       $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=`"$dummy"` &&
+               { echo "$SYSTEM_NAME"; exit; }
+       echo unknown-hitachi-hiuxwe2
+       exit ;;
+    9000/7??:4.3bsd:*:* | 9000/8?[79]:4.3bsd:*:*)
+       echo hppa1.1-hp-bsd
+       exit ;;
+    9000/8??:4.3bsd:*:*)
+       echo hppa1.0-hp-bsd
+       exit ;;
+    *9??*:MPE/iX:*:* | *3000*:MPE/iX:*:*)
+       echo hppa1.0-hp-mpeix
+       exit ;;
+    hp7??:OSF1:*:* | hp8?[79]:OSF1:*:*)
+       echo hppa1.1-hp-osf
+       exit ;;
+    hp8??:OSF1:*:*)
+       echo hppa1.0-hp-osf
+       exit ;;
+    i*86:OSF1:*:*)
+       if [ -x /usr/sbin/sysversion ] ; then
+           echo "$UNAME_MACHINE"-unknown-osf1mk
+       else
+           echo "$UNAME_MACHINE"-unknown-osf1
+       fi
+       exit ;;
+    parisc*:Lites*:*:*)
+       echo hppa1.1-hp-lites
+       exit ;;
+    C1*:ConvexOS:*:* | convex:ConvexOS:C1*:*)
+       echo c1-convex-bsd
+       exit ;;
+    C2*:ConvexOS:*:* | convex:ConvexOS:C2*:*)
+       if getsysinfo -f scalar_acc
+       then echo c32-convex-bsd
+       else echo c2-convex-bsd
+       fi
+       exit ;;
+    C34*:ConvexOS:*:* | convex:ConvexOS:C34*:*)
+       echo c34-convex-bsd
+       exit ;;
+    C38*:ConvexOS:*:* | convex:ConvexOS:C38*:*)
+       echo c38-convex-bsd
+       exit ;;
+    C4*:ConvexOS:*:* | convex:ConvexOS:C4*:*)
+       echo c4-convex-bsd
+       exit ;;
+    CRAY*Y-MP:*:*:*)
+       echo ymp-cray-unicos"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/'
+       exit ;;
+    CRAY*[A-Z]90:*:*:*)
+       echo "$UNAME_MACHINE"-cray-unicos"$UNAME_RELEASE" \
+       | sed -e 's/CRAY.*\([A-Z]90\)/\1/' \
+             -e y/ABCDEFGHIJKLMNOPQRSTUVWXYZ/abcdefghijklmnopqrstuvwxyz/ \
+             -e 's/\.[^.]*$/.X/'
+       exit ;;
+    CRAY*TS:*:*:*)
+       echo t90-cray-unicos"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/'
+       exit ;;
+    CRAY*T3E:*:*:*)
+       echo alphaev5-cray-unicosmk"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/'
+       exit ;;
+    CRAY*SV1:*:*:*)
+       echo sv1-cray-unicos"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/'
+       exit ;;
+    *:UNICOS/mp:*:*)
+       echo craynv-cray-unicosmp"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/'
+       exit ;;
+    F30[01]:UNIX_System_V:*:* | F700:UNIX_System_V:*:*)
+       FUJITSU_PROC=`uname -m | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz`
+       FUJITSU_SYS=`uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///'`
+       FUJITSU_REL=`echo "$UNAME_RELEASE" | sed -e 's/ /_/'`
+       echo "${FUJITSU_PROC}-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}"
+       exit ;;
+    5000:UNIX_System_V:4.*:*)
+       FUJITSU_SYS=`uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///'`
+       FUJITSU_REL=`echo "$UNAME_RELEASE" | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/ /_/'`
+       echo "sparc-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}"
+       exit ;;
+    i*86:BSD/386:*:* | i*86:BSD/OS:*:* | *:Ascend\ Embedded/OS:*:*)
+       echo "$UNAME_MACHINE"-pc-bsdi"$UNAME_RELEASE"
+       exit ;;
+    sparc*:BSD/OS:*:*)
+       echo sparc-unknown-bsdi"$UNAME_RELEASE"
+       exit ;;
+    *:BSD/OS:*:*)
+       echo "$UNAME_MACHINE"-unknown-bsdi"$UNAME_RELEASE"
+       exit ;;
+    arm:FreeBSD:*:*)
+       UNAME_PROCESSOR=`uname -p`
+       set_cc_for_build
+       if echo __ARM_PCS_VFP | $CC_FOR_BUILD -E - 2>/dev/null \
+           | grep -q __ARM_PCS_VFP
+       then
+           echo "${UNAME_PROCESSOR}"-unknown-freebsd"`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`"-gnueabi
+       else
+           echo "${UNAME_PROCESSOR}"-unknown-freebsd"`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`"-gnueabihf
+       fi
+       exit ;;
+    *:FreeBSD:*:*)
+       UNAME_PROCESSOR=`/usr/bin/uname -p`
+       case "$UNAME_PROCESSOR" in
+           amd64)
+               UNAME_PROCESSOR=x86_64 ;;
+           i386)
+               UNAME_PROCESSOR=i586 ;;
+       esac
+       echo "$UNAME_PROCESSOR"-unknown-freebsd"`echo "$UNAME_RELEASE"|sed -e 's/[-(].*//'`"
+       exit ;;
+    i*:CYGWIN*:*)
+       echo "$UNAME_MACHINE"-pc-cygwin
+       exit ;;
+    *:MINGW64*:*)
+       echo "$UNAME_MACHINE"-pc-mingw64
+       exit ;;
+    *:MINGW*:*)
+       echo "$UNAME_MACHINE"-pc-mingw32
+       exit ;;
+    *:MSYS*:*)
+       echo "$UNAME_MACHINE"-pc-msys
+       exit ;;
+    i*:PW*:*)
+       echo "$UNAME_MACHINE"-pc-pw32
+       exit ;;
+    *:Interix*:*)
+       case "$UNAME_MACHINE" in
+           x86)
+               echo i586-pc-interix"$UNAME_RELEASE"
+               exit ;;
+           authenticamd | genuineintel | EM64T)
+               echo x86_64-unknown-interix"$UNAME_RELEASE"
+               exit ;;
+           IA64)
+               echo ia64-unknown-interix"$UNAME_RELEASE"
+               exit ;;
+       esac ;;
+    i*:UWIN*:*)
+       echo "$UNAME_MACHINE"-pc-uwin
+       exit ;;
+    amd64:CYGWIN*:*:* | x86_64:CYGWIN*:*:*)
+       echo x86_64-pc-cygwin
+       exit ;;
+    prep*:SunOS:5.*:*)
+       echo powerpcle-unknown-solaris2"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`"
+       exit ;;
+    *:GNU:*:*)
+       # the GNU system
+       echo "`echo "$UNAME_MACHINE"|sed -e 's,[-/].*$,,'`-unknown-$LIBC`echo "$UNAME_RELEASE"|sed -e 's,/.*$,,'`"
+       exit ;;
+    *:GNU/*:*:*)
+       # other systems with GNU libc and userland
+       echo "$UNAME_MACHINE-unknown-`echo "$UNAME_SYSTEM" | sed 's,^[^/]*/,,' | tr "[:upper:]" "[:lower:]"``echo "$UNAME_RELEASE"|sed -e 's/[-(].*//'`-$LIBC"
+       exit ;;
+    *:Minix:*:*)
+       echo "$UNAME_MACHINE"-unknown-minix
+       exit ;;
+    aarch64:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    aarch64_be:Linux:*:*)
+       UNAME_MACHINE=aarch64_be
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    alpha:Linux:*:*)
+       case `sed -n '/^cpu model/s/^.*: \(.*\)/\1/p' < /proc/cpuinfo` in
+         EV5)   UNAME_MACHINE=alphaev5 ;;
+         EV56)  UNAME_MACHINE=alphaev56 ;;
+         PCA56) UNAME_MACHINE=alphapca56 ;;
+         PCA57) UNAME_MACHINE=alphapca56 ;;
+         EV6)   UNAME_MACHINE=alphaev6 ;;
+         EV67)  UNAME_MACHINE=alphaev67 ;;
+         EV68*) UNAME_MACHINE=alphaev68 ;;
+       esac
+       objdump --private-headers /bin/sh | grep -q ld.so.1
+       if test "$?" = 0 ; then LIBC=gnulibc1 ; fi
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    arc:Linux:*:* | arceb:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    arm*:Linux:*:*)
+       set_cc_for_build
+       if echo __ARM_EABI__ | $CC_FOR_BUILD -E - 2>/dev/null \
+           | grep -q __ARM_EABI__
+       then
+           echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       else
+           if echo __ARM_PCS_VFP | $CC_FOR_BUILD -E - 2>/dev/null \
+               | grep -q __ARM_PCS_VFP
+           then
+               echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"eabi
+           else
+               echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"eabihf
+           fi
+       fi
+       exit ;;
+    avr32*:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    cris:Linux:*:*)
+       echo "$UNAME_MACHINE"-axis-linux-"$LIBC"
+       exit ;;
+    crisv32:Linux:*:*)
+       echo "$UNAME_MACHINE"-axis-linux-"$LIBC"
+       exit ;;
+    e2k:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    frv:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    hexagon:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    i*86:Linux:*:*)
+       echo "$UNAME_MACHINE"-pc-linux-"$LIBC"
+       exit ;;
+    ia64:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    k1om:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    m32r*:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    m68*:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    mips:Linux:*:* | mips64:Linux:*:*)
+       set_cc_for_build
+       IS_GLIBC=0
+       test x"${LIBC}" = xgnu && IS_GLIBC=1
+       sed 's/^        //' << EOF > "$dummy.c"
+       #undef CPU
+       #undef mips
+       #undef mipsel
+       #undef mips64
+       #undef mips64el
+       #if ${IS_GLIBC} && defined(_ABI64)
+       LIBCABI=gnuabi64
+       #else
+       #if ${IS_GLIBC} && defined(_ABIN32)
+       LIBCABI=gnuabin32
+       #else
+       LIBCABI=${LIBC}
+       #endif
+       #endif
+
+       #if ${IS_GLIBC} && defined(__mips64) && defined(__mips_isa_rev) && __mips_isa_rev>=6
+       CPU=mipsisa64r6
+       #else
+       #if ${IS_GLIBC} && !defined(__mips64) && defined(__mips_isa_rev) && __mips_isa_rev>=6
+       CPU=mipsisa32r6
+       #else
+       #if defined(__mips64)
+       CPU=mips64
+       #else
+       CPU=mips
+       #endif
+       #endif
+       #endif
+
+       #if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL) || defined(MIPSEL)
+       MIPS_ENDIAN=el
+       #else
+       #if defined(__MIPSEB__) || defined(__MIPSEB) || defined(_MIPSEB) || defined(MIPSEB)
+       MIPS_ENDIAN=
+       #else
+       MIPS_ENDIAN=
+       #endif
+       #endif
+EOF
+       eval "`$CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^CPU\|^MIPS_ENDIAN\|^LIBCABI'`"
+       test "x$CPU" != x && { echo "$CPU${MIPS_ENDIAN}-unknown-linux-$LIBCABI"; exit; }
+       ;;
+    mips64el:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    openrisc*:Linux:*:*)
+       echo or1k-unknown-linux-"$LIBC"
+       exit ;;
+    or32:Linux:*:* | or1k*:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    padre:Linux:*:*)
+       echo sparc-unknown-linux-"$LIBC"
+       exit ;;
+    parisc64:Linux:*:* | hppa64:Linux:*:*)
+       echo hppa64-unknown-linux-"$LIBC"
+       exit ;;
+    parisc:Linux:*:* | hppa:Linux:*:*)
+       # Look for CPU level
+       case `grep '^cpu[^a-z]*:' /proc/cpuinfo 2>/dev/null | cut -d' ' -f2` in
+         PA7*) echo hppa1.1-unknown-linux-"$LIBC" ;;
+         PA8*) echo hppa2.0-unknown-linux-"$LIBC" ;;
+         *)    echo hppa-unknown-linux-"$LIBC" ;;
+       esac
+       exit ;;
+    ppc64:Linux:*:*)
+       echo powerpc64-unknown-linux-"$LIBC"
+       exit ;;
+    ppc:Linux:*:*)
+       echo powerpc-unknown-linux-"$LIBC"
+       exit ;;
+    ppc64le:Linux:*:*)
+       echo powerpc64le-unknown-linux-"$LIBC"
+       exit ;;
+    ppcle:Linux:*:*)
+       echo powerpcle-unknown-linux-"$LIBC"
+       exit ;;
+    riscv32:Linux:*:* | riscv64:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    s390:Linux:*:* | s390x:Linux:*:*)
+       echo "$UNAME_MACHINE"-ibm-linux-"$LIBC"
+       exit ;;
+    sh64*:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    sh*:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    sparc:Linux:*:* | sparc64:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    tile*:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    vax:Linux:*:*)
+       echo "$UNAME_MACHINE"-dec-linux-"$LIBC"
+       exit ;;
+    x86_64:Linux:*:*)
+       echo "$UNAME_MACHINE"-pc-linux-"$LIBC"
+       exit ;;
+    xtensa*:Linux:*:*)
+       echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"
+       exit ;;
+    i*86:DYNIX/ptx:4*:*)
+       # ptx 4.0 does uname -s correctly, with DYNIX/ptx in there.
+       # earlier versions are messed up and put the nodename in both
+       # sysname and nodename.
+       echo i386-sequent-sysv4
+       exit ;;
+    i*86:UNIX_SV:4.2MP:2.*)
+       # Unixware is an offshoot of SVR4, but it has its own version
+       # number series starting with 2...
+       # I am not positive that other SVR4 systems won't match this,
+       # I just have to hope.  -- rms.
+       # Use sysv4.2uw... so that sysv4* matches it.
+       echo "$UNAME_MACHINE"-pc-sysv4.2uw"$UNAME_VERSION"
+       exit ;;
+    i*86:OS/2:*:*)
+       # If we were able to find `uname', then EMX Unix compatibility
+       # is probably installed.
+       echo "$UNAME_MACHINE"-pc-os2-emx
+       exit ;;
+    i*86:XTS-300:*:STOP)
+       echo "$UNAME_MACHINE"-unknown-stop
+       exit ;;
+    i*86:atheos:*:*)
+       echo "$UNAME_MACHINE"-unknown-atheos
+       exit ;;
+    i*86:syllable:*:*)
+       echo "$UNAME_MACHINE"-pc-syllable
+       exit ;;
+    i*86:LynxOS:2.*:* | i*86:LynxOS:3.[01]*:* | i*86:LynxOS:4.[02]*:*)
+       echo i386-unknown-lynxos"$UNAME_RELEASE"
+       exit ;;
+    i*86:*DOS:*:*)
+       echo "$UNAME_MACHINE"-pc-msdosdjgpp
+       exit ;;
+    i*86:*:4.*:*)
+       UNAME_REL=`echo "$UNAME_RELEASE" | sed 's/\/MP$//'`
+       if grep Novell /usr/include/link.h >/dev/null 2>/dev/null; then
+               echo "$UNAME_MACHINE"-univel-sysv"$UNAME_REL"
+       else
+               echo "$UNAME_MACHINE"-pc-sysv"$UNAME_REL"
+       fi
+       exit ;;
+    i*86:*:5:[678]*)
+       # UnixWare 7.x, OpenUNIX and OpenServer 6.
+       case `/bin/uname -X | grep "^Machine"` in
+           *486*)           UNAME_MACHINE=i486 ;;
+           *Pentium)        UNAME_MACHINE=i586 ;;
+           *Pent*|*Celeron) UNAME_MACHINE=i686 ;;
+       esac
+       echo "$UNAME_MACHINE-unknown-sysv${UNAME_RELEASE}${UNAME_SYSTEM}${UNAME_VERSION}"
+       exit ;;
+    i*86:*:3.2:*)
+       if test -f /usr/options/cb.name; then
+               UNAME_REL=`sed -n 's/.*Version //p' </usr/options/cb.name`
+               echo "$UNAME_MACHINE"-pc-isc"$UNAME_REL"
+       elif /bin/uname -X 2>/dev/null >/dev/null ; then
+               UNAME_REL=`(/bin/uname -X|grep Release|sed -e 's/.*= //')`
+               (/bin/uname -X|grep i80486 >/dev/null) && UNAME_MACHINE=i486
+               (/bin/uname -X|grep '^Machine.*Pentium' >/dev/null) \
+                       && UNAME_MACHINE=i586
+               (/bin/uname -X|grep '^Machine.*Pent *II' >/dev/null) \
+                       && UNAME_MACHINE=i686
+               (/bin/uname -X|grep '^Machine.*Pentium Pro' >/dev/null) \
+                       && UNAME_MACHINE=i686
+               echo "$UNAME_MACHINE"-pc-sco"$UNAME_REL"
+       else
+               echo "$UNAME_MACHINE"-pc-sysv32
+       fi
+       exit ;;
+    pc:*:*:*)
+       # Left here for compatibility:
+       # uname -m prints for DJGPP always 'pc', but it prints nothing about
+       # the processor, so we play safe by assuming i586.
+       # Note: whatever this is, it MUST be the same as what config.sub
+       # prints for the "djgpp" host, or else GDB configure will decide that
+       # this is a cross-build.
+       echo i586-pc-msdosdjgpp
+       exit ;;
+    Intel:Mach:3*:*)
+       echo i386-pc-mach3
+       exit ;;
+    paragon:*:*:*)
+       echo i860-intel-osf1
+       exit ;;
+    i860:*:4.*:*) # i860-SVR4
+       if grep Stardent /usr/include/sys/uadmin.h >/dev/null 2>&1 ; then
+         echo i860-stardent-sysv"$UNAME_RELEASE" # Stardent Vistra i860-SVR4
+       else # Add other i860-SVR4 vendors below as they are discovered.
+         echo i860-unknown-sysv"$UNAME_RELEASE"  # Unknown i860-SVR4
+       fi
+       exit ;;
+    mini*:CTIX:SYS*5:*)
+       # "miniframe"
+       echo m68010-convergent-sysv
+       exit ;;
+    mc68k:UNIX:SYSTEM5:3.51m)
+       echo m68k-convergent-sysv
+       exit ;;
+    M680?0:D-NIX:5.3:*)
+       echo m68k-diab-dnix
+       exit ;;
+    M68*:*:R3V[5678]*:*)
+       test -r /sysV68 && { echo 'm68k-motorola-sysv'; exit; } ;;
+    3[345]??:*:4.0:3.0 | 3[34]??A:*:4.0:3.0 | 3[34]??,*:*:4.0:3.0 | 3[34]??/*:*:4.0:3.0 | 4400:*:4.0:3.0 | 4850:*:4.0:3.0 | SKA40:*:4.0:3.0 | SDS2:*:4.0:3.0 | SHG2:*:4.0:3.0 | S7501*:*:4.0:3.0)
+       OS_REL=''
+       test -r /etc/.relid \
+       && OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid`
+       /bin/uname -p 2>/dev/null | grep 86 >/dev/null \
+         && { echo i486-ncr-sysv4.3"$OS_REL"; exit; }
+       /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \
+         && { echo i586-ncr-sysv4.3"$OS_REL"; exit; } ;;
+    3[34]??:*:4.0:* | 3[34]??,*:*:4.0:*)
+       /bin/uname -p 2>/dev/null | grep 86 >/dev/null \
+         && { echo i486-ncr-sysv4; exit; } ;;
+    NCR*:*:4.2:* | MPRAS*:*:4.2:*)
+       OS_REL='.3'
+       test -r /etc/.relid \
+           && OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid`
+       /bin/uname -p 2>/dev/null | grep 86 >/dev/null \
+           && { echo i486-ncr-sysv4.3"$OS_REL"; exit; }
+       /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \
+           && { echo i586-ncr-sysv4.3"$OS_REL"; exit; }
+       /bin/uname -p 2>/dev/null | /bin/grep pteron >/dev/null \
+           && { echo i586-ncr-sysv4.3"$OS_REL"; exit; } ;;
+    m68*:LynxOS:2.*:* | m68*:LynxOS:3.0*:*)
+       echo m68k-unknown-lynxos"$UNAME_RELEASE"
+       exit ;;
+    mc68030:UNIX_System_V:4.*:*)
+       echo m68k-atari-sysv4
+       exit ;;
+    TSUNAMI:LynxOS:2.*:*)
+       echo sparc-unknown-lynxos"$UNAME_RELEASE"
+       exit ;;
+    rs6000:LynxOS:2.*:*)
+       echo rs6000-unknown-lynxos"$UNAME_RELEASE"
+       exit ;;
+    PowerPC:LynxOS:2.*:* | PowerPC:LynxOS:3.[01]*:* | PowerPC:LynxOS:4.[02]*:*)
+       echo powerpc-unknown-lynxos"$UNAME_RELEASE"
+       exit ;;
+    SM[BE]S:UNIX_SV:*:*)
+       echo mips-dde-sysv"$UNAME_RELEASE"
+       exit ;;
+    RM*:ReliantUNIX-*:*:*)
+       echo mips-sni-sysv4
+       exit ;;
+    RM*:SINIX-*:*:*)
+       echo mips-sni-sysv4
+       exit ;;
+    *:SINIX-*:*:*)
+       if uname -p 2>/dev/null >/dev/null ; then
+               UNAME_MACHINE=`(uname -p) 2>/dev/null`
+               echo "$UNAME_MACHINE"-sni-sysv4
+       else
+               echo ns32k-sni-sysv
+       fi
+       exit ;;
+    PENTIUM:*:4.0*:*)  # Unisys `ClearPath HMP IX 4000' SVR4/MP effort
+                       # says <Richard.M.Bartel@ccMail.Census.GOV>
+       echo i586-unisys-sysv4
+       exit ;;
+    *:UNIX_System_V:4*:FTX*)
+       # From Gerald Hewes <hewes@openmarket.com>.
+       # How about differentiating between stratus architectures? -djm
+       echo hppa1.1-stratus-sysv4
+       exit ;;
+    *:*:*:FTX*)
+       # From seanf@swdc.stratus.com.
+       echo i860-stratus-sysv4
+       exit ;;
+    i*86:VOS:*:*)
+       # From Paul.Green@stratus.com.
+       echo "$UNAME_MACHINE"-stratus-vos
+       exit ;;
+    *:VOS:*:*)
+       # From Paul.Green@stratus.com.
+       echo hppa1.1-stratus-vos
+       exit ;;
+    mc68*:A/UX:*:*)
+       echo m68k-apple-aux"$UNAME_RELEASE"
+       exit ;;
+    news*:NEWS-OS:6*:*)
+       echo mips-sony-newsos6
+       exit ;;
+    R[34]000:*System_V*:*:* | R4000:UNIX_SYSV:*:* | R*000:UNIX_SV:*:*)
+       if [ -d /usr/nec ]; then
+               echo mips-nec-sysv"$UNAME_RELEASE"
+       else
+               echo mips-unknown-sysv"$UNAME_RELEASE"
+       fi
+       exit ;;
+    BeBox:BeOS:*:*)    # BeOS running on hardware made by Be, PPC only.
+       echo powerpc-be-beos
+       exit ;;
+    BeMac:BeOS:*:*)    # BeOS running on Mac or Mac clone, PPC only.
+       echo powerpc-apple-beos
+       exit ;;
+    BePC:BeOS:*:*)     # BeOS running on Intel PC compatible.
+       echo i586-pc-beos
+       exit ;;
+    BePC:Haiku:*:*)    # Haiku running on Intel PC compatible.
+       echo i586-pc-haiku
+       exit ;;
+    x86_64:Haiku:*:*)
+       echo x86_64-unknown-haiku
+       exit ;;
+    SX-4:SUPER-UX:*:*)
+       echo sx4-nec-superux"$UNAME_RELEASE"
+       exit ;;
+    SX-5:SUPER-UX:*:*)
+       echo sx5-nec-superux"$UNAME_RELEASE"
+       exit ;;
+    SX-6:SUPER-UX:*:*)
+       echo sx6-nec-superux"$UNAME_RELEASE"
+       exit ;;
+    SX-7:SUPER-UX:*:*)
+       echo sx7-nec-superux"$UNAME_RELEASE"
+       exit ;;
+    SX-8:SUPER-UX:*:*)
+       echo sx8-nec-superux"$UNAME_RELEASE"
+       exit ;;
+    SX-8R:SUPER-UX:*:*)
+       echo sx8r-nec-superux"$UNAME_RELEASE"
+       exit ;;
+    SX-ACE:SUPER-UX:*:*)
+       echo sxace-nec-superux"$UNAME_RELEASE"
+       exit ;;
+    Power*:Rhapsody:*:*)
+       echo powerpc-apple-rhapsody"$UNAME_RELEASE"
+       exit ;;
+    *:Rhapsody:*:*)
+       echo "$UNAME_MACHINE"-apple-rhapsody"$UNAME_RELEASE"
+       exit ;;
+    *:Darwin:*:*)
+       UNAME_PROCESSOR=`uname -p`
+       case $UNAME_PROCESSOR in
+           unknown) UNAME_PROCESSOR=powerpc ;;
+       esac
+       if command -v xcode-select > /dev/null 2> /dev/null && \
+               ! xcode-select --print-path > /dev/null 2> /dev/null ; then
+           # Avoid executing cc if there is no toolchain installed as
+           # cc will be a stub that puts up a graphical alert
+           # prompting the user to install developer tools.
+           CC_FOR_BUILD=no_compiler_found
+       else
+           set_cc_for_build
+       fi
+       if [ "$CC_FOR_BUILD" != no_compiler_found ]; then
+           if (echo '#ifdef __LP64__'; echo IS_64BIT_ARCH; echo '#endif') | \
+                  (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \
+                  grep IS_64BIT_ARCH >/dev/null
+           then
+               case $UNAME_PROCESSOR in
+                   i386) UNAME_PROCESSOR=x86_64 ;;
+                   powerpc) UNAME_PROCESSOR=powerpc64 ;;
+               esac
+           fi
+           # On 10.4-10.6 one might compile for PowerPC via gcc -arch ppc
+           if (echo '#ifdef __POWERPC__'; echo IS_PPC; echo '#endif') | \
+                  (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \
+                  grep IS_PPC >/dev/null
+           then
+               UNAME_PROCESSOR=powerpc
+           fi
+       elif test "$UNAME_PROCESSOR" = i386 ; then
+           # uname -m returns i386 or x86_64
+           UNAME_PROCESSOR=$UNAME_MACHINE
+       fi
+       echo "$UNAME_PROCESSOR"-apple-darwin"$UNAME_RELEASE"
+       exit ;;
+    *:procnto*:*:* | *:QNX:[0123456789]*:*)
+       UNAME_PROCESSOR=`uname -p`
+       if test "$UNAME_PROCESSOR" = x86; then
+               UNAME_PROCESSOR=i386
+               UNAME_MACHINE=pc
+       fi
+       echo "$UNAME_PROCESSOR"-"$UNAME_MACHINE"-nto-qnx"$UNAME_RELEASE"
+       exit ;;
+    *:QNX:*:4*)
+       echo i386-pc-qnx
+       exit ;;
+    NEO-*:NONSTOP_KERNEL:*:*)
+       echo neo-tandem-nsk"$UNAME_RELEASE"
+       exit ;;
+    NSE-*:NONSTOP_KERNEL:*:*)
+       echo nse-tandem-nsk"$UNAME_RELEASE"
+       exit ;;
+    NSR-*:NONSTOP_KERNEL:*:*)
+       echo nsr-tandem-nsk"$UNAME_RELEASE"
+       exit ;;
+    NSV-*:NONSTOP_KERNEL:*:*)
+       echo nsv-tandem-nsk"$UNAME_RELEASE"
+       exit ;;
+    NSX-*:NONSTOP_KERNEL:*:*)
+       echo nsx-tandem-nsk"$UNAME_RELEASE"
+       exit ;;
+    *:NonStop-UX:*:*)
+       echo mips-compaq-nonstopux
+       exit ;;
+    BS2000:POSIX*:*:*)
+       echo bs2000-siemens-sysv
+       exit ;;
+    DS/*:UNIX_System_V:*:*)
+       echo "$UNAME_MACHINE"-"$UNAME_SYSTEM"-"$UNAME_RELEASE"
+       exit ;;
+    *:Plan9:*:*)
+       # "uname -m" is not consistent, so use $cputype instead. 386
+       # is converted to i386 for consistency with other x86
+       # operating systems.
+       # shellcheck disable=SC2154
+       if test "$cputype" = 386; then
+           UNAME_MACHINE=i386
+       else
+           UNAME_MACHINE="$cputype"
+       fi
+       echo "$UNAME_MACHINE"-unknown-plan9
+       exit ;;
+    *:TOPS-10:*:*)
+       echo pdp10-unknown-tops10
+       exit ;;
+    *:TENEX:*:*)
+       echo pdp10-unknown-tenex
+       exit ;;
+    KS10:TOPS-20:*:* | KL10:TOPS-20:*:* | TYPE4:TOPS-20:*:*)
+       echo pdp10-dec-tops20
+       exit ;;
+    XKL-1:TOPS-20:*:* | TYPE5:TOPS-20:*:*)
+       echo pdp10-xkl-tops20
+       exit ;;
+    *:TOPS-20:*:*)
+       echo pdp10-unknown-tops20
+       exit ;;
+    *:ITS:*:*)
+       echo pdp10-unknown-its
+       exit ;;
+    SEI:*:*:SEIUX)
+       echo mips-sei-seiux"$UNAME_RELEASE"
+       exit ;;
+    *:DragonFly:*:*)
+       echo "$UNAME_MACHINE"-unknown-dragonfly"`echo "$UNAME_RELEASE"|sed -e 's/[-(].*//'`"
+       exit ;;
+    *:*VMS:*:*)
+       UNAME_MACHINE=`(uname -p) 2>/dev/null`
+       case "$UNAME_MACHINE" in
+           A*) echo alpha-dec-vms ; exit ;;
+           I*) echo ia64-dec-vms ; exit ;;
+           V*) echo vax-dec-vms ; exit ;;
+       esac ;;
+    *:XENIX:*:SysV)
+       echo i386-pc-xenix
+       exit ;;
+    i*86:skyos:*:*)
+       echo "$UNAME_MACHINE"-pc-skyos"`echo "$UNAME_RELEASE" | sed -e 's/ .*$//'`"
+       exit ;;
+    i*86:rdos:*:*)
+       echo "$UNAME_MACHINE"-pc-rdos
+       exit ;;
+    i*86:AROS:*:*)
+       echo "$UNAME_MACHINE"-pc-aros
+       exit ;;
+    x86_64:VMkernel:*:*)
+       echo "$UNAME_MACHINE"-unknown-esx
+       exit ;;
+    amd64:Isilon\ OneFS:*:*)
+       echo x86_64-unknown-onefs
+       exit ;;
+    *:Unleashed:*:*)
+       echo "$UNAME_MACHINE"-unknown-unleashed"$UNAME_RELEASE"
+       exit ;;
+esac
+
+# No uname command or uname output not recognized.
+set_cc_for_build
+cat > "$dummy.c" <<EOF
+#ifdef _SEQUENT_
+#include <sys/types.h>
+#include <sys/utsname.h>
+#endif
+#if defined(ultrix) || defined(_ultrix) || defined(__ultrix) || defined(__ultrix__)
+#if defined (vax) || defined (__vax) || defined (__vax__) || defined(mips) || defined(__mips) || defined(__mips__) || defined(MIPS) || defined(__MIPS__)
+#include <signal.h>
+#if defined(_SIZE_T_) || defined(SIGLOST)
+#include <sys/utsname.h>
+#endif
+#endif
+#endif
+main ()
+{
+#if defined (sony)
+#if defined (MIPSEB)
+  /* BFD wants "bsd" instead of "newsos".  Perhaps BFD should be changed,
+     I don't know....  */
+  printf ("mips-sony-bsd\n"); exit (0);
+#else
+#include <sys/param.h>
+  printf ("m68k-sony-newsos%s\n",
+#ifdef NEWSOS4
+  "4"
+#else
+  ""
+#endif
+  ); exit (0);
+#endif
+#endif
+
+#if defined (NeXT)
+#if !defined (__ARCHITECTURE__)
+#define __ARCHITECTURE__ "m68k"
+#endif
+  int version;
+  version=`(hostinfo | sed -n 's/.*NeXT Mach \([0-9]*\).*/\1/p') 2>/dev/null`;
+  if (version < 4)
+    printf ("%s-next-nextstep%d\n", __ARCHITECTURE__, version);
+  else
+    printf ("%s-next-openstep%d\n", __ARCHITECTURE__, version);
+  exit (0);
+#endif
+
+#if defined (MULTIMAX) || defined (n16)
+#if defined (UMAXV)
+  printf ("ns32k-encore-sysv\n"); exit (0);
+#else
+#if defined (CMU)
+  printf ("ns32k-encore-mach\n"); exit (0);
+#else
+  printf ("ns32k-encore-bsd\n"); exit (0);
+#endif
+#endif
+#endif
+
+#if defined (__386BSD__)
+  printf ("i386-pc-bsd\n"); exit (0);
+#endif
+
+#if defined (sequent)
+#if defined (i386)
+  printf ("i386-sequent-dynix\n"); exit (0);
+#endif
+#if defined (ns32000)
+  printf ("ns32k-sequent-dynix\n"); exit (0);
+#endif
+#endif
+
+#if defined (_SEQUENT_)
+  struct utsname un;
+
+  uname(&un);
+  if (strncmp(un.version, "V2", 2) == 0) {
+    printf ("i386-sequent-ptx2\n"); exit (0);
+  }
+  if (strncmp(un.version, "V1", 2) == 0) { /* XXX is V1 correct? */
+    printf ("i386-sequent-ptx1\n"); exit (0);
+  }
+  printf ("i386-sequent-ptx\n"); exit (0);
+#endif
+
+#if defined (vax)
+#if !defined (ultrix)
+#include <sys/param.h>
+#if defined (BSD)
+#if BSD == 43
+  printf ("vax-dec-bsd4.3\n"); exit (0);
+#else
+#if BSD == 199006
+  printf ("vax-dec-bsd4.3reno\n"); exit (0);
+#else
+  printf ("vax-dec-bsd\n"); exit (0);
+#endif
+#endif
+#else
+  printf ("vax-dec-bsd\n"); exit (0);
+#endif
+#else
+#if defined(_SIZE_T_) || defined(SIGLOST)
+  struct utsname un;
+  uname (&un);
+  printf ("vax-dec-ultrix%s\n", un.release); exit (0);
+#else
+  printf ("vax-dec-ultrix\n"); exit (0);
+#endif
+#endif
+#endif
+#if defined(ultrix) || defined(_ultrix) || defined(__ultrix) || defined(__ultrix__)
+#if defined(mips) || defined(__mips) || defined(__mips__) || defined(MIPS) || defined(__MIPS__)
+#if defined(_SIZE_T_) || defined(SIGLOST)
+  struct utsname *un;
+  uname (&un);
+  printf ("mips-dec-ultrix%s\n", un.release); exit (0);
+#else
+  printf ("mips-dec-ultrix\n"); exit (0);
+#endif
+#endif
+#endif
+
+#if defined (alliant) && defined (i860)
+  printf ("i860-alliant-bsd\n"); exit (0);
+#endif
+
+  exit (1);
+}
+EOF
+
+$CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null && SYSTEM_NAME=`$dummy` &&
+       { echo "$SYSTEM_NAME"; exit; }
+
+# Apollos put the system type in the environment.
+test -d /usr/apollo && { echo "$ISP-apollo-$SYSTYPE"; exit; }
+
+echo "$0: unable to guess system type" >&2
+
+case "$UNAME_MACHINE:$UNAME_SYSTEM" in
+    mips:Linux | mips64:Linux)
+       # If we got here on MIPS GNU/Linux, output extra information.
+       cat >&2 <<EOF
+
+NOTE: MIPS GNU/Linux systems require a C compiler to fully recognize
+the system type. Please install a C compiler and try again.
+EOF
+       ;;
+esac
+
+cat >&2 <<EOF
+
+This script (version $timestamp), has failed to recognize the
+operating system you are using. If your script is old, overwrite *all*
+copies of config.guess and config.sub with the latest versions from:
+
+  https://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=config.guess
+and
+  https://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=config.sub
+
+If $0 has already been updated, send the following data and any
+information you think might be pertinent to config-patches@gnu.org to
+provide the necessary information to handle your system.
+
+config.guess timestamp = $timestamp
+
+uname -m = `(uname -m) 2>/dev/null || echo unknown`
+uname -r = `(uname -r) 2>/dev/null || echo unknown`
+uname -s = `(uname -s) 2>/dev/null || echo unknown`
+uname -v = `(uname -v) 2>/dev/null || echo unknown`
+
+/usr/bin/uname -p = `(/usr/bin/uname -p) 2>/dev/null`
+/bin/uname -X     = `(/bin/uname -X) 2>/dev/null`
+
+hostinfo               = `(hostinfo) 2>/dev/null`
+/bin/universe          = `(/bin/universe) 2>/dev/null`
+/usr/bin/arch -k       = `(/usr/bin/arch -k) 2>/dev/null`
+/bin/arch              = `(/bin/arch) 2>/dev/null`
+/usr/bin/oslevel       = `(/usr/bin/oslevel) 2>/dev/null`
+/usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null`
+
+UNAME_MACHINE = "$UNAME_MACHINE"
+UNAME_RELEASE = "$UNAME_RELEASE"
+UNAME_SYSTEM  = "$UNAME_SYSTEM"
+UNAME_VERSION = "$UNAME_VERSION"
+EOF
+
+exit 1
+
+# Local variables:
+# eval: (add-hook 'before-save-hook 'time-stamp)
+# time-stamp-start: "timestamp='"
+# time-stamp-format: "%:y-%02m-%02d"
+# time-stamp-end: "'"
+# End:
diff --git a/build-aux/config.rpath b/build-aux/config.rpath
new file mode 100755 (executable)
index 0000000..be202c1
--- /dev/null
@@ -0,0 +1,684 @@
+#! /bin/sh
+# Output a system dependent set of variables, describing how to set the
+# run time search path of shared libraries in an executable.
+#
+#   Copyright 1996-2019 Free Software Foundation, Inc.
+#   Taken from GNU libtool, 2001
+#   Originally by Gordon Matzigkeit <gord@gnu.ai.mit.edu>, 1996
+#
+#   This file is free software; the Free Software Foundation gives
+#   unlimited permission to copy and/or distribute it, with or without
+#   modifications, as long as this notice is preserved.
+#
+# The first argument passed to this file is the canonical host specification,
+#    CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM
+# or
+#    CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM
+# The environment variables CC, GCC, LDFLAGS, LD, with_gnu_ld
+# should be set by the caller.
+#
+# The set of defined variables is at the end of this script.
+
+# Known limitations:
+# - On IRIX 6.5 with CC="cc", the run time search patch must not be longer
+#   than 256 bytes, otherwise the compiler driver will dump core. The only
+#   known workaround is to choose shorter directory names for the build
+#   directory and/or the installation directory.
+
+# All known linkers require a '.a' archive for static linking (except MSVC,
+# which needs '.lib').
+libext=a
+shrext=.so
+
+host="$1"
+host_cpu=`echo "$host" | sed 's/^\([^-]*\)-\([^-]*\)-\(.*\)$/\1/'`
+host_vendor=`echo "$host" | sed 's/^\([^-]*\)-\([^-]*\)-\(.*\)$/\2/'`
+host_os=`echo "$host" | sed 's/^\([^-]*\)-\([^-]*\)-\(.*\)$/\3/'`
+
+# Code taken from libtool.m4's _LT_CC_BASENAME.
+
+for cc_temp in $CC""; do
+  case $cc_temp in
+    compile | *[\\/]compile | ccache | *[\\/]ccache ) ;;
+    distcc | *[\\/]distcc | purify | *[\\/]purify ) ;;
+    \-*) ;;
+    *) break;;
+  esac
+done
+cc_basename=`echo "$cc_temp" | sed -e 's%^.*/%%'`
+
+# Code taken from libtool.m4's _LT_COMPILER_PIC.
+
+wl=
+if test "$GCC" = yes; then
+  wl='-Wl,'
+else
+  case "$host_os" in
+    aix*)
+      wl='-Wl,'
+      ;;
+    mingw* | cygwin* | pw32* | os2* | cegcc*)
+      ;;
+    hpux9* | hpux10* | hpux11*)
+      wl='-Wl,'
+      ;;
+    irix5* | irix6* | nonstopux*)
+      wl='-Wl,'
+      ;;
+    linux* | k*bsd*-gnu | kopensolaris*-gnu)
+      case $cc_basename in
+        ecc*)
+          wl='-Wl,'
+          ;;
+        icc* | ifort*)
+          wl='-Wl,'
+          ;;
+        lf95*)
+          wl='-Wl,'
+          ;;
+        nagfor*)
+          wl='-Wl,-Wl,,'
+          ;;
+        pgcc* | pgf77* | pgf90* | pgf95* | pgfortran*)
+          wl='-Wl,'
+          ;;
+        ccc*)
+          wl='-Wl,'
+          ;;
+        xl* | bgxl* | bgf* | mpixl*)
+          wl='-Wl,'
+          ;;
+        como)
+          wl='-lopt='
+          ;;
+        *)
+          case `$CC -V 2>&1 | sed 5q` in
+            *Sun\ F* | *Sun*Fortran*)
+              wl=
+              ;;
+            *Sun\ C*)
+              wl='-Wl,'
+              ;;
+          esac
+          ;;
+      esac
+      ;;
+    newsos6)
+      ;;
+    *nto* | *qnx*)
+      ;;
+    osf3* | osf4* | osf5*)
+      wl='-Wl,'
+      ;;
+    rdos*)
+      ;;
+    solaris*)
+      case $cc_basename in
+        f77* | f90* | f95* | sunf77* | sunf90* | sunf95*)
+          wl='-Qoption ld '
+          ;;
+        *)
+          wl='-Wl,'
+          ;;
+      esac
+      ;;
+    sunos4*)
+      wl='-Qoption ld '
+      ;;
+    sysv4 | sysv4.2uw2* | sysv4.3*)
+      wl='-Wl,'
+      ;;
+    sysv4*MP*)
+      ;;
+    sysv5* | unixware* | sco3.2v5* | sco5v6* | OpenUNIX*)
+      wl='-Wl,'
+      ;;
+    unicos*)
+      wl='-Wl,'
+      ;;
+    uts4*)
+      ;;
+  esac
+fi
+
+# Code taken from libtool.m4's _LT_LINKER_SHLIBS.
+
+hardcode_libdir_flag_spec=
+hardcode_libdir_separator=
+hardcode_direct=no
+hardcode_minus_L=no
+
+case "$host_os" in
+  cygwin* | mingw* | pw32* | cegcc*)
+    # FIXME: the MSVC++ port hasn't been tested in a loooong time
+    # When not using gcc, we currently assume that we are using
+    # Microsoft Visual C++.
+    if test "$GCC" != yes; then
+      with_gnu_ld=no
+    fi
+    ;;
+  interix*)
+    # we just hope/assume this is gcc and not c89 (= MSVC++)
+    with_gnu_ld=yes
+    ;;
+  openbsd*)
+    with_gnu_ld=no
+    ;;
+esac
+
+ld_shlibs=yes
+if test "$with_gnu_ld" = yes; then
+  # Set some defaults for GNU ld with shared library support. These
+  # are reset later if shared libraries are not supported. Putting them
+  # here allows them to be overridden if necessary.
+  # Unlike libtool, we use -rpath here, not --rpath, since the documented
+  # option of GNU ld is called -rpath, not --rpath.
+  hardcode_libdir_flag_spec='${wl}-rpath ${wl}$libdir'
+  case "$host_os" in
+    aix[3-9]*)
+      # On AIX/PPC, the GNU linker is very broken
+      if test "$host_cpu" != ia64; then
+        ld_shlibs=no
+      fi
+      ;;
+    amigaos*)
+      case "$host_cpu" in
+        powerpc)
+          ;;
+        m68k)
+          hardcode_libdir_flag_spec='-L$libdir'
+          hardcode_minus_L=yes
+          ;;
+      esac
+      ;;
+    beos*)
+      if $LD --help 2>&1 | grep ': supported targets:.* elf' > /dev/null; then
+        :
+      else
+        ld_shlibs=no
+      fi
+      ;;
+    cygwin* | mingw* | pw32* | cegcc*)
+      # hardcode_libdir_flag_spec is actually meaningless, as there is
+      # no search path for DLLs.
+      hardcode_libdir_flag_spec='-L$libdir'
+      if $LD --help 2>&1 | grep 'auto-import' > /dev/null; then
+        :
+      else
+        ld_shlibs=no
+      fi
+      ;;
+    haiku*)
+      ;;
+    interix[3-9]*)
+      hardcode_direct=no
+      hardcode_libdir_flag_spec='${wl}-rpath,$libdir'
+      ;;
+    gnu* | linux* | tpf* | k*bsd*-gnu | kopensolaris*-gnu)
+      if $LD --help 2>&1 | grep ': supported targets:.* elf' > /dev/null; then
+        :
+      else
+        ld_shlibs=no
+      fi
+      ;;
+    netbsd*)
+      ;;
+    solaris*)
+      if $LD -v 2>&1 | grep 'BFD 2\.8' > /dev/null; then
+        ld_shlibs=no
+      elif $LD --help 2>&1 | grep ': supported targets:.* elf' > /dev/null; then
+        :
+      else
+        ld_shlibs=no
+      fi
+      ;;
+    sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX*)
+      case `$LD -v 2>&1` in
+        *\ [01].* | *\ 2.[0-9].* | *\ 2.1[0-5].*)
+          ld_shlibs=no
+          ;;
+        *)
+          if $LD --help 2>&1 | grep ': supported targets:.* elf' > /dev/null; then
+            hardcode_libdir_flag_spec='`test -z "$SCOABSPATH" && echo ${wl}-rpath,$libdir`'
+          else
+            ld_shlibs=no
+          fi
+          ;;
+      esac
+      ;;
+    sunos4*)
+      hardcode_direct=yes
+      ;;
+    *)
+      if $LD --help 2>&1 | grep ': supported targets:.* elf' > /dev/null; then
+        :
+      else
+        ld_shlibs=no
+      fi
+      ;;
+  esac
+  if test "$ld_shlibs" = no; then
+    hardcode_libdir_flag_spec=
+  fi
+else
+  case "$host_os" in
+    aix3*)
+      # Note: this linker hardcodes the directories in LIBPATH if there
+      # are no directories specified by -L.
+      hardcode_minus_L=yes
+      if test "$GCC" = yes; then
+        # Neither direct hardcoding nor static linking is supported with a
+        # broken collect2.
+        hardcode_direct=unsupported
+      fi
+      ;;
+    aix[4-9]*)
+      if test "$host_cpu" = ia64; then
+        # On IA64, the linker does run time linking by default, so we don't
+        # have to do anything special.
+        aix_use_runtimelinking=no
+      else
+        aix_use_runtimelinking=no
+        # Test if we are trying to use run time linking or normal
+        # AIX style linking. If -brtl is somewhere in LDFLAGS, we
+        # need to do runtime linking.
+        case $host_os in aix4.[23]|aix4.[23].*|aix[5-9]*)
+          for ld_flag in $LDFLAGS; do
+            if (test $ld_flag = "-brtl" || test $ld_flag = "-Wl,-brtl"); then
+              aix_use_runtimelinking=yes
+              break
+            fi
+          done
+          ;;
+        esac
+      fi
+      hardcode_direct=yes
+      hardcode_libdir_separator=':'
+      if test "$GCC" = yes; then
+        case $host_os in aix4.[012]|aix4.[012].*)
+          collect2name=`${CC} -print-prog-name=collect2`
+          if test -f "$collect2name" && \
+            strings "$collect2name" | grep resolve_lib_name >/dev/null
+          then
+            # We have reworked collect2
+            :
+          else
+            # We have old collect2
+            hardcode_direct=unsupported
+            hardcode_minus_L=yes
+            hardcode_libdir_flag_spec='-L$libdir'
+            hardcode_libdir_separator=
+          fi
+          ;;
+        esac
+      fi
+      # Begin _LT_AC_SYS_LIBPATH_AIX.
+      echo 'int main () { return 0; }' > conftest.c
+      ${CC} ${LDFLAGS} conftest.c -o conftest
+      aix_libpath=`dump -H conftest 2>/dev/null | sed -n -e '/Import File Strings/,/^$/ { /^0/ { s/^0  *\(.*\)$/\1/; p; }
+}'`
+      if test -z "$aix_libpath"; then
+        aix_libpath=`dump -HX64 conftest 2>/dev/null | sed -n -e '/Import File Strings/,/^$/ { /^0/ { s/^0  *\(.*\)$/\1/; p; }
+}'`
+      fi
+      if test -z "$aix_libpath"; then
+        aix_libpath="/usr/lib:/lib"
+      fi
+      rm -f conftest.c conftest
+      # End _LT_AC_SYS_LIBPATH_AIX.
+      if test "$aix_use_runtimelinking" = yes; then
+        hardcode_libdir_flag_spec='${wl}-blibpath:$libdir:'"$aix_libpath"
+      else
+        if test "$host_cpu" = ia64; then
+          hardcode_libdir_flag_spec='${wl}-R $libdir:/usr/lib:/lib'
+        else
+          hardcode_libdir_flag_spec='${wl}-blibpath:$libdir:'"$aix_libpath"
+        fi
+      fi
+      ;;
+    amigaos*)
+      case "$host_cpu" in
+        powerpc)
+          ;;
+        m68k)
+          hardcode_libdir_flag_spec='-L$libdir'
+          hardcode_minus_L=yes
+          ;;
+      esac
+      ;;
+    bsdi[45]*)
+      ;;
+    cygwin* | mingw* | pw32* | cegcc*)
+      # When not using gcc, we currently assume that we are using
+      # Microsoft Visual C++.
+      # hardcode_libdir_flag_spec is actually meaningless, as there is
+      # no search path for DLLs.
+      hardcode_libdir_flag_spec=' '
+      libext=lib
+      ;;
+    darwin* | rhapsody*)
+      hardcode_direct=no
+      if { case $cc_basename in ifort*) true;; *) test "$GCC" = yes;; esac; }; then
+        :
+      else
+        ld_shlibs=no
+      fi
+      ;;
+    dgux*)
+      hardcode_libdir_flag_spec='-L$libdir'
+      ;;
+    freebsd2.[01]*)
+      hardcode_direct=yes
+      hardcode_minus_L=yes
+      ;;
+    freebsd* | dragonfly*)
+      hardcode_libdir_flag_spec='-R$libdir'
+      hardcode_direct=yes
+      ;;
+    hpux9*)
+      hardcode_libdir_flag_spec='${wl}+b ${wl}$libdir'
+      hardcode_libdir_separator=:
+      hardcode_direct=yes
+      # hardcode_minus_L: Not really in the search PATH,
+      # but as the default location of the library.
+      hardcode_minus_L=yes
+      ;;
+    hpux10*)
+      if test "$with_gnu_ld" = no; then
+        hardcode_libdir_flag_spec='${wl}+b ${wl}$libdir'
+        hardcode_libdir_separator=:
+        hardcode_direct=yes
+        # hardcode_minus_L: Not really in the search PATH,
+        # but as the default location of the library.
+        hardcode_minus_L=yes
+      fi
+      ;;
+    hpux11*)
+      if test "$with_gnu_ld" = no; then
+        hardcode_libdir_flag_spec='${wl}+b ${wl}$libdir'
+        hardcode_libdir_separator=:
+        case $host_cpu in
+          hppa*64*|ia64*)
+            hardcode_direct=no
+            ;;
+          *)
+            hardcode_direct=yes
+            # hardcode_minus_L: Not really in the search PATH,
+            # but as the default location of the library.
+            hardcode_minus_L=yes
+            ;;
+        esac
+      fi
+      ;;
+    irix5* | irix6* | nonstopux*)
+      hardcode_libdir_flag_spec='${wl}-rpath ${wl}$libdir'
+      hardcode_libdir_separator=:
+      ;;
+    netbsd*)
+      hardcode_libdir_flag_spec='-R$libdir'
+      hardcode_direct=yes
+      ;;
+    newsos6)
+      hardcode_direct=yes
+      hardcode_libdir_flag_spec='${wl}-rpath ${wl}$libdir'
+      hardcode_libdir_separator=:
+      ;;
+    *nto* | *qnx*)
+      ;;
+    openbsd*)
+      if test -f /usr/libexec/ld.so; then
+        hardcode_direct=yes
+        if test -z "`echo __ELF__ | $CC -E - | grep __ELF__`" || test "$host_os-$host_cpu" = "openbsd2.8-powerpc"; then
+          hardcode_libdir_flag_spec='${wl}-rpath,$libdir'
+        else
+          case "$host_os" in
+            openbsd[01].* | openbsd2.[0-7] | openbsd2.[0-7].*)
+              hardcode_libdir_flag_spec='-R$libdir'
+              ;;
+            *)
+              hardcode_libdir_flag_spec='${wl}-rpath,$libdir'
+              ;;
+          esac
+        fi
+      else
+        ld_shlibs=no
+      fi
+      ;;
+    os2*)
+      hardcode_libdir_flag_spec='-L$libdir'
+      hardcode_minus_L=yes
+      ;;
+    osf3*)
+      hardcode_libdir_flag_spec='${wl}-rpath ${wl}$libdir'
+      hardcode_libdir_separator=:
+      ;;
+    osf4* | osf5*)
+      if test "$GCC" = yes; then
+        hardcode_libdir_flag_spec='${wl}-rpath ${wl}$libdir'
+      else
+        # Both cc and cxx compiler support -rpath directly
+        hardcode_libdir_flag_spec='-rpath $libdir'
+      fi
+      hardcode_libdir_separator=:
+      ;;
+    solaris*)
+      hardcode_libdir_flag_spec='-R$libdir'
+      ;;
+    sunos4*)
+      hardcode_libdir_flag_spec='-L$libdir'
+      hardcode_direct=yes
+      hardcode_minus_L=yes
+      ;;
+    sysv4)
+      case $host_vendor in
+        sni)
+          hardcode_direct=yes # is this really true???
+          ;;
+        siemens)
+          hardcode_direct=no
+          ;;
+        motorola)
+          hardcode_direct=no #Motorola manual says yes, but my tests say they lie
+          ;;
+      esac
+      ;;
+    sysv4.3*)
+      ;;
+    sysv4*MP*)
+      if test -d /usr/nec; then
+        ld_shlibs=yes
+      fi
+      ;;
+    sysv4*uw2* | sysv5OpenUNIX* | sysv5UnixWare7.[01].[10]* | unixware7* | sco3.2v5.0.[024]*)
+      ;;
+    sysv5* | sco3.2v5* | sco5v6*)
+      hardcode_libdir_flag_spec='`test -z "$SCOABSPATH" && echo ${wl}-R,$libdir`'
+      hardcode_libdir_separator=':'
+      ;;
+    uts4*)
+      hardcode_libdir_flag_spec='-L$libdir'
+      ;;
+    *)
+      ld_shlibs=no
+      ;;
+  esac
+fi
+
+# Check dynamic linker characteristics
+# Code taken from libtool.m4's _LT_SYS_DYNAMIC_LINKER.
+# Unlike libtool.m4, here we don't care about _all_ names of the library, but
+# only about the one the linker finds when passed -lNAME. This is the last
+# element of library_names_spec in libtool.m4, or possibly two of them if the
+# linker has special search rules.
+library_names_spec=      # the last element of library_names_spec in libtool.m4
+libname_spec='lib$name'
+case "$host_os" in
+  aix3*)
+    library_names_spec='$libname.a'
+    ;;
+  aix[4-9]*)
+    library_names_spec='$libname$shrext'
+    ;;
+  amigaos*)
+    case "$host_cpu" in
+      powerpc*)
+        library_names_spec='$libname$shrext' ;;
+      m68k)
+        library_names_spec='$libname.a' ;;
+    esac
+    ;;
+  beos*)
+    library_names_spec='$libname$shrext'
+    ;;
+  bsdi[45]*)
+    library_names_spec='$libname$shrext'
+    ;;
+  cygwin* | mingw* | pw32* | cegcc*)
+    shrext=.dll
+    library_names_spec='$libname.dll.a $libname.lib'
+    ;;
+  darwin* | rhapsody*)
+    shrext=.dylib
+    library_names_spec='$libname$shrext'
+    ;;
+  dgux*)
+    library_names_spec='$libname$shrext'
+    ;;
+  freebsd[23].*)
+    library_names_spec='$libname$shrext$versuffix'
+    ;;
+  freebsd* | dragonfly*)
+    library_names_spec='$libname$shrext'
+    ;;
+  gnu*)
+    library_names_spec='$libname$shrext'
+    ;;
+  haiku*)
+    library_names_spec='$libname$shrext'
+    ;;
+  hpux9* | hpux10* | hpux11*)
+    case $host_cpu in
+      ia64*)
+        shrext=.so
+        ;;
+      hppa*64*)
+        shrext=.sl
+        ;;
+      *)
+        shrext=.sl
+        ;;
+    esac
+    library_names_spec='$libname$shrext'
+    ;;
+  interix[3-9]*)
+    library_names_spec='$libname$shrext'
+    ;;
+  irix5* | irix6* | nonstopux*)
+    library_names_spec='$libname$shrext'
+    case "$host_os" in
+      irix5* | nonstopux*)
+        libsuff= shlibsuff=
+        ;;
+      *)
+        case $LD in
+          *-32|*"-32 "|*-melf32bsmip|*"-melf32bsmip ") libsuff= shlibsuff= ;;
+          *-n32|*"-n32 "|*-melf32bmipn32|*"-melf32bmipn32 ") libsuff=32 shlibsuff=N32 ;;
+          *-64|*"-64 "|*-melf64bmip|*"-melf64bmip ") libsuff=64 shlibsuff=64 ;;
+          *) libsuff= shlibsuff= ;;
+        esac
+        ;;
+    esac
+    ;;
+  linux*oldld* | linux*aout* | linux*coff*)
+    ;;
+  linux* | k*bsd*-gnu | kopensolaris*-gnu)
+    library_names_spec='$libname$shrext'
+    ;;
+  knetbsd*-gnu)
+    library_names_spec='$libname$shrext'
+    ;;
+  netbsd*)
+    library_names_spec='$libname$shrext'
+    ;;
+  newsos6)
+    library_names_spec='$libname$shrext'
+    ;;
+  *nto* | *qnx*)
+    library_names_spec='$libname$shrext'
+    ;;
+  openbsd*)
+    library_names_spec='$libname$shrext$versuffix'
+    ;;
+  os2*)
+    libname_spec='$name'
+    shrext=.dll
+    library_names_spec='$libname.a'
+    ;;
+  osf3* | osf4* | osf5*)
+    library_names_spec='$libname$shrext'
+    ;;
+  rdos*)
+    ;;
+  solaris*)
+    library_names_spec='$libname$shrext'
+    ;;
+  sunos4*)
+    library_names_spec='$libname$shrext$versuffix'
+    ;;
+  sysv4 | sysv4.3*)
+    library_names_spec='$libname$shrext'
+    ;;
+  sysv4*MP*)
+    library_names_spec='$libname$shrext'
+    ;;
+  sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX* | sysv4*uw2*)
+    library_names_spec='$libname$shrext'
+    ;;
+  tpf*)
+    library_names_spec='$libname$shrext'
+    ;;
+  uts4*)
+    library_names_spec='$libname$shrext'
+    ;;
+esac
+
+sed_quote_subst='s/\(["`$\\]\)/\\\1/g'
+escaped_wl=`echo "X$wl" | sed -e 's/^X//' -e "$sed_quote_subst"`
+shlibext=`echo "$shrext" | sed -e 's,^\.,,'`
+escaped_libname_spec=`echo "X$libname_spec" | sed -e 's/^X//' -e "$sed_quote_subst"`
+escaped_library_names_spec=`echo "X$library_names_spec" | sed -e 's/^X//' -e "$sed_quote_subst"`
+escaped_hardcode_libdir_flag_spec=`echo "X$hardcode_libdir_flag_spec" | sed -e 's/^X//' -e "$sed_quote_subst"`
+
+LC_ALL=C sed -e 's/^\([a-zA-Z0-9_]*\)=/acl_cv_\1=/' <<EOF
+
+# How to pass a linker flag through the compiler.
+wl="$escaped_wl"
+
+# Static library suffix (normally "a").
+libext="$libext"
+
+# Shared library suffix (normally "so").
+shlibext="$shlibext"
+
+# Format of library name prefix.
+libname_spec="$escaped_libname_spec"
+
+# Library names that the linker finds when passed -lNAME.
+library_names_spec="$escaped_library_names_spec"
+
+# Flag to hardcode \$libdir into a binary during linking.
+# This must work even if \$libdir does not exist.
+hardcode_libdir_flag_spec="$escaped_hardcode_libdir_flag_spec"
+
+# Whether we need a single -rpath flag with a separated argument.
+hardcode_libdir_separator="$hardcode_libdir_separator"
+
+# Set to yes if using DIR/libNAME.so during linking hardcodes DIR into the
+# resulting binary.
+hardcode_direct="$hardcode_direct"
+
+# Set to yes if using the -LDIR flag during linking hardcodes DIR into the
+# resulting binary.
+hardcode_minus_L="$hardcode_minus_L"
+
+EOF
diff --git a/build-aux/config.sub b/build-aux/config.sub
new file mode 100755 (executable)
index 0000000..a318a46
--- /dev/null
@@ -0,0 +1,1793 @@
+#! /bin/sh
+# Configuration validation subroutine script.
+#   Copyright 1992-2019 Free Software Foundation, Inc.
+
+timestamp='2019-06-30'
+
+# This file is free software; you can redistribute it and/or modify it
+# under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, see <https://www.gnu.org/licenses/>.
+#
+# As a special exception to the GNU General Public License, if you
+# distribute this file as part of a program that contains a
+# configuration script generated by Autoconf, you may include it under
+# the same distribution terms that you use for the rest of that
+# program.  This Exception is an additional permission under section 7
+# of the GNU General Public License, version 3 ("GPLv3").
+
+
+# Please send patches to <config-patches@gnu.org>.
+#
+# Configuration subroutine to validate and canonicalize a configuration type.
+# Supply the specified configuration type as an argument.
+# If it is invalid, we print an error message on stderr and exit with code 1.
+# Otherwise, we print the canonical config type on stdout and succeed.
+
+# You can get the latest version of this script from:
+# https://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=config.sub
+
+# This file is supposed to be the same for all GNU packages
+# and recognize all the CPU types, system types and aliases
+# that are meaningful with *any* GNU software.
+# Each package is responsible for reporting which valid configurations
+# it does not support.  The user should be able to distinguish
+# a failure to support a valid configuration from a meaningless
+# configuration.
+
+# The goal of this file is to map all the various variations of a given
+# machine specification into a single specification in the form:
+#      CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM
+# or in some cases, the newer four-part form:
+#      CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM
+# It is wrong to echo any other type of specification.
+
+me=`echo "$0" | sed -e 's,.*/,,'`
+
+usage="\
+Usage: $0 [OPTION] CPU-MFR-OPSYS or ALIAS
+
+Canonicalize a configuration name.
+
+Options:
+  -h, --help         print this help, then exit
+  -t, --time-stamp   print date of last modification, then exit
+  -v, --version      print version number, then exit
+
+Report bugs and patches to <config-patches@gnu.org>."
+
+version="\
+GNU config.sub ($timestamp)
+
+Copyright 1992-2019 Free Software Foundation, Inc.
+
+This is free software; see the source for copying conditions.  There is NO
+warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE."
+
+help="
+Try \`$me --help' for more information."
+
+# Parse command line
+while test $# -gt 0 ; do
+  case $1 in
+    --time-stamp | --time* | -t )
+       echo "$timestamp" ; exit ;;
+    --version | -v )
+       echo "$version" ; exit ;;
+    --help | --h* | -h )
+       echo "$usage"; exit ;;
+    -- )     # Stop option processing
+       shift; break ;;
+    - )        # Use stdin as input.
+       break ;;
+    -* )
+       echo "$me: invalid option $1$help" >&2
+       exit 1 ;;
+
+    *local*)
+       # First pass through any local machine types.
+       echo "$1"
+       exit ;;
+
+    * )
+       break ;;
+  esac
+done
+
+case $# in
+ 0) echo "$me: missing argument$help" >&2
+    exit 1;;
+ 1) ;;
+ *) echo "$me: too many arguments$help" >&2
+    exit 1;;
+esac
+
+# Split fields of configuration type
+# shellcheck disable=SC2162
+IFS="-" read field1 field2 field3 field4 <<EOF
+$1
+EOF
+
+# Separate into logical components for further validation
+case $1 in
+       *-*-*-*-*)
+               echo Invalid configuration \`"$1"\': more than four components >&2
+               exit 1
+               ;;
+       *-*-*-*)
+               basic_machine=$field1-$field2
+               os=$field3-$field4
+               ;;
+       *-*-*)
+               # Ambiguous whether COMPANY is present, or skipped and KERNEL-OS is two
+               # parts
+               maybe_os=$field2-$field3
+               case $maybe_os in
+                       nto-qnx* | linux-gnu* | linux-android* | linux-dietlibc \
+                       | linux-newlib* | linux-musl* | linux-uclibc* | uclinux-uclibc* \
+                       | uclinux-gnu* | kfreebsd*-gnu* | knetbsd*-gnu* | netbsd*-gnu* \
+                       | netbsd*-eabi* | kopensolaris*-gnu* | cloudabi*-eabi* \
+                       | storm-chaos* | os2-emx* | rtmk-nova*)
+                               basic_machine=$field1
+                               os=$maybe_os
+                               ;;
+                       android-linux)
+                               basic_machine=$field1-unknown
+                               os=linux-android
+                               ;;
+                       *)
+                               basic_machine=$field1-$field2
+                               os=$field3
+                               ;;
+               esac
+               ;;
+       *-*)
+               # A lone config we happen to match not fitting any pattern
+               case $field1-$field2 in
+                       decstation-3100)
+                               basic_machine=mips-dec
+                               os=
+                               ;;
+                       *-*)
+                               # Second component is usually, but not always the OS
+                               case $field2 in
+                                       # Prevent following clause from handling this valid os
+                                       sun*os*)
+                                               basic_machine=$field1
+                                               os=$field2
+                                               ;;
+                                       # Manufacturers
+                                       dec* | mips* | sequent* | encore* | pc533* | sgi* | sony* \
+                                       | att* | 7300* | 3300* | delta* | motorola* | sun[234]* \
+                                       | unicom* | ibm* | next | hp | isi* | apollo | altos* \
+                                       | convergent* | ncr* | news | 32* | 3600* | 3100* \
+                                       | hitachi* | c[123]* | convex* | sun | crds | omron* | dg \
+                                       | ultra | tti* | harris | dolphin | highlevel | gould \
+                                       | cbm | ns | masscomp | apple | axis | knuth | cray \
+                                       | microblaze* | sim | cisco \
+                                       | oki | wec | wrs | winbond)
+                                               basic_machine=$field1-$field2
+                                               os=
+                                               ;;
+                                       *)
+                                               basic_machine=$field1
+                                               os=$field2
+                                               ;;
+                               esac
+                       ;;
+               esac
+               ;;
+       *)
+               # Convert single-component short-hands not valid as part of
+               # multi-component configurations.
+               case $field1 in
+                       386bsd)
+                               basic_machine=i386-pc
+                               os=bsd
+                               ;;
+                       a29khif)
+                               basic_machine=a29k-amd
+                               os=udi
+                               ;;
+                       adobe68k)
+                               basic_machine=m68010-adobe
+                               os=scout
+                               ;;
+                       alliant)
+                               basic_machine=fx80-alliant
+                               os=
+                               ;;
+                       altos | altos3068)
+                               basic_machine=m68k-altos
+                               os=
+                               ;;
+                       am29k)
+                               basic_machine=a29k-none
+                               os=bsd
+                               ;;
+                       amdahl)
+                               basic_machine=580-amdahl
+                               os=sysv
+                               ;;
+                       amiga)
+                               basic_machine=m68k-unknown
+                               os=
+                               ;;
+                       amigaos | amigados)
+                               basic_machine=m68k-unknown
+                               os=amigaos
+                               ;;
+                       amigaunix | amix)
+                               basic_machine=m68k-unknown
+                               os=sysv4
+                               ;;
+                       apollo68)
+                               basic_machine=m68k-apollo
+                               os=sysv
+                               ;;
+                       apollo68bsd)
+                               basic_machine=m68k-apollo
+                               os=bsd
+                               ;;
+                       aros)
+                               basic_machine=i386-pc
+                               os=aros
+                               ;;
+                       aux)
+                               basic_machine=m68k-apple
+                               os=aux
+                               ;;
+                       balance)
+                               basic_machine=ns32k-sequent
+                               os=dynix
+                               ;;
+                       blackfin)
+                               basic_machine=bfin-unknown
+                               os=linux
+                               ;;
+                       cegcc)
+                               basic_machine=arm-unknown
+                               os=cegcc
+                               ;;
+                       convex-c1)
+                               basic_machine=c1-convex
+                               os=bsd
+                               ;;
+                       convex-c2)
+                               basic_machine=c2-convex
+                               os=bsd
+                               ;;
+                       convex-c32)
+                               basic_machine=c32-convex
+                               os=bsd
+                               ;;
+                       convex-c34)
+                               basic_machine=c34-convex
+                               os=bsd
+                               ;;
+                       convex-c38)
+                               basic_machine=c38-convex
+                               os=bsd
+                               ;;
+                       cray)
+                               basic_machine=j90-cray
+                               os=unicos
+                               ;;
+                       crds | unos)
+                               basic_machine=m68k-crds
+                               os=
+                               ;;
+                       da30)
+                               basic_machine=m68k-da30
+                               os=
+                               ;;
+                       decstation | pmax | pmin | dec3100 | decstatn)
+                               basic_machine=mips-dec
+                               os=
+                               ;;
+                       delta88)
+                               basic_machine=m88k-motorola
+                               os=sysv3
+                               ;;
+                       dicos)
+                               basic_machine=i686-pc
+                               os=dicos
+                               ;;
+                       djgpp)
+                               basic_machine=i586-pc
+                               os=msdosdjgpp
+                               ;;
+                       ebmon29k)
+                               basic_machine=a29k-amd
+                               os=ebmon
+                               ;;
+                       es1800 | OSE68k | ose68k | ose | OSE)
+                               basic_machine=m68k-ericsson
+                               os=ose
+                               ;;
+                       gmicro)
+                               basic_machine=tron-gmicro
+                               os=sysv
+                               ;;
+                       go32)
+                               basic_machine=i386-pc
+                               os=go32
+                               ;;
+                       h8300hms)
+                               basic_machine=h8300-hitachi
+                               os=hms
+                               ;;
+                       h8300xray)
+                               basic_machine=h8300-hitachi
+                               os=xray
+                               ;;
+                       h8500hms)
+                               basic_machine=h8500-hitachi
+                               os=hms
+                               ;;
+                       harris)
+                               basic_machine=m88k-harris
+                               os=sysv3
+                               ;;
+                       hp300 | hp300hpux)
+                               basic_machine=m68k-hp
+                               os=hpux
+                               ;;
+                       hp300bsd)
+                               basic_machine=m68k-hp
+                               os=bsd
+                               ;;
+                       hppaosf)
+                               basic_machine=hppa1.1-hp
+                               os=osf
+                               ;;
+                       hppro)
+                               basic_machine=hppa1.1-hp
+                               os=proelf
+                               ;;
+                       i386mach)
+                               basic_machine=i386-mach
+                               os=mach
+                               ;;
+                       isi68 | isi)
+                               basic_machine=m68k-isi
+                               os=sysv
+                               ;;
+                       m68knommu)
+                               basic_machine=m68k-unknown
+                               os=linux
+                               ;;
+                       magnum | m3230)
+                               basic_machine=mips-mips
+                               os=sysv
+                               ;;
+                       merlin)
+                               basic_machine=ns32k-utek
+                               os=sysv
+                               ;;
+                       mingw64)
+                               basic_machine=x86_64-pc
+                               os=mingw64
+                               ;;
+                       mingw32)
+                               basic_machine=i686-pc
+                               os=mingw32
+                               ;;
+                       mingw32ce)
+                               basic_machine=arm-unknown
+                               os=mingw32ce
+                               ;;
+                       monitor)
+                               basic_machine=m68k-rom68k
+                               os=coff
+                               ;;
+                       morphos)
+                               basic_machine=powerpc-unknown
+                               os=morphos
+                               ;;
+                       moxiebox)
+                               basic_machine=moxie-unknown
+                               os=moxiebox
+                               ;;
+                       msdos)
+                               basic_machine=i386-pc
+                               os=msdos
+                               ;;
+                       msys)
+                               basic_machine=i686-pc
+                               os=msys
+                               ;;
+                       mvs)
+                               basic_machine=i370-ibm
+                               os=mvs
+                               ;;
+                       nacl)
+                               basic_machine=le32-unknown
+                               os=nacl
+                               ;;
+                       ncr3000)
+                               basic_machine=i486-ncr
+                               os=sysv4
+                               ;;
+                       netbsd386)
+                               basic_machine=i386-pc
+                               os=netbsd
+                               ;;
+                       netwinder)
+                               basic_machine=armv4l-rebel
+                               os=linux
+                               ;;
+                       news | news700 | news800 | news900)
+                               basic_machine=m68k-sony
+                               os=newsos
+                               ;;
+                       news1000)
+                               basic_machine=m68030-sony
+                               os=newsos
+                               ;;
+                       necv70)
+                               basic_machine=v70-nec
+                               os=sysv
+                               ;;
+                       nh3000)
+                               basic_machine=m68k-harris
+                               os=cxux
+                               ;;
+                       nh[45]000)
+                               basic_machine=m88k-harris
+                               os=cxux
+                               ;;
+                       nindy960)
+                               basic_machine=i960-intel
+                               os=nindy
+                               ;;
+                       mon960)
+                               basic_machine=i960-intel
+                               os=mon960
+                               ;;
+                       nonstopux)
+                               basic_machine=mips-compaq
+                               os=nonstopux
+                               ;;
+                       os400)
+                               basic_machine=powerpc-ibm
+                               os=os400
+                               ;;
+                       OSE68000 | ose68000)
+                               basic_machine=m68000-ericsson
+                               os=ose
+                               ;;
+                       os68k)
+                               basic_machine=m68k-none
+                               os=os68k
+                               ;;
+                       paragon)
+                               basic_machine=i860-intel
+                               os=osf
+                               ;;
+                       parisc)
+                               basic_machine=hppa-unknown
+                               os=linux
+                               ;;
+                       pw32)
+                               basic_machine=i586-unknown
+                               os=pw32
+                               ;;
+                       rdos | rdos64)
+                               basic_machine=x86_64-pc
+                               os=rdos
+                               ;;
+                       rdos32)
+                               basic_machine=i386-pc
+                               os=rdos
+                               ;;
+                       rom68k)
+                               basic_machine=m68k-rom68k
+                               os=coff
+                               ;;
+                       sa29200)
+                               basic_machine=a29k-amd
+                               os=udi
+                               ;;
+                       sei)
+                               basic_machine=mips-sei
+                               os=seiux
+                               ;;
+                       sequent)
+                               basic_machine=i386-sequent
+                               os=
+                               ;;
+                       sps7)
+                               basic_machine=m68k-bull
+                               os=sysv2
+                               ;;
+                       st2000)
+                               basic_machine=m68k-tandem
+                               os=
+                               ;;
+                       stratus)
+                               basic_machine=i860-stratus
+                               os=sysv4
+                               ;;
+                       sun2)
+                               basic_machine=m68000-sun
+                               os=
+                               ;;
+                       sun2os3)
+                               basic_machine=m68000-sun
+                               os=sunos3
+                               ;;
+                       sun2os4)
+                               basic_machine=m68000-sun
+                               os=sunos4
+                               ;;
+                       sun3)
+                               basic_machine=m68k-sun
+                               os=
+                               ;;
+                       sun3os3)
+                               basic_machine=m68k-sun
+                               os=sunos3
+                               ;;
+                       sun3os4)
+                               basic_machine=m68k-sun
+                               os=sunos4
+                               ;;
+                       sun4)
+                               basic_machine=sparc-sun
+                               os=
+                               ;;
+                       sun4os3)
+                               basic_machine=sparc-sun
+                               os=sunos3
+                               ;;
+                       sun4os4)
+                               basic_machine=sparc-sun
+                               os=sunos4
+                               ;;
+                       sun4sol2)
+                               basic_machine=sparc-sun
+                               os=solaris2
+                               ;;
+                       sun386 | sun386i | roadrunner)
+                               basic_machine=i386-sun
+                               os=
+                               ;;
+                       sv1)
+                               basic_machine=sv1-cray
+                               os=unicos
+                               ;;
+                       symmetry)
+                               basic_machine=i386-sequent
+                               os=dynix
+                               ;;
+                       t3e)
+                               basic_machine=alphaev5-cray
+                               os=unicos
+                               ;;
+                       t90)
+                               basic_machine=t90-cray
+                               os=unicos
+                               ;;
+                       toad1)
+                               basic_machine=pdp10-xkl
+                               os=tops20
+                               ;;
+                       tpf)
+                               basic_machine=s390x-ibm
+                               os=tpf
+                               ;;
+                       udi29k)
+                               basic_machine=a29k-amd
+                               os=udi
+                               ;;
+                       ultra3)
+                               basic_machine=a29k-nyu
+                               os=sym1
+                               ;;
+                       v810 | necv810)
+                               basic_machine=v810-nec
+                               os=none
+                               ;;
+                       vaxv)
+                               basic_machine=vax-dec
+                               os=sysv
+                               ;;
+                       vms)
+                               basic_machine=vax-dec
+                               os=vms
+                               ;;
+                       vsta)
+                               basic_machine=i386-pc
+                               os=vsta
+                               ;;
+                       vxworks960)
+                               basic_machine=i960-wrs
+                               os=vxworks
+                               ;;
+                       vxworks68)
+                               basic_machine=m68k-wrs
+                               os=vxworks
+                               ;;
+                       vxworks29k)
+                               basic_machine=a29k-wrs
+                               os=vxworks
+                               ;;
+                       xbox)
+                               basic_machine=i686-pc
+                               os=mingw32
+                               ;;
+                       ymp)
+                               basic_machine=ymp-cray
+                               os=unicos
+                               ;;
+                       *)
+                               basic_machine=$1
+                               os=
+                               ;;
+               esac
+               ;;
+esac
+
+# Decode 1-component or ad-hoc basic machines
+case $basic_machine in
+       # Here we handle the default manufacturer of certain CPU types.  It is in
+       # some cases the only manufacturer, in others, it is the most popular.
+       w89k)
+               cpu=hppa1.1
+               vendor=winbond
+               ;;
+       op50n)
+               cpu=hppa1.1
+               vendor=oki
+               ;;
+       op60c)
+               cpu=hppa1.1
+               vendor=oki
+               ;;
+       ibm*)
+               cpu=i370
+               vendor=ibm
+               ;;
+       orion105)
+               cpu=clipper
+               vendor=highlevel
+               ;;
+       mac | mpw | mac-mpw)
+               cpu=m68k
+               vendor=apple
+               ;;
+       pmac | pmac-mpw)
+               cpu=powerpc
+               vendor=apple
+               ;;
+
+       # Recognize the various machine names and aliases which stand
+       # for a CPU type and a company and sometimes even an OS.
+       3b1 | 7300 | 7300-att | att-7300 | pc7300 | safari | unixpc)
+               cpu=m68000
+               vendor=att
+               ;;
+       3b*)
+               cpu=we32k
+               vendor=att
+               ;;
+       bluegene*)
+               cpu=powerpc
+               vendor=ibm
+               os=cnk
+               ;;
+       decsystem10* | dec10*)
+               cpu=pdp10
+               vendor=dec
+               os=tops10
+               ;;
+       decsystem20* | dec20*)
+               cpu=pdp10
+               vendor=dec
+               os=tops20
+               ;;
+       delta | 3300 | motorola-3300 | motorola-delta \
+             | 3300-motorola | delta-motorola)
+               cpu=m68k
+               vendor=motorola
+               ;;
+       dpx2*)
+               cpu=m68k
+               vendor=bull
+               os=sysv3
+               ;;
+       encore | umax | mmax)
+               cpu=ns32k
+               vendor=encore
+               ;;
+       elxsi)
+               cpu=elxsi
+               vendor=elxsi
+               os=${os:-bsd}
+               ;;
+       fx2800)
+               cpu=i860
+               vendor=alliant
+               ;;
+       genix)
+               cpu=ns32k
+               vendor=ns
+               ;;
+       h3050r* | hiux*)
+               cpu=hppa1.1
+               vendor=hitachi
+               os=hiuxwe2
+               ;;
+       hp3k9[0-9][0-9] | hp9[0-9][0-9])
+               cpu=hppa1.0
+               vendor=hp
+               ;;
+       hp9k2[0-9][0-9] | hp9k31[0-9])
+               cpu=m68000
+               vendor=hp
+               ;;
+       hp9k3[2-9][0-9])
+               cpu=m68k
+               vendor=hp
+               ;;
+       hp9k6[0-9][0-9] | hp6[0-9][0-9])
+               cpu=hppa1.0
+               vendor=hp
+               ;;
+       hp9k7[0-79][0-9] | hp7[0-79][0-9])
+               cpu=hppa1.1
+               vendor=hp
+               ;;
+       hp9k78[0-9] | hp78[0-9])
+               # FIXME: really hppa2.0-hp
+               cpu=hppa1.1
+               vendor=hp
+               ;;
+       hp9k8[67]1 | hp8[67]1 | hp9k80[24] | hp80[24] | hp9k8[78]9 | hp8[78]9 | hp9k893 | hp893)
+               # FIXME: really hppa2.0-hp
+               cpu=hppa1.1
+               vendor=hp
+               ;;
+       hp9k8[0-9][13679] | hp8[0-9][13679])
+               cpu=hppa1.1
+               vendor=hp
+               ;;
+       hp9k8[0-9][0-9] | hp8[0-9][0-9])
+               cpu=hppa1.0
+               vendor=hp
+               ;;
+       i*86v32)
+               cpu=`echo "$1" | sed -e 's/86.*/86/'`
+               vendor=pc
+               os=sysv32
+               ;;
+       i*86v4*)
+               cpu=`echo "$1" | sed -e 's/86.*/86/'`
+               vendor=pc
+               os=sysv4
+               ;;
+       i*86v)
+               cpu=`echo "$1" | sed -e 's/86.*/86/'`
+               vendor=pc
+               os=sysv
+               ;;
+       i*86sol2)
+               cpu=`echo "$1" | sed -e 's/86.*/86/'`
+               vendor=pc
+               os=solaris2
+               ;;
+       j90 | j90-cray)
+               cpu=j90
+               vendor=cray
+               os=${os:-unicos}
+               ;;
+       iris | iris4d)
+               cpu=mips
+               vendor=sgi
+               case $os in
+                   irix*)
+                       ;;
+                   *)
+                       os=irix4
+                       ;;
+               esac
+               ;;
+       miniframe)
+               cpu=m68000
+               vendor=convergent
+               ;;
+       *mint | mint[0-9]* | *MiNT | *MiNT[0-9]*)
+               cpu=m68k
+               vendor=atari
+               os=mint
+               ;;
+       news-3600 | risc-news)
+               cpu=mips
+               vendor=sony
+               os=newsos
+               ;;
+       next | m*-next)
+               cpu=m68k
+               vendor=next
+               case $os in
+                   openstep*)
+                       ;;
+                   nextstep*)
+                       ;;
+                   ns2*)
+                     os=nextstep2
+                       ;;
+                   *)
+                     os=nextstep3
+                       ;;
+               esac
+               ;;
+       np1)
+               cpu=np1
+               vendor=gould
+               ;;
+       op50n-* | op60c-*)
+               cpu=hppa1.1
+               vendor=oki
+               os=proelf
+               ;;
+       pa-hitachi)
+               cpu=hppa1.1
+               vendor=hitachi
+               os=hiuxwe2
+               ;;
+       pbd)
+               cpu=sparc
+               vendor=tti
+               ;;
+       pbb)
+               cpu=m68k
+               vendor=tti
+               ;;
+       pc532)
+               cpu=ns32k
+               vendor=pc532
+               ;;
+       pn)
+               cpu=pn
+               vendor=gould
+               ;;
+       power)
+               cpu=power
+               vendor=ibm
+               ;;
+       ps2)
+               cpu=i386
+               vendor=ibm
+               ;;
+       rm[46]00)
+               cpu=mips
+               vendor=siemens
+               ;;
+       rtpc | rtpc-*)
+               cpu=romp
+               vendor=ibm
+               ;;
+       sde)
+               cpu=mipsisa32
+               vendor=sde
+               os=${os:-elf}
+               ;;
+       simso-wrs)
+               cpu=sparclite
+               vendor=wrs
+               os=vxworks
+               ;;
+       tower | tower-32)
+               cpu=m68k
+               vendor=ncr
+               ;;
+       vpp*|vx|vx-*)
+               cpu=f301
+               vendor=fujitsu
+               ;;
+       w65)
+               cpu=w65
+               vendor=wdc
+               ;;
+       w89k-*)
+               cpu=hppa1.1
+               vendor=winbond
+               os=proelf
+               ;;
+       none)
+               cpu=none
+               vendor=none
+               ;;
+       leon|leon[3-9])
+               cpu=sparc
+               vendor=$basic_machine
+               ;;
+       leon-*|leon[3-9]-*)
+               cpu=sparc
+               vendor=`echo "$basic_machine" | sed 's/-.*//'`
+               ;;
+
+       *-*)
+               # shellcheck disable=SC2162
+               IFS="-" read cpu vendor <<EOF
+$basic_machine
+EOF
+               ;;
+       # We use `pc' rather than `unknown'
+       # because (1) that's what they normally are, and
+       # (2) the word "unknown" tends to confuse beginning users.
+       i*86 | x86_64)
+               cpu=$basic_machine
+               vendor=pc
+               ;;
+       # These rules are duplicated from below for sake of the special case above;
+       # i.e. things that normalized to x86 arches should also default to "pc"
+       pc98)
+               cpu=i386
+               vendor=pc
+               ;;
+       x64 | amd64)
+               cpu=x86_64
+               vendor=pc
+               ;;
+       # Recognize the basic CPU types without company name.
+       *)
+               cpu=$basic_machine
+               vendor=unknown
+               ;;
+esac
+
+unset -v basic_machine
+
+# Decode basic machines in the full and proper CPU-Company form.
+case $cpu-$vendor in
+       # Here we handle the default manufacturer of certain CPU types in canonical form. It is in
+       # some cases the only manufacturer, in others, it is the most popular.
+       craynv-unknown)
+               vendor=cray
+               os=${os:-unicosmp}
+               ;;
+       c90-unknown | c90-cray)
+               vendor=cray
+               os=${os:-unicos}
+               ;;
+       fx80-unknown)
+               vendor=alliant
+               ;;
+       romp-unknown)
+               vendor=ibm
+               ;;
+       mmix-unknown)
+               vendor=knuth
+               ;;
+       microblaze-unknown | microblazeel-unknown)
+               vendor=xilinx
+               ;;
+       rs6000-unknown)
+               vendor=ibm
+               ;;
+       vax-unknown)
+               vendor=dec
+               ;;
+       pdp11-unknown)
+               vendor=dec
+               ;;
+       we32k-unknown)
+               vendor=att
+               ;;
+       cydra-unknown)
+               vendor=cydrome
+               ;;
+       i370-ibm*)
+               vendor=ibm
+               ;;
+       orion-unknown)
+               vendor=highlevel
+               ;;
+       xps-unknown | xps100-unknown)
+               cpu=xps100
+               vendor=honeywell
+               ;;
+
+       # Here we normalize CPU types with a missing or matching vendor
+       dpx20-unknown | dpx20-bull)
+               cpu=rs6000
+               vendor=bull
+               os=${os:-bosx}
+               ;;
+
+       # Here we normalize CPU types irrespective of the vendor
+       amd64-*)
+               cpu=x86_64
+               ;;
+       blackfin-*)
+               cpu=bfin
+               os=linux
+               ;;
+       c54x-*)
+               cpu=tic54x
+               ;;
+       c55x-*)
+               cpu=tic55x
+               ;;
+       c6x-*)
+               cpu=tic6x
+               ;;
+       e500v[12]-*)
+               cpu=powerpc
+               os=$os"spe"
+               ;;
+       mips3*-*)
+               cpu=mips64
+               ;;
+       ms1-*)
+               cpu=mt
+               ;;
+       m68knommu-*)
+               cpu=m68k
+               os=linux
+               ;;
+       m9s12z-* | m68hcs12z-* | hcs12z-* | s12z-*)
+               cpu=s12z
+               ;;
+       openrisc-*)
+               cpu=or32
+               ;;
+       parisc-*)
+               cpu=hppa
+               os=linux
+               ;;
+       pentium-* | p5-* | k5-* | k6-* | nexgen-* | viac3-*)
+               cpu=i586
+               ;;
+       pentiumpro-* | p6-* | 6x86-* | athlon-* | athalon_*-*)
+               cpu=i686
+               ;;
+       pentiumii-* | pentium2-* | pentiumiii-* | pentium3-*)
+               cpu=i686
+               ;;
+       pentium4-*)
+               cpu=i786
+               ;;
+       pc98-*)
+               cpu=i386
+               ;;
+       ppc-* | ppcbe-*)
+               cpu=powerpc
+               ;;
+       ppcle-* | powerpclittle-*)
+               cpu=powerpcle
+               ;;
+       ppc64-*)
+               cpu=powerpc64
+               ;;
+       ppc64le-* | powerpc64little-*)
+               cpu=powerpc64le
+               ;;
+       sb1-*)
+               cpu=mipsisa64sb1
+               ;;
+       sb1el-*)
+               cpu=mipsisa64sb1el
+               ;;
+       sh5e[lb]-*)
+               cpu=`echo "$cpu" | sed 's/^\(sh.\)e\(.\)$/\1\2e/'`
+               ;;
+       spur-*)
+               cpu=spur
+               ;;
+       strongarm-* | thumb-*)
+               cpu=arm
+               ;;
+       tx39-*)
+               cpu=mipstx39
+               ;;
+       tx39el-*)
+               cpu=mipstx39el
+               ;;
+       x64-*)
+               cpu=x86_64
+               ;;
+       xscale-* | xscalee[bl]-*)
+               cpu=`echo "$cpu" | sed 's/^xscale/arm/'`
+               ;;
+
+       # Recognize the canonical CPU Types that limit and/or modify the
+       # company names they are paired with.
+       cr16-*)
+               os=${os:-elf}
+               ;;
+       crisv32-* | etraxfs*-*)
+               cpu=crisv32
+               vendor=axis
+               ;;
+       cris-* | etrax*-*)
+               cpu=cris
+               vendor=axis
+               ;;
+       crx-*)
+               os=${os:-elf}
+               ;;
+       neo-tandem)
+               cpu=neo
+               vendor=tandem
+               ;;
+       nse-tandem)
+               cpu=nse
+               vendor=tandem
+               ;;
+       nsr-tandem)
+               cpu=nsr
+               vendor=tandem
+               ;;
+       nsv-tandem)
+               cpu=nsv
+               vendor=tandem
+               ;;
+       nsx-tandem)
+               cpu=nsx
+               vendor=tandem
+               ;;
+       s390-*)
+               cpu=s390
+               vendor=ibm
+               ;;
+       s390x-*)
+               cpu=s390x
+               vendor=ibm
+               ;;
+       tile*-*)
+               os=${os:-linux-gnu}
+               ;;
+
+       *)
+               # Recognize the canonical CPU types that are allowed with any
+               # company name.
+               case $cpu in
+                       1750a | 580 \
+                       | a29k \
+                       | aarch64 | aarch64_be \
+                       | abacus \
+                       | alpha | alphaev[4-8] | alphaev56 | alphaev6[78] \
+                       | alpha64 | alpha64ev[4-8] | alpha64ev56 | alpha64ev6[78] \
+                       | alphapca5[67] | alpha64pca5[67] \
+                       | am33_2.0 \
+                       | amdgcn \
+                       | arc | arceb \
+                       | arm  | arm[lb]e | arme[lb] | armv* \
+                       | avr | avr32 \
+                       | asmjs \
+                       | ba \
+                       | be32 | be64 \
+                       | bfin | bpf | bs2000 \
+                       | c[123]* | c30 | [cjt]90 | c4x \
+                       | c8051 | clipper | craynv | csky | cydra \
+                       | d10v | d30v | dlx | dsp16xx \
+                       | e2k | elxsi | epiphany \
+                       | f30[01] | f700 | fido | fr30 | frv | ft32 | fx80 \
+                       | h8300 | h8500 \
+                       | hppa | hppa1.[01] | hppa2.0 | hppa2.0[nw] | hppa64 \
+                       | hexagon \
+                       | i370 | i*86 | i860 | i960 | ia16 | ia64 \
+                       | ip2k | iq2000 \
+                       | k1om \
+                       | le32 | le64 \
+                       | lm32 \
+                       | m32c | m32r | m32rle \
+                       | m5200 | m68000 | m680[012346]0 | m68360 | m683?2 | m68k \
+                       | m6811 | m68hc11 | m6812 | m68hc12 | m68hcs12x \
+                       | m88110 | m88k | maxq | mb | mcore | mep | metag \
+                       | microblaze | microblazeel \
+                       | mips | mipsbe | mipseb | mipsel | mipsle \
+                       | mips16 \
+                       | mips64 | mips64eb | mips64el \
+                       | mips64octeon | mips64octeonel \
+                       | mips64orion | mips64orionel \
+                       | mips64r5900 | mips64r5900el \
+                       | mips64vr | mips64vrel \
+                       | mips64vr4100 | mips64vr4100el \
+                       | mips64vr4300 | mips64vr4300el \
+                       | mips64vr5000 | mips64vr5000el \
+                       | mips64vr5900 | mips64vr5900el \
+                       | mipsisa32 | mipsisa32el \
+                       | mipsisa32r2 | mipsisa32r2el \
+                       | mipsisa32r6 | mipsisa32r6el \
+                       | mipsisa64 | mipsisa64el \
+                       | mipsisa64r2 | mipsisa64r2el \
+                       | mipsisa64r6 | mipsisa64r6el \
+                       | mipsisa64sb1 | mipsisa64sb1el \
+                       | mipsisa64sr71k | mipsisa64sr71kel \
+                       | mipsr5900 | mipsr5900el \
+                       | mipstx39 | mipstx39el \
+                       | mmix \
+                       | mn10200 | mn10300 \
+                       | moxie \
+                       | mt \
+                       | msp430 \
+                       | nds32 | nds32le | nds32be \
+                       | nfp \
+                       | nios | nios2 | nios2eb | nios2el \
+                       | none | np1 | ns16k | ns32k | nvptx \
+                       | open8 \
+                       | or1k* \
+                       | or32 \
+                       | orion \
+                       | picochip \
+                       | pdp10 | pdp11 | pj | pjl | pn | power \
+                       | powerpc | powerpc64 | powerpc64le | powerpcle | powerpcspe \
+                       | pru \
+                       | pyramid \
+                       | riscv | riscv32 | riscv64 \
+                       | rl78 | romp | rs6000 | rx \
+                       | score \
+                       | sh | shl \
+                       | sh[1234] | sh[24]a | sh[24]ae[lb] | sh[23]e | she[lb] | sh[lb]e \
+                       | sh[1234]e[lb] |  sh[12345][lb]e | sh[23]ele | sh64 | sh64le \
+                       | sparc | sparc64 | sparc64b | sparc64v | sparc86x | sparclet \
+                       | sparclite \
+                       | sparcv8 | sparcv9 | sparcv9b | sparcv9v | sv1 | sx* \
+                       | spu \
+                       | tahoe \
+                       | tic30 | tic4x | tic54x | tic55x | tic6x | tic80 \
+                       | tron \
+                       | ubicom32 \
+                       | v70 | v850 | v850e | v850e1 | v850es | v850e2 | v850e2v3 \
+                       | vax \
+                       | visium \
+                       | w65 \
+                       | wasm32 | wasm64 \
+                       | we32k \
+                       | x86 | x86_64 | xc16x | xgate | xps100 \
+                       | xstormy16 | xtensa* \
+                       | ymp \
+                       | z8k | z80)
+                               ;;
+
+                       *)
+                               echo Invalid configuration \`"$1"\': machine \`"$cpu-$vendor"\' not recognized 1>&2
+                               exit 1
+                               ;;
+               esac
+               ;;
+esac
+
+# Here we canonicalize certain aliases for manufacturers.
+case $vendor in
+       digital*)
+               vendor=dec
+               ;;
+       commodore*)
+               vendor=cbm
+               ;;
+       *)
+               ;;
+esac
+
+# Decode manufacturer-specific aliases for certain operating systems.
+
+if [ x$os != x ]
+then
+case $os in
+       # First match some system type aliases that might get confused
+       # with valid system types.
+       # solaris* is a basic system type, with this one exception.
+       auroraux)
+               os=auroraux
+               ;;
+       bluegene*)
+               os=cnk
+               ;;
+       solaris1 | solaris1.*)
+               os=`echo $os | sed -e 's|solaris1|sunos4|'`
+               ;;
+       solaris)
+               os=solaris2
+               ;;
+       unixware*)
+               os=sysv4.2uw
+               ;;
+       gnu/linux*)
+               os=`echo $os | sed -e 's|gnu/linux|linux-gnu|'`
+               ;;
+       # es1800 is here to avoid being matched by es* (a different OS)
+       es1800*)
+               os=ose
+               ;;
+       # Some version numbers need modification
+       chorusos*)
+               os=chorusos
+               ;;
+       isc)
+               os=isc2.2
+               ;;
+       sco6)
+               os=sco5v6
+               ;;
+       sco5)
+               os=sco3.2v5
+               ;;
+       sco4)
+               os=sco3.2v4
+               ;;
+       sco3.2.[4-9]*)
+               os=`echo $os | sed -e 's/sco3.2./sco3.2v/'`
+               ;;
+       sco3.2v[4-9]* | sco5v6*)
+               # Don't forget version if it is 3.2v4 or newer.
+               ;;
+       scout)
+               # Don't match below
+               ;;
+       sco*)
+               os=sco3.2v2
+               ;;
+       psos*)
+               os=psos
+               ;;
+       # Now accept the basic system types.
+       # The portable systems comes first.
+       # Each alternative MUST end in a * to match a version number.
+       # sysv* is not here because it comes later, after sysvr4.
+       gnu* | bsd* | mach* | minix* | genix* | ultrix* | irix* \
+            | *vms* | esix* | aix* | cnk* | sunos | sunos[34]*\
+            | hpux* | unos* | osf* | luna* | dgux* | auroraux* | solaris* \
+            | sym* | kopensolaris* | plan9* \
+            | amigaos* | amigados* | msdos* | newsos* | unicos* | aof* \
+            | aos* | aros* | cloudabi* | sortix* \
+            | nindy* | vxsim* | vxworks* | ebmon* | hms* | mvs* \
+            | clix* | riscos* | uniplus* | iris* | isc* | rtu* | xenix* \
+            | knetbsd* | mirbsd* | netbsd* \
+            | bitrig* | openbsd* | solidbsd* | libertybsd* | os108* \
+            | ekkobsd* | kfreebsd* | freebsd* | riscix* | lynxos* \
+            | bosx* | nextstep* | cxux* | aout* | elf* | oabi* \
+            | ptx* | coff* | ecoff* | winnt* | domain* | vsta* \
+            | udi* | eabi* | lites* | ieee* | go32* | aux* | hcos* \
+            | chorusrdb* | cegcc* | glidix* \
+            | cygwin* | msys* | pe* | moss* | proelf* | rtems* \
+            | midipix* | mingw32* | mingw64* | linux-gnu* | linux-android* \
+            | linux-newlib* | linux-musl* | linux-uclibc* \
+            | uxpv* | beos* | mpeix* | udk* | moxiebox* \
+            | interix* | uwin* | mks* | rhapsody* | darwin* \
+            | openstep* | oskit* | conix* | pw32* | nonstopux* \
+            | storm-chaos* | tops10* | tenex* | tops20* | its* \
+            | os2* | vos* | palmos* | uclinux* | nucleus* \
+            | morphos* | superux* | rtmk* | windiss* \
+            | powermax* | dnix* | nx6 | nx7 | sei* | dragonfly* \
+            | skyos* | haiku* | rdos* | toppers* | drops* | es* \
+            | onefs* | tirtos* | phoenix* | fuchsia* | redox* | bme* \
+            | midnightbsd* | amdhsa* | unleashed* | emscripten* | wasi* \
+            | nsk* | powerunix)
+       # Remember, each alternative MUST END IN *, to match a version number.
+               ;;
+       qnx*)
+               case $cpu in
+                   x86 | i*86)
+                       ;;
+                   *)
+                       os=nto-$os
+                       ;;
+               esac
+               ;;
+       hiux*)
+               os=hiuxwe2
+               ;;
+       nto-qnx*)
+               ;;
+       nto*)
+               os=`echo $os | sed -e 's|nto|nto-qnx|'`
+               ;;
+       sim | xray | os68k* | v88r* \
+           | windows* | osx | abug | netware* | os9* \
+           | macos* | mpw* | magic* | mmixware* | mon960* | lnews*)
+               ;;
+       linux-dietlibc)
+               os=linux-dietlibc
+               ;;
+       linux*)
+               os=`echo $os | sed -e 's|linux|linux-gnu|'`
+               ;;
+       lynx*178)
+               os=lynxos178
+               ;;
+       lynx*5)
+               os=lynxos5
+               ;;
+       lynx*)
+               os=lynxos
+               ;;
+       mac*)
+               os=`echo "$os" | sed -e 's|mac|macos|'`
+               ;;
+       opened*)
+               os=openedition
+               ;;
+       os400*)
+               os=os400
+               ;;
+       sunos5*)
+               os=`echo "$os" | sed -e 's|sunos5|solaris2|'`
+               ;;
+       sunos6*)
+               os=`echo "$os" | sed -e 's|sunos6|solaris3|'`
+               ;;
+       wince*)
+               os=wince
+               ;;
+       utek*)
+               os=bsd
+               ;;
+       dynix*)
+               os=bsd
+               ;;
+       acis*)
+               os=aos
+               ;;
+       atheos*)
+               os=atheos
+               ;;
+       syllable*)
+               os=syllable
+               ;;
+       386bsd)
+               os=bsd
+               ;;
+       ctix* | uts*)
+               os=sysv
+               ;;
+       nova*)
+               os=rtmk-nova
+               ;;
+       ns2)
+               os=nextstep2
+               ;;
+       # Preserve the version number of sinix5.
+       sinix5.*)
+               os=`echo $os | sed -e 's|sinix|sysv|'`
+               ;;
+       sinix*)
+               os=sysv4
+               ;;
+       tpf*)
+               os=tpf
+               ;;
+       triton*)
+               os=sysv3
+               ;;
+       oss*)
+               os=sysv3
+               ;;
+       svr4*)
+               os=sysv4
+               ;;
+       svr3)
+               os=sysv3
+               ;;
+       sysvr4)
+               os=sysv4
+               ;;
+       # This must come after sysvr4.
+       sysv*)
+               ;;
+       ose*)
+               os=ose
+               ;;
+       *mint | mint[0-9]* | *MiNT | MiNT[0-9]*)
+               os=mint
+               ;;
+       zvmoe)
+               os=zvmoe
+               ;;
+       dicos*)
+               os=dicos
+               ;;
+       pikeos*)
+               # Until real need of OS specific support for
+               # particular features comes up, bare metal
+               # configurations are quite functional.
+               case $cpu in
+                   arm*)
+                       os=eabi
+                       ;;
+                   *)
+                       os=elf
+                       ;;
+               esac
+               ;;
+       nacl*)
+               ;;
+       ios)
+               ;;
+       none)
+               ;;
+       *-eabi)
+               ;;
+       *)
+               echo Invalid configuration \`"$1"\': system \`"$os"\' not recognized 1>&2
+               exit 1
+               ;;
+esac
+else
+
+# Here we handle the default operating systems that come with various machines.
+# The value should be what the vendor currently ships out the door with their
+# machine or put another way, the most popular os provided with the machine.
+
+# Note that if you're going to try to match "-MANUFACTURER" here (say,
+# "-sun"), then you have to tell the case statement up towards the top
+# that MANUFACTURER isn't an operating system.  Otherwise, code above
+# will signal an error saying that MANUFACTURER isn't an operating
+# system, and we'll never get to this point.
+
+case $cpu-$vendor in
+       score-*)
+               os=elf
+               ;;
+       spu-*)
+               os=elf
+               ;;
+       *-acorn)
+               os=riscix1.2
+               ;;
+       arm*-rebel)
+               os=linux
+               ;;
+       arm*-semi)
+               os=aout
+               ;;
+       c4x-* | tic4x-*)
+               os=coff
+               ;;
+       c8051-*)
+               os=elf
+               ;;
+       clipper-intergraph)
+               os=clix
+               ;;
+       hexagon-*)
+               os=elf
+               ;;
+       tic54x-*)
+               os=coff
+               ;;
+       tic55x-*)
+               os=coff
+               ;;
+       tic6x-*)
+               os=coff
+               ;;
+       # This must come before the *-dec entry.
+       pdp10-*)
+               os=tops20
+               ;;
+       pdp11-*)
+               os=none
+               ;;
+       *-dec | vax-*)
+               os=ultrix4.2
+               ;;
+       m68*-apollo)
+               os=domain
+               ;;
+       i386-sun)
+               os=sunos4.0.2
+               ;;
+       m68000-sun)
+               os=sunos3
+               ;;
+       m68*-cisco)
+               os=aout
+               ;;
+       mep-*)
+               os=elf
+               ;;
+       mips*-cisco)
+               os=elf
+               ;;
+       mips*-*)
+               os=elf
+               ;;
+       or32-*)
+               os=coff
+               ;;
+       *-tti)  # must be before sparc entry or we get the wrong os.
+               os=sysv3
+               ;;
+       sparc-* | *-sun)
+               os=sunos4.1.1
+               ;;
+       pru-*)
+               os=elf
+               ;;
+       *-be)
+               os=beos
+               ;;
+       *-ibm)
+               os=aix
+               ;;
+       *-knuth)
+               os=mmixware
+               ;;
+       *-wec)
+               os=proelf
+               ;;
+       *-winbond)
+               os=proelf
+               ;;
+       *-oki)
+               os=proelf
+               ;;
+       *-hp)
+               os=hpux
+               ;;
+       *-hitachi)
+               os=hiux
+               ;;
+       i860-* | *-att | *-ncr | *-altos | *-motorola | *-convergent)
+               os=sysv
+               ;;
+       *-cbm)
+               os=amigaos
+               ;;
+       *-dg)
+               os=dgux
+               ;;
+       *-dolphin)
+               os=sysv3
+               ;;
+       m68k-ccur)
+               os=rtu
+               ;;
+       m88k-omron*)
+               os=luna
+               ;;
+       *-next)
+               os=nextstep
+               ;;
+       *-sequent)
+               os=ptx
+               ;;
+       *-crds)
+               os=unos
+               ;;
+       *-ns)
+               os=genix
+               ;;
+       i370-*)
+               os=mvs
+               ;;
+       *-gould)
+               os=sysv
+               ;;
+       *-highlevel)
+               os=bsd
+               ;;
+       *-encore)
+               os=bsd
+               ;;
+       *-sgi)
+               os=irix
+               ;;
+       *-siemens)
+               os=sysv4
+               ;;
+       *-masscomp)
+               os=rtu
+               ;;
+       f30[01]-fujitsu | f700-fujitsu)
+               os=uxpv
+               ;;
+       *-rom68k)
+               os=coff
+               ;;
+       *-*bug)
+               os=coff
+               ;;
+       *-apple)
+               os=macos
+               ;;
+       *-atari*)
+               os=mint
+               ;;
+       *-wrs)
+               os=vxworks
+               ;;
+       *)
+               os=none
+               ;;
+esac
+fi
+
+# Here we handle the case where we know the os, and the CPU type, but not the
+# manufacturer.  We pick the logical manufacturer.
+case $vendor in
+       unknown)
+               case $os in
+                       riscix*)
+                               vendor=acorn
+                               ;;
+                       sunos*)
+                               vendor=sun
+                               ;;
+                       cnk*|-aix*)
+                               vendor=ibm
+                               ;;
+                       beos*)
+                               vendor=be
+                               ;;
+                       hpux*)
+                               vendor=hp
+                               ;;
+                       mpeix*)
+                               vendor=hp
+                               ;;
+                       hiux*)
+                               vendor=hitachi
+                               ;;
+                       unos*)
+                               vendor=crds
+                               ;;
+                       dgux*)
+                               vendor=dg
+                               ;;
+                       luna*)
+                               vendor=omron
+                               ;;
+                       genix*)
+                               vendor=ns
+                               ;;
+                       clix*)
+                               vendor=intergraph
+                               ;;
+                       mvs* | opened*)
+                               vendor=ibm
+                               ;;
+                       os400*)
+                               vendor=ibm
+                               ;;
+                       ptx*)
+                               vendor=sequent
+                               ;;
+                       tpf*)
+                               vendor=ibm
+                               ;;
+                       vxsim* | vxworks* | windiss*)
+                               vendor=wrs
+                               ;;
+                       aux*)
+                               vendor=apple
+                               ;;
+                       hms*)
+                               vendor=hitachi
+                               ;;
+                       mpw* | macos*)
+                               vendor=apple
+                               ;;
+                       *mint | mint[0-9]* | *MiNT | MiNT[0-9]*)
+                               vendor=atari
+                               ;;
+                       vos*)
+                               vendor=stratus
+                               ;;
+               esac
+               ;;
+esac
+
+echo "$cpu-$vendor-$os"
+exit
+
+# Local variables:
+# eval: (add-hook 'before-save-hook 'time-stamp)
+# time-stamp-start: "timestamp='"
+# time-stamp-format: "%:y-%02m-%02d"
+# time-stamp-end: "'"
+# End:
diff --git a/build-aux/depcomp b/build-aux/depcomp
new file mode 100755 (executable)
index 0000000..b39f98f
--- /dev/null
@@ -0,0 +1,791 @@
+#! /bin/sh
+# depcomp - compile a program generating dependencies as side-effects
+
+scriptversion=2016-01-11.22; # UTC
+
+# Copyright (C) 1999-2017 Free Software Foundation, Inc.
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2, or (at your option)
+# any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+# As a special exception to the GNU General Public License, if you
+# distribute this file as part of a program that contains a
+# configuration script generated by Autoconf, you may include it under
+# the same distribution terms that you use for the rest of that program.
+
+# Originally written by Alexandre Oliva <oliva@dcc.unicamp.br>.
+
+case $1 in
+  '')
+    echo "$0: No command.  Try '$0 --help' for more information." 1>&2
+    exit 1;
+    ;;
+  -h | --h*)
+    cat <<\EOF
+Usage: depcomp [--help] [--version] PROGRAM [ARGS]
+
+Run PROGRAMS ARGS to compile a file, generating dependencies
+as side-effects.
+
+Environment variables:
+  depmode     Dependency tracking mode.
+  source      Source file read by 'PROGRAMS ARGS'.
+  object      Object file output by 'PROGRAMS ARGS'.
+  DEPDIR      directory where to store dependencies.
+  depfile     Dependency file to output.
+  tmpdepfile  Temporary file to use when outputting dependencies.
+  libtool     Whether libtool is used (yes/no).
+
+Report bugs to <bug-automake@gnu.org>.
+EOF
+    exit $?
+    ;;
+  -v | --v*)
+    echo "depcomp $scriptversion"
+    exit $?
+    ;;
+esac
+
+# Get the directory component of the given path, and save it in the
+# global variables '$dir'.  Note that this directory component will
+# be either empty or ending with a '/' character.  This is deliberate.
+set_dir_from ()
+{
+  case $1 in
+    */*) dir=`echo "$1" | sed -e 's|/[^/]*$|/|'`;;
+      *) dir=;;
+  esac
+}
+
+# Get the suffix-stripped basename of the given path, and save it the
+# global variable '$base'.
+set_base_from ()
+{
+  base=`echo "$1" | sed -e 's|^.*/||' -e 's/\.[^.]*$//'`
+}
+
+# If no dependency file was actually created by the compiler invocation,
+# we still have to create a dummy depfile, to avoid errors with the
+# Makefile "include basename.Plo" scheme.
+make_dummy_depfile ()
+{
+  echo "#dummy" > "$depfile"
+}
+
+# Factor out some common post-processing of the generated depfile.
+# Requires the auxiliary global variable '$tmpdepfile' to be set.
+aix_post_process_depfile ()
+{
+  # If the compiler actually managed to produce a dependency file,
+  # post-process it.
+  if test -f "$tmpdepfile"; then
+    # Each line is of the form 'foo.o: dependency.h'.
+    # Do two passes, one to just change these to
+    #   $object: dependency.h
+    # and one to simply output
+    #   dependency.h:
+    # which is needed to avoid the deleted-header problem.
+    { sed -e "s,^.*\.[$lower]*:,$object:," < "$tmpdepfile"
+      sed -e "s,^.*\.[$lower]*:[$tab ]*,," -e 's,$,:,' < "$tmpdepfile"
+    } > "$depfile"
+    rm -f "$tmpdepfile"
+  else
+    make_dummy_depfile
+  fi
+}
+
+# A tabulation character.
+tab='  '
+# A newline character.
+nl='
+'
+# Character ranges might be problematic outside the C locale.
+# These definitions help.
+upper=ABCDEFGHIJKLMNOPQRSTUVWXYZ
+lower=abcdefghijklmnopqrstuvwxyz
+digits=0123456789
+alpha=${upper}${lower}
+
+if test -z "$depmode" || test -z "$source" || test -z "$object"; then
+  echo "depcomp: Variables source, object and depmode must be set" 1>&2
+  exit 1
+fi
+
+# Dependencies for sub/bar.o or sub/bar.obj go into sub/.deps/bar.Po.
+depfile=${depfile-`echo "$object" |
+  sed 's|[^\\/]*$|'${DEPDIR-.deps}'/&|;s|\.\([^.]*\)$|.P\1|;s|Pobj$|Po|'`}
+tmpdepfile=${tmpdepfile-`echo "$depfile" | sed 's/\.\([^.]*\)$/.T\1/'`}
+
+rm -f "$tmpdepfile"
+
+# Avoid interferences from the environment.
+gccflag= dashmflag=
+
+# Some modes work just like other modes, but use different flags.  We
+# parameterize here, but still list the modes in the big case below,
+# to make depend.m4 easier to write.  Note that we *cannot* use a case
+# here, because this file can only contain one case statement.
+if test "$depmode" = hp; then
+  # HP compiler uses -M and no extra arg.
+  gccflag=-M
+  depmode=gcc
+fi
+
+if test "$depmode" = dashXmstdout; then
+  # This is just like dashmstdout with a different argument.
+  dashmflag=-xM
+  depmode=dashmstdout
+fi
+
+cygpath_u="cygpath -u -f -"
+if test "$depmode" = msvcmsys; then
+  # This is just like msvisualcpp but w/o cygpath translation.
+  # Just convert the backslash-escaped backslashes to single forward
+  # slashes to satisfy depend.m4
+  cygpath_u='sed s,\\\\,/,g'
+  depmode=msvisualcpp
+fi
+
+if test "$depmode" = msvc7msys; then
+  # This is just like msvc7 but w/o cygpath translation.
+  # Just convert the backslash-escaped backslashes to single forward
+  # slashes to satisfy depend.m4
+  cygpath_u='sed s,\\\\,/,g'
+  depmode=msvc7
+fi
+
+if test "$depmode" = xlc; then
+  # IBM C/C++ Compilers xlc/xlC can output gcc-like dependency information.
+  gccflag=-qmakedep=gcc,-MF
+  depmode=gcc
+fi
+
+case "$depmode" in
+gcc3)
+## gcc 3 implements dependency tracking that does exactly what
+## we want.  Yay!  Note: for some reason libtool 1.4 doesn't like
+## it if -MD -MP comes after the -MF stuff.  Hmm.
+## Unfortunately, FreeBSD c89 acceptance of flags depends upon
+## the command line argument order; so add the flags where they
+## appear in depend2.am.  Note that the slowdown incurred here
+## affects only configure: in makefiles, %FASTDEP% shortcuts this.
+  for arg
+  do
+    case $arg in
+    -c) set fnord "$@" -MT "$object" -MD -MP -MF "$tmpdepfile" "$arg" ;;
+    *)  set fnord "$@" "$arg" ;;
+    esac
+    shift # fnord
+    shift # $arg
+  done
+  "$@"
+  stat=$?
+  if test $stat -ne 0; then
+    rm -f "$tmpdepfile"
+    exit $stat
+  fi
+  mv "$tmpdepfile" "$depfile"
+  ;;
+
+gcc)
+## Note that this doesn't just cater to obsosete pre-3.x GCC compilers.
+## but also to in-use compilers like IMB xlc/xlC and the HP C compiler.
+## (see the conditional assignment to $gccflag above).
+## There are various ways to get dependency output from gcc.  Here's
+## why we pick this rather obscure method:
+## - Don't want to use -MD because we'd like the dependencies to end
+##   up in a subdir.  Having to rename by hand is ugly.
+##   (We might end up doing this anyway to support other compilers.)
+## - The DEPENDENCIES_OUTPUT environment variable makes gcc act like
+##   -MM, not -M (despite what the docs say).  Also, it might not be
+##   supported by the other compilers which use the 'gcc' depmode.
+## - Using -M directly means running the compiler twice (even worse
+##   than renaming).
+  if test -z "$gccflag"; then
+    gccflag=-MD,
+  fi
+  "$@" -Wp,"$gccflag$tmpdepfile"
+  stat=$?
+  if test $stat -ne 0; then
+    rm -f "$tmpdepfile"
+    exit $stat
+  fi
+  rm -f "$depfile"
+  echo "$object : \\" > "$depfile"
+  # The second -e expression handles DOS-style file names with drive
+  # letters.
+  sed -e 's/^[^:]*: / /' \
+      -e 's/^['$alpha']:\/[^:]*: / /' < "$tmpdepfile" >> "$depfile"
+## This next piece of magic avoids the "deleted header file" problem.
+## The problem is that when a header file which appears in a .P file
+## is deleted, the dependency causes make to die (because there is
+## typically no way to rebuild the header).  We avoid this by adding
+## dummy dependencies for each header file.  Too bad gcc doesn't do
+## this for us directly.
+## Some versions of gcc put a space before the ':'.  On the theory
+## that the space means something, we add a space to the output as
+## well.  hp depmode also adds that space, but also prefixes the VPATH
+## to the object.  Take care to not repeat it in the output.
+## Some versions of the HPUX 10.20 sed can't process this invocation
+## correctly.  Breaking it into two sed invocations is a workaround.
+  tr ' ' "$nl" < "$tmpdepfile" \
+    | sed -e 's/^\\$//' -e '/^$/d' -e "s|.*$object$||" -e '/:$/d' \
+    | sed -e 's/$/ :/' >> "$depfile"
+  rm -f "$tmpdepfile"
+  ;;
+
+hp)
+  # This case exists only to let depend.m4 do its work.  It works by
+  # looking at the text of this script.  This case will never be run,
+  # since it is checked for above.
+  exit 1
+  ;;
+
+sgi)
+  if test "$libtool" = yes; then
+    "$@" "-Wp,-MDupdate,$tmpdepfile"
+  else
+    "$@" -MDupdate "$tmpdepfile"
+  fi
+  stat=$?
+  if test $stat -ne 0; then
+    rm -f "$tmpdepfile"
+    exit $stat
+  fi
+  rm -f "$depfile"
+
+  if test -f "$tmpdepfile"; then  # yes, the sourcefile depend on other files
+    echo "$object : \\" > "$depfile"
+    # Clip off the initial element (the dependent).  Don't try to be
+    # clever and replace this with sed code, as IRIX sed won't handle
+    # lines with more than a fixed number of characters (4096 in
+    # IRIX 6.2 sed, 8192 in IRIX 6.5).  We also remove comment lines;
+    # the IRIX cc adds comments like '#:fec' to the end of the
+    # dependency line.
+    tr ' ' "$nl" < "$tmpdepfile" \
+      | sed -e 's/^.*\.o://' -e 's/#.*$//' -e '/^$/ d' \
+      | tr "$nl" ' ' >> "$depfile"
+    echo >> "$depfile"
+    # The second pass generates a dummy entry for each header file.
+    tr ' ' "$nl" < "$tmpdepfile" \
+      | sed -e 's/^.*\.o://' -e 's/#.*$//' -e '/^$/ d' -e 's/$/:/' \
+      >> "$depfile"
+  else
+    make_dummy_depfile
+  fi
+  rm -f "$tmpdepfile"
+  ;;
+
+xlc)
+  # This case exists only to let depend.m4 do its work.  It works by
+  # looking at the text of this script.  This case will never be run,
+  # since it is checked for above.
+  exit 1
+  ;;
+
+aix)
+  # The C for AIX Compiler uses -M and outputs the dependencies
+  # in a .u file.  In older versions, this file always lives in the
+  # current directory.  Also, the AIX compiler puts '$object:' at the
+  # start of each line; $object doesn't have directory information.
+  # Version 6 uses the directory in both cases.
+  set_dir_from "$object"
+  set_base_from "$object"
+  if test "$libtool" = yes; then
+    tmpdepfile1=$dir$base.u
+    tmpdepfile2=$base.u
+    tmpdepfile3=$dir.libs/$base.u
+    "$@" -Wc,-M
+  else
+    tmpdepfile1=$dir$base.u
+    tmpdepfile2=$dir$base.u
+    tmpdepfile3=$dir$base.u
+    "$@" -M
+  fi
+  stat=$?
+  if test $stat -ne 0; then
+    rm -f "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3"
+    exit $stat
+  fi
+
+  for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3"
+  do
+    test -f "$tmpdepfile" && break
+  done
+  aix_post_process_depfile
+  ;;
+
+tcc)
+  # tcc (Tiny C Compiler) understand '-MD -MF file' since version 0.9.26
+  # FIXME: That version still under development at the moment of writing.
+  #        Make that this statement remains true also for stable, released
+  #        versions.
+  # It will wrap lines (doesn't matter whether long or short) with a
+  # trailing '\', as in:
+  #
+  #   foo.o : \
+  #    foo.c \
+  #    foo.h \
+  #
+  # It will put a trailing '\' even on the last line, and will use leading
+  # spaces rather than leading tabs (at least since its commit 0394caf7
+  # "Emit spaces for -MD").
+  "$@" -MD -MF "$tmpdepfile"
+  stat=$?
+  if test $stat -ne 0; then
+    rm -f "$tmpdepfile"
+    exit $stat
+  fi
+  rm -f "$depfile"
+  # Each non-empty line is of the form 'foo.o : \' or ' dep.h \'.
+  # We have to change lines of the first kind to '$object: \'.
+  sed -e "s|.*:|$object :|" < "$tmpdepfile" > "$depfile"
+  # And for each line of the second kind, we have to emit a 'dep.h:'
+  # dummy dependency, to avoid the deleted-header problem.
+  sed -n -e 's|^  *\(.*\) *\\$|\1:|p' < "$tmpdepfile" >> "$depfile"
+  rm -f "$tmpdepfile"
+  ;;
+
+## The order of this option in the case statement is important, since the
+## shell code in configure will try each of these formats in the order
+## listed in this file.  A plain '-MD' option would be understood by many
+## compilers, so we must ensure this comes after the gcc and icc options.
+pgcc)
+  # Portland's C compiler understands '-MD'.
+  # Will always output deps to 'file.d' where file is the root name of the
+  # source file under compilation, even if file resides in a subdirectory.
+  # The object file name does not affect the name of the '.d' file.
+  # pgcc 10.2 will output
+  #    foo.o: sub/foo.c sub/foo.h
+  # and will wrap long lines using '\' :
+  #    foo.o: sub/foo.c ... \
+  #     sub/foo.h ... \
+  #     ...
+  set_dir_from "$object"
+  # Use the source, not the object, to determine the base name, since
+  # that's sadly what pgcc will do too.
+  set_base_from "$source"
+  tmpdepfile=$base.d
+
+  # For projects that build the same source file twice into different object
+  # files, the pgcc approach of using the *source* file root name can cause
+  # problems in parallel builds.  Use a locking strategy to avoid stomping on
+  # the same $tmpdepfile.
+  lockdir=$base.d-lock
+  trap "
+    echo '$0: caught signal, cleaning up...' >&2
+    rmdir '$lockdir'
+    exit 1
+  " 1 2 13 15
+  numtries=100
+  i=$numtries
+  while test $i -gt 0; do
+    # mkdir is a portable test-and-set.
+    if mkdir "$lockdir" 2>/dev/null; then
+      # This process acquired the lock.
+      "$@" -MD
+      stat=$?
+      # Release the lock.
+      rmdir "$lockdir"
+      break
+    else
+      # If the lock is being held by a different process, wait
+      # until the winning process is done or we timeout.
+      while test -d "$lockdir" && test $i -gt 0; do
+        sleep 1
+        i=`expr $i - 1`
+      done
+    fi
+    i=`expr $i - 1`
+  done
+  trap - 1 2 13 15
+  if test $i -le 0; then
+    echo "$0: failed to acquire lock after $numtries attempts" >&2
+    echo "$0: check lockdir '$lockdir'" >&2
+    exit 1
+  fi
+
+  if test $stat -ne 0; then
+    rm -f "$tmpdepfile"
+    exit $stat
+  fi
+  rm -f "$depfile"
+  # Each line is of the form `foo.o: dependent.h',
+  # or `foo.o: dep1.h dep2.h \', or ` dep3.h dep4.h \'.
+  # Do two passes, one to just change these to
+  # `$object: dependent.h' and one to simply `dependent.h:'.
+  sed "s,^[^:]*:,$object :," < "$tmpdepfile" > "$depfile"
+  # Some versions of the HPUX 10.20 sed can't process this invocation
+  # correctly.  Breaking it into two sed invocations is a workaround.
+  sed 's,^[^:]*: \(.*\)$,\1,;s/^\\$//;/^$/d;/:$/d' < "$tmpdepfile" \
+    | sed -e 's/$/ :/' >> "$depfile"
+  rm -f "$tmpdepfile"
+  ;;
+
+hp2)
+  # The "hp" stanza above does not work with aCC (C++) and HP's ia64
+  # compilers, which have integrated preprocessors.  The correct option
+  # to use with these is +Maked; it writes dependencies to a file named
+  # 'foo.d', which lands next to the object file, wherever that
+  # happens to be.
+  # Much of this is similar to the tru64 case; see comments there.
+  set_dir_from  "$object"
+  set_base_from "$object"
+  if test "$libtool" = yes; then
+    tmpdepfile1=$dir$base.d
+    tmpdepfile2=$dir.libs/$base.d
+    "$@" -Wc,+Maked
+  else
+    tmpdepfile1=$dir$base.d
+    tmpdepfile2=$dir$base.d
+    "$@" +Maked
+  fi
+  stat=$?
+  if test $stat -ne 0; then
+     rm -f "$tmpdepfile1" "$tmpdepfile2"
+     exit $stat
+  fi
+
+  for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2"
+  do
+    test -f "$tmpdepfile" && break
+  done
+  if test -f "$tmpdepfile"; then
+    sed -e "s,^.*\.[$lower]*:,$object:," "$tmpdepfile" > "$depfile"
+    # Add 'dependent.h:' lines.
+    sed -ne '2,${
+               s/^ *//
+               s/ \\*$//
+               s/$/:/
+               p
+             }' "$tmpdepfile" >> "$depfile"
+  else
+    make_dummy_depfile
+  fi
+  rm -f "$tmpdepfile" "$tmpdepfile2"
+  ;;
+
+tru64)
+  # The Tru64 compiler uses -MD to generate dependencies as a side
+  # effect.  'cc -MD -o foo.o ...' puts the dependencies into 'foo.o.d'.
+  # At least on Alpha/Redhat 6.1, Compaq CCC V6.2-504 seems to put
+  # dependencies in 'foo.d' instead, so we check for that too.
+  # Subdirectories are respected.
+  set_dir_from  "$object"
+  set_base_from "$object"
+
+  if test "$libtool" = yes; then
+    # Libtool generates 2 separate objects for the 2 libraries.  These
+    # two compilations output dependencies in $dir.libs/$base.o.d and
+    # in $dir$base.o.d.  We have to check for both files, because
+    # one of the two compilations can be disabled.  We should prefer
+    # $dir$base.o.d over $dir.libs/$base.o.d because the latter is
+    # automatically cleaned when .libs/ is deleted, while ignoring
+    # the former would cause a distcleancheck panic.
+    tmpdepfile1=$dir$base.o.d          # libtool 1.5
+    tmpdepfile2=$dir.libs/$base.o.d    # Likewise.
+    tmpdepfile3=$dir.libs/$base.d      # Compaq CCC V6.2-504
+    "$@" -Wc,-MD
+  else
+    tmpdepfile1=$dir$base.d
+    tmpdepfile2=$dir$base.d
+    tmpdepfile3=$dir$base.d
+    "$@" -MD
+  fi
+
+  stat=$?
+  if test $stat -ne 0; then
+    rm -f "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3"
+    exit $stat
+  fi
+
+  for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3"
+  do
+    test -f "$tmpdepfile" && break
+  done
+  # Same post-processing that is required for AIX mode.
+  aix_post_process_depfile
+  ;;
+
+msvc7)
+  if test "$libtool" = yes; then
+    showIncludes=-Wc,-showIncludes
+  else
+    showIncludes=-showIncludes
+  fi
+  "$@" $showIncludes > "$tmpdepfile"
+  stat=$?
+  grep -v '^Note: including file: ' "$tmpdepfile"
+  if test $stat -ne 0; then
+    rm -f "$tmpdepfile"
+    exit $stat
+  fi
+  rm -f "$depfile"
+  echo "$object : \\" > "$depfile"
+  # The first sed program below extracts the file names and escapes
+  # backslashes for cygpath.  The second sed program outputs the file
+  # name when reading, but also accumulates all include files in the
+  # hold buffer in order to output them again at the end.  This only
+  # works with sed implementations that can handle large buffers.
+  sed < "$tmpdepfile" -n '
+/^Note: including file:  *\(.*\)/ {
+  s//\1/
+  s/\\/\\\\/g
+  p
+}' | $cygpath_u | sort -u | sed -n '
+s/ /\\ /g
+s/\(.*\)/'"$tab"'\1 \\/p
+s/.\(.*\) \\/\1:/
+H
+$ {
+  s/.*/'"$tab"'/
+  G
+  p
+}' >> "$depfile"
+  echo >> "$depfile" # make sure the fragment doesn't end with a backslash
+  rm -f "$tmpdepfile"
+  ;;
+
+msvc7msys)
+  # This case exists only to let depend.m4 do its work.  It works by
+  # looking at the text of this script.  This case will never be run,
+  # since it is checked for above.
+  exit 1
+  ;;
+
+#nosideeffect)
+  # This comment above is used by automake to tell side-effect
+  # dependency tracking mechanisms from slower ones.
+
+dashmstdout)
+  # Important note: in order to support this mode, a compiler *must*
+  # always write the preprocessed file to stdout, regardless of -o.
+  "$@" || exit $?
+
+  # Remove the call to Libtool.
+  if test "$libtool" = yes; then
+    while test "X$1" != 'X--mode=compile'; do
+      shift
+    done
+    shift
+  fi
+
+  # Remove '-o $object'.
+  IFS=" "
+  for arg
+  do
+    case $arg in
+    -o)
+      shift
+      ;;
+    $object)
+      shift
+      ;;
+    *)
+      set fnord "$@" "$arg"
+      shift # fnord
+      shift # $arg
+      ;;
+    esac
+  done
+
+  test -z "$dashmflag" && dashmflag=-M
+  # Require at least two characters before searching for ':'
+  # in the target name.  This is to cope with DOS-style filenames:
+  # a dependency such as 'c:/foo/bar' could be seen as target 'c' otherwise.
+  "$@" $dashmflag |
+    sed "s|^[$tab ]*[^:$tab ][^:][^:]*:[$tab ]*|$object: |" > "$tmpdepfile"
+  rm -f "$depfile"
+  cat < "$tmpdepfile" > "$depfile"
+  # Some versions of the HPUX 10.20 sed can't process this sed invocation
+  # correctly.  Breaking it into two sed invocations is a workaround.
+  tr ' ' "$nl" < "$tmpdepfile" \
+    | sed -e 's/^\\$//' -e '/^$/d' -e '/:$/d' \
+    | sed -e 's/$/ :/' >> "$depfile"
+  rm -f "$tmpdepfile"
+  ;;
+
+dashXmstdout)
+  # This case only exists to satisfy depend.m4.  It is never actually
+  # run, as this mode is specially recognized in the preamble.
+  exit 1
+  ;;
+
+makedepend)
+  "$@" || exit $?
+  # Remove any Libtool call
+  if test "$libtool" = yes; then
+    while test "X$1" != 'X--mode=compile'; do
+      shift
+    done
+    shift
+  fi
+  # X makedepend
+  shift
+  cleared=no eat=no
+  for arg
+  do
+    case $cleared in
+    no)
+      set ""; shift
+      cleared=yes ;;
+    esac
+    if test $eat = yes; then
+      eat=no
+      continue
+    fi
+    case "$arg" in
+    -D*|-I*)
+      set fnord "$@" "$arg"; shift ;;
+    # Strip any option that makedepend may not understand.  Remove
+    # the object too, otherwise makedepend will parse it as a source file.
+    -arch)
+      eat=yes ;;
+    -*|$object)
+      ;;
+    *)
+      set fnord "$@" "$arg"; shift ;;
+    esac
+  done
+  obj_suffix=`echo "$object" | sed 's/^.*\././'`
+  touch "$tmpdepfile"
+  ${MAKEDEPEND-makedepend} -o"$obj_suffix" -f"$tmpdepfile" "$@"
+  rm -f "$depfile"
+  # makedepend may prepend the VPATH from the source file name to the object.
+  # No need to regex-escape $object, excess matching of '.' is harmless.
+  sed "s|^.*\($object *:\)|\1|" "$tmpdepfile" > "$depfile"
+  # Some versions of the HPUX 10.20 sed can't process the last invocation
+  # correctly.  Breaking it into two sed invocations is a workaround.
+  sed '1,2d' "$tmpdepfile" \
+    | tr ' ' "$nl" \
+    | sed -e 's/^\\$//' -e '/^$/d' -e '/:$/d' \
+    | sed -e 's/$/ :/' >> "$depfile"
+  rm -f "$tmpdepfile" "$tmpdepfile".bak
+  ;;
+
+cpp)
+  # Important note: in order to support this mode, a compiler *must*
+  # always write the preprocessed file to stdout.
+  "$@" || exit $?
+
+  # Remove the call to Libtool.
+  if test "$libtool" = yes; then
+    while test "X$1" != 'X--mode=compile'; do
+      shift
+    done
+    shift
+  fi
+
+  # Remove '-o $object'.
+  IFS=" "
+  for arg
+  do
+    case $arg in
+    -o)
+      shift
+      ;;
+    $object)
+      shift
+      ;;
+    *)
+      set fnord "$@" "$arg"
+      shift # fnord
+      shift # $arg
+      ;;
+    esac
+  done
+
+  "$@" -E \
+    | sed -n -e '/^# [0-9][0-9]* "\([^"]*\)".*/ s:: \1 \\:p' \
+             -e '/^#line [0-9][0-9]* "\([^"]*\)".*/ s:: \1 \\:p' \
+    | sed '$ s: \\$::' > "$tmpdepfile"
+  rm -f "$depfile"
+  echo "$object : \\" > "$depfile"
+  cat < "$tmpdepfile" >> "$depfile"
+  sed < "$tmpdepfile" '/^$/d;s/^ //;s/ \\$//;s/$/ :/' >> "$depfile"
+  rm -f "$tmpdepfile"
+  ;;
+
+msvisualcpp)
+  # Important note: in order to support this mode, a compiler *must*
+  # always write the preprocessed file to stdout.
+  "$@" || exit $?
+
+  # Remove the call to Libtool.
+  if test "$libtool" = yes; then
+    while test "X$1" != 'X--mode=compile'; do
+      shift
+    done
+    shift
+  fi
+
+  IFS=" "
+  for arg
+  do
+    case "$arg" in
+    -o)
+      shift
+      ;;
+    $object)
+      shift
+      ;;
+    "-Gm"|"/Gm"|"-Gi"|"/Gi"|"-ZI"|"/ZI")
+        set fnord "$@"
+        shift
+        shift
+        ;;
+    *)
+        set fnord "$@" "$arg"
+        shift
+        shift
+        ;;
+    esac
+  done
+  "$@" -E 2>/dev/null |
+  sed -n '/^#line [0-9][0-9]* "\([^"]*\)"/ s::\1:p' | $cygpath_u | sort -u > "$tmpdepfile"
+  rm -f "$depfile"
+  echo "$object : \\" > "$depfile"
+  sed < "$tmpdepfile" -n -e 's% %\\ %g' -e '/^\(.*\)$/ s::'"$tab"'\1 \\:p' >> "$depfile"
+  echo "$tab" >> "$depfile"
+  sed < "$tmpdepfile" -n -e 's% %\\ %g' -e '/^\(.*\)$/ s::\1\::p' >> "$depfile"
+  rm -f "$tmpdepfile"
+  ;;
+
+msvcmsys)
+  # This case exists only to let depend.m4 do its work.  It works by
+  # looking at the text of this script.  This case will never be run,
+  # since it is checked for above.
+  exit 1
+  ;;
+
+none)
+  exec "$@"
+  ;;
+
+*)
+  echo "Unknown depmode $depmode" 1>&2
+  exit 1
+  ;;
+esac
+
+exit 0
+
+# Local Variables:
+# mode: shell-script
+# sh-indentation: 2
+# eval: (add-hook 'write-file-hooks 'time-stamp)
+# time-stamp-start: "scriptversion="
+# time-stamp-format: "%:y-%02m-%02d.%02H"
+# time-stamp-time-zone: "UTC0"
+# time-stamp-end: "; # UTC"
+# End:
diff --git a/build-aux/install-sh b/build-aux/install-sh
new file mode 100755 (executable)
index 0000000..8175c64
--- /dev/null
@@ -0,0 +1,518 @@
+#!/bin/sh
+# install - install a program, script, or datafile
+
+scriptversion=2018-03-11.20; # UTC
+
+# This originates from X11R5 (mit/util/scripts/install.sh), which was
+# later released in X11R6 (xc/config/util/install.sh) with the
+# following copyright and license.
+#
+# Copyright (C) 1994 X Consortium
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to
+# deal in the Software without restriction, including without limitation the
+# rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
+# sell copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+# AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNEC-
+# TION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#
+# Except as contained in this notice, the name of the X Consortium shall not
+# be used in advertising or otherwise to promote the sale, use or other deal-
+# ings in this Software without prior written authorization from the X Consor-
+# tium.
+#
+#
+# FSF changes to this file are in the public domain.
+#
+# Calling this script install-sh is preferred over install.sh, to prevent
+# 'make' implicit rules from creating a file called install from it
+# when there is no Makefile.
+#
+# This script is compatible with the BSD install script, but was written
+# from scratch.
+
+tab='  '
+nl='
+'
+IFS=" $tab$nl"
+
+# Set DOITPROG to "echo" to test this script.
+
+doit=${DOITPROG-}
+doit_exec=${doit:-exec}
+
+# Put in absolute file names if you don't have them in your path;
+# or use environment vars.
+
+chgrpprog=${CHGRPPROG-chgrp}
+chmodprog=${CHMODPROG-chmod}
+chownprog=${CHOWNPROG-chown}
+cmpprog=${CMPPROG-cmp}
+cpprog=${CPPROG-cp}
+mkdirprog=${MKDIRPROG-mkdir}
+mvprog=${MVPROG-mv}
+rmprog=${RMPROG-rm}
+stripprog=${STRIPPROG-strip}
+
+posix_mkdir=
+
+# Desired mode of installed file.
+mode=0755
+
+chgrpcmd=
+chmodcmd=$chmodprog
+chowncmd=
+mvcmd=$mvprog
+rmcmd="$rmprog -f"
+stripcmd=
+
+src=
+dst=
+dir_arg=
+dst_arg=
+
+copy_on_change=false
+is_target_a_directory=possibly
+
+usage="\
+Usage: $0 [OPTION]... [-T] SRCFILE DSTFILE
+   or: $0 [OPTION]... SRCFILES... DIRECTORY
+   or: $0 [OPTION]... -t DIRECTORY SRCFILES...
+   or: $0 [OPTION]... -d DIRECTORIES...
+
+In the 1st form, copy SRCFILE to DSTFILE.
+In the 2nd and 3rd, copy all SRCFILES to DIRECTORY.
+In the 4th, create DIRECTORIES.
+
+Options:
+     --help     display this help and exit.
+     --version  display version info and exit.
+
+  -c            (ignored)
+  -C            install only if different (preserve the last data modification time)
+  -d            create directories instead of installing files.
+  -g GROUP      $chgrpprog installed files to GROUP.
+  -m MODE       $chmodprog installed files to MODE.
+  -o USER       $chownprog installed files to USER.
+  -s            $stripprog installed files.
+  -t DIRECTORY  install into DIRECTORY.
+  -T            report an error if DSTFILE is a directory.
+
+Environment variables override the default commands:
+  CHGRPPROG CHMODPROG CHOWNPROG CMPPROG CPPROG MKDIRPROG MVPROG
+  RMPROG STRIPPROG
+"
+
+while test $# -ne 0; do
+  case $1 in
+    -c) ;;
+
+    -C) copy_on_change=true;;
+
+    -d) dir_arg=true;;
+
+    -g) chgrpcmd="$chgrpprog $2"
+        shift;;
+
+    --help) echo "$usage"; exit $?;;
+
+    -m) mode=$2
+        case $mode in
+          *' '* | *"$tab"* | *"$nl"* | *'*'* | *'?'* | *'['*)
+            echo "$0: invalid mode: $mode" >&2
+            exit 1;;
+        esac
+        shift;;
+
+    -o) chowncmd="$chownprog $2"
+        shift;;
+
+    -s) stripcmd=$stripprog;;
+
+    -t)
+        is_target_a_directory=always
+        dst_arg=$2
+        # Protect names problematic for 'test' and other utilities.
+        case $dst_arg in
+          -* | [=\(\)!]) dst_arg=./$dst_arg;;
+        esac
+        shift;;
+
+    -T) is_target_a_directory=never;;
+
+    --version) echo "$0 $scriptversion"; exit $?;;
+
+    --) shift
+        break;;
+
+    -*) echo "$0: invalid option: $1" >&2
+        exit 1;;
+
+    *)  break;;
+  esac
+  shift
+done
+
+# We allow the use of options -d and -T together, by making -d
+# take the precedence; this is for compatibility with GNU install.
+
+if test -n "$dir_arg"; then
+  if test -n "$dst_arg"; then
+    echo "$0: target directory not allowed when installing a directory." >&2
+    exit 1
+  fi
+fi
+
+if test $# -ne 0 && test -z "$dir_arg$dst_arg"; then
+  # When -d is used, all remaining arguments are directories to create.
+  # When -t is used, the destination is already specified.
+  # Otherwise, the last argument is the destination.  Remove it from $@.
+  for arg
+  do
+    if test -n "$dst_arg"; then
+      # $@ is not empty: it contains at least $arg.
+      set fnord "$@" "$dst_arg"
+      shift # fnord
+    fi
+    shift # arg
+    dst_arg=$arg
+    # Protect names problematic for 'test' and other utilities.
+    case $dst_arg in
+      -* | [=\(\)!]) dst_arg=./$dst_arg;;
+    esac
+  done
+fi
+
+if test $# -eq 0; then
+  if test -z "$dir_arg"; then
+    echo "$0: no input file specified." >&2
+    exit 1
+  fi
+  # It's OK to call 'install-sh -d' without argument.
+  # This can happen when creating conditional directories.
+  exit 0
+fi
+
+if test -z "$dir_arg"; then
+  if test $# -gt 1 || test "$is_target_a_directory" = always; then
+    if test ! -d "$dst_arg"; then
+      echo "$0: $dst_arg: Is not a directory." >&2
+      exit 1
+    fi
+  fi
+fi
+
+if test -z "$dir_arg"; then
+  do_exit='(exit $ret); exit $ret'
+  trap "ret=129; $do_exit" 1
+  trap "ret=130; $do_exit" 2
+  trap "ret=141; $do_exit" 13
+  trap "ret=143; $do_exit" 15
+
+  # Set umask so as not to create temps with too-generous modes.
+  # However, 'strip' requires both read and write access to temps.
+  case $mode in
+    # Optimize common cases.
+    *644) cp_umask=133;;
+    *755) cp_umask=22;;
+
+    *[0-7])
+      if test -z "$stripcmd"; then
+        u_plus_rw=
+      else
+        u_plus_rw='% 200'
+      fi
+      cp_umask=`expr '(' 777 - $mode % 1000 ')' $u_plus_rw`;;
+    *)
+      if test -z "$stripcmd"; then
+        u_plus_rw=
+      else
+        u_plus_rw=,u+rw
+      fi
+      cp_umask=$mode$u_plus_rw;;
+  esac
+fi
+
+for src
+do
+  # Protect names problematic for 'test' and other utilities.
+  case $src in
+    -* | [=\(\)!]) src=./$src;;
+  esac
+
+  if test -n "$dir_arg"; then
+    dst=$src
+    dstdir=$dst
+    test -d "$dstdir"
+    dstdir_status=$?
+  else
+
+    # Waiting for this to be detected by the "$cpprog $src $dsttmp" command
+    # might cause directories to be created, which would be especially bad
+    # if $src (and thus $dsttmp) contains '*'.
+    if test ! -f "$src" && test ! -d "$src"; then
+      echo "$0: $src does not exist." >&2
+      exit 1
+    fi
+
+    if test -z "$dst_arg"; then
+      echo "$0: no destination specified." >&2
+      exit 1
+    fi
+    dst=$dst_arg
+
+    # If destination is a directory, append the input filename.
+    if test -d "$dst"; then
+      if test "$is_target_a_directory" = never; then
+        echo "$0: $dst_arg: Is a directory" >&2
+        exit 1
+      fi
+      dstdir=$dst
+      dstbase=`basename "$src"`
+      case $dst in
+       */) dst=$dst$dstbase;;
+       *)  dst=$dst/$dstbase;;
+      esac
+      dstdir_status=0
+    else
+      dstdir=`dirname "$dst"`
+      test -d "$dstdir"
+      dstdir_status=$?
+    fi
+  fi
+
+  case $dstdir in
+    */) dstdirslash=$dstdir;;
+    *)  dstdirslash=$dstdir/;;
+  esac
+
+  obsolete_mkdir_used=false
+
+  if test $dstdir_status != 0; then
+    case $posix_mkdir in
+      '')
+        # Create intermediate dirs using mode 755 as modified by the umask.
+        # This is like FreeBSD 'install' as of 1997-10-28.
+        umask=`umask`
+        case $stripcmd.$umask in
+          # Optimize common cases.
+          *[2367][2367]) mkdir_umask=$umask;;
+          .*0[02][02] | .[02][02] | .[02]) mkdir_umask=22;;
+
+          *[0-7])
+            mkdir_umask=`expr $umask + 22 \
+              - $umask % 100 % 40 + $umask % 20 \
+              - $umask % 10 % 4 + $umask % 2
+            `;;
+          *) mkdir_umask=$umask,go-w;;
+        esac
+
+        # With -d, create the new directory with the user-specified mode.
+        # Otherwise, rely on $mkdir_umask.
+        if test -n "$dir_arg"; then
+          mkdir_mode=-m$mode
+        else
+          mkdir_mode=
+        fi
+
+        posix_mkdir=false
+        case $umask in
+          *[123567][0-7][0-7])
+            # POSIX mkdir -p sets u+wx bits regardless of umask, which
+            # is incompatible with FreeBSD 'install' when (umask & 300) != 0.
+            ;;
+          *)
+            # Note that $RANDOM variable is not portable (e.g. dash);  Use it
+            # here however when possible just to lower collision chance.
+            tmpdir=${TMPDIR-/tmp}/ins$RANDOM-$$
+
+            trap 'ret=$?; rmdir "$tmpdir/a/b" "$tmpdir/a" "$tmpdir" 2>/dev/null; exit $ret' 0
+
+            # Because "mkdir -p" follows existing symlinks and we likely work
+            # directly in world-writeable /tmp, make sure that the '$tmpdir'
+            # directory is successfully created first before we actually test
+            # 'mkdir -p' feature.
+            if (umask $mkdir_umask &&
+                $mkdirprog $mkdir_mode "$tmpdir" &&
+                exec $mkdirprog $mkdir_mode -p -- "$tmpdir/a/b") >/dev/null 2>&1
+            then
+              if test -z "$dir_arg" || {
+                   # Check for POSIX incompatibilities with -m.
+                   # HP-UX 11.23 and IRIX 6.5 mkdir -m -p sets group- or
+                   # other-writable bit of parent directory when it shouldn't.
+                   # FreeBSD 6.1 mkdir -m -p sets mode of existing directory.
+                   test_tmpdir="$tmpdir/a"
+                   ls_ld_tmpdir=`ls -ld "$test_tmpdir"`
+                   case $ls_ld_tmpdir in
+                     d????-?r-*) different_mode=700;;
+                     d????-?--*) different_mode=755;;
+                     *) false;;
+                   esac &&
+                   $mkdirprog -m$different_mode -p -- "$test_tmpdir" && {
+                     ls_ld_tmpdir_1=`ls -ld "$test_tmpdir"`
+                     test "$ls_ld_tmpdir" = "$ls_ld_tmpdir_1"
+                   }
+                 }
+              then posix_mkdir=:
+              fi
+              rmdir "$tmpdir/a/b" "$tmpdir/a" "$tmpdir"
+            else
+              # Remove any dirs left behind by ancient mkdir implementations.
+              rmdir ./$mkdir_mode ./-p ./-- "$tmpdir" 2>/dev/null
+            fi
+            trap '' 0;;
+        esac;;
+    esac
+
+    if
+      $posix_mkdir && (
+        umask $mkdir_umask &&
+        $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir"
+      )
+    then :
+    else
+
+      # The umask is ridiculous, or mkdir does not conform to POSIX,
+      # or it failed possibly due to a race condition.  Create the
+      # directory the slow way, step by step, checking for races as we go.
+
+      case $dstdir in
+        /*) prefix='/';;
+        [-=\(\)!]*) prefix='./';;
+        *)  prefix='';;
+      esac
+
+      oIFS=$IFS
+      IFS=/
+      set -f
+      set fnord $dstdir
+      shift
+      set +f
+      IFS=$oIFS
+
+      prefixes=
+
+      for d
+      do
+        test X"$d" = X && continue
+
+        prefix=$prefix$d
+        if test -d "$prefix"; then
+          prefixes=
+        else
+          if $posix_mkdir; then
+            (umask=$mkdir_umask &&
+             $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir") && break
+            # Don't fail if two instances are running concurrently.
+            test -d "$prefix" || exit 1
+          else
+            case $prefix in
+              *\'*) qprefix=`echo "$prefix" | sed "s/'/'\\\\\\\\''/g"`;;
+              *) qprefix=$prefix;;
+            esac
+            prefixes="$prefixes '$qprefix'"
+          fi
+        fi
+        prefix=$prefix/
+      done
+
+      if test -n "$prefixes"; then
+        # Don't fail if two instances are running concurrently.
+        (umask $mkdir_umask &&
+         eval "\$doit_exec \$mkdirprog $prefixes") ||
+          test -d "$dstdir" || exit 1
+        obsolete_mkdir_used=true
+      fi
+    fi
+  fi
+
+  if test -n "$dir_arg"; then
+    { test -z "$chowncmd" || $doit $chowncmd "$dst"; } &&
+    { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } &&
+    { test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false ||
+      test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1
+  else
+
+    # Make a couple of temp file names in the proper directory.
+    dsttmp=${dstdirslash}_inst.$$_
+    rmtmp=${dstdirslash}_rm.$$_
+
+    # Trap to clean up those temp files at exit.
+    trap 'ret=$?; rm -f "$dsttmp" "$rmtmp" && exit $ret' 0
+
+    # Copy the file name to the temp name.
+    (umask $cp_umask && $doit_exec $cpprog "$src" "$dsttmp") &&
+
+    # and set any options; do chmod last to preserve setuid bits.
+    #
+    # If any of these fail, we abort the whole thing.  If we want to
+    # ignore errors from any of these, just make sure not to ignore
+    # errors from the above "$doit $cpprog $src $dsttmp" command.
+    #
+    { test -z "$chowncmd" || $doit $chowncmd "$dsttmp"; } &&
+    { test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } &&
+    { test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } &&
+    { test -z "$chmodcmd" || $doit $chmodcmd $mode "$dsttmp"; } &&
+
+    # If -C, don't bother to copy if it wouldn't change the file.
+    if $copy_on_change &&
+       old=`LC_ALL=C ls -dlL "$dst"     2>/dev/null` &&
+       new=`LC_ALL=C ls -dlL "$dsttmp"  2>/dev/null` &&
+       set -f &&
+       set X $old && old=:$2:$4:$5:$6 &&
+       set X $new && new=:$2:$4:$5:$6 &&
+       set +f &&
+       test "$old" = "$new" &&
+       $cmpprog "$dst" "$dsttmp" >/dev/null 2>&1
+    then
+      rm -f "$dsttmp"
+    else
+      # Rename the file to the real destination.
+      $doit $mvcmd -f "$dsttmp" "$dst" 2>/dev/null ||
+
+      # The rename failed, perhaps because mv can't rename something else
+      # to itself, or perhaps because mv is so ancient that it does not
+      # support -f.
+      {
+        # Now remove or move aside any old file at destination location.
+        # We try this two ways since rm can't unlink itself on some
+        # systems and the destination file might be busy for other
+        # reasons.  In this case, the final cleanup might fail but the new
+        # file should still install successfully.
+        {
+          test ! -f "$dst" ||
+          $doit $rmcmd -f "$dst" 2>/dev/null ||
+          { $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null &&
+            { $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; }
+          } ||
+          { echo "$0: cannot unlink or rename $dst" >&2
+            (exit 1); exit 1
+          }
+        } &&
+
+        # Now rename the file to the real destination.
+        $doit $mvcmd "$dsttmp" "$dst"
+      }
+    fi || exit 1
+
+    trap '' 0
+  fi
+done
+
+# Local variables:
+# eval: (add-hook 'before-save-hook 'time-stamp)
+# time-stamp-start: "scriptversion="
+# time-stamp-format: "%:y-%02m-%02d.%02H"
+# time-stamp-time-zone: "UTC0"
+# time-stamp-end: "; # UTC"
+# End:
diff --git a/build-aux/ltmain.sh b/build-aux/ltmain.sh
new file mode 100644 (file)
index 0000000..1d0185a
--- /dev/null
@@ -0,0 +1,11149 @@
+#! /bin/sh
+## DO NOT EDIT - This file generated from ./build-aux/ltmain.in
+##               by inline-source v2014-01-03.01
+
+# libtool (GNU libtool) 2.4.6
+# Provide generalized library-building support services.
+# Written by Gordon Matzigkeit <gord@gnu.ai.mit.edu>, 1996
+
+# Copyright (C) 1996-2015 Free Software Foundation, Inc.
+# This is free software; see the source for copying conditions.  There is NO
+# warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+# GNU Libtool is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# As a special exception to the GNU General Public License,
+# if you distribute this file as part of a program or library that
+# is built using GNU Libtool, you may include this file under the
+# same distribution terms that you use for the rest of that program.
+#
+# GNU Libtool is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+
+PROGRAM=libtool
+PACKAGE=libtool
+VERSION=2.4.6
+package_revision=2.4.6
+
+
+## ------ ##
+## Usage. ##
+## ------ ##
+
+# Run './libtool --help' for help with using this script from the
+# command line.
+
+
+## ------------------------------- ##
+## User overridable command paths. ##
+## ------------------------------- ##
+
+# After configure completes, it has a better idea of some of the
+# shell tools we need than the defaults used by the functions shared
+# with bootstrap, so set those here where they can still be over-
+# ridden by the user, but otherwise take precedence.
+
+: ${AUTOCONF="autoconf"}
+: ${AUTOMAKE="automake"}
+
+
+## -------------------------- ##
+## Source external libraries. ##
+## -------------------------- ##
+
+# Much of our low-level functionality needs to be sourced from external
+# libraries, which are installed to $pkgauxdir.
+
+# Set a version string for this script.
+scriptversion=2015-01-20.17; # UTC
+
+# General shell script boiler plate, and helper functions.
+# Written by Gary V. Vaughan, 2004
+
+# Copyright (C) 2004-2015 Free Software Foundation, Inc.
+# This is free software; see the source for copying conditions.  There is NO
+# warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+
+# As a special exception to the GNU General Public License, if you distribute
+# this file as part of a program or library that is built using GNU Libtool,
+# you may include this file under the same distribution terms that you use
+# for the rest of that program.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNES FOR A PARTICULAR PURPOSE. See the GNU
+# General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+# Please report bugs or propose patches to gary@gnu.org.
+
+
+## ------ ##
+## Usage. ##
+## ------ ##
+
+# Evaluate this file near the top of your script to gain access to
+# the functions and variables defined here:
+#
+#   . `echo "$0" | ${SED-sed} 's|[^/]*$||'`/build-aux/funclib.sh
+#
+# If you need to override any of the default environment variable
+# settings, do that before evaluating this file.
+
+
+## -------------------- ##
+## Shell normalisation. ##
+## -------------------- ##
+
+# Some shells need a little help to be as Bourne compatible as possible.
+# Before doing anything else, make sure all that help has been provided!
+
+DUALCASE=1; export DUALCASE # for MKS sh
+if test -n "${ZSH_VERSION+set}" && (emulate sh) >/dev/null 2>&1; then :
+  emulate sh
+  NULLCMD=:
+  # Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which
+  # is contrary to our usage.  Disable this feature.
+  alias -g '${1+"$@"}'='"$@"'
+  setopt NO_GLOB_SUBST
+else
+  case `(set -o) 2>/dev/null` in *posix*) set -o posix ;; esac
+fi
+
+# NLS nuisances: We save the old values in case they are required later.
+_G_user_locale=
+_G_safe_locale=
+for _G_var in LANG LANGUAGE LC_ALL LC_CTYPE LC_COLLATE LC_MESSAGES
+do
+  eval "if test set = \"\${$_G_var+set}\"; then
+          save_$_G_var=\$$_G_var
+          $_G_var=C
+         export $_G_var
+         _G_user_locale=\"$_G_var=\\\$save_\$_G_var; \$_G_user_locale\"
+         _G_safe_locale=\"$_G_var=C; \$_G_safe_locale\"
+       fi"
+done
+
+# CDPATH.
+(unset CDPATH) >/dev/null 2>&1 && unset CDPATH
+
+# Make sure IFS has a sensible default
+sp=' '
+nl='
+'
+IFS="$sp       $nl"
+
+# There are apparently some retarded systems that use ';' as a PATH separator!
+if test "${PATH_SEPARATOR+set}" != set; then
+  PATH_SEPARATOR=:
+  (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && {
+    (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 ||
+      PATH_SEPARATOR=';'
+  }
+fi
+
+
+
+## ------------------------- ##
+## Locate command utilities. ##
+## ------------------------- ##
+
+
+# func_executable_p FILE
+# ----------------------
+# Check that FILE is an executable regular file.
+func_executable_p ()
+{
+    test -f "$1" && test -x "$1"
+}
+
+
+# func_path_progs PROGS_LIST CHECK_FUNC [PATH]
+# --------------------------------------------
+# Search for either a program that responds to --version with output
+# containing "GNU", or else returned by CHECK_FUNC otherwise, by
+# trying all the directories in PATH with each of the elements of
+# PROGS_LIST.
+#
+# CHECK_FUNC should accept the path to a candidate program, and
+# set $func_check_prog_result if it truncates its output less than
+# $_G_path_prog_max characters.
+func_path_progs ()
+{
+    _G_progs_list=$1
+    _G_check_func=$2
+    _G_PATH=${3-"$PATH"}
+
+    _G_path_prog_max=0
+    _G_path_prog_found=false
+    _G_save_IFS=$IFS; IFS=${PATH_SEPARATOR-:}
+    for _G_dir in $_G_PATH; do
+      IFS=$_G_save_IFS
+      test -z "$_G_dir" && _G_dir=.
+      for _G_prog_name in $_G_progs_list; do
+        for _exeext in '' .EXE; do
+          _G_path_prog=$_G_dir/$_G_prog_name$_exeext
+          func_executable_p "$_G_path_prog" || continue
+          case `"$_G_path_prog" --version 2>&1` in
+            *GNU*) func_path_progs_result=$_G_path_prog _G_path_prog_found=: ;;
+            *)     $_G_check_func $_G_path_prog
+                  func_path_progs_result=$func_check_prog_result
+                  ;;
+          esac
+          $_G_path_prog_found && break 3
+        done
+      done
+    done
+    IFS=$_G_save_IFS
+    test -z "$func_path_progs_result" && {
+      echo "no acceptable sed could be found in \$PATH" >&2
+      exit 1
+    }
+}
+
+
+# We want to be able to use the functions in this file before configure
+# has figured out where the best binaries are kept, which means we have
+# to search for them ourselves - except when the results are already set
+# where we skip the searches.
+
+# Unless the user overrides by setting SED, search the path for either GNU
+# sed, or the sed that truncates its output the least.
+test -z "$SED" && {
+  _G_sed_script=s/aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa/bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb/
+  for _G_i in 1 2 3 4 5 6 7; do
+    _G_sed_script=$_G_sed_script$nl$_G_sed_script
+  done
+  echo "$_G_sed_script" 2>/dev/null | sed 99q >conftest.sed
+  _G_sed_script=
+
+  func_check_prog_sed ()
+  {
+    _G_path_prog=$1
+
+    _G_count=0
+    printf 0123456789 >conftest.in
+    while :
+    do
+      cat conftest.in conftest.in >conftest.tmp
+      mv conftest.tmp conftest.in
+      cp conftest.in conftest.nl
+      echo '' >> conftest.nl
+      "$_G_path_prog" -f conftest.sed <conftest.nl >conftest.out 2>/dev/null || break
+      diff conftest.out conftest.nl >/dev/null 2>&1 || break
+      _G_count=`expr $_G_count + 1`
+      if test "$_G_count" -gt "$_G_path_prog_max"; then
+        # Best one so far, save it but keep looking for a better one
+        func_check_prog_result=$_G_path_prog
+        _G_path_prog_max=$_G_count
+      fi
+      # 10*(2^10) chars as input seems more than enough
+      test 10 -lt "$_G_count" && break
+    done
+    rm -f conftest.in conftest.tmp conftest.nl conftest.out
+  }
+
+  func_path_progs "sed gsed" func_check_prog_sed $PATH:/usr/xpg4/bin
+  rm -f conftest.sed
+  SED=$func_path_progs_result
+}
+
+
+# Unless the user overrides by setting GREP, search the path for either GNU
+# grep, or the grep that truncates its output the least.
+test -z "$GREP" && {
+  func_check_prog_grep ()
+  {
+    _G_path_prog=$1
+
+    _G_count=0
+    _G_path_prog_max=0
+    printf 0123456789 >conftest.in
+    while :
+    do
+      cat conftest.in conftest.in >conftest.tmp
+      mv conftest.tmp conftest.in
+      cp conftest.in conftest.nl
+      echo 'GREP' >> conftest.nl
+      "$_G_path_prog" -e 'GREP$' -e '-(cannot match)-' <conftest.nl >conftest.out 2>/dev/null || break
+      diff conftest.out conftest.nl >/dev/null 2>&1 || break
+      _G_count=`expr $_G_count + 1`
+      if test "$_G_count" -gt "$_G_path_prog_max"; then
+        # Best one so far, save it but keep looking for a better one
+        func_check_prog_result=$_G_path_prog
+        _G_path_prog_max=$_G_count
+      fi
+      # 10*(2^10) chars as input seems more than enough
+      test 10 -lt "$_G_count" && break
+    done
+    rm -f conftest.in conftest.tmp conftest.nl conftest.out
+  }
+
+  func_path_progs "grep ggrep" func_check_prog_grep $PATH:/usr/xpg4/bin
+  GREP=$func_path_progs_result
+}
+
+
+## ------------------------------- ##
+## User overridable command paths. ##
+## ------------------------------- ##
+
+# All uppercase variable names are used for environment variables.  These
+# variables can be overridden by the user before calling a script that
+# uses them if a suitable command of that name is not already available
+# in the command search PATH.
+
+: ${CP="cp -f"}
+: ${ECHO="printf %s\n"}
+: ${EGREP="$GREP -E"}
+: ${FGREP="$GREP -F"}
+: ${LN_S="ln -s"}
+: ${MAKE="make"}
+: ${MKDIR="mkdir"}
+: ${MV="mv -f"}
+: ${RM="rm -f"}
+: ${SHELL="${CONFIG_SHELL-/bin/sh}"}
+
+
+## -------------------- ##
+## Useful sed snippets. ##
+## -------------------- ##
+
+sed_dirname='s|/[^/]*$||'
+sed_basename='s|^.*/||'
+
+# Sed substitution that helps us do robust quoting.  It backslashifies
+# metacharacters that are still active within double-quoted strings.
+sed_quote_subst='s|\([`"$\\]\)|\\\1|g'
+
+# Same as above, but do not quote variable references.
+sed_double_quote_subst='s/\(["`\\]\)/\\\1/g'
+
+# Sed substitution that turns a string into a regex matching for the
+# string literally.
+sed_make_literal_regex='s|[].[^$\\*\/]|\\&|g'
+
+# Sed substitution that converts a w32 file name or path
+# that contains forward slashes, into one that contains
+# (escaped) backslashes.  A very naive implementation.
+sed_naive_backslashify='s|\\\\*|\\|g;s|/|\\|g;s|\\|\\\\|g'
+
+# Re-'\' parameter expansions in output of sed_double_quote_subst that
+# were '\'-ed in input to the same.  If an odd number of '\' preceded a
+# '$' in input to sed_double_quote_subst, that '$' was protected from
+# expansion.  Since each input '\' is now two '\'s, look for any number
+# of runs of four '\'s followed by two '\'s and then a '$'.  '\' that '$'.
+_G_bs='\\'
+_G_bs2='\\\\'
+_G_bs4='\\\\\\\\'
+_G_dollar='\$'
+sed_double_backslash="\
+  s/$_G_bs4/&\\
+/g
+  s/^$_G_bs2$_G_dollar/$_G_bs&/
+  s/\\([^$_G_bs]\\)$_G_bs2$_G_dollar/\\1$_G_bs2$_G_bs$_G_dollar/g
+  s/\n//g"
+
+
+## ----------------- ##
+## Global variables. ##
+## ----------------- ##
+
+# Except for the global variables explicitly listed below, the following
+# functions in the '^func_' namespace, and the '^require_' namespace
+# variables initialised in the 'Resource management' section, sourcing
+# this file will not pollute your global namespace with anything
+# else. There's no portable way to scope variables in Bourne shell
+# though, so actually running these functions will sometimes place
+# results into a variable named after the function, and often use
+# temporary variables in the '^_G_' namespace. If you are careful to
+# avoid using those namespaces casually in your sourcing script, things
+# should continue to work as you expect. And, of course, you can freely
+# overwrite any of the functions or variables defined here before
+# calling anything to customize them.
+
+EXIT_SUCCESS=0
+EXIT_FAILURE=1
+EXIT_MISMATCH=63  # $? = 63 is used to indicate version mismatch to missing.
+EXIT_SKIP=77     # $? = 77 is used to indicate a skipped test to automake.
+
+# Allow overriding, eg assuming that you follow the convention of
+# putting '$debug_cmd' at the start of all your functions, you can get
+# bash to show function call trace with:
+#
+#    debug_cmd='eval echo "${FUNCNAME[0]} $*" >&2' bash your-script-name
+debug_cmd=${debug_cmd-":"}
+exit_cmd=:
+
+# By convention, finish your script with:
+#
+#    exit $exit_status
+#
+# so that you can set exit_status to non-zero if you want to indicate
+# something went wrong during execution without actually bailing out at
+# the point of failure.
+exit_status=$EXIT_SUCCESS
+
+# Work around backward compatibility issue on IRIX 6.5. On IRIX 6.4+, sh
+# is ksh but when the shell is invoked as "sh" and the current value of
+# the _XPG environment variable is not equal to 1 (one), the special
+# positional parameter $0, within a function call, is the name of the
+# function.
+progpath=$0
+
+# The name of this program.
+progname=`$ECHO "$progpath" |$SED "$sed_basename"`
+
+# Make sure we have an absolute progpath for reexecution:
+case $progpath in
+  [\\/]*|[A-Za-z]:\\*) ;;
+  *[\\/]*)
+     progdir=`$ECHO "$progpath" |$SED "$sed_dirname"`
+     progdir=`cd "$progdir" && pwd`
+     progpath=$progdir/$progname
+     ;;
+  *)
+     _G_IFS=$IFS
+     IFS=${PATH_SEPARATOR-:}
+     for progdir in $PATH; do
+       IFS=$_G_IFS
+       test -x "$progdir/$progname" && break
+     done
+     IFS=$_G_IFS
+     test -n "$progdir" || progdir=`pwd`
+     progpath=$progdir/$progname
+     ;;
+esac
+
+
+## ----------------- ##
+## Standard options. ##
+## ----------------- ##
+
+# The following options affect the operation of the functions defined
+# below, and should be set appropriately depending on run-time para-
+# meters passed on the command line.
+
+opt_dry_run=false
+opt_quiet=false
+opt_verbose=false
+
+# Categories 'all' and 'none' are always available.  Append any others
+# you will pass as the first argument to func_warning from your own
+# code.
+warning_categories=
+
+# By default, display warnings according to 'opt_warning_types'.  Set
+# 'warning_func'  to ':' to elide all warnings, or func_fatal_error to
+# treat the next displayed warning as a fatal error.
+warning_func=func_warn_and_continue
+
+# Set to 'all' to display all warnings, 'none' to suppress all
+# warnings, or a space delimited list of some subset of
+# 'warning_categories' to display only the listed warnings.
+opt_warning_types=all
+
+
+## -------------------- ##
+## Resource management. ##
+## -------------------- ##
+
+# This section contains definitions for functions that each ensure a
+# particular resource (a file, or a non-empty configuration variable for
+# example) is available, and if appropriate to extract default values
+# from pertinent package files. Call them using their associated
+# 'require_*' variable to ensure that they are executed, at most, once.
+#
+# It's entirely deliberate that calling these functions can set
+# variables that don't obey the namespace limitations obeyed by the rest
+# of this file, in order that that they be as useful as possible to
+# callers.
+
+
+# require_term_colors
+# -------------------
+# Allow display of bold text on terminals that support it.
+require_term_colors=func_require_term_colors
+func_require_term_colors ()
+{
+    $debug_cmd
+
+    test -t 1 && {
+      # COLORTERM and USE_ANSI_COLORS environment variables take
+      # precedence, because most terminfo databases neglect to describe
+      # whether color sequences are supported.
+      test -n "${COLORTERM+set}" && : ${USE_ANSI_COLORS="1"}
+
+      if test 1 = "$USE_ANSI_COLORS"; then
+        # Standard ANSI escape sequences
+        tc_reset='\e[0m'
+        tc_bold='\e[1m';   tc_standout='\e[7m'
+        tc_red='\e[31m';   tc_green='\e[32m'
+        tc_blue='\e[34m';  tc_cyan='\e[36m'
+      else
+        # Otherwise trust the terminfo database after all.
+        test -n "`tput sgr0 2>/dev/null`" && {
+          tc_reset=`tput sgr0`
+          test -n "`tput bold 2>/dev/null`" && tc_bold=`tput bold`
+          tc_standout=$tc_bold
+          test -n "`tput smso 2>/dev/null`" && tc_standout=`tput smso`
+          test -n "`tput setaf 1 2>/dev/null`" && tc_red=`tput setaf 1`
+          test -n "`tput setaf 2 2>/dev/null`" && tc_green=`tput setaf 2`
+          test -n "`tput setaf 4 2>/dev/null`" && tc_blue=`tput setaf 4`
+          test -n "`tput setaf 5 2>/dev/null`" && tc_cyan=`tput setaf 5`
+        }
+      fi
+    }
+
+    require_term_colors=:
+}
+
+
+## ----------------- ##
+## Function library. ##
+## ----------------- ##
+
+# This section contains a variety of useful functions to call in your
+# scripts. Take note of the portable wrappers for features provided by
+# some modern shells, which will fall back to slower equivalents on
+# less featureful shells.
+
+
+# func_append VAR VALUE
+# ---------------------
+# Append VALUE onto the existing contents of VAR.
+
+  # We should try to minimise forks, especially on Windows where they are
+  # unreasonably slow, so skip the feature probes when bash or zsh are
+  # being used:
+  if test set = "${BASH_VERSION+set}${ZSH_VERSION+set}"; then
+    : ${_G_HAVE_ARITH_OP="yes"}
+    : ${_G_HAVE_XSI_OPS="yes"}
+    # The += operator was introduced in bash 3.1
+    case $BASH_VERSION in
+      [12].* | 3.0 | 3.0*) ;;
+      *)
+        : ${_G_HAVE_PLUSEQ_OP="yes"}
+        ;;
+    esac
+  fi
+
+  # _G_HAVE_PLUSEQ_OP
+  # Can be empty, in which case the shell is probed, "yes" if += is
+  # useable or anything else if it does not work.
+  test -z "$_G_HAVE_PLUSEQ_OP" \
+    && (eval 'x=a; x+=" b"; test "a b" = "$x"') 2>/dev/null \
+    && _G_HAVE_PLUSEQ_OP=yes
+
+if test yes = "$_G_HAVE_PLUSEQ_OP"
+then
+  # This is an XSI compatible shell, allowing a faster implementation...
+  eval 'func_append ()
+  {
+    $debug_cmd
+
+    eval "$1+=\$2"
+  }'
+else
+  # ...otherwise fall back to using expr, which is often a shell builtin.
+  func_append ()
+  {
+    $debug_cmd
+
+    eval "$1=\$$1\$2"
+  }
+fi
+
+
+# func_append_quoted VAR VALUE
+# ----------------------------
+# Quote VALUE and append to the end of shell variable VAR, separated
+# by a space.
+if test yes = "$_G_HAVE_PLUSEQ_OP"; then
+  eval 'func_append_quoted ()
+  {
+    $debug_cmd
+
+    func_quote_for_eval "$2"
+    eval "$1+=\\ \$func_quote_for_eval_result"
+  }'
+else
+  func_append_quoted ()
+  {
+    $debug_cmd
+
+    func_quote_for_eval "$2"
+    eval "$1=\$$1\\ \$func_quote_for_eval_result"
+  }
+fi
+
+
+# func_append_uniq VAR VALUE
+# --------------------------
+# Append unique VALUE onto the existing contents of VAR, assuming
+# entries are delimited by the first character of VALUE.  For example:
+#
+#   func_append_uniq options " --another-option option-argument"
+#
+# will only append to $options if " --another-option option-argument "
+# is not already present somewhere in $options already (note spaces at
+# each end implied by leading space in second argument).
+func_append_uniq ()
+{
+    $debug_cmd
+
+    eval _G_current_value='`$ECHO $'$1'`'
+    _G_delim=`expr "$2" : '\(.\)'`
+
+    case $_G_delim$_G_current_value$_G_delim in
+      *"$2$_G_delim"*) ;;
+      *) func_append "$@" ;;
+    esac
+}
+
+
+# func_arith TERM...
+# ------------------
+# Set func_arith_result to the result of evaluating TERMs.
+  test -z "$_G_HAVE_ARITH_OP" \
+    && (eval 'test 2 = $(( 1 + 1 ))') 2>/dev/null \
+    && _G_HAVE_ARITH_OP=yes
+
+if test yes = "$_G_HAVE_ARITH_OP"; then
+  eval 'func_arith ()
+  {
+    $debug_cmd
+
+    func_arith_result=$(( $* ))
+  }'
+else
+  func_arith ()
+  {
+    $debug_cmd
+
+    func_arith_result=`expr "$@"`
+  }
+fi
+
+
+# func_basename FILE
+# ------------------
+# Set func_basename_result to FILE with everything up to and including
+# the last / stripped.
+if test yes = "$_G_HAVE_XSI_OPS"; then
+  # If this shell supports suffix pattern removal, then use it to avoid
+  # forking. Hide the definitions single quotes in case the shell chokes
+  # on unsupported syntax...
+  _b='func_basename_result=${1##*/}'
+  _d='case $1 in
+        */*) func_dirname_result=${1%/*}$2 ;;
+        *  ) func_dirname_result=$3        ;;
+      esac'
+
+else
+  # ...otherwise fall back to using sed.
+  _b='func_basename_result=`$ECHO "$1" |$SED "$sed_basename"`'
+  _d='func_dirname_result=`$ECHO "$1"  |$SED "$sed_dirname"`
+      if test "X$func_dirname_result" = "X$1"; then
+        func_dirname_result=$3
+      else
+        func_append func_dirname_result "$2"
+      fi'
+fi
+
+eval 'func_basename ()
+{
+    $debug_cmd
+
+    '"$_b"'
+}'
+
+
+# func_dirname FILE APPEND NONDIR_REPLACEMENT
+# -------------------------------------------
+# Compute the dirname of FILE.  If nonempty, add APPEND to the result,
+# otherwise set result to NONDIR_REPLACEMENT.
+eval 'func_dirname ()
+{
+    $debug_cmd
+
+    '"$_d"'
+}'
+
+
+# func_dirname_and_basename FILE APPEND NONDIR_REPLACEMENT
+# --------------------------------------------------------
+# Perform func_basename and func_dirname in a single function
+# call:
+#   dirname:  Compute the dirname of FILE.  If nonempty,
+#             add APPEND to the result, otherwise set result
+#             to NONDIR_REPLACEMENT.
+#             value returned in "$func_dirname_result"
+#   basename: Compute filename of FILE.
+#             value retuned in "$func_basename_result"
+# For efficiency, we do not delegate to the functions above but instead
+# duplicate the functionality here.
+eval 'func_dirname_and_basename ()
+{
+    $debug_cmd
+
+    '"$_b"'
+    '"$_d"'
+}'
+
+
+# func_echo ARG...
+# ----------------
+# Echo program name prefixed message.
+func_echo ()
+{
+    $debug_cmd
+
+    _G_message=$*
+
+    func_echo_IFS=$IFS
+    IFS=$nl
+    for _G_line in $_G_message; do
+      IFS=$func_echo_IFS
+      $ECHO "$progname: $_G_line"
+    done
+    IFS=$func_echo_IFS
+}
+
+
+# func_echo_all ARG...
+# --------------------
+# Invoke $ECHO with all args, space-separated.
+func_echo_all ()
+{
+    $ECHO "$*"
+}
+
+
+# func_echo_infix_1 INFIX ARG...
+# ------------------------------
+# Echo program name, followed by INFIX on the first line, with any
+# additional lines not showing INFIX.
+func_echo_infix_1 ()
+{
+    $debug_cmd
+
+    $require_term_colors
+
+    _G_infix=$1; shift
+    _G_indent=$_G_infix
+    _G_prefix="$progname: $_G_infix: "
+    _G_message=$*
+
+    # Strip color escape sequences before counting printable length
+    for _G_tc in "$tc_reset" "$tc_bold" "$tc_standout" "$tc_red" "$tc_green" "$tc_blue" "$tc_cyan"
+    do
+      test -n "$_G_tc" && {
+        _G_esc_tc=`$ECHO "$_G_tc" | $SED "$sed_make_literal_regex"`
+        _G_indent=`$ECHO "$_G_indent" | $SED "s|$_G_esc_tc||g"`
+      }
+    done
+    _G_indent="$progname: "`echo "$_G_indent" | $SED 's|.| |g'`"  " ## exclude from sc_prohibit_nested_quotes
+
+    func_echo_infix_1_IFS=$IFS
+    IFS=$nl
+    for _G_line in $_G_message; do
+      IFS=$func_echo_infix_1_IFS
+      $ECHO "$_G_prefix$tc_bold$_G_line$tc_reset" >&2
+      _G_prefix=$_G_indent
+    done
+    IFS=$func_echo_infix_1_IFS
+}
+
+
+# func_error ARG...
+# -----------------
+# Echo program name prefixed message to standard error.
+func_error ()
+{
+    $debug_cmd
+
+    $require_term_colors
+
+    func_echo_infix_1 "  $tc_standout${tc_red}error$tc_reset" "$*" >&2
+}
+
+
+# func_fatal_error ARG...
+# -----------------------
+# Echo program name prefixed message to standard error, and exit.
+func_fatal_error ()
+{
+    $debug_cmd
+
+    func_error "$*"
+    exit $EXIT_FAILURE
+}
+
+
+# func_grep EXPRESSION FILENAME
+# -----------------------------
+# Check whether EXPRESSION matches any line of FILENAME, without output.
+func_grep ()
+{
+    $debug_cmd
+
+    $GREP "$1" "$2" >/dev/null 2>&1
+}
+
+
+# func_len STRING
+# ---------------
+# Set func_len_result to the length of STRING. STRING may not
+# start with a hyphen.
+  test -z "$_G_HAVE_XSI_OPS" \
+    && (eval 'x=a/b/c;
+      test 5aa/bb/cc = "${#x}${x%%/*}${x%/*}${x#*/}${x##*/}"') 2>/dev/null \
+    && _G_HAVE_XSI_OPS=yes
+
+if test yes = "$_G_HAVE_XSI_OPS"; then
+  eval 'func_len ()
+  {
+    $debug_cmd
+
+    func_len_result=${#1}
+  }'
+else
+  func_len ()
+  {
+    $debug_cmd
+
+    func_len_result=`expr "$1" : ".*" 2>/dev/null || echo $max_cmd_len`
+  }
+fi
+
+
+# func_mkdir_p DIRECTORY-PATH
+# ---------------------------
+# Make sure the entire path to DIRECTORY-PATH is available.
+func_mkdir_p ()
+{
+    $debug_cmd
+
+    _G_directory_path=$1
+    _G_dir_list=
+
+    if test -n "$_G_directory_path" && test : != "$opt_dry_run"; then
+
+      # Protect directory names starting with '-'
+      case $_G_directory_path in
+        -*) _G_directory_path=./$_G_directory_path ;;
+      esac
+
+      # While some portion of DIR does not yet exist...
+      while test ! -d "$_G_directory_path"; do
+        # ...make a list in topmost first order.  Use a colon delimited
+       # list incase some portion of path contains whitespace.
+        _G_dir_list=$_G_directory_path:$_G_dir_list
+
+        # If the last portion added has no slash in it, the list is done
+        case $_G_directory_path in */*) ;; *) break ;; esac
+
+        # ...otherwise throw away the child directory and loop
+        _G_directory_path=`$ECHO "$_G_directory_path" | $SED -e "$sed_dirname"`
+      done
+      _G_dir_list=`$ECHO "$_G_dir_list" | $SED 's|:*$||'`
+
+      func_mkdir_p_IFS=$IFS; IFS=:
+      for _G_dir in $_G_dir_list; do
+       IFS=$func_mkdir_p_IFS
+        # mkdir can fail with a 'File exist' error if two processes
+        # try to create one of the directories concurrently.  Don't
+        # stop in that case!
+        $MKDIR "$_G_dir" 2>/dev/null || :
+      done
+      IFS=$func_mkdir_p_IFS
+
+      # Bail out if we (or some other process) failed to create a directory.
+      test -d "$_G_directory_path" || \
+        func_fatal_error "Failed to create '$1'"
+    fi
+}
+
+
+# func_mktempdir [BASENAME]
+# -------------------------
+# Make a temporary directory that won't clash with other running
+# libtool processes, and avoids race conditions if possible.  If
+# given, BASENAME is the basename for that directory.
+func_mktempdir ()
+{
+    $debug_cmd
+
+    _G_template=${TMPDIR-/tmp}/${1-$progname}
+
+    if test : = "$opt_dry_run"; then
+      # Return a directory name, but don't create it in dry-run mode
+      _G_tmpdir=$_G_template-$$
+    else
+
+      # If mktemp works, use that first and foremost
+      _G_tmpdir=`mktemp -d "$_G_template-XXXXXXXX" 2>/dev/null`
+
+      if test ! -d "$_G_tmpdir"; then
+        # Failing that, at least try and use $RANDOM to avoid a race
+        _G_tmpdir=$_G_template-${RANDOM-0}$$
+
+        func_mktempdir_umask=`umask`
+        umask 0077
+        $MKDIR "$_G_tmpdir"
+        umask $func_mktempdir_umask
+      fi
+
+      # If we're not in dry-run mode, bomb out on failure
+      test -d "$_G_tmpdir" || \
+        func_fatal_error "cannot create temporary directory '$_G_tmpdir'"
+    fi
+
+    $ECHO "$_G_tmpdir"
+}
+
+
+# func_normal_abspath PATH
+# ------------------------
+# Remove doubled-up and trailing slashes, "." path components,
+# and cancel out any ".." path components in PATH after making
+# it an absolute path.
+func_normal_abspath ()
+{
+    $debug_cmd
+
+    # These SED scripts presuppose an absolute path with a trailing slash.
+    _G_pathcar='s|^/\([^/]*\).*$|\1|'
+    _G_pathcdr='s|^/[^/]*||'
+    _G_removedotparts=':dotsl
+               s|/\./|/|g
+               t dotsl
+               s|/\.$|/|'
+    _G_collapseslashes='s|/\{1,\}|/|g'
+    _G_finalslash='s|/*$|/|'
+
+    # Start from root dir and reassemble the path.
+    func_normal_abspath_result=
+    func_normal_abspath_tpath=$1
+    func_normal_abspath_altnamespace=
+    case $func_normal_abspath_tpath in
+      "")
+        # Empty path, that just means $cwd.
+        func_stripname '' '/' "`pwd`"
+        func_normal_abspath_result=$func_stripname_result
+        return
+        ;;
+      # The next three entries are used to spot a run of precisely
+      # two leading slashes without using negated character classes;
+      # we take advantage of case's first-match behaviour.
+      ///*)
+        # Unusual form of absolute path, do nothing.
+        ;;
+      //*)
+        # Not necessarily an ordinary path; POSIX reserves leading '//'
+        # and for example Cygwin uses it to access remote file shares
+        # over CIFS/SMB, so we conserve a leading double slash if found.
+        func_normal_abspath_altnamespace=/
+        ;;
+      /*)
+        # Absolute path, do nothing.
+        ;;
+      *)
+        # Relative path, prepend $cwd.
+        func_normal_abspath_tpath=`pwd`/$func_normal_abspath_tpath
+        ;;
+    esac
+
+    # Cancel out all the simple stuff to save iterations.  We also want
+    # the path to end with a slash for ease of parsing, so make sure
+    # there is one (and only one) here.
+    func_normal_abspath_tpath=`$ECHO "$func_normal_abspath_tpath" | $SED \
+          -e "$_G_removedotparts" -e "$_G_collapseslashes" -e "$_G_finalslash"`
+    while :; do
+      # Processed it all yet?
+      if test / = "$func_normal_abspath_tpath"; then
+        # If we ascended to the root using ".." the result may be empty now.
+        if test -z "$func_normal_abspath_result"; then
+          func_normal_abspath_result=/
+        fi
+        break
+      fi
+      func_normal_abspath_tcomponent=`$ECHO "$func_normal_abspath_tpath" | $SED \
+          -e "$_G_pathcar"`
+      func_normal_abspath_tpath=`$ECHO "$func_normal_abspath_tpath" | $SED \
+          -e "$_G_pathcdr"`
+      # Figure out what to do with it
+      case $func_normal_abspath_tcomponent in
+        "")
+          # Trailing empty path component, ignore it.
+          ;;
+        ..)
+          # Parent dir; strip last assembled component from result.
+          func_dirname "$func_normal_abspath_result"
+          func_normal_abspath_result=$func_dirname_result
+          ;;
+        *)
+          # Actual path component, append it.
+          func_append func_normal_abspath_result "/$func_normal_abspath_tcomponent"
+          ;;
+      esac
+    done
+    # Restore leading double-slash if one was found on entry.
+    func_normal_abspath_result=$func_normal_abspath_altnamespace$func_normal_abspath_result
+}
+
+
+# func_notquiet ARG...
+# --------------------
+# Echo program name prefixed message only when not in quiet mode.
+func_notquiet ()
+{
+    $debug_cmd
+
+    $opt_quiet || func_echo ${1+"$@"}
+
+    # A bug in bash halts the script if the last line of a function
+    # fails when set -e is in force, so we need another command to
+    # work around that:
+    :
+}
+
+
+# func_relative_path SRCDIR DSTDIR
+# --------------------------------
+# Set func_relative_path_result to the relative path from SRCDIR to DSTDIR.
+func_relative_path ()
+{
+    $debug_cmd
+
+    func_relative_path_result=
+    func_normal_abspath "$1"
+    func_relative_path_tlibdir=$func_normal_abspath_result
+    func_normal_abspath "$2"
+    func_relative_path_tbindir=$func_normal_abspath_result
+
+    # Ascend the tree starting from libdir
+    while :; do
+      # check if we have found a prefix of bindir
+      case $func_relative_path_tbindir in
+        $func_relative_path_tlibdir)
+          # found an exact match
+          func_relative_path_tcancelled=
+          break
+          ;;
+        $func_relative_path_tlibdir*)
+          # found a matching prefix
+          func_stripname "$func_relative_path_tlibdir" '' "$func_relative_path_tbindir"
+          func_relative_path_tcancelled=$func_stripname_result
+          if test -z "$func_relative_path_result"; then
+            func_relative_path_result=.
+          fi
+          break
+          ;;
+        *)
+          func_dirname $func_relative_path_tlibdir
+          func_relative_path_tlibdir=$func_dirname_result
+          if test -z "$func_relative_path_tlibdir"; then
+            # Have to descend all the way to the root!
+            func_relative_path_result=../$func_relative_path_result
+            func_relative_path_tcancelled=$func_relative_path_tbindir
+            break
+          fi
+          func_relative_path_result=../$func_relative_path_result
+          ;;
+      esac
+    done
+
+    # Now calculate path; take care to avoid doubling-up slashes.
+    func_stripname '' '/' "$func_relative_path_result"
+    func_relative_path_result=$func_stripname_result
+    func_stripname '/' '/' "$func_relative_path_tcancelled"
+    if test -n "$func_stripname_result"; then
+      func_append func_relative_path_result "/$func_stripname_result"
+    fi
+
+    # Normalisation. If bindir is libdir, return '.' else relative path.
+    if test -n "$func_relative_path_result"; then
+      func_stripname './' '' "$func_relative_path_result"
+      func_relative_path_result=$func_stripname_result
+    fi
+
+    test -n "$func_relative_path_result" || func_relative_path_result=.
+
+    :
+}
+
+
+# func_quote_for_eval ARG...
+# --------------------------
+# Aesthetically quote ARGs to be evaled later.
+# This function returns two values:
+#   i) func_quote_for_eval_result
+#      double-quoted, suitable for a subsequent eval
+#  ii) func_quote_for_eval_unquoted_result
+#      has all characters that are still active within double
+#      quotes backslashified.
+func_quote_for_eval ()
+{
+    $debug_cmd
+
+    func_quote_for_eval_unquoted_result=
+    func_quote_for_eval_result=
+    while test 0 -lt $#; do
+      case $1 in
+        *[\\\`\"\$]*)
+         _G_unquoted_arg=`printf '%s\n' "$1" |$SED "$sed_quote_subst"` ;;
+        *)
+          _G_unquoted_arg=$1 ;;
+      esac
+      if test -n "$func_quote_for_eval_unquoted_result"; then
+       func_append func_quote_for_eval_unquoted_result " $_G_unquoted_arg"
+      else
+        func_append func_quote_for_eval_unquoted_result "$_G_unquoted_arg"
+      fi
+
+      case $_G_unquoted_arg in
+        # Double-quote args containing shell metacharacters to delay
+        # word splitting, command substitution and variable expansion
+        # for a subsequent eval.
+        # Many Bourne shells cannot handle close brackets correctly
+        # in scan sets, so we specify it separately.
+        *[\[\~\#\^\&\*\(\)\{\}\|\;\<\>\?\'\ \  ]*|*]*|"")
+          _G_quoted_arg=\"$_G_unquoted_arg\"
+          ;;
+        *)
+          _G_quoted_arg=$_G_unquoted_arg
+         ;;
+      esac
+
+      if test -n "$func_quote_for_eval_result"; then
+       func_append func_quote_for_eval_result " $_G_quoted_arg"
+      else
+        func_append func_quote_for_eval_result "$_G_quoted_arg"
+      fi
+      shift
+    done
+}
+
+
+# func_quote_for_expand ARG
+# -------------------------
+# Aesthetically quote ARG to be evaled later; same as above,
+# but do not quote variable references.
+func_quote_for_expand ()
+{
+    $debug_cmd
+
+    case $1 in
+      *[\\\`\"]*)
+       _G_arg=`$ECHO "$1" | $SED \
+           -e "$sed_double_quote_subst" -e "$sed_double_backslash"` ;;
+      *)
+        _G_arg=$1 ;;
+    esac
+
+    case $_G_arg in
+      # Double-quote args containing shell metacharacters to delay
+      # word splitting and command substitution for a subsequent eval.
+      # Many Bourne shells cannot handle close brackets correctly
+      # in scan sets, so we specify it separately.
+      *[\[\~\#\^\&\*\(\)\{\}\|\;\<\>\?\'\ \    ]*|*]*|"")
+        _G_arg=\"$_G_arg\"
+        ;;
+    esac
+
+    func_quote_for_expand_result=$_G_arg
+}
+
+
+# func_stripname PREFIX SUFFIX NAME
+# ---------------------------------
+# strip PREFIX and SUFFIX from NAME, and store in func_stripname_result.
+# PREFIX and SUFFIX must not contain globbing or regex special
+# characters, hashes, percent signs, but SUFFIX may contain a leading
+# dot (in which case that matches only a dot).
+if test yes = "$_G_HAVE_XSI_OPS"; then
+  eval 'func_stripname ()
+  {
+    $debug_cmd
+
+    # pdksh 5.2.14 does not do ${X%$Y} correctly if both X and Y are
+    # positional parameters, so assign one to ordinary variable first.
+    func_stripname_result=$3
+    func_stripname_result=${func_stripname_result#"$1"}
+    func_stripname_result=${func_stripname_result%"$2"}
+  }'
+else
+  func_stripname ()
+  {
+    $debug_cmd
+
+    case $2 in
+      .*) func_stripname_result=`$ECHO "$3" | $SED -e "s%^$1%%" -e "s%\\\\$2\$%%"`;;
+      *)  func_stripname_result=`$ECHO "$3" | $SED -e "s%^$1%%" -e "s%$2\$%%"`;;
+    esac
+  }
+fi
+
+
+# func_show_eval CMD [FAIL_EXP]
+# -----------------------------
+# Unless opt_quiet is true, then output CMD.  Then, if opt_dryrun is
+# not true, evaluate CMD.  If the evaluation of CMD fails, and FAIL_EXP
+# is given, then evaluate it.
+func_show_eval ()
+{
+    $debug_cmd
+
+    _G_cmd=$1
+    _G_fail_exp=${2-':'}
+
+    func_quote_for_expand "$_G_cmd"
+    eval "func_notquiet $func_quote_for_expand_result"
+
+    $opt_dry_run || {
+      eval "$_G_cmd"
+      _G_status=$?
+      if test 0 -ne "$_G_status"; then
+       eval "(exit $_G_status); $_G_fail_exp"
+      fi
+    }
+}
+
+
+# func_show_eval_locale CMD [FAIL_EXP]
+# ------------------------------------
+# Unless opt_quiet is true, then output CMD.  Then, if opt_dryrun is
+# not true, evaluate CMD.  If the evaluation of CMD fails, and FAIL_EXP
+# is given, then evaluate it.  Use the saved locale for evaluation.
+func_show_eval_locale ()
+{
+    $debug_cmd
+
+    _G_cmd=$1
+    _G_fail_exp=${2-':'}
+
+    $opt_quiet || {
+      func_quote_for_expand "$_G_cmd"
+      eval "func_echo $func_quote_for_expand_result"
+    }
+
+    $opt_dry_run || {
+      eval "$_G_user_locale
+           $_G_cmd"
+      _G_status=$?
+      eval "$_G_safe_locale"
+      if test 0 -ne "$_G_status"; then
+       eval "(exit $_G_status); $_G_fail_exp"
+      fi
+    }
+}
+
+
+# func_tr_sh
+# ----------
+# Turn $1 into a string suitable for a shell variable name.
+# Result is stored in $func_tr_sh_result.  All characters
+# not in the set a-zA-Z0-9_ are replaced with '_'. Further,
+# if $1 begins with a digit, a '_' is prepended as well.
+func_tr_sh ()
+{
+    $debug_cmd
+
+    case $1 in
+    [0-9]* | *[!a-zA-Z0-9_]*)
+      func_tr_sh_result=`$ECHO "$1" | $SED -e 's/^\([0-9]\)/_\1/' -e 's/[^a-zA-Z0-9_]/_/g'`
+      ;;
+    * )
+      func_tr_sh_result=$1
+      ;;
+    esac
+}
+
+
+# func_verbose ARG...
+# -------------------
+# Echo program name prefixed message in verbose mode only.
+func_verbose ()
+{
+    $debug_cmd
+
+    $opt_verbose && func_echo "$*"
+
+    :
+}
+
+
+# func_warn_and_continue ARG...
+# -----------------------------
+# Echo program name prefixed warning message to standard error.
+func_warn_and_continue ()
+{
+    $debug_cmd
+
+    $require_term_colors
+
+    func_echo_infix_1 "${tc_red}warning$tc_reset" "$*" >&2
+}
+
+
+# func_warning CATEGORY ARG...
+# ----------------------------
+# Echo program name prefixed warning message to standard error. Warning
+# messages can be filtered according to CATEGORY, where this function
+# elides messages where CATEGORY is not listed in the global variable
+# 'opt_warning_types'.
+func_warning ()
+{
+    $debug_cmd
+
+    # CATEGORY must be in the warning_categories list!
+    case " $warning_categories " in
+      *" $1 "*) ;;
+      *) func_internal_error "invalid warning category '$1'" ;;
+    esac
+
+    _G_category=$1
+    shift
+
+    case " $opt_warning_types " in
+      *" $_G_category "*) $warning_func ${1+"$@"} ;;
+    esac
+}
+
+
+# func_sort_ver VER1 VER2
+# -----------------------
+# 'sort -V' is not generally available.
+# Note this deviates from the version comparison in automake
+# in that it treats 1.5 < 1.5.0, and treats 1.4.4a < 1.4-p3a
+# but this should suffice as we won't be specifying old
+# version formats or redundant trailing .0 in bootstrap.conf.
+# If we did want full compatibility then we should probably
+# use m4_version_compare from autoconf.
+func_sort_ver ()
+{
+    $debug_cmd
+
+    printf '%s\n%s\n' "$1" "$2" \
+      | sort -t. -k 1,1n -k 2,2n -k 3,3n -k 4,4n -k 5,5n -k 6,6n -k 7,7n -k 8,8n -k 9,9n
+}
+
+# func_lt_ver PREV CURR
+# ---------------------
+# Return true if PREV and CURR are in the correct order according to
+# func_sort_ver, otherwise false.  Use it like this:
+#
+#  func_lt_ver "$prev_ver" "$proposed_ver" || func_fatal_error "..."
+func_lt_ver ()
+{
+    $debug_cmd
+
+    test "x$1" = x`func_sort_ver "$1" "$2" | $SED 1q`
+}
+
+
+# Local variables:
+# mode: shell-script
+# sh-indentation: 2
+# eval: (add-hook 'before-save-hook 'time-stamp)
+# time-stamp-pattern: "10/scriptversion=%:y-%02m-%02d.%02H; # UTC"
+# time-stamp-time-zone: "UTC"
+# End:
+#! /bin/sh
+
+# Set a version string for this script.
+scriptversion=2014-01-07.03; # UTC
+
+# A portable, pluggable option parser for Bourne shell.
+# Written by Gary V. Vaughan, 2010
+
+# Copyright (C) 2010-2015 Free Software Foundation, Inc.
+# This is free software; see the source for copying conditions.  There is NO
+# warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+# Please report bugs or propose patches to gary@gnu.org.
+
+
+## ------ ##
+## Usage. ##
+## ------ ##
+
+# This file is a library for parsing options in your shell scripts along
+# with assorted other useful supporting features that you can make use
+# of too.
+#
+# For the simplest scripts you might need only:
+#
+#   #!/bin/sh
+#   . relative/path/to/funclib.sh
+#   . relative/path/to/options-parser
+#   scriptversion=1.0
+#   func_options ${1+"$@"}
+#   eval set dummy "$func_options_result"; shift
+#   ...rest of your script...
+#
+# In order for the '--version' option to work, you will need to have a
+# suitably formatted comment like the one at the top of this file
+# starting with '# Written by ' and ending with '# warranty; '.
+#
+# For '-h' and '--help' to work, you will also need a one line
+# description of your script's purpose in a comment directly above the
+# '# Written by ' line, like the one at the top of this file.
+#
+# The default options also support '--debug', which will turn on shell
+# execution tracing (see the comment above debug_cmd below for another
+# use), and '--verbose' and the func_verbose function to allow your script
+# to display verbose messages only when your user has specified
+# '--verbose'.
+#
+# After sourcing this file, you can plug processing for additional
+# options by amending the variables from the 'Configuration' section
+# below, and following the instructions in the 'Option parsing'
+# section further down.
+
+## -------------- ##
+## Configuration. ##
+## -------------- ##
+
+# You should override these variables in your script after sourcing this
+# file so that they reflect the customisations you have added to the
+# option parser.
+
+# The usage line for option parsing errors and the start of '-h' and
+# '--help' output messages. You can embed shell variables for delayed
+# expansion at the time the message is displayed, but you will need to
+# quote other shell meta-characters carefully to prevent them being
+# expanded when the contents are evaled.
+usage='$progpath [OPTION]...'
+
+# Short help message in response to '-h' and '--help'.  Add to this or
+# override it after sourcing this library to reflect the full set of
+# options your script accepts.
+usage_message="\
+       --debug        enable verbose shell tracing
+   -W, --warnings=CATEGORY
+                      report the warnings falling in CATEGORY [all]
+   -v, --verbose      verbosely report processing
+       --version      print version information and exit
+   -h, --help         print short or long help message and exit
+"
+
+# Additional text appended to 'usage_message' in response to '--help'.
+long_help_message="
+Warning categories include:
+       'all'          show all warnings
+       'none'         turn off all the warnings
+       'error'        warnings are treated as fatal errors"
+
+# Help message printed before fatal option parsing errors.
+fatal_help="Try '\$progname --help' for more information."
+
+
+
+## ------------------------- ##
+## Hook function management. ##
+## ------------------------- ##
+
+# This section contains functions for adding, removing, and running hooks
+# to the main code.  A hook is just a named list of of function, that can
+# be run in order later on.
+
+# func_hookable FUNC_NAME
+# -----------------------
+# Declare that FUNC_NAME will run hooks added with
+# 'func_add_hook FUNC_NAME ...'.
+func_hookable ()
+{
+    $debug_cmd
+
+    func_append hookable_fns " $1"
+}
+
+
+# func_add_hook FUNC_NAME HOOK_FUNC
+# ---------------------------------
+# Request that FUNC_NAME call HOOK_FUNC before it returns.  FUNC_NAME must
+# first have been declared "hookable" by a call to 'func_hookable'.
+func_add_hook ()
+{
+    $debug_cmd
+
+    case " $hookable_fns " in
+      *" $1 "*) ;;
+      *) func_fatal_error "'$1' does not accept hook functions." ;;
+    esac
+
+    eval func_append ${1}_hooks '" $2"'
+}
+
+
+# func_remove_hook FUNC_NAME HOOK_FUNC
+# ------------------------------------
+# Remove HOOK_FUNC from the list of functions called by FUNC_NAME.
+func_remove_hook ()
+{
+    $debug_cmd
+
+    eval ${1}_hooks='`$ECHO "\$'$1'_hooks" |$SED "s| '$2'||"`'
+}
+
+
+# func_run_hooks FUNC_NAME [ARG]...
+# ---------------------------------
+# Run all hook functions registered to FUNC_NAME.
+# It is assumed that the list of hook functions contains nothing more
+# than a whitespace-delimited list of legal shell function names, and
+# no effort is wasted trying to catch shell meta-characters or preserve
+# whitespace.
+func_run_hooks ()
+{
+    $debug_cmd
+
+    case " $hookable_fns " in
+      *" $1 "*) ;;
+      *) func_fatal_error "'$1' does not support hook funcions.n" ;;
+    esac
+
+    eval _G_hook_fns=\$$1_hooks; shift
+
+    for _G_hook in $_G_hook_fns; do
+      eval $_G_hook '"$@"'
+
+      # store returned options list back into positional
+      # parameters for next 'cmd' execution.
+      eval _G_hook_result=\$${_G_hook}_result
+      eval set dummy "$_G_hook_result"; shift
+    done
+
+    func_quote_for_eval ${1+"$@"}
+    func_run_hooks_result=$func_quote_for_eval_result
+}
+
+
+
+## --------------- ##
+## Option parsing. ##
+## --------------- ##
+
+# In order to add your own option parsing hooks, you must accept the
+# full positional parameter list in your hook function, remove any
+# options that you action, and then pass back the remaining unprocessed
+# options in '<hooked_function_name>_result', escaped suitably for
+# 'eval'.  Like this:
+#
+#    my_options_prep ()
+#    {
+#        $debug_cmd
+#
+#        # Extend the existing usage message.
+#        usage_message=$usage_message'
+#      -s, --silent       don'\''t print informational messages
+#    '
+#
+#        func_quote_for_eval ${1+"$@"}
+#        my_options_prep_result=$func_quote_for_eval_result
+#    }
+#    func_add_hook func_options_prep my_options_prep
+#
+#
+#    my_silent_option ()
+#    {
+#        $debug_cmd
+#
+#        # Note that for efficiency, we parse as many options as we can
+#        # recognise in a loop before passing the remainder back to the
+#        # caller on the first unrecognised argument we encounter.
+#        while test $# -gt 0; do
+#          opt=$1; shift
+#          case $opt in
+#            --silent|-s) opt_silent=: ;;
+#            # Separate non-argument short options:
+#            -s*)         func_split_short_opt "$_G_opt"
+#                         set dummy "$func_split_short_opt_name" \
+#                             "-$func_split_short_opt_arg" ${1+"$@"}
+#                         shift
+#                         ;;
+#            *)            set dummy "$_G_opt" "$*"; shift; break ;;
+#          esac
+#        done
+#
+#        func_quote_for_eval ${1+"$@"}
+#        my_silent_option_result=$func_quote_for_eval_result
+#    }
+#    func_add_hook func_parse_options my_silent_option
+#
+#
+#    my_option_validation ()
+#    {
+#        $debug_cmd
+#
+#        $opt_silent && $opt_verbose && func_fatal_help "\
+#    '--silent' and '--verbose' options are mutually exclusive."
+#
+#        func_quote_for_eval ${1+"$@"}
+#        my_option_validation_result=$func_quote_for_eval_result
+#    }
+#    func_add_hook func_validate_options my_option_validation
+#
+# You'll alse need to manually amend $usage_message to reflect the extra
+# options you parse.  It's preferable to append if you can, so that
+# multiple option parsing hooks can be added safely.
+
+
+# func_options [ARG]...
+# ---------------------
+# All the functions called inside func_options are hookable. See the
+# individual implementations for details.
+func_hookable func_options
+func_options ()
+{
+    $debug_cmd
+
+    func_options_prep ${1+"$@"}
+    eval func_parse_options \
+        ${func_options_prep_result+"$func_options_prep_result"}
+    eval func_validate_options \
+        ${func_parse_options_result+"$func_parse_options_result"}
+
+    eval func_run_hooks func_options \
+        ${func_validate_options_result+"$func_validate_options_result"}
+
+    # save modified positional parameters for caller
+    func_options_result=$func_run_hooks_result
+}
+
+
+# func_options_prep [ARG]...
+# --------------------------
+# All initialisations required before starting the option parse loop.
+# Note that when calling hook functions, we pass through the list of
+# positional parameters.  If a hook function modifies that list, and
+# needs to propogate that back to rest of this script, then the complete
+# modified list must be put in 'func_run_hooks_result' before
+# returning.
+func_hookable func_options_prep
+func_options_prep ()
+{
+    $debug_cmd
+
+    # Option defaults:
+    opt_verbose=false
+    opt_warning_types=
+
+    func_run_hooks func_options_prep ${1+"$@"}
+
+    # save modified positional parameters for caller
+    func_options_prep_result=$func_run_hooks_result
+}
+
+
+# func_parse_options [ARG]...
+# ---------------------------
+# The main option parsing loop.
+func_hookable func_parse_options
+func_parse_options ()
+{
+    $debug_cmd
+
+    func_parse_options_result=
+
+    # this just eases exit handling
+    while test $# -gt 0; do
+      # Defer to hook functions for initial option parsing, so they
+      # get priority in the event of reusing an option name.
+      func_run_hooks func_parse_options ${1+"$@"}
+
+      # Adjust func_parse_options positional parameters to match
+      eval set dummy "$func_run_hooks_result"; shift
+
+      # Break out of the loop if we already parsed every option.
+      test $# -gt 0 || break
+
+      _G_opt=$1
+      shift
+      case $_G_opt in
+        --debug|-x)   debug_cmd='set -x'
+                      func_echo "enabling shell trace mode"
+                      $debug_cmd
+                      ;;
+
+        --no-warnings|--no-warning|--no-warn)
+                      set dummy --warnings none ${1+"$@"}
+                      shift
+                     ;;
+
+        --warnings|--warning|-W)
+                      test $# = 0 && func_missing_arg $_G_opt && break
+                      case " $warning_categories $1" in
+                        *" $1 "*)
+                          # trailing space prevents matching last $1 above
+                          func_append_uniq opt_warning_types " $1"
+                          ;;
+                        *all)
+                          opt_warning_types=$warning_categories
+                          ;;
+                        *none)
+                          opt_warning_types=none
+                          warning_func=:
+                          ;;
+                        *error)
+                          opt_warning_types=$warning_categories
+                          warning_func=func_fatal_error
+                          ;;
+                        *)
+                          func_fatal_error \
+                             "unsupported warning category: '$1'"
+                          ;;
+                      esac
+                      shift
+                      ;;
+
+        --verbose|-v) opt_verbose=: ;;
+        --version)    func_version ;;
+        -\?|-h)       func_usage ;;
+        --help)       func_help ;;
+
+       # Separate optargs to long options (plugins may need this):
+       --*=*)        func_split_equals "$_G_opt"
+                     set dummy "$func_split_equals_lhs" \
+                          "$func_split_equals_rhs" ${1+"$@"}
+                      shift
+                      ;;
+
+       # Separate optargs to short options:
+        -W*)
+                      func_split_short_opt "$_G_opt"
+                      set dummy "$func_split_short_opt_name" \
+                          "$func_split_short_opt_arg" ${1+"$@"}
+                      shift
+                      ;;
+
+        # Separate non-argument short options:
+        -\?*|-h*|-v*|-x*)
+                      func_split_short_opt "$_G_opt"
+                      set dummy "$func_split_short_opt_name" \
+                          "-$func_split_short_opt_arg" ${1+"$@"}
+                      shift
+                      ;;
+
+        --)           break ;;
+        -*)           func_fatal_help "unrecognised option: '$_G_opt'" ;;
+        *)            set dummy "$_G_opt" ${1+"$@"}; shift; break ;;
+      esac
+    done
+
+    # save modified positional parameters for caller
+    func_quote_for_eval ${1+"$@"}
+    func_parse_options_result=$func_quote_for_eval_result
+}
+
+
+# func_validate_options [ARG]...
+# ------------------------------
+# Perform any sanity checks on option settings and/or unconsumed
+# arguments.
+func_hookable func_validate_options
+func_validate_options ()
+{
+    $debug_cmd
+
+    # Display all warnings if -W was not given.
+    test -n "$opt_warning_types" || opt_warning_types=" $warning_categories"
+
+    func_run_hooks func_validate_options ${1+"$@"}
+
+    # Bail if the options were screwed!
+    $exit_cmd $EXIT_FAILURE
+
+    # save modified positional parameters for caller
+    func_validate_options_result=$func_run_hooks_result
+}
+
+
+
+## ----------------- ##
+## Helper functions. ##
+## ----------------- ##
+
+# This section contains the helper functions used by the rest of the
+# hookable option parser framework in ascii-betical order.
+
+
+# func_fatal_help ARG...
+# ----------------------
+# Echo program name prefixed message to standard error, followed by
+# a help hint, and exit.
+func_fatal_help ()
+{
+    $debug_cmd
+
+    eval \$ECHO \""Usage: $usage"\"
+    eval \$ECHO \""$fatal_help"\"
+    func_error ${1+"$@"}
+    exit $EXIT_FAILURE
+}
+
+
+# func_help
+# ---------
+# Echo long help message to standard output and exit.
+func_help ()
+{
+    $debug_cmd
+
+    func_usage_message
+    $ECHO "$long_help_message"
+    exit 0
+}
+
+
+# func_missing_arg ARGNAME
+# ------------------------
+# Echo program name prefixed message to standard error and set global
+# exit_cmd.
+func_missing_arg ()
+{
+    $debug_cmd
+
+    func_error "Missing argument for '$1'."
+    exit_cmd=exit
+}
+
+
+# func_split_equals STRING
+# ------------------------
+# Set func_split_equals_lhs and func_split_equals_rhs shell variables after
+# splitting STRING at the '=' sign.
+test -z "$_G_HAVE_XSI_OPS" \
+    && (eval 'x=a/b/c;
+      test 5aa/bb/cc = "${#x}${x%%/*}${x%/*}${x#*/}${x##*/}"') 2>/dev/null \
+    && _G_HAVE_XSI_OPS=yes
+
+if test yes = "$_G_HAVE_XSI_OPS"
+then
+  # This is an XSI compatible shell, allowing a faster implementation...
+  eval 'func_split_equals ()
+  {
+      $debug_cmd
+
+      func_split_equals_lhs=${1%%=*}
+      func_split_equals_rhs=${1#*=}
+      test "x$func_split_equals_lhs" = "x$1" \
+        && func_split_equals_rhs=
+  }'
+else
+  # ...otherwise fall back to using expr, which is often a shell builtin.
+  func_split_equals ()
+  {
+      $debug_cmd
+
+      func_split_equals_lhs=`expr "x$1" : 'x\([^=]*\)'`
+      func_split_equals_rhs=
+      test "x$func_split_equals_lhs" = "x$1" \
+        || func_split_equals_rhs=`expr "x$1" : 'x[^=]*=\(.*\)$'`
+  }
+fi #func_split_equals
+
+
+# func_split_short_opt SHORTOPT
+# -----------------------------
+# Set func_split_short_opt_name and func_split_short_opt_arg shell
+# variables after splitting SHORTOPT after the 2nd character.
+if test yes = "$_G_HAVE_XSI_OPS"
+then
+  # This is an XSI compatible shell, allowing a faster implementation...
+  eval 'func_split_short_opt ()
+  {
+      $debug_cmd
+
+      func_split_short_opt_arg=${1#??}
+      func_split_short_opt_name=${1%"$func_split_short_opt_arg"}
+  }'
+else
+  # ...otherwise fall back to using expr, which is often a shell builtin.
+  func_split_short_opt ()
+  {
+      $debug_cmd
+
+      func_split_short_opt_name=`expr "x$1" : 'x-\(.\)'`
+      func_split_short_opt_arg=`expr "x$1" : 'x-.\(.*\)$'`
+  }
+fi #func_split_short_opt
+
+
+# func_usage
+# ----------
+# Echo short help message to standard output and exit.
+func_usage ()
+{
+    $debug_cmd
+
+    func_usage_message
+    $ECHO "Run '$progname --help |${PAGER-more}' for full usage"
+    exit 0
+}
+
+
+# func_usage_message
+# ------------------
+# Echo short help message to standard output.
+func_usage_message ()
+{
+    $debug_cmd
+
+    eval \$ECHO \""Usage: $usage"\"
+    echo
+    $SED -n 's|^# ||
+        /^Written by/{
+          x;p;x
+        }
+       h
+       /^Written by/q' < "$progpath"
+    echo
+    eval \$ECHO \""$usage_message"\"
+}
+
+
+# func_version
+# ------------
+# Echo version message to standard output and exit.
+func_version ()
+{
+    $debug_cmd
+
+    printf '%s\n' "$progname $scriptversion"
+    $SED -n '
+        /(C)/!b go
+        :more
+        /\./!{
+          N
+          s|\n# | |
+          b more
+        }
+        :go
+        /^# Written by /,/# warranty; / {
+          s|^# ||
+          s|^# *$||
+          s|\((C)\)[ 0-9,-]*[ ,-]\([1-9][0-9]* \)|\1 \2|
+          p
+        }
+        /^# Written by / {
+          s|^# ||
+          p
+        }
+        /^warranty; /q' < "$progpath"
+
+    exit $?
+}
+
+
+# Local variables:
+# mode: shell-script
+# sh-indentation: 2
+# eval: (add-hook 'before-save-hook 'time-stamp)
+# time-stamp-pattern: "10/scriptversion=%:y-%02m-%02d.%02H; # UTC"
+# time-stamp-time-zone: "UTC"
+# End:
+
+# Set a version string.
+scriptversion='(GNU libtool) 2.4.6'
+
+
+# func_echo ARG...
+# ----------------
+# Libtool also displays the current mode in messages, so override
+# funclib.sh func_echo with this custom definition.
+func_echo ()
+{
+    $debug_cmd
+
+    _G_message=$*
+
+    func_echo_IFS=$IFS
+    IFS=$nl
+    for _G_line in $_G_message; do
+      IFS=$func_echo_IFS
+      $ECHO "$progname${opt_mode+: $opt_mode}: $_G_line"
+    done
+    IFS=$func_echo_IFS
+}
+
+
+# func_warning ARG...
+# -------------------
+# Libtool warnings are not categorized, so override funclib.sh
+# func_warning with this simpler definition.
+func_warning ()
+{
+    $debug_cmd
+
+    $warning_func ${1+"$@"}
+}
+
+
+## ---------------- ##
+## Options parsing. ##
+## ---------------- ##
+
+# Hook in the functions to make sure our own options are parsed during
+# the option parsing loop.
+
+usage='$progpath [OPTION]... [MODE-ARG]...'
+
+# Short help message in response to '-h'.
+usage_message="Options:
+       --config             show all configuration variables
+       --debug              enable verbose shell tracing
+   -n, --dry-run            display commands without modifying any files
+       --features           display basic configuration information and exit
+       --mode=MODE          use operation mode MODE
+       --no-warnings        equivalent to '-Wnone'
+       --preserve-dup-deps  don't remove duplicate dependency libraries
+       --quiet, --silent    don't print informational messages
+       --tag=TAG            use configuration variables from tag TAG
+   -v, --verbose            print more informational messages than default
+       --version            print version information
+   -W, --warnings=CATEGORY  report the warnings falling in CATEGORY [all]
+   -h, --help, --help-all   print short, long, or detailed help message
+"
+
+# Additional text appended to 'usage_message' in response to '--help'.
+func_help ()
+{
+    $debug_cmd
+
+    func_usage_message
+    $ECHO "$long_help_message
+
+MODE must be one of the following:
+
+       clean           remove files from the build directory
+       compile         compile a source file into a libtool object
+       execute         automatically set library path, then run a program
+       finish          complete the installation of libtool libraries
+       install         install libraries or executables
+       link            create a library or an executable
+       uninstall       remove libraries from an installed directory
+
+MODE-ARGS vary depending on the MODE.  When passed as first option,
+'--mode=MODE' may be abbreviated as 'MODE' or a unique abbreviation of that.
+Try '$progname --help --mode=MODE' for a more detailed description of MODE.
+
+When reporting a bug, please describe a test case to reproduce it and
+include the following information:
+
+       host-triplet:   $host
+       shell:          $SHELL
+       compiler:       $LTCC
+       compiler flags: $LTCFLAGS
+       linker:         $LD (gnu? $with_gnu_ld)
+       version:        $progname (GNU libtool) 2.4.6
+       automake:       `($AUTOMAKE --version) 2>/dev/null |$SED 1q`
+       autoconf:       `($AUTOCONF --version) 2>/dev/null |$SED 1q`
+
+Report bugs to <bug-libtool@gnu.org>.
+GNU libtool home page: <http://www.gnu.org/software/libtool/>.
+General help using GNU software: <http://www.gnu.org/gethelp/>."
+    exit 0
+}
+
+
+# func_lo2o OBJECT-NAME
+# ---------------------
+# Transform OBJECT-NAME from a '.lo' suffix to the platform specific
+# object suffix.
+
+lo2o=s/\\.lo\$/.$objext/
+o2lo=s/\\.$objext\$/.lo/
+
+if test yes = "$_G_HAVE_XSI_OPS"; then
+  eval 'func_lo2o ()
+  {
+    case $1 in
+      *.lo) func_lo2o_result=${1%.lo}.$objext ;;
+      *   ) func_lo2o_result=$1               ;;
+    esac
+  }'
+
+  # func_xform LIBOBJ-OR-SOURCE
+  # ---------------------------
+  # Transform LIBOBJ-OR-SOURCE from a '.o' or '.c' (or otherwise)
+  # suffix to a '.lo' libtool-object suffix.
+  eval 'func_xform ()
+  {
+    func_xform_result=${1%.*}.lo
+  }'
+else
+  # ...otherwise fall back to using sed.
+  func_lo2o ()
+  {
+    func_lo2o_result=`$ECHO "$1" | $SED "$lo2o"`
+  }
+
+  func_xform ()
+  {
+    func_xform_result=`$ECHO "$1" | $SED 's|\.[^.]*$|.lo|'`
+  }
+fi
+
+
+# func_fatal_configuration ARG...
+# -------------------------------
+# Echo program name prefixed message to standard error, followed by
+# a configuration failure hint, and exit.
+func_fatal_configuration ()
+{
+    func__fatal_error ${1+"$@"} \
+      "See the $PACKAGE documentation for more information." \
+      "Fatal configuration error."
+}
+
+
+# func_config
+# -----------
+# Display the configuration for all the tags in this script.
+func_config ()
+{
+    re_begincf='^# ### BEGIN LIBTOOL'
+    re_endcf='^# ### END LIBTOOL'
+
+    # Default configuration.
+    $SED "1,/$re_begincf CONFIG/d;/$re_endcf CONFIG/,\$d" < "$progpath"
+
+    # Now print the configurations for the tags.
+    for tagname in $taglist; do
+      $SED -n "/$re_begincf TAG CONFIG: $tagname\$/,/$re_endcf TAG CONFIG: $tagname\$/p" < "$progpath"
+    done
+
+    exit $?
+}
+
+
+# func_features
+# -------------
+# Display the features supported by this script.
+func_features ()
+{
+    echo "host: $host"
+    if test yes = "$build_libtool_libs"; then
+      echo "enable shared libraries"
+    else
+      echo "disable shared libraries"
+    fi
+    if test yes = "$build_old_libs"; then
+      echo "enable static libraries"
+    else
+      echo "disable static libraries"
+    fi
+
+    exit $?
+}
+
+
+# func_enable_tag TAGNAME
+# -----------------------
+# Verify that TAGNAME is valid, and either flag an error and exit, or
+# enable the TAGNAME tag.  We also add TAGNAME to the global $taglist
+# variable here.
+func_enable_tag ()
+{
+    # Global variable:
+    tagname=$1
+
+    re_begincf="^# ### BEGIN LIBTOOL TAG CONFIG: $tagname\$"
+    re_endcf="^# ### END LIBTOOL TAG CONFIG: $tagname\$"
+    sed_extractcf=/$re_begincf/,/$re_endcf/p
+
+    # Validate tagname.
+    case $tagname in
+      *[!-_A-Za-z0-9,/]*)
+        func_fatal_error "invalid tag name: $tagname"
+        ;;
+    esac
+
+    # Don't test for the "default" C tag, as we know it's
+    # there but not specially marked.
+    case $tagname in
+        CC) ;;
+    *)
+        if $GREP "$re_begincf" "$progpath" >/dev/null 2>&1; then
+         taglist="$taglist $tagname"
+
+         # Evaluate the configuration.  Be careful to quote the path
+         # and the sed script, to avoid splitting on whitespace, but
+         # also don't use non-portable quotes within backquotes within
+         # quotes we have to do it in 2 steps:
+         extractedcf=`$SED -n -e "$sed_extractcf" < "$progpath"`
+         eval "$extractedcf"
+        else
+         func_error "ignoring unknown tag $tagname"
+        fi
+        ;;
+    esac
+}
+
+
+# func_check_version_match
+# ------------------------
+# Ensure that we are using m4 macros, and libtool script from the same
+# release of libtool.
+func_check_version_match ()
+{
+    if test "$package_revision" != "$macro_revision"; then
+      if test "$VERSION" != "$macro_version"; then
+        if test -z "$macro_version"; then
+          cat >&2 <<_LT_EOF
+$progname: Version mismatch error.  This is $PACKAGE $VERSION, but the
+$progname: definition of this LT_INIT comes from an older release.
+$progname: You should recreate aclocal.m4 with macros from $PACKAGE $VERSION
+$progname: and run autoconf again.
+_LT_EOF
+        else
+          cat >&2 <<_LT_EOF
+$progname: Version mismatch error.  This is $PACKAGE $VERSION, but the
+$progname: definition of this LT_INIT comes from $PACKAGE $macro_version.
+$progname: You should recreate aclocal.m4 with macros from $PACKAGE $VERSION
+$progname: and run autoconf again.
+_LT_EOF
+        fi
+      else
+        cat >&2 <<_LT_EOF
+$progname: Version mismatch error.  This is $PACKAGE $VERSION, revision $package_revision,
+$progname: but the definition of this LT_INIT comes from revision $macro_revision.
+$progname: You should recreate aclocal.m4 with macros from revision $package_revision
+$progname: of $PACKAGE $VERSION and run autoconf again.
+_LT_EOF
+      fi
+
+      exit $EXIT_MISMATCH
+    fi
+}
+
+
+# libtool_options_prep [ARG]...
+# -----------------------------
+# Preparation for options parsed by libtool.
+libtool_options_prep ()
+{
+    $debug_mode
+
+    # Option defaults:
+    opt_config=false
+    opt_dlopen=
+    opt_dry_run=false
+    opt_help=false
+    opt_mode=
+    opt_preserve_dup_deps=false
+    opt_quiet=false
+
+    nonopt=
+    preserve_args=
+
+    # Shorthand for --mode=foo, only valid as the first argument
+    case $1 in
+    clean|clea|cle|cl)
+      shift; set dummy --mode clean ${1+"$@"}; shift
+      ;;
+    compile|compil|compi|comp|com|co|c)
+      shift; set dummy --mode compile ${1+"$@"}; shift
+      ;;
+    execute|execut|execu|exec|exe|ex|e)
+      shift; set dummy --mode execute ${1+"$@"}; shift
+      ;;
+    finish|finis|fini|fin|fi|f)
+      shift; set dummy --mode finish ${1+"$@"}; shift
+      ;;
+    install|instal|insta|inst|ins|in|i)
+      shift; set dummy --mode install ${1+"$@"}; shift
+      ;;
+    link|lin|li|l)
+      shift; set dummy --mode link ${1+"$@"}; shift
+      ;;
+    uninstall|uninstal|uninsta|uninst|unins|unin|uni|un|u)
+      shift; set dummy --mode uninstall ${1+"$@"}; shift
+      ;;
+    esac
+
+    # Pass back the list of options.
+    func_quote_for_eval ${1+"$@"}
+    libtool_options_prep_result=$func_quote_for_eval_result
+}
+func_add_hook func_options_prep libtool_options_prep
+
+
+# libtool_parse_options [ARG]...
+# ---------------------------------
+# Provide handling for libtool specific options.
+libtool_parse_options ()
+{
+    $debug_cmd
+
+    # Perform our own loop to consume as many options as possible in
+    # each iteration.
+    while test $# -gt 0; do
+      _G_opt=$1
+      shift
+      case $_G_opt in
+        --dry-run|--dryrun|-n)
+                        opt_dry_run=:
+                        ;;
+
+        --config)       func_config ;;
+
+        --dlopen|-dlopen)
+                        opt_dlopen="${opt_dlopen+$opt_dlopen
+}$1"
+                        shift
+                        ;;
+
+        --preserve-dup-deps)
+                        opt_preserve_dup_deps=: ;;
+
+        --features)     func_features ;;
+
+        --finish)       set dummy --mode finish ${1+"$@"}; shift ;;
+
+        --help)         opt_help=: ;;
+
+        --help-all)     opt_help=': help-all' ;;
+
+        --mode)         test $# = 0 && func_missing_arg $_G_opt && break
+                        opt_mode=$1
+                        case $1 in
+                          # Valid mode arguments:
+                          clean|compile|execute|finish|install|link|relink|uninstall) ;;
+
+                          # Catch anything else as an error
+                          *) func_error "invalid argument for $_G_opt"
+                             exit_cmd=exit
+                             break
+                             ;;
+                        esac
+                        shift
+                        ;;
+
+        --no-silent|--no-quiet)
+                        opt_quiet=false
+                        func_append preserve_args " $_G_opt"
+                        ;;
+
+        --no-warnings|--no-warning|--no-warn)
+                        opt_warning=false
+                        func_append preserve_args " $_G_opt"
+                        ;;
+
+        --no-verbose)
+                        opt_verbose=false
+                        func_append preserve_args " $_G_opt"
+                        ;;
+
+        --silent|--quiet)
+                        opt_quiet=:
+                        opt_verbose=false
+                        func_append preserve_args " $_G_opt"
+                        ;;
+
+        --tag)          test $# = 0 && func_missing_arg $_G_opt && break
+                        opt_tag=$1
+                        func_append preserve_args " $_G_opt $1"
+                        func_enable_tag "$1"
+                        shift
+                        ;;
+
+        --verbose|-v)   opt_quiet=false
+                        opt_verbose=:
+                        func_append preserve_args " $_G_opt"
+                        ;;
+
+       # An option not handled by this hook function:
+        *)             set dummy "$_G_opt" ${1+"$@"};  shift; break  ;;
+      esac
+    done
+
+
+    # save modified positional parameters for caller
+    func_quote_for_eval ${1+"$@"}
+    libtool_parse_options_result=$func_quote_for_eval_result
+}
+func_add_hook func_parse_options libtool_parse_options
+
+
+
+# libtool_validate_options [ARG]...
+# ---------------------------------
+# Perform any sanity checks on option settings and/or unconsumed
+# arguments.
+libtool_validate_options ()
+{
+    # save first non-option argument
+    if test 0 -lt $#; then
+      nonopt=$1
+      shift
+    fi
+
+    # preserve --debug
+    test : = "$debug_cmd" || func_append preserve_args " --debug"
+
+    case $host in
+      # Solaris2 added to fix http://debbugs.gnu.org/cgi/bugreport.cgi?bug=16452
+      # see also: http://gcc.gnu.org/bugzilla/show_bug.cgi?id=59788
+      *cygwin* | *mingw* | *pw32* | *cegcc* | *solaris2* | *os2*)
+        # don't eliminate duplications in $postdeps and $predeps
+        opt_duplicate_compiler_generated_deps=:
+        ;;
+      *)
+        opt_duplicate_compiler_generated_deps=$opt_preserve_dup_deps
+        ;;
+    esac
+
+    $opt_help || {
+      # Sanity checks first:
+      func_check_version_match
+
+      test yes != "$build_libtool_libs" \
+        && test yes != "$build_old_libs" \
+        && func_fatal_configuration "not configured to build any kind of library"
+
+      # Darwin sucks
+      eval std_shrext=\"$shrext_cmds\"
+
+      # Only execute mode is allowed to have -dlopen flags.
+      if test -n "$opt_dlopen" && test execute != "$opt_mode"; then
+        func_error "unrecognized option '-dlopen'"
+        $ECHO "$help" 1>&2
+        exit $EXIT_FAILURE
+      fi
+
+      # Change the help message to a mode-specific one.
+      generic_help=$help
+      help="Try '$progname --help --mode=$opt_mode' for more information."
+    }
+
+    # Pass back the unparsed argument list
+    func_quote_for_eval ${1+"$@"}
+    libtool_validate_options_result=$func_quote_for_eval_result
+}
+func_add_hook func_validate_options libtool_validate_options
+
+
+# Process options as early as possible so that --help and --version
+# can return quickly.
+func_options ${1+"$@"}
+eval set dummy "$func_options_result"; shift
+
+
+
+## ----------- ##
+##    Main.    ##
+## ----------- ##
+
+magic='%%%MAGIC variable%%%'
+magic_exe='%%%MAGIC EXE variable%%%'
+
+# Global variables.
+extracted_archives=
+extracted_serial=0
+
+# If this variable is set in any of the actions, the command in it
+# will be execed at the end.  This prevents here-documents from being
+# left over by shells.
+exec_cmd=
+
+
+# A function that is used when there is no print builtin or printf.
+func_fallback_echo ()
+{
+  eval 'cat <<_LTECHO_EOF
+$1
+_LTECHO_EOF'
+}
+
+# func_generated_by_libtool
+# True iff stdin has been generated by Libtool. This function is only
+# a basic sanity check; it will hardly flush out determined imposters.
+func_generated_by_libtool_p ()
+{
+  $GREP "^# Generated by .*$PACKAGE" > /dev/null 2>&1
+}
+
+# func_lalib_p file
+# True iff FILE is a libtool '.la' library or '.lo' object file.
+# This function is only a basic sanity check; it will hardly flush out
+# determined imposters.
+func_lalib_p ()
+{
+    test -f "$1" &&
+      $SED -e 4q "$1" 2>/dev/null | func_generated_by_libtool_p
+}
+
+# func_lalib_unsafe_p file
+# True iff FILE is a libtool '.la' library or '.lo' object file.
+# This function implements the same check as func_lalib_p without
+# resorting to external programs.  To this end, it redirects stdin and
+# closes it afterwards, without saving the original file descriptor.
+# As a safety measure, use it only where a negative result would be
+# fatal anyway.  Works if 'file' does not exist.
+func_lalib_unsafe_p ()
+{
+    lalib_p=no
+    if test -f "$1" && test -r "$1" && exec 5<&0 <"$1"; then
+       for lalib_p_l in 1 2 3 4
+       do
+           read lalib_p_line
+           case $lalib_p_line in
+               \#\ Generated\ by\ *$PACKAGE* ) lalib_p=yes; break;;
+           esac
+       done
+       exec 0<&5 5<&-
+    fi
+    test yes = "$lalib_p"
+}
+
+# func_ltwrapper_script_p file
+# True iff FILE is a libtool wrapper script
+# This function is only a basic sanity check; it will hardly flush out
+# determined imposters.
+func_ltwrapper_script_p ()
+{
+    test -f "$1" &&
+      $lt_truncate_bin < "$1" 2>/dev/null | func_generated_by_libtool_p
+}
+
+# func_ltwrapper_executable_p file
+# True iff FILE is a libtool wrapper executable
+# This function is only a basic sanity check; it will hardly flush out
+# determined imposters.
+func_ltwrapper_executable_p ()
+{
+    func_ltwrapper_exec_suffix=
+    case $1 in
+    *.exe) ;;
+    *) func_ltwrapper_exec_suffix=.exe ;;
+    esac
+    $GREP "$magic_exe" "$1$func_ltwrapper_exec_suffix" >/dev/null 2>&1
+}
+
+# func_ltwrapper_scriptname file
+# Assumes file is an ltwrapper_executable
+# uses $file to determine the appropriate filename for a
+# temporary ltwrapper_script.
+func_ltwrapper_scriptname ()
+{
+    func_dirname_and_basename "$1" "" "."
+    func_stripname '' '.exe' "$func_basename_result"
+    func_ltwrapper_scriptname_result=$func_dirname_result/$objdir/${func_stripname_result}_ltshwrapper
+}
+
+# func_ltwrapper_p file
+# True iff FILE is a libtool wrapper script or wrapper executable
+# This function is only a basic sanity check; it will hardly flush out
+# determined imposters.
+func_ltwrapper_p ()
+{
+    func_ltwrapper_script_p "$1" || func_ltwrapper_executable_p "$1"
+}
+
+
+# func_execute_cmds commands fail_cmd
+# Execute tilde-delimited COMMANDS.
+# If FAIL_CMD is given, eval that upon failure.
+# FAIL_CMD may read-access the current command in variable CMD!
+func_execute_cmds ()
+{
+    $debug_cmd
+
+    save_ifs=$IFS; IFS='~'
+    for cmd in $1; do
+      IFS=$sp$nl
+      eval cmd=\"$cmd\"
+      IFS=$save_ifs
+      func_show_eval "$cmd" "${2-:}"
+    done
+    IFS=$save_ifs
+}
+
+
+# func_source file
+# Source FILE, adding directory component if necessary.
+# Note that it is not necessary on cygwin/mingw to append a dot to
+# FILE even if both FILE and FILE.exe exist: automatic-append-.exe
+# behavior happens only for exec(3), not for open(2)!  Also, sourcing
+# 'FILE.' does not work on cygwin managed mounts.
+func_source ()
+{
+    $debug_cmd
+
+    case $1 in
+    */* | *\\*)        . "$1" ;;
+    *)         . "./$1" ;;
+    esac
+}
+
+
+# func_resolve_sysroot PATH
+# Replace a leading = in PATH with a sysroot.  Store the result into
+# func_resolve_sysroot_result
+func_resolve_sysroot ()
+{
+  func_resolve_sysroot_result=$1
+  case $func_resolve_sysroot_result in
+  =*)
+    func_stripname '=' '' "$func_resolve_sysroot_result"
+    func_resolve_sysroot_result=$lt_sysroot$func_stripname_result
+    ;;
+  esac
+}
+
+# func_replace_sysroot PATH
+# If PATH begins with the sysroot, replace it with = and
+# store the result into func_replace_sysroot_result.
+func_replace_sysroot ()
+{
+  case $lt_sysroot:$1 in
+  ?*:"$lt_sysroot"*)
+    func_stripname "$lt_sysroot" '' "$1"
+    func_replace_sysroot_result='='$func_stripname_result
+    ;;
+  *)
+    # Including no sysroot.
+    func_replace_sysroot_result=$1
+    ;;
+  esac
+}
+
+# func_infer_tag arg
+# Infer tagged configuration to use if any are available and
+# if one wasn't chosen via the "--tag" command line option.
+# Only attempt this if the compiler in the base compile
+# command doesn't match the default compiler.
+# arg is usually of the form 'gcc ...'
+func_infer_tag ()
+{
+    $debug_cmd
+
+    if test -n "$available_tags" && test -z "$tagname"; then
+      CC_quoted=
+      for arg in $CC; do
+       func_append_quoted CC_quoted "$arg"
+      done
+      CC_expanded=`func_echo_all $CC`
+      CC_quoted_expanded=`func_echo_all $CC_quoted`
+      case $@ in
+      # Blanks in the command may have been stripped by the calling shell,
+      # but not from the CC environment variable when configure was run.
+      " $CC "* | "$CC "* | " $CC_expanded "* | "$CC_expanded "* | \
+      " $CC_quoted"* | "$CC_quoted "* | " $CC_quoted_expanded "* | "$CC_quoted_expanded "*) ;;
+      # Blanks at the start of $base_compile will cause this to fail
+      # if we don't check for them as well.
+      *)
+       for z in $available_tags; do
+         if $GREP "^# ### BEGIN LIBTOOL TAG CONFIG: $z$" < "$progpath" > /dev/null; then
+           # Evaluate the configuration.
+           eval "`$SED -n -e '/^# ### BEGIN LIBTOOL TAG CONFIG: '$z'$/,/^# ### END LIBTOOL TAG CONFIG: '$z'$/p' < $progpath`"
+           CC_quoted=
+           for arg in $CC; do
+             # Double-quote args containing other shell metacharacters.
+             func_append_quoted CC_quoted "$arg"
+           done
+           CC_expanded=`func_echo_all $CC`
+           CC_quoted_expanded=`func_echo_all $CC_quoted`
+           case "$@ " in
+           " $CC "* | "$CC "* | " $CC_expanded "* | "$CC_expanded "* | \
+           " $CC_quoted"* | "$CC_quoted "* | " $CC_quoted_expanded "* | "$CC_quoted_expanded "*)
+             # The compiler in the base compile command matches
+             # the one in the tagged configuration.
+             # Assume this is the tagged configuration we want.
+             tagname=$z
+             break
+             ;;
+           esac
+         fi
+       done
+       # If $tagname still isn't set, then no tagged configuration
+       # was found and let the user know that the "--tag" command
+       # line option must be used.
+       if test -z "$tagname"; then
+         func_echo "unable to infer tagged configuration"
+         func_fatal_error "specify a tag with '--tag'"
+#      else
+#        func_verbose "using $tagname tagged configuration"
+       fi
+       ;;
+      esac
+    fi
+}
+
+
+
+# func_write_libtool_object output_name pic_name nonpic_name
+# Create a libtool object file (analogous to a ".la" file),
+# but don't create it if we're doing a dry run.
+func_write_libtool_object ()
+{
+    write_libobj=$1
+    if test yes = "$build_libtool_libs"; then
+      write_lobj=\'$2\'
+    else
+      write_lobj=none
+    fi
+
+    if test yes = "$build_old_libs"; then
+      write_oldobj=\'$3\'
+    else
+      write_oldobj=none
+    fi
+
+    $opt_dry_run || {
+      cat >${write_libobj}T <<EOF
+# $write_libobj - a libtool object file
+# Generated by $PROGRAM (GNU $PACKAGE) $VERSION
+#
+# Please DO NOT delete this file!
+# It is necessary for linking the library.
+
+# Name of the PIC object.
+pic_object=$write_lobj
+
+# Name of the non-PIC object
+non_pic_object=$write_oldobj
+
+EOF
+      $MV "${write_libobj}T" "$write_libobj"
+    }
+}
+
+
+##################################################
+# FILE NAME AND PATH CONVERSION HELPER FUNCTIONS #
+##################################################
+
+# func_convert_core_file_wine_to_w32 ARG
+# Helper function used by file name conversion functions when $build is *nix,
+# and $host is mingw, cygwin, or some other w32 environment. Relies on a
+# correctly configured wine environment available, with the winepath program
+# in $build's $PATH.
+#
+# ARG is the $build file name to be converted to w32 format.
+# Result is available in $func_convert_core_file_wine_to_w32_result, and will
+# be empty on error (or when ARG is empty)
+func_convert_core_file_wine_to_w32 ()
+{
+  $debug_cmd
+
+  func_convert_core_file_wine_to_w32_result=$1
+  if test -n "$1"; then
+    # Unfortunately, winepath does not exit with a non-zero error code, so we
+    # are forced to check the contents of stdout. On the other hand, if the
+    # command is not found, the shell will set an exit code of 127 and print
+    # *an error message* to stdout. So we must check for both error code of
+    # zero AND non-empty stdout, which explains the odd construction:
+    func_convert_core_file_wine_to_w32_tmp=`winepath -w "$1" 2>/dev/null`
+    if test "$?" -eq 0 && test -n "$func_convert_core_file_wine_to_w32_tmp"; then
+      func_convert_core_file_wine_to_w32_result=`$ECHO "$func_convert_core_file_wine_to_w32_tmp" |
+        $SED -e "$sed_naive_backslashify"`
+    else
+      func_convert_core_file_wine_to_w32_result=
+    fi
+  fi
+}
+# end: func_convert_core_file_wine_to_w32
+
+
+# func_convert_core_path_wine_to_w32 ARG
+# Helper function used by path conversion functions when $build is *nix, and
+# $host is mingw, cygwin, or some other w32 environment. Relies on a correctly
+# configured wine environment available, with the winepath program in $build's
+# $PATH. Assumes ARG has no leading or trailing path separator characters.
+#
+# ARG is path to be converted from $build format to win32.
+# Result is available in $func_convert_core_path_wine_to_w32_result.
+# Unconvertible file (directory) names in ARG are skipped; if no directory names
+# are convertible, then the result may be empty.
+func_convert_core_path_wine_to_w32 ()
+{
+  $debug_cmd
+
+  # unfortunately, winepath doesn't convert paths, only file names
+  func_convert_core_path_wine_to_w32_result=
+  if test -n "$1"; then
+    oldIFS=$IFS
+    IFS=:
+    for func_convert_core_path_wine_to_w32_f in $1; do
+      IFS=$oldIFS
+      func_convert_core_file_wine_to_w32 "$func_convert_core_path_wine_to_w32_f"
+      if test -n "$func_convert_core_file_wine_to_w32_result"; then
+        if test -z "$func_convert_core_path_wine_to_w32_result"; then
+          func_convert_core_path_wine_to_w32_result=$func_convert_core_file_wine_to_w32_result
+        else
+          func_append func_convert_core_path_wine_to_w32_result ";$func_convert_core_file_wine_to_w32_result"
+        fi
+      fi
+    done
+    IFS=$oldIFS
+  fi
+}
+# end: func_convert_core_path_wine_to_w32
+
+
+# func_cygpath ARGS...
+# Wrapper around calling the cygpath program via LT_CYGPATH. This is used when
+# when (1) $build is *nix and Cygwin is hosted via a wine environment; or (2)
+# $build is MSYS and $host is Cygwin, or (3) $build is Cygwin. In case (1) or
+# (2), returns the Cygwin file name or path in func_cygpath_result (input
+# file name or path is assumed to be in w32 format, as previously converted
+# from $build's *nix or MSYS format). In case (3), returns the w32 file name
+# or path in func_cygpath_result (input file name or path is assumed to be in
+# Cygwin format). Returns an empty string on error.
+#
+# ARGS are passed to cygpath, with the last one being the file name or path to
+# be converted.
+#
+# Specify the absolute *nix (or w32) name to cygpath in the LT_CYGPATH
+# environment variable; do not put it in $PATH.
+func_cygpath ()
+{
+  $debug_cmd
+
+  if test -n "$LT_CYGPATH" && test -f "$LT_CYGPATH"; then
+    func_cygpath_result=`$LT_CYGPATH "$@" 2>/dev/null`
+    if test "$?" -ne 0; then
+      # on failure, ensure result is empty
+      func_cygpath_result=
+    fi
+  else
+    func_cygpath_result=
+    func_error "LT_CYGPATH is empty or specifies non-existent file: '$LT_CYGPATH'"
+  fi
+}
+#end: func_cygpath
+
+
+# func_convert_core_msys_to_w32 ARG
+# Convert file name or path ARG from MSYS format to w32 format.  Return
+# result in func_convert_core_msys_to_w32_result.
+func_convert_core_msys_to_w32 ()
+{
+  $debug_cmd
+
+  # awkward: cmd appends spaces to result
+  func_convert_core_msys_to_w32_result=`( cmd //c echo "$1" ) 2>/dev/null |
+    $SED -e 's/[ ]*$//' -e "$sed_naive_backslashify"`
+}
+#end: func_convert_core_msys_to_w32
+
+
+# func_convert_file_check ARG1 ARG2
+# Verify that ARG1 (a file name in $build format) was converted to $host
+# format in ARG2. Otherwise, emit an error message, but continue (resetting
+# func_to_host_file_result to ARG1).
+func_convert_file_check ()
+{
+  $debug_cmd
+
+  if test -z "$2" && test -n "$1"; then
+    func_error "Could not determine host file name corresponding to"
+    func_error "  '$1'"
+    func_error "Continuing, but uninstalled executables may not work."
+    # Fallback:
+    func_to_host_file_result=$1
+  fi
+}
+# end func_convert_file_check
+
+
+# func_convert_path_check FROM_PATHSEP TO_PATHSEP FROM_PATH TO_PATH
+# Verify that FROM_PATH (a path in $build format) was converted to $host
+# format in TO_PATH. Otherwise, emit an error message, but continue, resetting
+# func_to_host_file_result to a simplistic fallback value (see below).
+func_convert_path_check ()
+{
+  $debug_cmd
+
+  if test -z "$4" && test -n "$3"; then
+    func_error "Could not determine the host path corresponding to"
+    func_error "  '$3'"
+    func_error "Continuing, but uninstalled executables may not work."
+    # Fallback.  This is a deliberately simplistic "conversion" and
+    # should not be "improved".  See libtool.info.
+    if test "x$1" != "x$2"; then
+      lt_replace_pathsep_chars="s|$1|$2|g"
+      func_to_host_path_result=`echo "$3" |
+        $SED -e "$lt_replace_pathsep_chars"`
+    else
+      func_to_host_path_result=$3
+    fi
+  fi
+}
+# end func_convert_path_check
+
+
+# func_convert_path_front_back_pathsep FRONTPAT BACKPAT REPL ORIG
+# Modifies func_to_host_path_result by prepending REPL if ORIG matches FRONTPAT
+# and appending REPL if ORIG matches BACKPAT.
+func_convert_path_front_back_pathsep ()
+{
+  $debug_cmd
+
+  case $4 in
+  $1 ) func_to_host_path_result=$3$func_to_host_path_result
+    ;;
+  esac
+  case $4 in
+  $2 ) func_append func_to_host_path_result "$3"
+    ;;
+  esac
+}
+# end func_convert_path_front_back_pathsep
+
+
+##################################################
+# $build to $host FILE NAME CONVERSION FUNCTIONS #
+##################################################
+# invoked via '$to_host_file_cmd ARG'
+#
+# In each case, ARG is the path to be converted from $build to $host format.
+# Result will be available in $func_to_host_file_result.
+
+
+# func_to_host_file ARG
+# Converts the file name ARG from $build format to $host format. Return result
+# in func_to_host_file_result.
+func_to_host_file ()
+{
+  $debug_cmd
+
+  $to_host_file_cmd "$1"
+}
+# end func_to_host_file
+
+
+# func_to_tool_file ARG LAZY
+# converts the file name ARG from $build format to toolchain format. Return
+# result in func_to_tool_file_result.  If the conversion in use is listed
+# in (the comma separated) LAZY, no conversion takes place.
+func_to_tool_file ()
+{
+  $debug_cmd
+
+  case ,$2, in
+    *,"$to_tool_file_cmd",*)
+      func_to_tool_file_result=$1
+      ;;
+    *)
+      $to_tool_file_cmd "$1"
+      func_to_tool_file_result=$func_to_host_file_result
+      ;;
+  esac
+}
+# end func_to_tool_file
+
+
+# func_convert_file_noop ARG
+# Copy ARG to func_to_host_file_result.
+func_convert_file_noop ()
+{
+  func_to_host_file_result=$1
+}
+# end func_convert_file_noop
+
+
+# func_convert_file_msys_to_w32 ARG
+# Convert file name ARG from (mingw) MSYS to (mingw) w32 format; automatic
+# conversion to w32 is not available inside the cwrapper.  Returns result in
+# func_to_host_file_result.
+func_convert_file_msys_to_w32 ()
+{
+  $debug_cmd
+
+  func_to_host_file_result=$1
+  if test -n "$1"; then
+    func_convert_core_msys_to_w32 "$1"
+    func_to_host_file_result=$func_convert_core_msys_to_w32_result
+  fi
+  func_convert_file_check "$1" "$func_to_host_file_result"
+}
+# end func_convert_file_msys_to_w32
+
+
+# func_convert_file_cygwin_to_w32 ARG
+# Convert file name ARG from Cygwin to w32 format.  Returns result in
+# func_to_host_file_result.
+func_convert_file_cygwin_to_w32 ()
+{
+  $debug_cmd
+
+  func_to_host_file_result=$1
+  if test -n "$1"; then
+    # because $build is cygwin, we call "the" cygpath in $PATH; no need to use
+    # LT_CYGPATH in this case.
+    func_to_host_file_result=`cygpath -m "$1"`
+  fi
+  func_convert_file_check "$1" "$func_to_host_file_result"
+}
+# end func_convert_file_cygwin_to_w32
+
+
+# func_convert_file_nix_to_w32 ARG
+# Convert file name ARG from *nix to w32 format.  Requires a wine environment
+# and a working winepath. Returns result in func_to_host_file_result.
+func_convert_file_nix_to_w32 ()
+{
+  $debug_cmd
+
+  func_to_host_file_result=$1
+  if test -n "$1"; then
+    func_convert_core_file_wine_to_w32 "$1"
+    func_to_host_file_result=$func_convert_core_file_wine_to_w32_result
+  fi
+  func_convert_file_check "$1" "$func_to_host_file_result"
+}
+# end func_convert_file_nix_to_w32
+
+
+# func_convert_file_msys_to_cygwin ARG
+# Convert file name ARG from MSYS to Cygwin format.  Requires LT_CYGPATH set.
+# Returns result in func_to_host_file_result.
+func_convert_file_msys_to_cygwin ()
+{
+  $debug_cmd
+
+  func_to_host_file_result=$1
+  if test -n "$1"; then
+    func_convert_core_msys_to_w32 "$1"
+    func_cygpath -u "$func_convert_core_msys_to_w32_result"
+    func_to_host_file_result=$func_cygpath_result
+  fi
+  func_convert_file_check "$1" "$func_to_host_file_result"
+}
+# end func_convert_file_msys_to_cygwin
+
+
+# func_convert_file_nix_to_cygwin ARG
+# Convert file name ARG from *nix to Cygwin format.  Requires Cygwin installed
+# in a wine environment, working winepath, and LT_CYGPATH set.  Returns result
+# in func_to_host_file_result.
+func_convert_file_nix_to_cygwin ()
+{
+  $debug_cmd
+
+  func_to_host_file_result=$1
+  if test -n "$1"; then
+    # convert from *nix to w32, then use cygpath to convert from w32 to cygwin.
+    func_convert_core_file_wine_to_w32 "$1"
+    func_cygpath -u "$func_convert_core_file_wine_to_w32_result"
+    func_to_host_file_result=$func_cygpath_result
+  fi
+  func_convert_file_check "$1" "$func_to_host_file_result"
+}
+# end func_convert_file_nix_to_cygwin
+
+
+#############################################
+# $build to $host PATH CONVERSION FUNCTIONS #
+#############################################
+# invoked via '$to_host_path_cmd ARG'
+#
+# In each case, ARG is the path to be converted from $build to $host format.
+# The result will be available in $func_to_host_path_result.
+#
+# Path separators are also converted from $build format to $host format.  If
+# ARG begins or ends with a path separator character, it is preserved (but
+# converted to $host format) on output.
+#
+# All path conversion functions are named using the following convention:
+#   file name conversion function    : func_convert_file_X_to_Y ()
+#   path conversion function         : func_convert_path_X_to_Y ()
+# where, for any given $build/$host combination the 'X_to_Y' value is the
+# same.  If conversion functions are added for new $build/$host combinations,
+# the two new functions must follow this pattern, or func_init_to_host_path_cmd
+# will break.
+
+
+# func_init_to_host_path_cmd
+# Ensures that function "pointer" variable $to_host_path_cmd is set to the
+# appropriate value, based on the value of $to_host_file_cmd.
+to_host_path_cmd=
+func_init_to_host_path_cmd ()
+{
+  $debug_cmd
+
+  if test -z "$to_host_path_cmd"; then
+    func_stripname 'func_convert_file_' '' "$to_host_file_cmd"
+    to_host_path_cmd=func_convert_path_$func_stripname_result
+  fi
+}
+
+
+# func_to_host_path ARG
+# Converts the path ARG from $build format to $host format. Return result
+# in func_to_host_path_result.
+func_to_host_path ()
+{
+  $debug_cmd
+
+  func_init_to_host_path_cmd
+  $to_host_path_cmd "$1"
+}
+# end func_to_host_path
+
+
+# func_convert_path_noop ARG
+# Copy ARG to func_to_host_path_result.
+func_convert_path_noop ()
+{
+  func_to_host_path_result=$1
+}
+# end func_convert_path_noop
+
+
+# func_convert_path_msys_to_w32 ARG
+# Convert path ARG from (mingw) MSYS to (mingw) w32 format; automatic
+# conversion to w32 is not available inside the cwrapper.  Returns result in
+# func_to_host_path_result.
+func_convert_path_msys_to_w32 ()
+{
+  $debug_cmd
+
+  func_to_host_path_result=$1
+  if test -n "$1"; then
+    # Remove leading and trailing path separator characters from ARG.  MSYS
+    # behavior is inconsistent here; cygpath turns them into '.;' and ';.';
+    # and winepath ignores them completely.
+    func_stripname : : "$1"
+    func_to_host_path_tmp1=$func_stripname_result
+    func_convert_core_msys_to_w32 "$func_to_host_path_tmp1"
+    func_to_host_path_result=$func_convert_core_msys_to_w32_result
+    func_convert_path_check : ";" \
+      "$func_to_host_path_tmp1" "$func_to_host_path_result"
+    func_convert_path_front_back_pathsep ":*" "*:" ";" "$1"
+  fi
+}
+# end func_convert_path_msys_to_w32
+
+
+# func_convert_path_cygwin_to_w32 ARG
+# Convert path ARG from Cygwin to w32 format.  Returns result in
+# func_to_host_file_result.
+func_convert_path_cygwin_to_w32 ()
+{
+  $debug_cmd
+
+  func_to_host_path_result=$1
+  if test -n "$1"; then
+    # See func_convert_path_msys_to_w32:
+    func_stripname : : "$1"
+    func_to_host_path_tmp1=$func_stripname_result
+    func_to_host_path_result=`cygpath -m -p "$func_to_host_path_tmp1"`
+    func_convert_path_check : ";" \
+      "$func_to_host_path_tmp1" "$func_to_host_path_result"
+    func_convert_path_front_back_pathsep ":*" "*:" ";" "$1"
+  fi
+}
+# end func_convert_path_cygwin_to_w32
+
+
+# func_convert_path_nix_to_w32 ARG
+# Convert path ARG from *nix to w32 format.  Requires a wine environment and
+# a working winepath.  Returns result in func_to_host_file_result.
+func_convert_path_nix_to_w32 ()
+{
+  $debug_cmd
+
+  func_to_host_path_result=$1
+  if test -n "$1"; then
+    # See func_convert_path_msys_to_w32:
+    func_stripname : : "$1"
+    func_to_host_path_tmp1=$func_stripname_result
+    func_convert_core_path_wine_to_w32 "$func_to_host_path_tmp1"
+    func_to_host_path_result=$func_convert_core_path_wine_to_w32_result
+    func_convert_path_check : ";" \
+      "$func_to_host_path_tmp1" "$func_to_host_path_result"
+    func_convert_path_front_back_pathsep ":*" "*:" ";" "$1"
+  fi
+}
+# end func_convert_path_nix_to_w32
+
+
+# func_convert_path_msys_to_cygwin ARG
+# Convert path ARG from MSYS to Cygwin format.  Requires LT_CYGPATH set.
+# Returns result in func_to_host_file_result.
+func_convert_path_msys_to_cygwin ()
+{
+  $debug_cmd
+
+  func_to_host_path_result=$1
+  if test -n "$1"; then
+    # See func_convert_path_msys_to_w32:
+    func_stripname : : "$1"
+    func_to_host_path_tmp1=$func_stripname_result
+    func_convert_core_msys_to_w32 "$func_to_host_path_tmp1"
+    func_cygpath -u -p "$func_convert_core_msys_to_w32_result"
+    func_to_host_path_result=$func_cygpath_result
+    func_convert_path_check : : \
+      "$func_to_host_path_tmp1" "$func_to_host_path_result"
+    func_convert_path_front_back_pathsep ":*" "*:" : "$1"
+  fi
+}
+# end func_convert_path_msys_to_cygwin
+
+
+# func_convert_path_nix_to_cygwin ARG
+# Convert path ARG from *nix to Cygwin format.  Requires Cygwin installed in a
+# a wine environment, working winepath, and LT_CYGPATH set.  Returns result in
+# func_to_host_file_result.
+func_convert_path_nix_to_cygwin ()
+{
+  $debug_cmd
+
+  func_to_host_path_result=$1
+  if test -n "$1"; then
+    # Remove leading and trailing path separator characters from
+    # ARG. msys behavior is inconsistent here, cygpath turns them
+    # into '.;' and ';.', and winepath ignores them completely.
+    func_stripname : : "$1"
+    func_to_host_path_tmp1=$func_stripname_result
+    func_convert_core_path_wine_to_w32 "$func_to_host_path_tmp1"
+    func_cygpath -u -p "$func_convert_core_path_wine_to_w32_result"
+    func_to_host_path_result=$func_cygpath_result
+    func_convert_path_check : : \
+      "$func_to_host_path_tmp1" "$func_to_host_path_result"
+    func_convert_path_front_back_pathsep ":*" "*:" : "$1"
+  fi
+}
+# end func_convert_path_nix_to_cygwin
+
+
+# func_dll_def_p FILE
+# True iff FILE is a Windows DLL '.def' file.
+# Keep in sync with _LT_DLL_DEF_P in libtool.m4
+func_dll_def_p ()
+{
+  $debug_cmd
+
+  func_dll_def_p_tmp=`$SED -n \
+    -e 's/^[    ]*//' \
+    -e '/^\(;.*\)*$/d' \
+    -e 's/^\(EXPORTS\|LIBRARY\)\([      ].*\)*$/DEF/p' \
+    -e q \
+    "$1"`
+  test DEF = "$func_dll_def_p_tmp"
+}
+
+
+# func_mode_compile arg...
+func_mode_compile ()
+{
+    $debug_cmd
+
+    # Get the compilation command and the source file.
+    base_compile=
+    srcfile=$nonopt  #  always keep a non-empty value in "srcfile"
+    suppress_opt=yes
+    suppress_output=
+    arg_mode=normal
+    libobj=
+    later=
+    pie_flag=
+
+    for arg
+    do
+      case $arg_mode in
+      arg  )
+       # do not "continue".  Instead, add this to base_compile
+       lastarg=$arg
+       arg_mode=normal
+       ;;
+
+      target )
+       libobj=$arg
+       arg_mode=normal
+       continue
+       ;;
+
+      normal )
+       # Accept any command-line options.
+       case $arg in
+       -o)
+         test -n "$libobj" && \
+           func_fatal_error "you cannot specify '-o' more than once"
+         arg_mode=target
+         continue
+         ;;
+
+       -pie | -fpie | -fPIE)
+          func_append pie_flag " $arg"
+         continue
+         ;;
+
+       -shared | -static | -prefer-pic | -prefer-non-pic)
+         func_append later " $arg"
+         continue
+         ;;
+
+       -no-suppress)
+         suppress_opt=no
+         continue
+         ;;
+
+       -Xcompiler)
+         arg_mode=arg  #  the next one goes into the "base_compile" arg list
+         continue      #  The current "srcfile" will either be retained or
+         ;;            #  replaced later.  I would guess that would be a bug.
+
+       -Wc,*)
+         func_stripname '-Wc,' '' "$arg"
+         args=$func_stripname_result
+         lastarg=
+         save_ifs=$IFS; IFS=,
+         for arg in $args; do
+           IFS=$save_ifs
+           func_append_quoted lastarg "$arg"
+         done
+         IFS=$save_ifs
+         func_stripname ' ' '' "$lastarg"
+         lastarg=$func_stripname_result
+
+         # Add the arguments to base_compile.
+         func_append base_compile " $lastarg"
+         continue
+         ;;
+
+       *)
+         # Accept the current argument as the source file.
+         # The previous "srcfile" becomes the current argument.
+         #
+         lastarg=$srcfile
+         srcfile=$arg
+         ;;
+       esac  #  case $arg
+       ;;
+      esac    #  case $arg_mode
+
+      # Aesthetically quote the previous argument.
+      func_append_quoted base_compile "$lastarg"
+    done # for arg
+
+    case $arg_mode in
+    arg)
+      func_fatal_error "you must specify an argument for -Xcompile"
+      ;;
+    target)
+      func_fatal_error "you must specify a target with '-o'"
+      ;;
+    *)
+      # Get the name of the library object.
+      test -z "$libobj" && {
+       func_basename "$srcfile"
+       libobj=$func_basename_result
+      }
+      ;;
+    esac
+
+    # Recognize several different file suffixes.
+    # If the user specifies -o file.o, it is replaced with file.lo
+    case $libobj in
+    *.[cCFSifmso] | \
+    *.ada | *.adb | *.ads | *.asm | \
+    *.c++ | *.cc | *.ii | *.class | *.cpp | *.cxx | \
+    *.[fF][09]? | *.for | *.java | *.go | *.obj | *.sx | *.cu | *.cup)
+      func_xform "$libobj"
+      libobj=$func_xform_result
+      ;;
+    esac
+
+    case $libobj in
+    *.lo) func_lo2o "$libobj"; obj=$func_lo2o_result ;;
+    *)
+      func_fatal_error "cannot determine name of library object from '$libobj'"
+      ;;
+    esac
+
+    func_infer_tag $base_compile
+
+    for arg in $later; do
+      case $arg in
+      -shared)
+       test yes = "$build_libtool_libs" \
+         || func_fatal_configuration "cannot build a shared library"
+       build_old_libs=no
+       continue
+       ;;
+
+      -static)
+       build_libtool_libs=no
+       build_old_libs=yes
+       continue
+       ;;
+
+      -prefer-pic)
+       pic_mode=yes
+       continue
+       ;;
+
+      -prefer-non-pic)
+       pic_mode=no
+       continue
+       ;;
+      esac
+    done
+
+    func_quote_for_eval "$libobj"
+    test "X$libobj" != "X$func_quote_for_eval_result" \
+      && $ECHO "X$libobj" | $GREP '[]~#^*{};<>?"'"'"'   &()|`$[]' \
+      && func_warning "libobj name '$libobj' may not contain shell special characters."
+    func_dirname_and_basename "$obj" "/" ""
+    objname=$func_basename_result
+    xdir=$func_dirname_result
+    lobj=$xdir$objdir/$objname
+
+    test -z "$base_compile" && \
+      func_fatal_help "you must specify a compilation command"
+
+    # Delete any leftover library objects.
+    if test yes = "$build_old_libs"; then
+      removelist="$obj $lobj $libobj ${libobj}T"
+    else
+      removelist="$lobj $libobj ${libobj}T"
+    fi
+
+    # On Cygwin there's no "real" PIC flag so we must build both object types
+    case $host_os in
+    cygwin* | mingw* | pw32* | os2* | cegcc*)
+      pic_mode=default
+      ;;
+    esac
+    if test no = "$pic_mode" && test pass_all != "$deplibs_check_method"; then
+      # non-PIC code in shared libraries is not supported
+      pic_mode=default
+    fi
+
+    # Calculate the filename of the output object if compiler does
+    # not support -o with -c
+    if test no = "$compiler_c_o"; then
+      output_obj=`$ECHO "$srcfile" | $SED 's%^.*/%%; s%\.[^.]*$%%'`.$objext
+      lockfile=$output_obj.lock
+    else
+      output_obj=
+      need_locks=no
+      lockfile=
+    fi
+
+    # Lock this critical section if it is needed
+    # We use this script file to make the link, it avoids creating a new file
+    if test yes = "$need_locks"; then
+      until $opt_dry_run || ln "$progpath" "$lockfile" 2>/dev/null; do
+       func_echo "Waiting for $lockfile to be removed"
+       sleep 2
+      done
+    elif test warn = "$need_locks"; then
+      if test -f "$lockfile"; then
+       $ECHO "\
+*** ERROR, $lockfile exists and contains:
+`cat $lockfile 2>/dev/null`
+
+This indicates that another process is trying to use the same
+temporary object file, and libtool could not work around it because
+your compiler does not support '-c' and '-o' together.  If you
+repeat this compilation, it may succeed, by chance, but you had better
+avoid parallel builds (make -j) in this platform, or get a better
+compiler."
+
+       $opt_dry_run || $RM $removelist
+       exit $EXIT_FAILURE
+      fi
+      func_append removelist " $output_obj"
+      $ECHO "$srcfile" > "$lockfile"
+    fi
+
+    $opt_dry_run || $RM $removelist
+    func_append removelist " $lockfile"
+    trap '$opt_dry_run || $RM $removelist; exit $EXIT_FAILURE' 1 2 15
+
+    func_to_tool_file "$srcfile" func_convert_file_msys_to_w32
+    srcfile=$func_to_tool_file_result
+    func_quote_for_eval "$srcfile"
+    qsrcfile=$func_quote_for_eval_result
+
+    # Only build a PIC object if we are building libtool libraries.
+    if test yes = "$build_libtool_libs"; then
+      # Without this assignment, base_compile gets emptied.
+      fbsd_hideous_sh_bug=$base_compile
+
+      if test no != "$pic_mode"; then
+       command="$base_compile $qsrcfile $pic_flag"
+      else
+       # Don't build PIC code
+       command="$base_compile $qsrcfile"
+      fi
+
+      func_mkdir_p "$xdir$objdir"
+
+      if test -z "$output_obj"; then
+       # Place PIC objects in $objdir
+       func_append command " -o $lobj"
+      fi
+
+      func_show_eval_locale "$command" \
+          'test -n "$output_obj" && $RM $removelist; exit $EXIT_FAILURE'
+
+      if test warn = "$need_locks" &&
+        test "X`cat $lockfile 2>/dev/null`" != "X$srcfile"; then
+       $ECHO "\
+*** ERROR, $lockfile contains:
+`cat $lockfile 2>/dev/null`
+
+but it should contain:
+$srcfile
+
+This indicates that another process is trying to use the same
+temporary object file, and libtool could not work around it because
+your compiler does not support '-c' and '-o' together.  If you
+repeat this compilation, it may succeed, by chance, but you had better
+avoid parallel builds (make -j) in this platform, or get a better
+compiler."
+
+       $opt_dry_run || $RM $removelist
+       exit $EXIT_FAILURE
+      fi
+
+      # Just move the object if needed, then go on to compile the next one
+      if test -n "$output_obj" && test "X$output_obj" != "X$lobj"; then
+       func_show_eval '$MV "$output_obj" "$lobj"' \
+         'error=$?; $opt_dry_run || $RM $removelist; exit $error'
+      fi
+
+      # Allow error messages only from the first compilation.
+      if test yes = "$suppress_opt"; then
+       suppress_output=' >/dev/null 2>&1'
+      fi
+    fi
+
+    # Only build a position-dependent object if we build old libraries.
+    if test yes = "$build_old_libs"; then
+      if test yes != "$pic_mode"; then
+       # Don't build PIC code
+       command="$base_compile $qsrcfile$pie_flag"
+      else
+       command="$base_compile $qsrcfile $pic_flag"
+      fi
+      if test yes = "$compiler_c_o"; then
+       func_append command " -o $obj"
+      fi
+
+      # Suppress compiler output if we already did a PIC compilation.
+      func_append command "$suppress_output"
+      func_show_eval_locale "$command" \
+        '$opt_dry_run || $RM $removelist; exit $EXIT_FAILURE'
+
+      if test warn = "$need_locks" &&
+        test "X`cat $lockfile 2>/dev/null`" != "X$srcfile"; then
+       $ECHO "\
+*** ERROR, $lockfile contains:
+`cat $lockfile 2>/dev/null`
+
+but it should contain:
+$srcfile
+
+This indicates that another process is trying to use the same
+temporary object file, and libtool could not work around it because
+your compiler does not support '-c' and '-o' together.  If you
+repeat this compilation, it may succeed, by chance, but you had better
+avoid parallel builds (make -j) in this platform, or get a better
+compiler."
+
+       $opt_dry_run || $RM $removelist
+       exit $EXIT_FAILURE
+      fi
+
+      # Just move the object if needed
+      if test -n "$output_obj" && test "X$output_obj" != "X$obj"; then
+       func_show_eval '$MV "$output_obj" "$obj"' \
+         'error=$?; $opt_dry_run || $RM $removelist; exit $error'
+      fi
+    fi
+
+    $opt_dry_run || {
+      func_write_libtool_object "$libobj" "$objdir/$objname" "$objname"
+
+      # Unlock the critical section if it was locked
+      if test no != "$need_locks"; then
+       removelist=$lockfile
+        $RM "$lockfile"
+      fi
+    }
+
+    exit $EXIT_SUCCESS
+}
+
+$opt_help || {
+  test compile = "$opt_mode" && func_mode_compile ${1+"$@"}
+}
+
+func_mode_help ()
+{
+    # We need to display help for each of the modes.
+    case $opt_mode in
+      "")
+        # Generic help is extracted from the usage comments
+        # at the start of this file.
+        func_help
+        ;;
+
+      clean)
+        $ECHO \
+"Usage: $progname [OPTION]... --mode=clean RM [RM-OPTION]... FILE...
+
+Remove files from the build directory.
+
+RM is the name of the program to use to delete files associated with each FILE
+(typically '/bin/rm').  RM-OPTIONS are options (such as '-f') to be passed
+to RM.
+
+If FILE is a libtool library, object or program, all the files associated
+with it are deleted. Otherwise, only FILE itself is deleted using RM."
+        ;;
+
+      compile)
+      $ECHO \
+"Usage: $progname [OPTION]... --mode=compile COMPILE-COMMAND... SOURCEFILE
+
+Compile a source file into a libtool library object.
+
+This mode accepts the following additional options:
+
+  -o OUTPUT-FILE    set the output file name to OUTPUT-FILE
+  -no-suppress      do not suppress compiler output for multiple passes
+  -prefer-pic       try to build PIC objects only
+  -prefer-non-pic   try to build non-PIC objects only
+  -shared           do not build a '.o' file suitable for static linking
+  -static           only build a '.o' file suitable for static linking
+  -Wc,FLAG          pass FLAG directly to the compiler
+
+COMPILE-COMMAND is a command to be used in creating a 'standard' object file
+from the given SOURCEFILE.
+
+The output file name is determined by removing the directory component from
+SOURCEFILE, then substituting the C source code suffix '.c' with the
+library object suffix, '.lo'."
+        ;;
+
+      execute)
+        $ECHO \
+"Usage: $progname [OPTION]... --mode=execute COMMAND [ARGS]...
+
+Automatically set library path, then run a program.
+
+This mode accepts the following additional options:
+
+  -dlopen FILE      add the directory containing FILE to the library path
+
+This mode sets the library path environment variable according to '-dlopen'
+flags.
+
+If any of the ARGS are libtool executable wrappers, then they are translated
+into their corresponding uninstalled binary, and any of their required library
+directories are added to the library path.
+
+Then, COMMAND is executed, with ARGS as arguments."
+        ;;
+
+      finish)
+        $ECHO \
+"Usage: $progname [OPTION]... --mode=finish [LIBDIR]...
+
+Complete the installation of libtool libraries.
+
+Each LIBDIR is a directory that contains libtool libraries.
+
+The commands that this mode executes may require superuser privileges.  Use
+the '--dry-run' option if you just want to see what would be executed."
+        ;;
+
+      install)
+        $ECHO \
+"Usage: $progname [OPTION]... --mode=install INSTALL-COMMAND...
+
+Install executables or libraries.
+
+INSTALL-COMMAND is the installation command.  The first component should be
+either the 'install' or 'cp' program.
+
+The following components of INSTALL-COMMAND are treated specially:
+
+  -inst-prefix-dir PREFIX-DIR  Use PREFIX-DIR as a staging area for installation
+
+The rest of the components are interpreted as arguments to that command (only
+BSD-compatible install options are recognized)."
+        ;;
+
+      link)
+        $ECHO \
+"Usage: $progname [OPTION]... --mode=link LINK-COMMAND...
+
+Link object files or libraries together to form another library, or to
+create an executable program.
+
+LINK-COMMAND is a command using the C compiler that you would use to create
+a program from several object files.
+
+The following components of LINK-COMMAND are treated specially:
+
+  -all-static       do not do any dynamic linking at all
+  -static           do not do any dynamic linking at all
+  -avoid-version    do not add a version suffix if possible
+  -bindir BINDIR    specify path to binaries directory (for systems where
+                    libraries must be found in the PATH setting at runtime)
+  -dlopen FILE      '-dlpreopen' FILE if it cannot be dlopened at runtime
+  -dlpreopen FILE   link in FILE and add its symbols to lt_preloaded_symbols
+  -export-dynamic   allow symbols from OUTPUT-FILE to be resolved with dlsym(3)
+  -export-symbols SYMFILE
+                    try to export only the symbols listed in SYMFILE
+  -export-symbols-regex REGEX
+                    try to export only the symbols matching REGEX
+  -LLIBDIR          search LIBDIR for required installed libraries
+  -lNAME            OUTPUT-FILE requires the installed library libNAME
+  -module           build a library that can dlopened
+  -no-fast-install  disable the fast-install mode
+  -no-install       link a not-installable executable
+  -no-undefined     declare that a library does not refer to external symbols
+  -o OUTPUT-FILE    create OUTPUT-FILE from the specified objects
+  -objectlist FILE  use a list of object files found in FILE to specify objects
+  -os2dllname NAME  force a short DLL name on OS/2 (no effect on other OSes)
+  -precious-files-regex REGEX
+                    don't remove output files matching REGEX
+  -release RELEASE  specify package release information
+  -rpath LIBDIR     the created library will eventually be installed in LIBDIR
+  -R[ ]LIBDIR       add LIBDIR to the runtime path of programs and libraries
+  -shared           only do dynamic linking of libtool libraries
+  -shrext SUFFIX    override the standard shared library file extension
+  -static-uninstalled-libs
+                    do not do any dynamic linking of uninstalled libtool libraries
+  -static-libtool-libs
+                    do not do any dynamic linking of libtool libraries
+  -version-info CURRENT[:REVISION[:AGE]]
+                    specify library version info [each variable defaults to 0]
+  -weak LIBNAME     declare that the target provides the LIBNAME interface
+  -Wc,FLAG
+  -Xcompiler FLAG   pass linker-specific FLAG directly to the compiler
+  -Wl,FLAG
+  -Xlinker FLAG     pass linker-specific FLAG directly to the linker
+  -XCClinker FLAG   pass link-specific FLAG to the compiler driver (CC)
+
+All other options (arguments beginning with '-') are ignored.
+
+Every other argument is treated as a filename.  Files ending in '.la' are
+treated as uninstalled libtool libraries, other files are standard or library
+object files.
+
+If the OUTPUT-FILE ends in '.la', then a libtool library is created,
+only library objects ('.lo' files) may be specified, and '-rpath' is
+required, except when creating a convenience library.
+
+If OUTPUT-FILE ends in '.a' or '.lib', then a standard library is created
+using 'ar' and 'ranlib', or on Windows using 'lib'.
+
+If OUTPUT-FILE ends in '.lo' or '.$objext', then a reloadable object file
+is created, otherwise an executable program is created."
+        ;;
+
+      uninstall)
+        $ECHO \
+"Usage: $progname [OPTION]... --mode=uninstall RM [RM-OPTION]... FILE...
+
+Remove libraries from an installation directory.
+
+RM is the name of the program to use to delete files associated with each FILE
+(typically '/bin/rm').  RM-OPTIONS are options (such as '-f') to be passed
+to RM.
+
+If FILE is a libtool library, all the files associated with it are deleted.
+Otherwise, only FILE itself is deleted using RM."
+        ;;
+
+      *)
+        func_fatal_help "invalid operation mode '$opt_mode'"
+        ;;
+    esac
+
+    echo
+    $ECHO "Try '$progname --help' for more information about other modes."
+}
+
+# Now that we've collected a possible --mode arg, show help if necessary
+if $opt_help; then
+  if test : = "$opt_help"; then
+    func_mode_help
+  else
+    {
+      func_help noexit
+      for opt_mode in compile link execute install finish uninstall clean; do
+       func_mode_help
+      done
+    } | $SED -n '1p; 2,$s/^Usage:/  or: /p'
+    {
+      func_help noexit
+      for opt_mode in compile link execute install finish uninstall clean; do
+       echo
+       func_mode_help
+      done
+    } |
+    $SED '1d
+      /^When reporting/,/^Report/{
+       H
+       d
+      }
+      $x
+      /information about other modes/d
+      /more detailed .*MODE/d
+      s/^Usage:.*--mode=\([^ ]*\) .*/Description of \1 mode:/'
+  fi
+  exit $?
+fi
+
+
+# func_mode_execute arg...
+func_mode_execute ()
+{
+    $debug_cmd
+
+    # The first argument is the command name.
+    cmd=$nonopt
+    test -z "$cmd" && \
+      func_fatal_help "you must specify a COMMAND"
+
+    # Handle -dlopen flags immediately.
+    for file in $opt_dlopen; do
+      test -f "$file" \
+       || func_fatal_help "'$file' is not a file"
+
+      dir=
+      case $file in
+      *.la)
+       func_resolve_sysroot "$file"
+       file=$func_resolve_sysroot_result
+
+       # Check to see that this really is a libtool archive.
+       func_lalib_unsafe_p "$file" \
+         || func_fatal_help "'$lib' is not a valid libtool archive"
+
+       # Read the libtool library.
+       dlname=
+       library_names=
+       func_source "$file"
+
+       # Skip this library if it cannot be dlopened.
+       if test -z "$dlname"; then
+         # Warn if it was a shared library.
+         test -n "$library_names" && \
+           func_warning "'$file' was not linked with '-export-dynamic'"
+         continue
+       fi
+
+       func_dirname "$file" "" "."
+       dir=$func_dirname_result
+
+       if test -f "$dir/$objdir/$dlname"; then
+         func_append dir "/$objdir"
+       else
+         if test ! -f "$dir/$dlname"; then
+           func_fatal_error "cannot find '$dlname' in '$dir' or '$dir/$objdir'"
+         fi
+       fi
+       ;;
+
+      *.lo)
+       # Just add the directory containing the .lo file.
+       func_dirname "$file" "" "."
+       dir=$func_dirname_result
+       ;;
+
+      *)
+       func_warning "'-dlopen' is ignored for non-libtool libraries and objects"
+       continue
+       ;;
+      esac
+
+      # Get the absolute pathname.
+      absdir=`cd "$dir" && pwd`
+      test -n "$absdir" && dir=$absdir
+
+      # Now add the directory to shlibpath_var.
+      if eval "test -z \"\$$shlibpath_var\""; then
+       eval "$shlibpath_var=\"\$dir\""
+      else
+       eval "$shlibpath_var=\"\$dir:\$$shlibpath_var\""
+      fi
+    done
+
+    # This variable tells wrapper scripts just to set shlibpath_var
+    # rather than running their programs.
+    libtool_execute_magic=$magic
+
+    # Check if any of the arguments is a wrapper script.
+    args=
+    for file
+    do
+      case $file in
+      -* | *.la | *.lo ) ;;
+      *)
+       # Do a test to see if this is really a libtool program.
+       if func_ltwrapper_script_p "$file"; then
+         func_source "$file"
+         # Transform arg to wrapped name.
+         file=$progdir/$program
+       elif func_ltwrapper_executable_p "$file"; then
+         func_ltwrapper_scriptname "$file"
+         func_source "$func_ltwrapper_scriptname_result"
+         # Transform arg to wrapped name.
+         file=$progdir/$program
+       fi
+       ;;
+      esac
+      # Quote arguments (to preserve shell metacharacters).
+      func_append_quoted args "$file"
+    done
+
+    if $opt_dry_run; then
+      # Display what would be done.
+      if test -n "$shlibpath_var"; then
+       eval "\$ECHO \"\$shlibpath_var=\$$shlibpath_var\""
+       echo "export $shlibpath_var"
+      fi
+      $ECHO "$cmd$args"
+      exit $EXIT_SUCCESS
+    else
+      if test -n "$shlibpath_var"; then
+       # Export the shlibpath_var.
+       eval "export $shlibpath_var"
+      fi
+
+      # Restore saved environment variables
+      for lt_var in LANG LANGUAGE LC_ALL LC_CTYPE LC_COLLATE LC_MESSAGES
+      do
+       eval "if test \"\${save_$lt_var+set}\" = set; then
+                $lt_var=\$save_$lt_var; export $lt_var
+             else
+               $lt_unset $lt_var
+             fi"
+      done
+
+      # Now prepare to actually exec the command.
+      exec_cmd=\$cmd$args
+    fi
+}
+
+test execute = "$opt_mode" && func_mode_execute ${1+"$@"}
+
+
+# func_mode_finish arg...
+func_mode_finish ()
+{
+    $debug_cmd
+
+    libs=
+    libdirs=
+    admincmds=
+
+    for opt in "$nonopt" ${1+"$@"}
+    do
+      if test -d "$opt"; then
+       func_append libdirs " $opt"
+
+      elif test -f "$opt"; then
+       if func_lalib_unsafe_p "$opt"; then
+         func_append libs " $opt"
+       else
+         func_warning "'$opt' is not a valid libtool archive"
+       fi
+
+      else
+       func_fatal_error "invalid argument '$opt'"
+      fi
+    done
+
+    if test -n "$libs"; then
+      if test -n "$lt_sysroot"; then
+        sysroot_regex=`$ECHO "$lt_sysroot" | $SED "$sed_make_literal_regex"`
+        sysroot_cmd="s/\([ ']\)$sysroot_regex/\1/g;"
+      else
+        sysroot_cmd=
+      fi
+
+      # Remove sysroot references
+      if $opt_dry_run; then
+        for lib in $libs; do
+          echo "removing references to $lt_sysroot and '=' prefixes from $lib"
+        done
+      else
+        tmpdir=`func_mktempdir`
+        for lib in $libs; do
+         $SED -e "$sysroot_cmd s/\([ ']-[LR]\)=/\1/g; s/\([ ']\)=/\1/g" $lib \
+           > $tmpdir/tmp-la
+         mv -f $tmpdir/tmp-la $lib
+       done
+        ${RM}r "$tmpdir"
+      fi
+    fi
+
+    if test -n "$finish_cmds$finish_eval" && test -n "$libdirs"; then
+      for libdir in $libdirs; do
+       if test -n "$finish_cmds"; then
+         # Do each command in the finish commands.
+         func_execute_cmds "$finish_cmds" 'admincmds="$admincmds
+'"$cmd"'"'
+       fi
+       if test -n "$finish_eval"; then
+         # Do the single finish_eval.
+         eval cmds=\"$finish_eval\"
+         $opt_dry_run || eval "$cmds" || func_append admincmds "
+       $cmds"
+       fi
+      done
+    fi
+
+    # Exit here if they wanted silent mode.
+    $opt_quiet && exit $EXIT_SUCCESS
+
+    if test -n "$finish_cmds$finish_eval" && test -n "$libdirs"; then
+      echo "----------------------------------------------------------------------"
+      echo "Libraries have been installed in:"
+      for libdir in $libdirs; do
+       $ECHO "   $libdir"
+      done
+      echo
+      echo "If you ever happen to want to link against installed libraries"
+      echo "in a given directory, LIBDIR, you must either use libtool, and"
+      echo "specify the full pathname of the library, or use the '-LLIBDIR'"
+      echo "flag during linking and do at least one of the following:"
+      if test -n "$shlibpath_var"; then
+       echo "   - add LIBDIR to the '$shlibpath_var' environment variable"
+       echo "     during execution"
+      fi
+      if test -n "$runpath_var"; then
+       echo "   - add LIBDIR to the '$runpath_var' environment variable"
+       echo "     during linking"
+      fi
+      if test -n "$hardcode_libdir_flag_spec"; then
+       libdir=LIBDIR
+       eval flag=\"$hardcode_libdir_flag_spec\"
+
+       $ECHO "   - use the '$flag' linker flag"
+      fi
+      if test -n "$admincmds"; then
+       $ECHO "   - have your system administrator run these commands:$admincmds"
+      fi
+      if test -f /etc/ld.so.conf; then
+       echo "   - have your system administrator add LIBDIR to '/etc/ld.so.conf'"
+      fi
+      echo
+
+      echo "See any operating system documentation about shared libraries for"
+      case $host in
+       solaris2.[6789]|solaris2.1[0-9])
+         echo "more information, such as the ld(1), crle(1) and ld.so(8) manual"
+         echo "pages."
+         ;;
+       *)
+         echo "more information, such as the ld(1) and ld.so(8) manual pages."
+         ;;
+      esac
+      echo "----------------------------------------------------------------------"
+    fi
+    exit $EXIT_SUCCESS
+}
+
+test finish = "$opt_mode" && func_mode_finish ${1+"$@"}
+
+
+# func_mode_install arg...
+func_mode_install ()
+{
+    $debug_cmd
+
+    # There may be an optional sh(1) argument at the beginning of
+    # install_prog (especially on Windows NT).
+    if test "$SHELL" = "$nonopt" || test /bin/sh = "$nonopt" ||
+       # Allow the use of GNU shtool's install command.
+       case $nonopt in *shtool*) :;; *) false;; esac
+    then
+      # Aesthetically quote it.
+      func_quote_for_eval "$nonopt"
+      install_prog="$func_quote_for_eval_result "
+      arg=$1
+      shift
+    else
+      install_prog=
+      arg=$nonopt
+    fi
+
+    # The real first argument should be the name of the installation program.
+    # Aesthetically quote it.
+    func_quote_for_eval "$arg"
+    func_append install_prog "$func_quote_for_eval_result"
+    install_shared_prog=$install_prog
+    case " $install_prog " in
+      *[\\\ /]cp\ *) install_cp=: ;;
+      *) install_cp=false ;;
+    esac
+
+    # We need to accept at least all the BSD install flags.
+    dest=
+    files=
+    opts=
+    prev=
+    install_type=
+    isdir=false
+    stripme=
+    no_mode=:
+    for arg
+    do
+      arg2=
+      if test -n "$dest"; then
+       func_append files " $dest"
+       dest=$arg
+       continue
+      fi
+
+      case $arg in
+      -d) isdir=: ;;
+      -f)
+       if $install_cp; then :; else
+         prev=$arg
+       fi
+       ;;
+      -g | -m | -o)
+       prev=$arg
+       ;;
+      -s)
+       stripme=" -s"
+       continue
+       ;;
+      -*)
+       ;;
+      *)
+       # If the previous option needed an argument, then skip it.
+       if test -n "$prev"; then
+         if test X-m = "X$prev" && test -n "$install_override_mode"; then
+           arg2=$install_override_mode
+           no_mode=false
+         fi
+         prev=
+       else
+         dest=$arg
+         continue
+       fi
+       ;;
+      esac
+
+      # Aesthetically quote the argument.
+      func_quote_for_eval "$arg"
+      func_append install_prog " $func_quote_for_eval_result"
+      if test -n "$arg2"; then
+       func_quote_for_eval "$arg2"
+      fi
+      func_append install_shared_prog " $func_quote_for_eval_result"
+    done
+
+    test -z "$install_prog" && \
+      func_fatal_help "you must specify an install program"
+
+    test -n "$prev" && \
+      func_fatal_help "the '$prev' option requires an argument"
+
+    if test -n "$install_override_mode" && $no_mode; then
+      if $install_cp; then :; else
+       func_quote_for_eval "$install_override_mode"
+       func_append install_shared_prog " -m $func_quote_for_eval_result"
+      fi
+    fi
+
+    if test -z "$files"; then
+      if test -z "$dest"; then
+       func_fatal_help "no file or destination specified"
+      else
+       func_fatal_help "you must specify a destination"
+      fi
+    fi
+
+    # Strip any trailing slash from the destination.
+    func_stripname '' '/' "$dest"
+    dest=$func_stripname_result
+
+    # Check to see that the destination is a directory.
+    test -d "$dest" && isdir=:
+    if $isdir; then
+      destdir=$dest
+      destname=
+    else
+      func_dirname_and_basename "$dest" "" "."
+      destdir=$func_dirname_result
+      destname=$func_basename_result
+
+      # Not a directory, so check to see that there is only one file specified.
+      set dummy $files; shift
+      test "$#" -gt 1 && \
+       func_fatal_help "'$dest' is not a directory"
+    fi
+    case $destdir in
+    [\\/]* | [A-Za-z]:[\\/]*) ;;
+    *)
+      for file in $files; do
+       case $file in
+       *.lo) ;;
+       *)
+         func_fatal_help "'$destdir' must be an absolute directory name"
+         ;;
+       esac
+      done
+      ;;
+    esac
+
+    # This variable tells wrapper scripts just to set variables rather
+    # than running their programs.
+    libtool_install_magic=$magic
+
+    staticlibs=
+    future_libdirs=
+    current_libdirs=
+    for file in $files; do
+
+      # Do each installation.
+      case $file in
+      *.$libext)
+       # Do the static libraries later.
+       func_append staticlibs " $file"
+       ;;
+
+      *.la)
+       func_resolve_sysroot "$file"
+       file=$func_resolve_sysroot_result
+
+       # Check to see that this really is a libtool archive.
+       func_lalib_unsafe_p "$file" \
+         || func_fatal_help "'$file' is not a valid libtool archive"
+
+       library_names=
+       old_library=
+       relink_command=
+       func_source "$file"
+
+       # Add the libdir to current_libdirs if it is the destination.
+       if test "X$destdir" = "X$libdir"; then
+         case "$current_libdirs " in
+         *" $libdir "*) ;;
+         *) func_append current_libdirs " $libdir" ;;
+         esac
+       else
+         # Note the libdir as a future libdir.
+         case "$future_libdirs " in
+         *" $libdir "*) ;;
+         *) func_append future_libdirs " $libdir" ;;
+         esac
+       fi
+
+       func_dirname "$file" "/" ""
+       dir=$func_dirname_result
+       func_append dir "$objdir"
+
+       if test -n "$relink_command"; then
+         # Determine the prefix the user has applied to our future dir.
+         inst_prefix_dir=`$ECHO "$destdir" | $SED -e "s%$libdir\$%%"`
+
+         # Don't allow the user to place us outside of our expected
+         # location b/c this prevents finding dependent libraries that
+         # are installed to the same prefix.
+         # At present, this check doesn't affect windows .dll's that
+         # are installed into $libdir/../bin (currently, that works fine)
+         # but it's something to keep an eye on.
+         test "$inst_prefix_dir" = "$destdir" && \
+           func_fatal_error "error: cannot install '$file' to a directory not ending in $libdir"
+
+         if test -n "$inst_prefix_dir"; then
+           # Stick the inst_prefix_dir data into the link command.
+           relink_command=`$ECHO "$relink_command" | $SED "s%@inst_prefix_dir@%-inst-prefix-dir $inst_prefix_dir%"`
+         else
+           relink_command=`$ECHO "$relink_command" | $SED "s%@inst_prefix_dir@%%"`
+         fi
+
+         func_warning "relinking '$file'"
+         func_show_eval "$relink_command" \
+           'func_fatal_error "error: relink '\''$file'\'' with the above command before installing it"'
+       fi
+
+       # See the names of the shared library.
+       set dummy $library_names; shift
+       if test -n "$1"; then
+         realname=$1
+         shift
+
+         srcname=$realname
+         test -n "$relink_command" && srcname=${realname}T
+
+         # Install the shared library and build the symlinks.
+         func_show_eval "$install_shared_prog $dir/$srcname $destdir/$realname" \
+             'exit $?'
+         tstripme=$stripme
+         case $host_os in
+         cygwin* | mingw* | pw32* | cegcc*)
+           case $realname in
+           *.dll.a)
+             tstripme=
+             ;;
+           esac
+           ;;
+         os2*)
+           case $realname in
+           *_dll.a)
+             tstripme=
+             ;;
+           esac
+           ;;
+         esac
+         if test -n "$tstripme" && test -n "$striplib"; then
+           func_show_eval "$striplib $destdir/$realname" 'exit $?'
+         fi
+
+         if test "$#" -gt 0; then
+           # Delete the old symlinks, and create new ones.
+           # Try 'ln -sf' first, because the 'ln' binary might depend on
+           # the symlink we replace!  Solaris /bin/ln does not understand -f,
+           # so we also need to try rm && ln -s.
+           for linkname
+           do
+             test "$linkname" != "$realname" \
+               && func_show_eval "(cd $destdir && { $LN_S -f $realname $linkname || { $RM $linkname && $LN_S $realname $linkname; }; })"
+           done
+         fi
+
+         # Do each command in the postinstall commands.
+         lib=$destdir/$realname
+         func_execute_cmds "$postinstall_cmds" 'exit $?'
+       fi
+
+       # Install the pseudo-library for information purposes.
+       func_basename "$file"
+       name=$func_basename_result
+       instname=$dir/${name}i
+       func_show_eval "$install_prog $instname $destdir/$name" 'exit $?'
+
+       # Maybe install the static library, too.
+       test -n "$old_library" && func_append staticlibs " $dir/$old_library"
+       ;;
+
+      *.lo)
+       # Install (i.e. copy) a libtool object.
+
+       # Figure out destination file name, if it wasn't already specified.
+       if test -n "$destname"; then
+         destfile=$destdir/$destname
+       else
+         func_basename "$file"
+         destfile=$func_basename_result
+         destfile=$destdir/$destfile
+       fi
+
+       # Deduce the name of the destination old-style object file.
+       case $destfile in
+       *.lo)
+         func_lo2o "$destfile"
+         staticdest=$func_lo2o_result
+         ;;
+       *.$objext)
+         staticdest=$destfile
+         destfile=
+         ;;
+       *)
+         func_fatal_help "cannot copy a libtool object to '$destfile'"
+         ;;
+       esac
+
+       # Install the libtool object if requested.
+       test -n "$destfile" && \
+         func_show_eval "$install_prog $file $destfile" 'exit $?'
+
+       # Install the old object if enabled.
+       if test yes = "$build_old_libs"; then
+         # Deduce the name of the old-style object file.
+         func_lo2o "$file"
+         staticobj=$func_lo2o_result
+         func_show_eval "$install_prog \$staticobj \$staticdest" 'exit $?'
+       fi
+       exit $EXIT_SUCCESS
+       ;;
+
+      *)
+       # Figure out destination file name, if it wasn't already specified.
+       if test -n "$destname"; then
+         destfile=$destdir/$destname
+       else
+         func_basename "$file"
+         destfile=$func_basename_result
+         destfile=$destdir/$destfile
+       fi
+
+       # If the file is missing, and there is a .exe on the end, strip it
+       # because it is most likely a libtool script we actually want to
+       # install
+       stripped_ext=
+       case $file in
+         *.exe)
+           if test ! -f "$file"; then
+             func_stripname '' '.exe' "$file"
+             file=$func_stripname_result
+             stripped_ext=.exe
+           fi
+           ;;
+       esac
+
+       # Do a test to see if this is really a libtool program.
+       case $host in
+       *cygwin* | *mingw*)
+           if func_ltwrapper_executable_p "$file"; then
+             func_ltwrapper_scriptname "$file"
+             wrapper=$func_ltwrapper_scriptname_result
+           else
+             func_stripname '' '.exe' "$file"
+             wrapper=$func_stripname_result
+           fi
+           ;;
+       *)
+           wrapper=$file
+           ;;
+       esac
+       if func_ltwrapper_script_p "$wrapper"; then
+         notinst_deplibs=
+         relink_command=
+
+         func_source "$wrapper"
+
+         # Check the variables that should have been set.
+         test -z "$generated_by_libtool_version" && \
+           func_fatal_error "invalid libtool wrapper script '$wrapper'"
+
+         finalize=:
+         for lib in $notinst_deplibs; do
+           # Check to see that each library is installed.
+           libdir=
+           if test -f "$lib"; then
+             func_source "$lib"
+           fi
+           libfile=$libdir/`$ECHO "$lib" | $SED 's%^.*/%%g'`
+           if test -n "$libdir" && test ! -f "$libfile"; then
+             func_warning "'$lib' has not been installed in '$libdir'"
+             finalize=false
+           fi
+         done
+
+         relink_command=
+         func_source "$wrapper"
+
+         outputname=
+         if test no = "$fast_install" && test -n "$relink_command"; then
+           $opt_dry_run || {
+             if $finalize; then
+               tmpdir=`func_mktempdir`
+               func_basename "$file$stripped_ext"
+               file=$func_basename_result
+               outputname=$tmpdir/$file
+               # Replace the output file specification.
+               relink_command=`$ECHO "$relink_command" | $SED 's%@OUTPUT@%'"$outputname"'%g'`
+
+               $opt_quiet || {
+                 func_quote_for_expand "$relink_command"
+                 eval "func_echo $func_quote_for_expand_result"
+               }
+               if eval "$relink_command"; then :
+                 else
+                 func_error "error: relink '$file' with the above command before installing it"
+                 $opt_dry_run || ${RM}r "$tmpdir"
+                 continue
+               fi
+               file=$outputname
+             else
+               func_warning "cannot relink '$file'"
+             fi
+           }
+         else
+           # Install the binary that we compiled earlier.
+           file=`$ECHO "$file$stripped_ext" | $SED "s%\([^/]*\)$%$objdir/\1%"`
+         fi
+       fi
+
+       # remove .exe since cygwin /usr/bin/install will append another
+       # one anyway
+       case $install_prog,$host in
+       */usr/bin/install*,*cygwin*)
+         case $file:$destfile in
+         *.exe:*.exe)
+           # this is ok
+           ;;
+         *.exe:*)
+           destfile=$destfile.exe
+           ;;
+         *:*.exe)
+           func_stripname '' '.exe' "$destfile"
+           destfile=$func_stripname_result
+           ;;
+         esac
+         ;;
+       esac
+       func_show_eval "$install_prog\$stripme \$file \$destfile" 'exit $?'
+       $opt_dry_run || if test -n "$outputname"; then
+         ${RM}r "$tmpdir"
+       fi
+       ;;
+      esac
+    done
+
+    for file in $staticlibs; do
+      func_basename "$file"
+      name=$func_basename_result
+
+      # Set up the ranlib parameters.
+      oldlib=$destdir/$name
+      func_to_tool_file "$oldlib" func_convert_file_msys_to_w32
+      tool_oldlib=$func_to_tool_file_result
+
+      func_show_eval "$install_prog \$file \$oldlib" 'exit $?'
+
+      if test -n "$stripme" && test -n "$old_striplib"; then
+       func_show_eval "$old_striplib $tool_oldlib" 'exit $?'
+      fi
+
+      # Do each command in the postinstall commands.
+      func_execute_cmds "$old_postinstall_cmds" 'exit $?'
+    done
+
+    test -n "$future_libdirs" && \
+      func_warning "remember to run '$progname --finish$future_libdirs'"
+
+    if test -n "$current_libdirs"; then
+      # Maybe just do a dry run.
+      $opt_dry_run && current_libdirs=" -n$current_libdirs"
+      exec_cmd='$SHELL "$progpath" $preserve_args --finish$current_libdirs'
+    else
+      exit $EXIT_SUCCESS
+    fi
+}
+
+test install = "$opt_mode" && func_mode_install ${1+"$@"}
+
+
+# func_generate_dlsyms outputname originator pic_p
+# Extract symbols from dlprefiles and create ${outputname}S.o with
+# a dlpreopen symbol table.
+func_generate_dlsyms ()
+{
+    $debug_cmd
+
+    my_outputname=$1
+    my_originator=$2
+    my_pic_p=${3-false}
+    my_prefix=`$ECHO "$my_originator" | $SED 's%[^a-zA-Z0-9]%_%g'`
+    my_dlsyms=
+
+    if test -n "$dlfiles$dlprefiles" || test no != "$dlself"; then
+      if test -n "$NM" && test -n "$global_symbol_pipe"; then
+       my_dlsyms=${my_outputname}S.c
+      else
+       func_error "not configured to extract global symbols from dlpreopened files"
+      fi
+    fi
+
+    if test -n "$my_dlsyms"; then
+      case $my_dlsyms in
+      "") ;;
+      *.c)
+       # Discover the nlist of each of the dlfiles.
+       nlist=$output_objdir/$my_outputname.nm
+
+       func_show_eval "$RM $nlist ${nlist}S ${nlist}T"
+
+       # Parse the name list into a source file.
+       func_verbose "creating $output_objdir/$my_dlsyms"
+
+       $opt_dry_run || $ECHO > "$output_objdir/$my_dlsyms" "\
+/* $my_dlsyms - symbol resolution table for '$my_outputname' dlsym emulation. */
+/* Generated by $PROGRAM (GNU $PACKAGE) $VERSION */
+
+#ifdef __cplusplus
+extern \"C\" {
+#endif
+
+#if defined __GNUC__ && (((__GNUC__ == 4) && (__GNUC_MINOR__ >= 4)) || (__GNUC__ > 4))
+#pragma GCC diagnostic ignored \"-Wstrict-prototypes\"
+#endif
+
+/* Keep this code in sync between libtool.m4, ltmain, lt_system.h, and tests.  */
+#if defined _WIN32 || defined __CYGWIN__ || defined _WIN32_WCE
+/* DATA imports from DLLs on WIN32 can't be const, because runtime
+   relocations are performed -- see ld's documentation on pseudo-relocs.  */
+# define LT_DLSYM_CONST
+#elif defined __osf__
+/* This system does not cope well with relocations in const data.  */
+# define LT_DLSYM_CONST
+#else
+# define LT_DLSYM_CONST const
+#endif
+
+#define STREQ(s1, s2) (strcmp ((s1), (s2)) == 0)
+
+/* External symbol declarations for the compiler. */\
+"
+
+       if test yes = "$dlself"; then
+         func_verbose "generating symbol list for '$output'"
+
+         $opt_dry_run || echo ': @PROGRAM@ ' > "$nlist"
+
+         # Add our own program objects to the symbol list.
+         progfiles=`$ECHO "$objs$old_deplibs" | $SP2NL | $SED "$lo2o" | $NL2SP`
+         for progfile in $progfiles; do
+           func_to_tool_file "$progfile" func_convert_file_msys_to_w32
+           func_verbose "extracting global C symbols from '$func_to_tool_file_result'"
+           $opt_dry_run || eval "$NM $func_to_tool_file_result | $global_symbol_pipe >> '$nlist'"
+         done
+
+         if test -n "$exclude_expsyms"; then
+           $opt_dry_run || {
+             eval '$EGREP -v " ($exclude_expsyms)$" "$nlist" > "$nlist"T'
+             eval '$MV "$nlist"T "$nlist"'
+           }
+         fi
+
+         if test -n "$export_symbols_regex"; then
+           $opt_dry_run || {
+             eval '$EGREP -e "$export_symbols_regex" "$nlist" > "$nlist"T'
+             eval '$MV "$nlist"T "$nlist"'
+           }
+         fi
+
+         # Prepare the list of exported symbols
+         if test -z "$export_symbols"; then
+           export_symbols=$output_objdir/$outputname.exp
+           $opt_dry_run || {
+             $RM $export_symbols
+             eval "$SED -n -e '/^: @PROGRAM@ $/d' -e 's/^.* \(.*\)$/\1/p' "'< "$nlist" > "$export_symbols"'
+             case $host in
+             *cygwin* | *mingw* | *cegcc* )
+                eval "echo EXPORTS "'> "$output_objdir/$outputname.def"'
+                eval 'cat "$export_symbols" >> "$output_objdir/$outputname.def"'
+               ;;
+             esac
+           }
+         else
+           $opt_dry_run || {
+             eval "$SED -e 's/\([].[*^$]\)/\\\\\1/g' -e 's/^/ /' -e 's/$/$/'"' < "$export_symbols" > "$output_objdir/$outputname.exp"'
+             eval '$GREP -f "$output_objdir/$outputname.exp" < "$nlist" > "$nlist"T'
+             eval '$MV "$nlist"T "$nlist"'
+             case $host in
+               *cygwin* | *mingw* | *cegcc* )
+                 eval "echo EXPORTS "'> "$output_objdir/$outputname.def"'
+                 eval 'cat "$nlist" >> "$output_objdir/$outputname.def"'
+                 ;;
+             esac
+           }
+         fi
+       fi
+
+       for dlprefile in $dlprefiles; do
+         func_verbose "extracting global C symbols from '$dlprefile'"
+         func_basename "$dlprefile"
+         name=$func_basename_result
+          case $host in
+           *cygwin* | *mingw* | *cegcc* )
+             # if an import library, we need to obtain dlname
+             if func_win32_import_lib_p "$dlprefile"; then
+               func_tr_sh "$dlprefile"
+               eval "curr_lafile=\$libfile_$func_tr_sh_result"
+               dlprefile_dlbasename=
+               if test -n "$curr_lafile" && func_lalib_p "$curr_lafile"; then
+                 # Use subshell, to avoid clobbering current variable values
+                 dlprefile_dlname=`source "$curr_lafile" && echo "$dlname"`
+                 if test -n "$dlprefile_dlname"; then
+                   func_basename "$dlprefile_dlname"
+                   dlprefile_dlbasename=$func_basename_result
+                 else
+                   # no lafile. user explicitly requested -dlpreopen <import library>.
+                   $sharedlib_from_linklib_cmd "$dlprefile"
+                   dlprefile_dlbasename=$sharedlib_from_linklib_result
+                 fi
+               fi
+               $opt_dry_run || {
+                 if test -n "$dlprefile_dlbasename"; then
+                   eval '$ECHO ": $dlprefile_dlbasename" >> "$nlist"'
+                 else
+                   func_warning "Could not compute DLL name from $name"
+                   eval '$ECHO ": $name " >> "$nlist"'
+                 fi
+                 func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32
+                 eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe |
+                   $SED -e '/I __imp/d' -e 's/I __nm_/D /;s/_nm__//' >> '$nlist'"
+               }
+             else # not an import lib
+               $opt_dry_run || {
+                 eval '$ECHO ": $name " >> "$nlist"'
+                 func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32
+                 eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe >> '$nlist'"
+               }
+             fi
+           ;;
+           *)
+             $opt_dry_run || {
+               eval '$ECHO ": $name " >> "$nlist"'
+               func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32
+               eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe >> '$nlist'"
+             }
+           ;;
+          esac
+       done
+
+       $opt_dry_run || {
+         # Make sure we have at least an empty file.
+         test -f "$nlist" || : > "$nlist"
+
+         if test -n "$exclude_expsyms"; then
+           $EGREP -v " ($exclude_expsyms)$" "$nlist" > "$nlist"T
+           $MV "$nlist"T "$nlist"
+         fi
+
+         # Try sorting and uniquifying the output.
+         if $GREP -v "^: " < "$nlist" |
+             if sort -k 3 </dev/null >/dev/null 2>&1; then
+               sort -k 3
+             else
+               sort +2
+             fi |
+             uniq > "$nlist"S; then
+           :
+         else
+           $GREP -v "^: " < "$nlist" > "$nlist"S
+         fi
+
+         if test -f "$nlist"S; then
+           eval "$global_symbol_to_cdecl"' < "$nlist"S >> "$output_objdir/$my_dlsyms"'
+         else
+           echo '/* NONE */' >> "$output_objdir/$my_dlsyms"
+         fi
+
+         func_show_eval '$RM "${nlist}I"'
+         if test -n "$global_symbol_to_import"; then
+           eval "$global_symbol_to_import"' < "$nlist"S > "$nlist"I'
+         fi
+
+         echo >> "$output_objdir/$my_dlsyms" "\
+
+/* The mapping between symbol names and symbols.  */
+typedef struct {
+  const char *name;
+  void *address;
+} lt_dlsymlist;
+extern LT_DLSYM_CONST lt_dlsymlist
+lt_${my_prefix}_LTX_preloaded_symbols[];\
+"
+
+         if test -s "$nlist"I; then
+           echo >> "$output_objdir/$my_dlsyms" "\
+static void lt_syminit(void)
+{
+  LT_DLSYM_CONST lt_dlsymlist *symbol = lt_${my_prefix}_LTX_preloaded_symbols;
+  for (; symbol->name; ++symbol)
+    {"
+           $SED 's/.*/      if (STREQ (symbol->name, \"&\")) symbol->address = (void *) \&&;/' < "$nlist"I >> "$output_objdir/$my_dlsyms"
+           echo >> "$output_objdir/$my_dlsyms" "\
+    }
+}"
+         fi
+         echo >> "$output_objdir/$my_dlsyms" "\
+LT_DLSYM_CONST lt_dlsymlist
+lt_${my_prefix}_LTX_preloaded_symbols[] =
+{ {\"$my_originator\", (void *) 0},"
+
+         if test -s "$nlist"I; then
+           echo >> "$output_objdir/$my_dlsyms" "\
+  {\"@INIT@\", (void *) &lt_syminit},"
+         fi
+
+         case $need_lib_prefix in
+         no)
+           eval "$global_symbol_to_c_name_address" < "$nlist" >> "$output_objdir/$my_dlsyms"
+           ;;
+         *)
+           eval "$global_symbol_to_c_name_address_lib_prefix" < "$nlist" >> "$output_objdir/$my_dlsyms"
+           ;;
+         esac
+         echo >> "$output_objdir/$my_dlsyms" "\
+  {0, (void *) 0}
+};
+
+/* This works around a problem in FreeBSD linker */
+#ifdef FREEBSD_WORKAROUND
+static const void *lt_preloaded_setup() {
+  return lt_${my_prefix}_LTX_preloaded_symbols;
+}
+#endif
+
+#ifdef __cplusplus
+}
+#endif\
+"
+       } # !$opt_dry_run
+
+       pic_flag_for_symtable=
+       case "$compile_command " in
+       *" -static "*) ;;
+       *)
+         case $host in
+         # compiling the symbol table file with pic_flag works around
+         # a FreeBSD bug that causes programs to crash when -lm is
+         # linked before any other PIC object.  But we must not use
+         # pic_flag when linking with -static.  The problem exists in
+         # FreeBSD 2.2.6 and is fixed in FreeBSD 3.1.
+         *-*-freebsd2.*|*-*-freebsd3.0*|*-*-freebsdelf3.0*)
+           pic_flag_for_symtable=" $pic_flag -DFREEBSD_WORKAROUND" ;;
+         *-*-hpux*)
+           pic_flag_for_symtable=" $pic_flag"  ;;
+         *)
+           $my_pic_p && pic_flag_for_symtable=" $pic_flag"
+           ;;
+         esac
+         ;;
+       esac
+       symtab_cflags=
+       for arg in $LTCFLAGS; do
+         case $arg in
+         -pie | -fpie | -fPIE) ;;
+         *) func_append symtab_cflags " $arg" ;;
+         esac
+       done
+
+       # Now compile the dynamic symbol file.
+       func_show_eval '(cd $output_objdir && $LTCC$symtab_cflags -c$no_builtin_flag$pic_flag_for_symtable "$my_dlsyms")' 'exit $?'
+
+       # Clean up the generated files.
+       func_show_eval '$RM "$output_objdir/$my_dlsyms" "$nlist" "${nlist}S" "${nlist}T" "${nlist}I"'
+
+       # Transform the symbol file into the correct name.
+       symfileobj=$output_objdir/${my_outputname}S.$objext
+       case $host in
+       *cygwin* | *mingw* | *cegcc* )
+         if test -f "$output_objdir/$my_outputname.def"; then
+           compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$output_objdir/$my_outputname.def $symfileobj%"`
+           finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$output_objdir/$my_outputname.def $symfileobj%"`
+         else
+           compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$symfileobj%"`
+           finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$symfileobj%"`
+         fi
+         ;;
+       *)
+         compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$symfileobj%"`
+         finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$symfileobj%"`
+         ;;
+       esac
+       ;;
+      *)
+       func_fatal_error "unknown suffix for '$my_dlsyms'"
+       ;;
+      esac
+    else
+      # We keep going just in case the user didn't refer to
+      # lt_preloaded_symbols.  The linker will fail if global_symbol_pipe
+      # really was required.
+
+      # Nullify the symbol file.
+      compile_command=`$ECHO "$compile_command" | $SED "s% @SYMFILE@%%"`
+      finalize_command=`$ECHO "$finalize_command" | $SED "s% @SYMFILE@%%"`
+    fi
+}
+
+# func_cygming_gnu_implib_p ARG
+# This predicate returns with zero status (TRUE) if
+# ARG is a GNU/binutils-style import library. Returns
+# with nonzero status (FALSE) otherwise.
+func_cygming_gnu_implib_p ()
+{
+  $debug_cmd
+
+  func_to_tool_file "$1" func_convert_file_msys_to_w32
+  func_cygming_gnu_implib_tmp=`$NM "$func_to_tool_file_result" | eval "$global_symbol_pipe" | $EGREP ' (_head_[A-Za-z0-9_]+_[ad]l*|[A-Za-z0-9_]+_[ad]l*_iname)$'`
+  test -n "$func_cygming_gnu_implib_tmp"
+}
+
+# func_cygming_ms_implib_p ARG
+# This predicate returns with zero status (TRUE) if
+# ARG is an MS-style import library. Returns
+# with nonzero status (FALSE) otherwise.
+func_cygming_ms_implib_p ()
+{
+  $debug_cmd
+
+  func_to_tool_file "$1" func_convert_file_msys_to_w32
+  func_cygming_ms_implib_tmp=`$NM "$func_to_tool_file_result" | eval "$global_symbol_pipe" | $GREP '_NULL_IMPORT_DESCRIPTOR'`
+  test -n "$func_cygming_ms_implib_tmp"
+}
+
+# func_win32_libid arg
+# return the library type of file 'arg'
+#
+# Need a lot of goo to handle *both* DLLs and import libs
+# Has to be a shell function in order to 'eat' the argument
+# that is supplied when $file_magic_command is called.
+# Despite the name, also deal with 64 bit binaries.
+func_win32_libid ()
+{
+  $debug_cmd
+
+  win32_libid_type=unknown
+  win32_fileres=`file -L $1 2>/dev/null`
+  case $win32_fileres in
+  *ar\ archive\ import\ library*) # definitely import
+    win32_libid_type="x86 archive import"
+    ;;
+  *ar\ archive*) # could be an import, or static
+    # Keep the egrep pattern in sync with the one in _LT_CHECK_MAGIC_METHOD.
+    if eval $OBJDUMP -f $1 | $SED -e '10q' 2>/dev/null |
+       $EGREP 'file format (pei*-i386(.*architecture: i386)?|pe-arm-wince|pe-x86-64)' >/dev/null; then
+      case $nm_interface in
+      "MS dumpbin")
+       if func_cygming_ms_implib_p "$1" ||
+          func_cygming_gnu_implib_p "$1"
+       then
+         win32_nmres=import
+       else
+         win32_nmres=
+       fi
+       ;;
+      *)
+       func_to_tool_file "$1" func_convert_file_msys_to_w32
+       win32_nmres=`eval $NM -f posix -A \"$func_to_tool_file_result\" |
+         $SED -n -e '
+           1,100{
+               / I /{
+                   s|.*|import|
+                   p
+                   q
+               }
+           }'`
+       ;;
+      esac
+      case $win32_nmres in
+      import*)  win32_libid_type="x86 archive import";;
+      *)        win32_libid_type="x86 archive static";;
+      esac
+    fi
+    ;;
+  *DLL*)
+    win32_libid_type="x86 DLL"
+    ;;
+  *executable*) # but shell scripts are "executable" too...
+    case $win32_fileres in
+    *MS\ Windows\ PE\ Intel*)
+      win32_libid_type="x86 DLL"
+      ;;
+    esac
+    ;;
+  esac
+  $ECHO "$win32_libid_type"
+}
+
+# func_cygming_dll_for_implib ARG
+#
+# Platform-specific function to extract the
+# name of the DLL associated with the specified
+# import library ARG.
+# Invoked by eval'ing the libtool variable
+#    $sharedlib_from_linklib_cmd
+# Result is available in the variable
+#    $sharedlib_from_linklib_result
+func_cygming_dll_for_implib ()
+{
+  $debug_cmd
+
+  sharedlib_from_linklib_result=`$DLLTOOL --identify-strict --identify "$1"`
+}
+
+# func_cygming_dll_for_implib_fallback_core SECTION_NAME LIBNAMEs
+#
+# The is the core of a fallback implementation of a
+# platform-specific function to extract the name of the
+# DLL associated with the specified import library LIBNAME.
+#
+# SECTION_NAME is either .idata$6 or .idata$7, depending
+# on the platform and compiler that created the implib.
+#
+# Echos the name of the DLL associated with the
+# specified import library.
+func_cygming_dll_for_implib_fallback_core ()
+{
+  $debug_cmd
+
+  match_literal=`$ECHO "$1" | $SED "$sed_make_literal_regex"`
+  $OBJDUMP -s --section "$1" "$2" 2>/dev/null |
+    $SED '/^Contents of section '"$match_literal"':/{
+      # Place marker at beginning of archive member dllname section
+      s/.*/====MARK====/
+      p
+      d
+    }
+    # These lines can sometimes be longer than 43 characters, but
+    # are always uninteresting
+    /:[         ]*file format pe[i]\{,1\}-/d
+    /^In archive [^:]*:/d
+    # Ensure marker is printed
+    /^====MARK====/p
+    # Remove all lines with less than 43 characters
+    /^.\{43\}/!d
+    # From remaining lines, remove first 43 characters
+    s/^.\{43\}//' |
+    $SED -n '
+      # Join marker and all lines until next marker into a single line
+      /^====MARK====/ b para
+      H
+      $ b para
+      b
+      :para
+      x
+      s/\n//g
+      # Remove the marker
+      s/^====MARK====//
+      # Remove trailing dots and whitespace
+      s/[\. \t]*$//
+      # Print
+      /./p' |
+    # we now have a list, one entry per line, of the stringified
+    # contents of the appropriate section of all members of the
+    # archive that possess that section. Heuristic: eliminate
+    # all those that have a first or second character that is
+    # a '.' (that is, objdump's representation of an unprintable
+    # character.) This should work for all archives with less than
+    # 0x302f exports -- but will fail for DLLs whose name actually
+    # begins with a literal '.' or a single character followed by
+    # a '.'.
+    #
+    # Of those that remain, print the first one.
+    $SED -e '/^\./d;/^.\./d;q'
+}
+
+# func_cygming_dll_for_implib_fallback ARG
+# Platform-specific function to extract the
+# name of the DLL associated with the specified
+# import library ARG.
+#
+# This fallback implementation is for use when $DLLTOOL
+# does not support the --identify-strict option.
+# Invoked by eval'ing the libtool variable
+#    $sharedlib_from_linklib_cmd
+# Result is available in the variable
+#    $sharedlib_from_linklib_result
+func_cygming_dll_for_implib_fallback ()
+{
+  $debug_cmd
+
+  if func_cygming_gnu_implib_p "$1"; then
+    # binutils import library
+    sharedlib_from_linklib_result=`func_cygming_dll_for_implib_fallback_core '.idata$7' "$1"`
+  elif func_cygming_ms_implib_p "$1"; then
+    # ms-generated import library
+    sharedlib_from_linklib_result=`func_cygming_dll_for_implib_fallback_core '.idata$6' "$1"`
+  else
+    # unknown
+    sharedlib_from_linklib_result=
+  fi
+}
+
+
+# func_extract_an_archive dir oldlib
+func_extract_an_archive ()
+{
+    $debug_cmd
+
+    f_ex_an_ar_dir=$1; shift
+    f_ex_an_ar_oldlib=$1
+    if test yes = "$lock_old_archive_extraction"; then
+      lockfile=$f_ex_an_ar_oldlib.lock
+      until $opt_dry_run || ln "$progpath" "$lockfile" 2>/dev/null; do
+       func_echo "Waiting for $lockfile to be removed"
+       sleep 2
+      done
+    fi
+    func_show_eval "(cd \$f_ex_an_ar_dir && $AR x \"\$f_ex_an_ar_oldlib\")" \
+                  'stat=$?; rm -f "$lockfile"; exit $stat'
+    if test yes = "$lock_old_archive_extraction"; then
+      $opt_dry_run || rm -f "$lockfile"
+    fi
+    if ($AR t "$f_ex_an_ar_oldlib" | sort | sort -uc >/dev/null 2>&1); then
+     :
+    else
+      func_fatal_error "object name conflicts in archive: $f_ex_an_ar_dir/$f_ex_an_ar_oldlib"
+    fi
+}
+
+
+# func_extract_archives gentop oldlib ...
+func_extract_archives ()
+{
+    $debug_cmd
+
+    my_gentop=$1; shift
+    my_oldlibs=${1+"$@"}
+    my_oldobjs=
+    my_xlib=
+    my_xabs=
+    my_xdir=
+
+    for my_xlib in $my_oldlibs; do
+      # Extract the objects.
+      case $my_xlib in
+       [\\/]* | [A-Za-z]:[\\/]*) my_xabs=$my_xlib ;;
+       *) my_xabs=`pwd`"/$my_xlib" ;;
+      esac
+      func_basename "$my_xlib"
+      my_xlib=$func_basename_result
+      my_xlib_u=$my_xlib
+      while :; do
+        case " $extracted_archives " in
+       *" $my_xlib_u "*)
+         func_arith $extracted_serial + 1
+         extracted_serial=$func_arith_result
+         my_xlib_u=lt$extracted_serial-$my_xlib ;;
+       *) break ;;
+       esac
+      done
+      extracted_archives="$extracted_archives $my_xlib_u"
+      my_xdir=$my_gentop/$my_xlib_u
+
+      func_mkdir_p "$my_xdir"
+
+      case $host in
+      *-darwin*)
+       func_verbose "Extracting $my_xabs"
+       # Do not bother doing anything if just a dry run
+       $opt_dry_run || {
+         darwin_orig_dir=`pwd`
+         cd $my_xdir || exit $?
+         darwin_archive=$my_xabs
+         darwin_curdir=`pwd`
+         func_basename "$darwin_archive"
+         darwin_base_archive=$func_basename_result
+         darwin_arches=`$LIPO -info "$darwin_archive" 2>/dev/null | $GREP Architectures 2>/dev/null || true`
+         if test -n "$darwin_arches"; then
+           darwin_arches=`$ECHO "$darwin_arches" | $SED -e 's/.*are://'`
+           darwin_arch=
+           func_verbose "$darwin_base_archive has multiple architectures $darwin_arches"
+           for darwin_arch in  $darwin_arches; do
+             func_mkdir_p "unfat-$$/$darwin_base_archive-$darwin_arch"
+             $LIPO -thin $darwin_arch -output "unfat-$$/$darwin_base_archive-$darwin_arch/$darwin_base_archive" "$darwin_archive"
+             cd "unfat-$$/$darwin_base_archive-$darwin_arch"
+             func_extract_an_archive "`pwd`" "$darwin_base_archive"
+             cd "$darwin_curdir"
+             $RM "unfat-$$/$darwin_base_archive-$darwin_arch/$darwin_base_archive"
+           done # $darwin_arches
+            ## Okay now we've a bunch of thin objects, gotta fatten them up :)
+           darwin_filelist=`find unfat-$$ -type f -name \*.o -print -o -name \*.lo -print | $SED -e "$sed_basename" | sort -u`
+           darwin_file=
+           darwin_files=
+           for darwin_file in $darwin_filelist; do
+             darwin_files=`find unfat-$$ -name $darwin_file -print | sort | $NL2SP`
+             $LIPO -create -output "$darwin_file" $darwin_files
+           done # $darwin_filelist
+           $RM -rf unfat-$$
+           cd "$darwin_orig_dir"
+         else
+           cd $darwin_orig_dir
+           func_extract_an_archive "$my_xdir" "$my_xabs"
+         fi # $darwin_arches
+       } # !$opt_dry_run
+       ;;
+      *)
+        func_extract_an_archive "$my_xdir" "$my_xabs"
+       ;;
+      esac
+      my_oldobjs="$my_oldobjs "`find $my_xdir -name \*.$objext -print -o -name \*.lo -print | sort | $NL2SP`
+    done
+
+    func_extract_archives_result=$my_oldobjs
+}
+
+
+# func_emit_wrapper [arg=no]
+#
+# Emit a libtool wrapper script on stdout.
+# Don't directly open a file because we may want to
+# incorporate the script contents within a cygwin/mingw
+# wrapper executable.  Must ONLY be called from within
+# func_mode_link because it depends on a number of variables
+# set therein.
+#
+# ARG is the value that the WRAPPER_SCRIPT_BELONGS_IN_OBJDIR
+# variable will take.  If 'yes', then the emitted script
+# will assume that the directory where it is stored is
+# the $objdir directory.  This is a cygwin/mingw-specific
+# behavior.
+func_emit_wrapper ()
+{
+       func_emit_wrapper_arg1=${1-no}
+
+       $ECHO "\
+#! $SHELL
+
+# $output - temporary wrapper script for $objdir/$outputname
+# Generated by $PROGRAM (GNU $PACKAGE) $VERSION
+#
+# The $output program cannot be directly executed until all the libtool
+# libraries that it depends on are installed.
+#
+# This wrapper script should never be moved out of the build directory.
+# If it is, it will not operate correctly.
+
+# Sed substitution that helps us do robust quoting.  It backslashifies
+# metacharacters that are still active within double-quoted strings.
+sed_quote_subst='$sed_quote_subst'
+
+# Be Bourne compatible
+if test -n \"\${ZSH_VERSION+set}\" && (emulate sh) >/dev/null 2>&1; then
+  emulate sh
+  NULLCMD=:
+  # Zsh 3.x and 4.x performs word splitting on \${1+\"\$@\"}, which
+  # is contrary to our usage.  Disable this feature.
+  alias -g '\${1+\"\$@\"}'='\"\$@\"'
+  setopt NO_GLOB_SUBST
+else
+  case \`(set -o) 2>/dev/null\` in *posix*) set -o posix;; esac
+fi
+BIN_SH=xpg4; export BIN_SH # for Tru64
+DUALCASE=1; export DUALCASE # for MKS sh
+
+# The HP-UX ksh and POSIX shell print the target directory to stdout
+# if CDPATH is set.
+(unset CDPATH) >/dev/null 2>&1 && unset CDPATH
+
+relink_command=\"$relink_command\"
+
+# This environment variable determines our operation mode.
+if test \"\$libtool_install_magic\" = \"$magic\"; then
+  # install mode needs the following variables:
+  generated_by_libtool_version='$macro_version'
+  notinst_deplibs='$notinst_deplibs'
+else
+  # When we are sourced in execute mode, \$file and \$ECHO are already set.
+  if test \"\$libtool_execute_magic\" != \"$magic\"; then
+    file=\"\$0\""
+
+    qECHO=`$ECHO "$ECHO" | $SED "$sed_quote_subst"`
+    $ECHO "\
+
+# A function that is used when there is no print builtin or printf.
+func_fallback_echo ()
+{
+  eval 'cat <<_LTECHO_EOF
+\$1
+_LTECHO_EOF'
+}
+    ECHO=\"$qECHO\"
+  fi
+
+# Very basic option parsing. These options are (a) specific to
+# the libtool wrapper, (b) are identical between the wrapper
+# /script/ and the wrapper /executable/ that is used only on
+# windows platforms, and (c) all begin with the string "--lt-"
+# (application programs are unlikely to have options that match
+# this pattern).
+#
+# There are only two supported options: --lt-debug and
+# --lt-dump-script. There is, deliberately, no --lt-help.
+#
+# The first argument to this parsing function should be the
+# script's $0 value, followed by "$@".
+lt_option_debug=
+func_parse_lt_options ()
+{
+  lt_script_arg0=\$0
+  shift
+  for lt_opt
+  do
+    case \"\$lt_opt\" in
+    --lt-debug) lt_option_debug=1 ;;
+    --lt-dump-script)
+        lt_dump_D=\`\$ECHO \"X\$lt_script_arg0\" | $SED -e 's/^X//' -e 's%/[^/]*$%%'\`
+        test \"X\$lt_dump_D\" = \"X\$lt_script_arg0\" && lt_dump_D=.
+        lt_dump_F=\`\$ECHO \"X\$lt_script_arg0\" | $SED -e 's/^X//' -e 's%^.*/%%'\`
+        cat \"\$lt_dump_D/\$lt_dump_F\"
+        exit 0
+      ;;
+    --lt-*)
+        \$ECHO \"Unrecognized --lt- option: '\$lt_opt'\" 1>&2
+        exit 1
+      ;;
+    esac
+  done
+
+  # Print the debug banner immediately:
+  if test -n \"\$lt_option_debug\"; then
+    echo \"$outputname:$output:\$LINENO: libtool wrapper (GNU $PACKAGE) $VERSION\" 1>&2
+  fi
+}
+
+# Used when --lt-debug. Prints its arguments to stdout
+# (redirection is the responsibility of the caller)
+func_lt_dump_args ()
+{
+  lt_dump_args_N=1;
+  for lt_arg
+  do
+    \$ECHO \"$outputname:$output:\$LINENO: newargv[\$lt_dump_args_N]: \$lt_arg\"
+    lt_dump_args_N=\`expr \$lt_dump_args_N + 1\`
+  done
+}
+
+# Core function for launching the target application
+func_exec_program_core ()
+{
+"
+  case $host in
+  # Backslashes separate directories on plain windows
+  *-*-mingw | *-*-os2* | *-cegcc*)
+    $ECHO "\
+      if test -n \"\$lt_option_debug\"; then
+        \$ECHO \"$outputname:$output:\$LINENO: newargv[0]: \$progdir\\\\\$program\" 1>&2
+        func_lt_dump_args \${1+\"\$@\"} 1>&2
+      fi
+      exec \"\$progdir\\\\\$program\" \${1+\"\$@\"}
+"
+    ;;
+
+  *)
+    $ECHO "\
+      if test -n \"\$lt_option_debug\"; then
+        \$ECHO \"$outputname:$output:\$LINENO: newargv[0]: \$progdir/\$program\" 1>&2
+        func_lt_dump_args \${1+\"\$@\"} 1>&2
+      fi
+      exec \"\$progdir/\$program\" \${1+\"\$@\"}
+"
+    ;;
+  esac
+  $ECHO "\
+      \$ECHO \"\$0: cannot exec \$program \$*\" 1>&2
+      exit 1
+}
+
+# A function to encapsulate launching the target application
+# Strips options in the --lt-* namespace from \$@ and
+# launches target application with the remaining arguments.
+func_exec_program ()
+{
+  case \" \$* \" in
+  *\\ --lt-*)
+    for lt_wr_arg
+    do
+      case \$lt_wr_arg in
+      --lt-*) ;;
+      *) set x \"\$@\" \"\$lt_wr_arg\"; shift;;
+      esac
+      shift
+    done ;;
+  esac
+  func_exec_program_core \${1+\"\$@\"}
+}
+
+  # Parse options
+  func_parse_lt_options \"\$0\" \${1+\"\$@\"}
+
+  # Find the directory that this script lives in.
+  thisdir=\`\$ECHO \"\$file\" | $SED 's%/[^/]*$%%'\`
+  test \"x\$thisdir\" = \"x\$file\" && thisdir=.
+
+  # Follow symbolic links until we get to the real thisdir.
+  file=\`ls -ld \"\$file\" | $SED -n 's/.*-> //p'\`
+  while test -n \"\$file\"; do
+    destdir=\`\$ECHO \"\$file\" | $SED 's%/[^/]*\$%%'\`
+
+    # If there was a directory component, then change thisdir.
+    if test \"x\$destdir\" != \"x\$file\"; then
+      case \"\$destdir\" in
+      [\\\\/]* | [A-Za-z]:[\\\\/]*) thisdir=\"\$destdir\" ;;
+      *) thisdir=\"\$thisdir/\$destdir\" ;;
+      esac
+    fi
+
+    file=\`\$ECHO \"\$file\" | $SED 's%^.*/%%'\`
+    file=\`ls -ld \"\$thisdir/\$file\" | $SED -n 's/.*-> //p'\`
+  done
+
+  # Usually 'no', except on cygwin/mingw when embedded into
+  # the cwrapper.
+  WRAPPER_SCRIPT_BELONGS_IN_OBJDIR=$func_emit_wrapper_arg1
+  if test \"\$WRAPPER_SCRIPT_BELONGS_IN_OBJDIR\" = \"yes\"; then
+    # special case for '.'
+    if test \"\$thisdir\" = \".\"; then
+      thisdir=\`pwd\`
+    fi
+    # remove .libs from thisdir
+    case \"\$thisdir\" in
+    *[\\\\/]$objdir ) thisdir=\`\$ECHO \"\$thisdir\" | $SED 's%[\\\\/][^\\\\/]*$%%'\` ;;
+    $objdir )   thisdir=. ;;
+    esac
+  fi
+
+  # Try to get the absolute directory name.
+  absdir=\`cd \"\$thisdir\" && pwd\`
+  test -n \"\$absdir\" && thisdir=\"\$absdir\"
+"
+
+       if test yes = "$fast_install"; then
+         $ECHO "\
+  program=lt-'$outputname'$exeext
+  progdir=\"\$thisdir/$objdir\"
+
+  if test ! -f \"\$progdir/\$program\" ||
+     { file=\`ls -1dt \"\$progdir/\$program\" \"\$progdir/../\$program\" 2>/dev/null | $SED 1q\`; \\
+       test \"X\$file\" != \"X\$progdir/\$program\"; }; then
+
+    file=\"\$\$-\$program\"
+
+    if test ! -d \"\$progdir\"; then
+      $MKDIR \"\$progdir\"
+    else
+      $RM \"\$progdir/\$file\"
+    fi"
+
+         $ECHO "\
+
+    # relink executable if necessary
+    if test -n \"\$relink_command\"; then
+      if relink_command_output=\`eval \$relink_command 2>&1\`; then :
+      else
+       \$ECHO \"\$relink_command_output\" >&2
+       $RM \"\$progdir/\$file\"
+       exit 1
+      fi
+    fi
+
+    $MV \"\$progdir/\$file\" \"\$progdir/\$program\" 2>/dev/null ||
+    { $RM \"\$progdir/\$program\";
+      $MV \"\$progdir/\$file\" \"\$progdir/\$program\"; }
+    $RM \"\$progdir/\$file\"
+  fi"
+       else
+         $ECHO "\
+  program='$outputname'
+  progdir=\"\$thisdir/$objdir\"
+"
+       fi
+
+       $ECHO "\
+
+  if test -f \"\$progdir/\$program\"; then"
+
+       # fixup the dll searchpath if we need to.
+       #
+       # Fix the DLL searchpath if we need to.  Do this before prepending
+       # to shlibpath, because on Windows, both are PATH and uninstalled
+       # libraries must come first.
+       if test -n "$dllsearchpath"; then
+         $ECHO "\
+    # Add the dll search path components to the executable PATH
+    PATH=$dllsearchpath:\$PATH
+"
+       fi
+
+       # Export our shlibpath_var if we have one.
+       if test yes = "$shlibpath_overrides_runpath" && test -n "$shlibpath_var" && test -n "$temp_rpath"; then
+         $ECHO "\
+    # Add our own library path to $shlibpath_var
+    $shlibpath_var=\"$temp_rpath\$$shlibpath_var\"
+
+    # Some systems cannot cope with colon-terminated $shlibpath_var
+    # The second colon is a workaround for a bug in BeOS R4 sed
+    $shlibpath_var=\`\$ECHO \"\$$shlibpath_var\" | $SED 's/::*\$//'\`
+
+    export $shlibpath_var
+"
+       fi
+
+       $ECHO "\
+    if test \"\$libtool_execute_magic\" != \"$magic\"; then
+      # Run the actual program with our arguments.
+      func_exec_program \${1+\"\$@\"}
+    fi
+  else
+    # The program doesn't exist.
+    \$ECHO \"\$0: error: '\$progdir/\$program' does not exist\" 1>&2
+    \$ECHO \"This script is just a wrapper for \$program.\" 1>&2
+    \$ECHO \"See the $PACKAGE documentation for more information.\" 1>&2
+    exit 1
+  fi
+fi\
+"
+}
+
+
+# func_emit_cwrapperexe_src
+# emit the source code for a wrapper executable on stdout
+# Must ONLY be called from within func_mode_link because
+# it depends on a number of variable set therein.
+func_emit_cwrapperexe_src ()
+{
+       cat <<EOF
+
+/* $cwrappersource - temporary wrapper executable for $objdir/$outputname
+   Generated by $PROGRAM (GNU $PACKAGE) $VERSION
+
+   The $output program cannot be directly executed until all the libtool
+   libraries that it depends on are installed.
+
+   This wrapper executable should never be moved out of the build directory.
+   If it is, it will not operate correctly.
+*/
+EOF
+           cat <<"EOF"
+#ifdef _MSC_VER
+# define _CRT_SECURE_NO_DEPRECATE 1
+#endif
+#include <stdio.h>
+#include <stdlib.h>
+#ifdef _MSC_VER
+# include <direct.h>
+# include <process.h>
+# include <io.h>
+#else
+# include <unistd.h>
+# include <stdint.h>
+# ifdef __CYGWIN__
+#  include <io.h>
+# endif
+#endif
+#include <malloc.h>
+#include <stdarg.h>
+#include <assert.h>
+#include <string.h>
+#include <ctype.h>
+#include <errno.h>
+#include <fcntl.h>
+#include <sys/stat.h>
+
+#define STREQ(s1, s2) (strcmp ((s1), (s2)) == 0)
+
+/* declarations of non-ANSI functions */
+#if defined __MINGW32__
+# ifdef __STRICT_ANSI__
+int _putenv (const char *);
+# endif
+#elif defined __CYGWIN__
+# ifdef __STRICT_ANSI__
+char *realpath (const char *, char *);
+int putenv (char *);
+int setenv (const char *, const char *, int);
+# endif
+/* #elif defined other_platform || defined ... */
+#endif
+
+/* portability defines, excluding path handling macros */
+#if defined _MSC_VER
+# define setmode _setmode
+# define stat    _stat
+# define chmod   _chmod
+# define getcwd  _getcwd
+# define putenv  _putenv
+# define S_IXUSR _S_IEXEC
+#elif defined __MINGW32__
+# define setmode _setmode
+# define stat    _stat
+# define chmod   _chmod
+# define getcwd  _getcwd
+# define putenv  _putenv
+#elif defined __CYGWIN__
+# define HAVE_SETENV
+# define FOPEN_WB "wb"
+/* #elif defined other platforms ... */
+#endif
+
+#if defined PATH_MAX
+# define LT_PATHMAX PATH_MAX
+#elif defined MAXPATHLEN
+# define LT_PATHMAX MAXPATHLEN
+#else
+# define LT_PATHMAX 1024
+#endif
+
+#ifndef S_IXOTH
+# define S_IXOTH 0
+#endif
+#ifndef S_IXGRP
+# define S_IXGRP 0
+#endif
+
+/* path handling portability macros */
+#ifndef DIR_SEPARATOR
+# define DIR_SEPARATOR '/'
+# define PATH_SEPARATOR ':'
+#endif
+
+#if defined _WIN32 || defined __MSDOS__ || defined __DJGPP__ || \
+  defined __OS2__
+# define HAVE_DOS_BASED_FILE_SYSTEM
+# define FOPEN_WB "wb"
+# ifndef DIR_SEPARATOR_2
+#  define DIR_SEPARATOR_2 '\\'
+# endif
+# ifndef PATH_SEPARATOR_2
+#  define PATH_SEPARATOR_2 ';'
+# endif
+#endif
+
+#ifndef DIR_SEPARATOR_2
+# define IS_DIR_SEPARATOR(ch) ((ch) == DIR_SEPARATOR)
+#else /* DIR_SEPARATOR_2 */
+# define IS_DIR_SEPARATOR(ch) \
+       (((ch) == DIR_SEPARATOR) || ((ch) == DIR_SEPARATOR_2))
+#endif /* DIR_SEPARATOR_2 */
+
+#ifndef PATH_SEPARATOR_2
+# define IS_PATH_SEPARATOR(ch) ((ch) == PATH_SEPARATOR)
+#else /* PATH_SEPARATOR_2 */
+# define IS_PATH_SEPARATOR(ch) ((ch) == PATH_SEPARATOR_2)
+#endif /* PATH_SEPARATOR_2 */
+
+#ifndef FOPEN_WB
+# define FOPEN_WB "w"
+#endif
+#ifndef _O_BINARY
+# define _O_BINARY 0
+#endif
+
+#define XMALLOC(type, num)      ((type *) xmalloc ((num) * sizeof(type)))
+#define XFREE(stale) do { \
+  if (stale) { free (stale); stale = 0; } \
+} while (0)
+
+#if defined LT_DEBUGWRAPPER
+static int lt_debug = 1;
+#else
+static int lt_debug = 0;
+#endif
+
+const char *program_name = "libtool-wrapper"; /* in case xstrdup fails */
+
+void *xmalloc (size_t num);
+char *xstrdup (const char *string);
+const char *base_name (const char *name);
+char *find_executable (const char *wrapper);
+char *chase_symlinks (const char *pathspec);
+int make_executable (const char *path);
+int check_executable (const char *path);
+char *strendzap (char *str, const char *pat);
+void lt_debugprintf (const char *file, int line, const char *fmt, ...);
+void lt_fatal (const char *file, int line, const char *message, ...);
+static const char *nonnull (const char *s);
+static const char *nonempty (const char *s);
+void lt_setenv (const char *name, const char *value);
+char *lt_extend_str (const char *orig_value, const char *add, int to_end);
+void lt_update_exe_path (const char *name, const char *value);
+void lt_update_lib_path (const char *name, const char *value);
+char **prepare_spawn (char **argv);
+void lt_dump_script (FILE *f);
+EOF
+
+           cat <<EOF
+#if __GNUC__ < 4 || (__GNUC__ == 4 && __GNUC_MINOR__ < 5)
+# define externally_visible volatile
+#else
+# define externally_visible __attribute__((externally_visible)) volatile
+#endif
+externally_visible const char * MAGIC_EXE = "$magic_exe";
+const char * LIB_PATH_VARNAME = "$shlibpath_var";
+EOF
+
+           if test yes = "$shlibpath_overrides_runpath" && test -n "$shlibpath_var" && test -n "$temp_rpath"; then
+              func_to_host_path "$temp_rpath"
+             cat <<EOF
+const char * LIB_PATH_VALUE   = "$func_to_host_path_result";
+EOF
+           else
+             cat <<"EOF"
+const char * LIB_PATH_VALUE   = "";
+EOF
+           fi
+
+           if test -n "$dllsearchpath"; then
+              func_to_host_path "$dllsearchpath:"
+             cat <<EOF
+const char * EXE_PATH_VARNAME = "PATH";
+const char * EXE_PATH_VALUE   = "$func_to_host_path_result";
+EOF
+           else
+             cat <<"EOF"
+const char * EXE_PATH_VARNAME = "";
+const char * EXE_PATH_VALUE   = "";
+EOF
+           fi
+
+           if test yes = "$fast_install"; then
+             cat <<EOF
+const char * TARGET_PROGRAM_NAME = "lt-$outputname"; /* hopefully, no .exe */
+EOF
+           else
+             cat <<EOF
+const char * TARGET_PROGRAM_NAME = "$outputname"; /* hopefully, no .exe */
+EOF
+           fi
+
+
+           cat <<"EOF"
+
+#define LTWRAPPER_OPTION_PREFIX         "--lt-"
+
+static const char *ltwrapper_option_prefix = LTWRAPPER_OPTION_PREFIX;
+static const char *dumpscript_opt       = LTWRAPPER_OPTION_PREFIX "dump-script";
+static const char *debug_opt            = LTWRAPPER_OPTION_PREFIX "debug";
+
+int
+main (int argc, char *argv[])
+{
+  char **newargz;
+  int  newargc;
+  char *tmp_pathspec;
+  char *actual_cwrapper_path;
+  char *actual_cwrapper_name;
+  char *target_name;
+  char *lt_argv_zero;
+  int rval = 127;
+
+  int i;
+
+  program_name = (char *) xstrdup (base_name (argv[0]));
+  newargz = XMALLOC (char *, (size_t) argc + 1);
+
+  /* very simple arg parsing; don't want to rely on getopt
+   * also, copy all non cwrapper options to newargz, except
+   * argz[0], which is handled differently
+   */
+  newargc=0;
+  for (i = 1; i < argc; i++)
+    {
+      if (STREQ (argv[i], dumpscript_opt))
+       {
+EOF
+           case $host in
+             *mingw* | *cygwin* )
+               # make stdout use "unix" line endings
+               echo "          setmode(1,_O_BINARY);"
+               ;;
+             esac
+
+           cat <<"EOF"
+         lt_dump_script (stdout);
+         return 0;
+       }
+      if (STREQ (argv[i], debug_opt))
+       {
+          lt_debug = 1;
+          continue;
+       }
+      if (STREQ (argv[i], ltwrapper_option_prefix))
+        {
+          /* however, if there is an option in the LTWRAPPER_OPTION_PREFIX
+             namespace, but it is not one of the ones we know about and
+             have already dealt with, above (inluding dump-script), then
+             report an error. Otherwise, targets might begin to believe
+             they are allowed to use options in the LTWRAPPER_OPTION_PREFIX
+             namespace. The first time any user complains about this, we'll
+             need to make LTWRAPPER_OPTION_PREFIX a configure-time option
+             or a configure.ac-settable value.
+           */
+          lt_fatal (__FILE__, __LINE__,
+                   "unrecognized %s option: '%s'",
+                    ltwrapper_option_prefix, argv[i]);
+        }
+      /* otherwise ... */
+      newargz[++newargc] = xstrdup (argv[i]);
+    }
+  newargz[++newargc] = NULL;
+
+EOF
+           cat <<EOF
+  /* The GNU banner must be the first non-error debug message */
+  lt_debugprintf (__FILE__, __LINE__, "libtool wrapper (GNU $PACKAGE) $VERSION\n");
+EOF
+           cat <<"EOF"
+  lt_debugprintf (__FILE__, __LINE__, "(main) argv[0]: %s\n", argv[0]);
+  lt_debugprintf (__FILE__, __LINE__, "(main) program_name: %s\n", program_name);
+
+  tmp_pathspec = find_executable (argv[0]);
+  if (tmp_pathspec == NULL)
+    lt_fatal (__FILE__, __LINE__, "couldn't find %s", argv[0]);
+  lt_debugprintf (__FILE__, __LINE__,
+                  "(main) found exe (before symlink chase) at: %s\n",
+                 tmp_pathspec);
+
+  actual_cwrapper_path = chase_symlinks (tmp_pathspec);
+  lt_debugprintf (__FILE__, __LINE__,
+                  "(main) found exe (after symlink chase) at: %s\n",
+                 actual_cwrapper_path);
+  XFREE (tmp_pathspec);
+
+  actual_cwrapper_name = xstrdup (base_name (actual_cwrapper_path));
+  strendzap (actual_cwrapper_path, actual_cwrapper_name);
+
+  /* wrapper name transforms */
+  strendzap (actual_cwrapper_name, ".exe");
+  tmp_pathspec = lt_extend_str (actual_cwrapper_name, ".exe", 1);
+  XFREE (actual_cwrapper_name);
+  actual_cwrapper_name = tmp_pathspec;
+  tmp_pathspec = 0;
+
+  /* target_name transforms -- use actual target program name; might have lt- prefix */
+  target_name = xstrdup (base_name (TARGET_PROGRAM_NAME));
+  strendzap (target_name, ".exe");
+  tmp_pathspec = lt_extend_str (target_name, ".exe", 1);
+  XFREE (target_name);
+  target_name = tmp_pathspec;
+  tmp_pathspec = 0;
+
+  lt_debugprintf (__FILE__, __LINE__,
+                 "(main) libtool target name: %s\n",
+                 target_name);
+EOF
+
+           cat <<EOF
+  newargz[0] =
+    XMALLOC (char, (strlen (actual_cwrapper_path) +
+                   strlen ("$objdir") + 1 + strlen (actual_cwrapper_name) + 1));
+  strcpy (newargz[0], actual_cwrapper_path);
+  strcat (newargz[0], "$objdir");
+  strcat (newargz[0], "/");
+EOF
+
+           cat <<"EOF"
+  /* stop here, and copy so we don't have to do this twice */
+  tmp_pathspec = xstrdup (newargz[0]);
+
+  /* do NOT want the lt- prefix here, so use actual_cwrapper_name */
+  strcat (newargz[0], actual_cwrapper_name);
+
+  /* DO want the lt- prefix here if it exists, so use target_name */
+  lt_argv_zero = lt_extend_str (tmp_pathspec, target_name, 1);
+  XFREE (tmp_pathspec);
+  tmp_pathspec = NULL;
+EOF
+
+           case $host_os in
+             mingw*)
+           cat <<"EOF"
+  {
+    char* p;
+    while ((p = strchr (newargz[0], '\\')) != NULL)
+      {
+       *p = '/';
+      }
+    while ((p = strchr (lt_argv_zero, '\\')) != NULL)
+      {
+       *p = '/';
+      }
+  }
+EOF
+           ;;
+           esac
+
+           cat <<"EOF"
+  XFREE (target_name);
+  XFREE (actual_cwrapper_path);
+  XFREE (actual_cwrapper_name);
+
+  lt_setenv ("BIN_SH", "xpg4"); /* for Tru64 */
+  lt_setenv ("DUALCASE", "1");  /* for MSK sh */
+  /* Update the DLL searchpath.  EXE_PATH_VALUE ($dllsearchpath) must
+     be prepended before (that is, appear after) LIB_PATH_VALUE ($temp_rpath)
+     because on Windows, both *_VARNAMEs are PATH but uninstalled
+     libraries must come first. */
+  lt_update_exe_path (EXE_PATH_VARNAME, EXE_PATH_VALUE);
+  lt_update_lib_path (LIB_PATH_VARNAME, LIB_PATH_VALUE);
+
+  lt_debugprintf (__FILE__, __LINE__, "(main) lt_argv_zero: %s\n",
+                 nonnull (lt_argv_zero));
+  for (i = 0; i < newargc; i++)
+    {
+      lt_debugprintf (__FILE__, __LINE__, "(main) newargz[%d]: %s\n",
+                     i, nonnull (newargz[i]));
+    }
+
+EOF
+
+           case $host_os in
+             mingw*)
+               cat <<"EOF"
+  /* execv doesn't actually work on mingw as expected on unix */
+  newargz = prepare_spawn (newargz);
+  rval = (int) _spawnv (_P_WAIT, lt_argv_zero, (const char * const *) newargz);
+  if (rval == -1)
+    {
+      /* failed to start process */
+      lt_debugprintf (__FILE__, __LINE__,
+                     "(main) failed to launch target \"%s\": %s\n",
+                     lt_argv_zero, nonnull (strerror (errno)));
+      return 127;
+    }
+  return rval;
+EOF
+               ;;
+             *)
+               cat <<"EOF"
+  execv (lt_argv_zero, newargz);
+  return rval; /* =127, but avoids unused variable warning */
+EOF
+               ;;
+           esac
+
+           cat <<"EOF"
+}
+
+void *
+xmalloc (size_t num)
+{
+  void *p = (void *) malloc (num);
+  if (!p)
+    lt_fatal (__FILE__, __LINE__, "memory exhausted");
+
+  return p;
+}
+
+char *
+xstrdup (const char *string)
+{
+  return string ? strcpy ((char *) xmalloc (strlen (string) + 1),
+                         string) : NULL;
+}
+
+const char *
+base_name (const char *name)
+{
+  const char *base;
+
+#if defined HAVE_DOS_BASED_FILE_SYSTEM
+  /* Skip over the disk name in MSDOS pathnames. */
+  if (isalpha ((unsigned char) name[0]) && name[1] == ':')
+    name += 2;
+#endif
+
+  for (base = name; *name; name++)
+    if (IS_DIR_SEPARATOR (*name))
+      base = name + 1;
+  return base;
+}
+
+int
+check_executable (const char *path)
+{
+  struct stat st;
+
+  lt_debugprintf (__FILE__, __LINE__, "(check_executable): %s\n",
+                  nonempty (path));
+  if ((!path) || (!*path))
+    return 0;
+
+  if ((stat (path, &st) >= 0)
+      && (st.st_mode & (S_IXUSR | S_IXGRP | S_IXOTH)))
+    return 1;
+  else
+    return 0;
+}
+
+int
+make_executable (const char *path)
+{
+  int rval = 0;
+  struct stat st;
+
+  lt_debugprintf (__FILE__, __LINE__, "(make_executable): %s\n",
+                  nonempty (path));
+  if ((!path) || (!*path))
+    return 0;
+
+  if (stat (path, &st) >= 0)
+    {
+      rval = chmod (path, st.st_mode | S_IXOTH | S_IXGRP | S_IXUSR);
+    }
+  return rval;
+}
+
+/* Searches for the full path of the wrapper.  Returns
+   newly allocated full path name if found, NULL otherwise
+   Does not chase symlinks, even on platforms that support them.
+*/
+char *
+find_executable (const char *wrapper)
+{
+  int has_slash = 0;
+  const char *p;
+  const char *p_next;
+  /* static buffer for getcwd */
+  char tmp[LT_PATHMAX + 1];
+  size_t tmp_len;
+  char *concat_name;
+
+  lt_debugprintf (__FILE__, __LINE__, "(find_executable): %s\n",
+                  nonempty (wrapper));
+
+  if ((wrapper == NULL) || (*wrapper == '\0'))
+    return NULL;
+
+  /* Absolute path? */
+#if defined HAVE_DOS_BASED_FILE_SYSTEM
+  if (isalpha ((unsigned char) wrapper[0]) && wrapper[1] == ':')
+    {
+      concat_name = xstrdup (wrapper);
+      if (check_executable (concat_name))
+       return concat_name;
+      XFREE (concat_name);
+    }
+  else
+    {
+#endif
+      if (IS_DIR_SEPARATOR (wrapper[0]))
+       {
+         concat_name = xstrdup (wrapper);
+         if (check_executable (concat_name))
+           return concat_name;
+         XFREE (concat_name);
+       }
+#if defined HAVE_DOS_BASED_FILE_SYSTEM
+    }
+#endif
+
+  for (p = wrapper; *p; p++)
+    if (*p == '/')
+      {
+       has_slash = 1;
+       break;
+      }
+  if (!has_slash)
+    {
+      /* no slashes; search PATH */
+      const char *path = getenv ("PATH");
+      if (path != NULL)
+       {
+         for (p = path; *p; p = p_next)
+           {
+             const char *q;
+             size_t p_len;
+             for (q = p; *q; q++)
+               if (IS_PATH_SEPARATOR (*q))
+                 break;
+             p_len = (size_t) (q - p);
+             p_next = (*q == '\0' ? q : q + 1);
+             if (p_len == 0)
+               {
+                 /* empty path: current directory */
+                 if (getcwd (tmp, LT_PATHMAX) == NULL)
+                   lt_fatal (__FILE__, __LINE__, "getcwd failed: %s",
+                              nonnull (strerror (errno)));
+                 tmp_len = strlen (tmp);
+                 concat_name =
+                   XMALLOC (char, tmp_len + 1 + strlen (wrapper) + 1);
+                 memcpy (concat_name, tmp, tmp_len);
+                 concat_name[tmp_len] = '/';
+                 strcpy (concat_name + tmp_len + 1, wrapper);
+               }
+             else
+               {
+                 concat_name =
+                   XMALLOC (char, p_len + 1 + strlen (wrapper) + 1);
+                 memcpy (concat_name, p, p_len);
+                 concat_name[p_len] = '/';
+                 strcpy (concat_name + p_len + 1, wrapper);
+               }
+             if (check_executable (concat_name))
+               return concat_name;
+             XFREE (concat_name);
+           }
+       }
+      /* not found in PATH; assume curdir */
+    }
+  /* Relative path | not found in path: prepend cwd */
+  if (getcwd (tmp, LT_PATHMAX) == NULL)
+    lt_fatal (__FILE__, __LINE__, "getcwd failed: %s",
+              nonnull (strerror (errno)));
+  tmp_len = strlen (tmp);
+  concat_name = XMALLOC (char, tmp_len + 1 + strlen (wrapper) + 1);
+  memcpy (concat_name, tmp, tmp_len);
+  concat_name[tmp_len] = '/';
+  strcpy (concat_name + tmp_len + 1, wrapper);
+
+  if (check_executable (concat_name))
+    return concat_name;
+  XFREE (concat_name);
+  return NULL;
+}
+
+char *
+chase_symlinks (const char *pathspec)
+{
+#ifndef S_ISLNK
+  return xstrdup (pathspec);
+#else
+  char buf[LT_PATHMAX];
+  struct stat s;
+  char *tmp_pathspec = xstrdup (pathspec);
+  char *p;
+  int has_symlinks = 0;
+  while (strlen (tmp_pathspec) && !has_symlinks)
+    {
+      lt_debugprintf (__FILE__, __LINE__,
+                     "checking path component for symlinks: %s\n",
+                     tmp_pathspec);
+      if (lstat (tmp_pathspec, &s) == 0)
+       {
+         if (S_ISLNK (s.st_mode) != 0)
+           {
+             has_symlinks = 1;
+             break;
+           }
+
+         /* search backwards for last DIR_SEPARATOR */
+         p = tmp_pathspec + strlen (tmp_pathspec) - 1;
+         while ((p > tmp_pathspec) && (!IS_DIR_SEPARATOR (*p)))
+           p--;
+         if ((p == tmp_pathspec) && (!IS_DIR_SEPARATOR (*p)))
+           {
+             /* no more DIR_SEPARATORS left */
+             break;
+           }
+         *p = '\0';
+       }
+      else
+       {
+         lt_fatal (__FILE__, __LINE__,
+                   "error accessing file \"%s\": %s",
+                   tmp_pathspec, nonnull (strerror (errno)));
+       }
+    }
+  XFREE (tmp_pathspec);
+
+  if (!has_symlinks)
+    {
+      return xstrdup (pathspec);
+    }
+
+  tmp_pathspec = realpath (pathspec, buf);
+  if (tmp_pathspec == 0)
+    {
+      lt_fatal (__FILE__, __LINE__,
+               "could not follow symlinks for %s", pathspec);
+    }
+  return xstrdup (tmp_pathspec);
+#endif
+}
+
+char *
+strendzap (char *str, const char *pat)
+{
+  size_t len, patlen;
+
+  assert (str != NULL);
+  assert (pat != NULL);
+
+  len = strlen (str);
+  patlen = strlen (pat);
+
+  if (patlen <= len)
+    {
+      str += len - patlen;
+      if (STREQ (str, pat))
+       *str = '\0';
+    }
+  return str;
+}
+
+void
+lt_debugprintf (const char *file, int line, const char *fmt, ...)
+{
+  va_list args;
+  if (lt_debug)
+    {
+      (void) fprintf (stderr, "%s:%s:%d: ", program_name, file, line);
+      va_start (args, fmt);
+      (void) vfprintf (stderr, fmt, args);
+      va_end (args);
+    }
+}
+
+static void
+lt_error_core (int exit_status, const char *file,
+              int line, const char *mode,
+              const char *message, va_list ap)
+{
+  fprintf (stderr, "%s:%s:%d: %s: ", program_name, file, line, mode);
+  vfprintf (stderr, message, ap);
+  fprintf (stderr, ".\n");
+
+  if (exit_status >= 0)
+    exit (exit_status);
+}
+
+void
+lt_fatal (const char *file, int line, const char *message, ...)
+{
+  va_list ap;
+  va_start (ap, message);
+  lt_error_core (EXIT_FAILURE, file, line, "FATAL", message, ap);
+  va_end (ap);
+}
+
+static const char *
+nonnull (const char *s)
+{
+  return s ? s : "(null)";
+}
+
+static const char *
+nonempty (const char *s)
+{
+  return (s && !*s) ? "(empty)" : nonnull (s);
+}
+
+void
+lt_setenv (const char *name, const char *value)
+{
+  lt_debugprintf (__FILE__, __LINE__,
+                 "(lt_setenv) setting '%s' to '%s'\n",
+                  nonnull (name), nonnull (value));
+  {
+#ifdef HAVE_SETENV
+    /* always make a copy, for consistency with !HAVE_SETENV */
+    char *str = xstrdup (value);
+    setenv (name, str, 1);
+#else
+    size_t len = strlen (name) + 1 + strlen (value) + 1;
+    char *str = XMALLOC (char, len);
+    sprintf (str, "%s=%s", name, value);
+    if (putenv (str) != EXIT_SUCCESS)
+      {
+        XFREE (str);
+      }
+#endif
+  }
+}
+
+char *
+lt_extend_str (const char *orig_value, const char *add, int to_end)
+{
+  char *new_value;
+  if (orig_value && *orig_value)
+    {
+      size_t orig_value_len = strlen (orig_value);
+      size_t add_len = strlen (add);
+      new_value = XMALLOC (char, add_len + orig_value_len + 1);
+      if (to_end)
+        {
+          strcpy (new_value, orig_value);
+          strcpy (new_value + orig_value_len, add);
+        }
+      else
+        {
+          strcpy (new_value, add);
+          strcpy (new_value + add_len, orig_value);
+        }
+    }
+  else
+    {
+      new_value = xstrdup (add);
+    }
+  return new_value;
+}
+
+void
+lt_update_exe_path (const char *name, const char *value)
+{
+  lt_debugprintf (__FILE__, __LINE__,
+                 "(lt_update_exe_path) modifying '%s' by prepending '%s'\n",
+                  nonnull (name), nonnull (value));
+
+  if (name && *name && value && *value)
+    {
+      char *new_value = lt_extend_str (getenv (name), value, 0);
+      /* some systems can't cope with a ':'-terminated path #' */
+      size_t len = strlen (new_value);
+      while ((len > 0) && IS_PATH_SEPARATOR (new_value[len-1]))
+        {
+          new_value[--len] = '\0';
+        }
+      lt_setenv (name, new_value);
+      XFREE (new_value);
+    }
+}
+
+void
+lt_update_lib_path (const char *name, const char *value)
+{
+  lt_debugprintf (__FILE__, __LINE__,
+                 "(lt_update_lib_path) modifying '%s' by prepending '%s'\n",
+                  nonnull (name), nonnull (value));
+
+  if (name && *name && value && *value)
+    {
+      char *new_value = lt_extend_str (getenv (name), value, 0);
+      lt_setenv (name, new_value);
+      XFREE (new_value);
+    }
+}
+
+EOF
+           case $host_os in
+             mingw*)
+               cat <<"EOF"
+
+/* Prepares an argument vector before calling spawn().
+   Note that spawn() does not by itself call the command interpreter
+     (getenv ("COMSPEC") != NULL ? getenv ("COMSPEC") :
+      ({ OSVERSIONINFO v; v.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
+         GetVersionEx(&v);
+         v.dwPlatformId == VER_PLATFORM_WIN32_NT;
+      }) ? "cmd.exe" : "command.com").
+   Instead it simply concatenates the arguments, separated by ' ', and calls
+   CreateProcess().  We must quote the arguments since Win32 CreateProcess()
+   interprets characters like ' ', '\t', '\\', '"' (but not '<' and '>') in a
+   special way:
+   - Space and tab are interpreted as delimiters. They are not treated as
+     delimiters if they are surrounded by double quotes: "...".
+   - Unescaped double quotes are removed from the input. Their only effect is
+     that within double quotes, space and tab are treated like normal
+     characters.
+   - Backslashes not followed by double quotes are not special.
+   - But 2*n+1 backslashes followed by a double quote become
+     n backslashes followed by a double quote (n >= 0):
+       \" -> "
+       \\\" -> \"
+       \\\\\" -> \\"
+ */
+#define SHELL_SPECIAL_CHARS "\"\\ \001\002\003\004\005\006\007\010\011\012\013\014\015\016\017\020\021\022\023\024\025\026\027\030\031\032\033\034\035\036\037"
+#define SHELL_SPACE_CHARS " \001\002\003\004\005\006\007\010\011\012\013\014\015\016\017\020\021\022\023\024\025\026\027\030\031\032\033\034\035\036\037"
+char **
+prepare_spawn (char **argv)
+{
+  size_t argc;
+  char **new_argv;
+  size_t i;
+
+  /* Count number of arguments.  */
+  for (argc = 0; argv[argc] != NULL; argc++)
+    ;
+
+  /* Allocate new argument vector.  */
+  new_argv = XMALLOC (char *, argc + 1);
+
+  /* Put quoted arguments into the new argument vector.  */
+  for (i = 0; i < argc; i++)
+    {
+      const char *string = argv[i];
+
+      if (string[0] == '\0')
+       new_argv[i] = xstrdup ("\"\"");
+      else if (strpbrk (string, SHELL_SPECIAL_CHARS) != NULL)
+       {
+         int quote_around = (strpbrk (string, SHELL_SPACE_CHARS) != NULL);
+         size_t length;
+         unsigned int backslashes;
+         const char *s;
+         char *quoted_string;
+         char *p;
+
+         length = 0;
+         backslashes = 0;
+         if (quote_around)
+           length++;
+         for (s = string; *s != '\0'; s++)
+           {
+             char c = *s;
+             if (c == '"')
+               length += backslashes + 1;
+             length++;
+             if (c == '\\')
+               backslashes++;
+             else
+               backslashes = 0;
+           }
+         if (quote_around)
+           length += backslashes + 1;
+
+         quoted_string = XMALLOC (char, length + 1);
+
+         p = quoted_string;
+         backslashes = 0;
+         if (quote_around)
+           *p++ = '"';
+         for (s = string; *s != '\0'; s++)
+           {
+             char c = *s;
+             if (c == '"')
+               {
+                 unsigned int j;
+                 for (j = backslashes + 1; j > 0; j--)
+                   *p++ = '\\';
+               }
+             *p++ = c;
+             if (c == '\\')
+               backslashes++;
+             else
+               backslashes = 0;
+           }
+         if (quote_around)
+           {
+             unsigned int j;
+             for (j = backslashes; j > 0; j--)
+               *p++ = '\\';
+             *p++ = '"';
+           }
+         *p = '\0';
+
+         new_argv[i] = quoted_string;
+       }
+      else
+       new_argv[i] = (char *) string;
+    }
+  new_argv[argc] = NULL;
+
+  return new_argv;
+}
+EOF
+               ;;
+           esac
+
+            cat <<"EOF"
+void lt_dump_script (FILE* f)
+{
+EOF
+           func_emit_wrapper yes |
+             $SED -n -e '
+s/^\(.\{79\}\)\(..*\)/\1\
+\2/
+h
+s/\([\\"]\)/\\\1/g
+s/$/\\n/
+s/\([^\n]*\).*/  fputs ("\1", f);/p
+g
+D'
+            cat <<"EOF"
+}
+EOF
+}
+# end: func_emit_cwrapperexe_src
+
+# func_win32_import_lib_p ARG
+# True if ARG is an import lib, as indicated by $file_magic_cmd
+func_win32_import_lib_p ()
+{
+    $debug_cmd
+
+    case `eval $file_magic_cmd \"\$1\" 2>/dev/null | $SED -e 10q` in
+    *import*) : ;;
+    *) false ;;
+    esac
+}
+
+# func_suncc_cstd_abi
+# !!ONLY CALL THIS FOR SUN CC AFTER $compile_command IS FULLY EXPANDED!!
+# Several compiler flags select an ABI that is incompatible with the
+# Cstd library. Avoid specifying it if any are in CXXFLAGS.
+func_suncc_cstd_abi ()
+{
+    $debug_cmd
+
+    case " $compile_command " in
+    *" -compat=g "*|*\ -std=c++[0-9][0-9]\ *|*" -library=stdcxx4 "*|*" -library=stlport4 "*)
+      suncc_use_cstd_abi=no
+      ;;
+    *)
+      suncc_use_cstd_abi=yes
+      ;;
+    esac
+}
+
+# func_mode_link arg...
+func_mode_link ()
+{
+    $debug_cmd
+
+    case $host in
+    *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*)
+      # It is impossible to link a dll without this setting, and
+      # we shouldn't force the makefile maintainer to figure out
+      # what system we are compiling for in order to pass an extra
+      # flag for every libtool invocation.
+      # allow_undefined=no
+
+      # FIXME: Unfortunately, there are problems with the above when trying
+      # to make a dll that has undefined symbols, in which case not
+      # even a static library is built.  For now, we need to specify
+      # -no-undefined on the libtool link line when we can be certain
+      # that all symbols are satisfied, otherwise we get a static library.
+      allow_undefined=yes
+      ;;
+    *)
+      allow_undefined=yes
+      ;;
+    esac
+    libtool_args=$nonopt
+    base_compile="$nonopt $@"
+    compile_command=$nonopt
+    finalize_command=$nonopt
+
+    compile_rpath=
+    finalize_rpath=
+    compile_shlibpath=
+    finalize_shlibpath=
+    convenience=
+    old_convenience=
+    deplibs=
+    old_deplibs=
+    compiler_flags=
+    linker_flags=
+    dllsearchpath=
+    lib_search_path=`pwd`
+    inst_prefix_dir=
+    new_inherited_linker_flags=
+
+    avoid_version=no
+    bindir=
+    dlfiles=
+    dlprefiles=
+    dlself=no
+    export_dynamic=no
+    export_symbols=
+    export_symbols_regex=
+    generated=
+    libobjs=
+    ltlibs=
+    module=no
+    no_install=no
+    objs=
+    os2dllname=
+    non_pic_objects=
+    precious_files_regex=
+    prefer_static_libs=no
+    preload=false
+    prev=
+    prevarg=
+    release=
+    rpath=
+    xrpath=
+    perm_rpath=
+    temp_rpath=
+    thread_safe=no
+    vinfo=
+    vinfo_number=no
+    weak_libs=
+    single_module=$wl-single_module
+    func_infer_tag $base_compile
+
+    # We need to know -static, to get the right output filenames.
+    for arg
+    do
+      case $arg in
+      -shared)
+       test yes != "$build_libtool_libs" \
+         && func_fatal_configuration "cannot build a shared library"
+       build_old_libs=no
+       break
+       ;;
+      -all-static | -static | -static-uninstalled-libs | -static-libtool-libs)
+       case $arg in
+       -all-static | -static)
+         if test yes = "$build_libtool_libs" && test -z "$link_static_flag"; then
+           func_warning "complete static linking is impossible in this configuration"
+         fi
+         if test -n "$link_static_flag"; then
+           dlopen_self=$dlopen_self_static
+         fi
+         prefer_static_libs=yes
+         ;;
+       -static-uninstalled-libs)
+         if test -z "$pic_flag" && test -n "$link_static_flag"; then
+           dlopen_self=$dlopen_self_static
+         fi
+         prefer_static_libs=built
+         ;;
+       -static-libtool-libs)
+         if test -z "$pic_flag" && test -n "$link_static_flag"; then
+           dlopen_self=$dlopen_self_static
+         fi
+         prefer_static_libs=yes
+         ;;
+       esac
+       build_libtool_libs=no
+       build_old_libs=yes
+       break
+       ;;
+      esac
+    done
+
+    # See if our shared archives depend on static archives.
+    test -n "$old_archive_from_new_cmds" && build_old_libs=yes
+
+    # Go through the arguments, transforming them on the way.
+    while test "$#" -gt 0; do
+      arg=$1
+      shift
+      func_quote_for_eval "$arg"
+      qarg=$func_quote_for_eval_unquoted_result
+      func_append libtool_args " $func_quote_for_eval_result"
+
+      # If the previous option needs an argument, assign it.
+      if test -n "$prev"; then
+       case $prev in
+       output)
+         func_append compile_command " @OUTPUT@"
+         func_append finalize_command " @OUTPUT@"
+         ;;
+       esac
+
+       case $prev in
+       bindir)
+         bindir=$arg
+         prev=
+         continue
+         ;;
+       dlfiles|dlprefiles)
+         $preload || {
+           # Add the symbol object into the linking commands.
+           func_append compile_command " @SYMFILE@"
+           func_append finalize_command " @SYMFILE@"
+           preload=:
+         }
+         case $arg in
+         *.la | *.lo) ;;  # We handle these cases below.
+         force)
+           if test no = "$dlself"; then
+             dlself=needless
+             export_dynamic=yes
+           fi
+           prev=
+           continue
+           ;;
+         self)
+           if test dlprefiles = "$prev"; then
+             dlself=yes
+           elif test dlfiles = "$prev" && test yes != "$dlopen_self"; then
+             dlself=yes
+           else
+             dlself=needless
+             export_dynamic=yes
+           fi
+           prev=
+           continue
+           ;;
+         *)
+           if test dlfiles = "$prev"; then
+             func_append dlfiles " $arg"
+           else
+             func_append dlprefiles " $arg"
+           fi
+           prev=
+           continue
+           ;;
+         esac
+         ;;
+       expsyms)
+         export_symbols=$arg
+         test -f "$arg" \
+           || func_fatal_error "symbol file '$arg' does not exist"
+         prev=
+         continue
+         ;;
+       expsyms_regex)
+         export_symbols_regex=$arg
+         prev=
+         continue
+         ;;
+       framework)
+         case $host in
+           *-*-darwin*)
+             case "$deplibs " in
+               *" $qarg.ltframework "*) ;;
+               *) func_append deplibs " $qarg.ltframework" # this is fixed later
+                  ;;
+             esac
+             ;;
+         esac
+         prev=
+         continue
+         ;;
+       inst_prefix)
+         inst_prefix_dir=$arg
+         prev=
+         continue
+         ;;
+       mllvm)
+         # Clang does not use LLVM to link, so we can simply discard any
+         # '-mllvm $arg' options when doing the link step.
+         prev=
+         continue
+         ;;
+       objectlist)
+         if test -f "$arg"; then
+           save_arg=$arg
+           moreargs=
+           for fil in `cat "$save_arg"`
+           do
+#            func_append moreargs " $fil"
+             arg=$fil
+             # A libtool-controlled object.
+
+             # Check to see that this really is a libtool object.
+             if func_lalib_unsafe_p "$arg"; then
+               pic_object=
+               non_pic_object=
+
+               # Read the .lo file
+               func_source "$arg"
+
+               if test -z "$pic_object" ||
+                  test -z "$non_pic_object" ||
+                  test none = "$pic_object" &&
+                  test none = "$non_pic_object"; then
+                 func_fatal_error "cannot find name of object for '$arg'"
+               fi
+
+               # Extract subdirectory from the argument.
+               func_dirname "$arg" "/" ""
+               xdir=$func_dirname_result
+
+               if test none != "$pic_object"; then
+                 # Prepend the subdirectory the object is found in.
+                 pic_object=$xdir$pic_object
+
+                 if test dlfiles = "$prev"; then
+                   if test yes = "$build_libtool_libs" && test yes = "$dlopen_support"; then
+                     func_append dlfiles " $pic_object"
+                     prev=
+                     continue
+                   else
+                     # If libtool objects are unsupported, then we need to preload.
+                     prev=dlprefiles
+                   fi
+                 fi
+
+                 # CHECK ME:  I think I busted this.  -Ossama
+                 if test dlprefiles = "$prev"; then
+                   # Preload the old-style object.
+                   func_append dlprefiles " $pic_object"
+                   prev=
+                 fi
+
+                 # A PIC object.
+                 func_append libobjs " $pic_object"
+                 arg=$pic_object
+               fi
+
+               # Non-PIC object.
+               if test none != "$non_pic_object"; then
+                 # Prepend the subdirectory the object is found in.
+                 non_pic_object=$xdir$non_pic_object
+
+                 # A standard non-PIC object
+                 func_append non_pic_objects " $non_pic_object"
+                 if test -z "$pic_object" || test none = "$pic_object"; then
+                   arg=$non_pic_object
+                 fi
+               else
+                 # If the PIC object exists, use it instead.
+                 # $xdir was prepended to $pic_object above.
+                 non_pic_object=$pic_object
+                 func_append non_pic_objects " $non_pic_object"
+               fi
+             else
+               # Only an error if not doing a dry-run.
+               if $opt_dry_run; then
+                 # Extract subdirectory from the argument.
+                 func_dirname "$arg" "/" ""
+                 xdir=$func_dirname_result
+
+                 func_lo2o "$arg"
+                 pic_object=$xdir$objdir/$func_lo2o_result
+                 non_pic_object=$xdir$func_lo2o_result
+                 func_append libobjs " $pic_object"
+                 func_append non_pic_objects " $non_pic_object"
+               else
+                 func_fatal_error "'$arg' is not a valid libtool object"
+               fi
+             fi
+           done
+         else
+           func_fatal_error "link input file '$arg' does not exist"
+         fi
+         arg=$save_arg
+         prev=
+         continue
+         ;;
+       os2dllname)
+         os2dllname=$arg
+         prev=
+         continue
+         ;;
+       precious_regex)
+         precious_files_regex=$arg
+         prev=
+         continue
+         ;;
+       release)
+         release=-$arg
+         prev=
+         continue
+         ;;
+       rpath | xrpath)
+         # We need an absolute path.
+         case $arg in
+         [\\/]* | [A-Za-z]:[\\/]*) ;;
+         *)
+           func_fatal_error "only absolute run-paths are allowed"
+           ;;
+         esac
+         if test rpath = "$prev"; then
+           case "$rpath " in
+           *" $arg "*) ;;
+           *) func_append rpath " $arg" ;;
+           esac
+         else
+           case "$xrpath " in
+           *" $arg "*) ;;
+           *) func_append xrpath " $arg" ;;
+           esac
+         fi
+         prev=
+         continue
+         ;;
+       shrext)
+         shrext_cmds=$arg
+         prev=
+         continue
+         ;;
+       weak)
+         func_append weak_libs " $arg"
+         prev=
+         continue
+         ;;
+       xcclinker)
+         func_append linker_flags " $qarg"
+         func_append compiler_flags " $qarg"
+         prev=
+         func_append compile_command " $qarg"
+         func_append finalize_command " $qarg"
+         continue
+         ;;
+       xcompiler)
+         func_append compiler_flags " $qarg"
+         prev=
+         func_append compile_command " $qarg"
+         func_append finalize_command " $qarg"
+         continue
+         ;;
+       xlinker)
+         func_append linker_flags " $qarg"
+         func_append compiler_flags " $wl$qarg"
+         prev=
+         func_append compile_command " $wl$qarg"
+         func_append finalize_command " $wl$qarg"
+         continue
+         ;;
+       *)
+         eval "$prev=\"\$arg\""
+         prev=
+         continue
+         ;;
+       esac
+      fi # test -n "$prev"
+
+      prevarg=$arg
+
+      case $arg in
+      -all-static | -static)
+       if test -n "$link_static_flag"; then
+         # See comment for -static flag below, for more details.
+         func_append compile_command " $link_static_flag"
+         func_append finalize_command " $link_static_flag"
+       fi
+       continue
+       ;;
+
+      -allow-undefined)
+       # FIXME: remove this flag sometime in the future.
+       func_fatal_error "'-allow-undefined' must not be used because it is the default"
+       ;;
+
+      -avoid-version)
+       avoid_version=yes
+       continue
+       ;;
+
+      -bindir)
+       prev=bindir
+       continue
+       ;;
+
+      -dlopen)
+       prev=dlfiles
+       continue
+       ;;
+
+      -dlpreopen)
+       prev=dlprefiles
+       continue
+       ;;
+
+      -export-dynamic)
+       export_dynamic=yes
+       continue
+       ;;
+
+      -export-symbols | -export-symbols-regex)
+       if test -n "$export_symbols" || test -n "$export_symbols_regex"; then
+         func_fatal_error "more than one -exported-symbols argument is not allowed"
+       fi
+       if test X-export-symbols = "X$arg"; then
+         prev=expsyms
+       else
+         prev=expsyms_regex
+       fi
+       continue
+       ;;
+
+      -framework)
+       prev=framework
+       continue
+       ;;
+
+      -inst-prefix-dir)
+       prev=inst_prefix
+       continue
+       ;;
+
+      # The native IRIX linker understands -LANG:*, -LIST:* and -LNO:*
+      # so, if we see these flags be careful not to treat them like -L
+      -L[A-Z][A-Z]*:*)
+       case $with_gcc/$host in
+       no/*-*-irix* | /*-*-irix*)
+         func_append compile_command " $arg"
+         func_append finalize_command " $arg"
+         ;;
+       esac
+       continue
+       ;;
+
+      -L*)
+       func_stripname "-L" '' "$arg"
+       if test -z "$func_stripname_result"; then
+         if test "$#" -gt 0; then
+           func_fatal_error "require no space between '-L' and '$1'"
+         else
+           func_fatal_error "need path for '-L' option"
+         fi
+       fi
+       func_resolve_sysroot "$func_stripname_result"
+       dir=$func_resolve_sysroot_result
+       # We need an absolute path.
+       case $dir in
+       [\\/]* | [A-Za-z]:[\\/]*) ;;
+       *)
+         absdir=`cd "$dir" && pwd`
+         test -z "$absdir" && \
+           func_fatal_error "cannot determine absolute directory name of '$dir'"
+         dir=$absdir
+         ;;
+       esac
+       case "$deplibs " in
+       *" -L$dir "* | *" $arg "*)
+         # Will only happen for absolute or sysroot arguments
+         ;;
+       *)
+         # Preserve sysroot, but never include relative directories
+         case $dir in
+           [\\/]* | [A-Za-z]:[\\/]* | =*) func_append deplibs " $arg" ;;
+           *) func_append deplibs " -L$dir" ;;
+         esac
+         func_append lib_search_path " $dir"
+         ;;
+       esac
+       case $host in
+       *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*)
+         testbindir=`$ECHO "$dir" | $SED 's*/lib$*/bin*'`
+         case :$dllsearchpath: in
+         *":$dir:"*) ;;
+         ::) dllsearchpath=$dir;;
+         *) func_append dllsearchpath ":$dir";;
+         esac
+         case :$dllsearchpath: in
+         *":$testbindir:"*) ;;
+         ::) dllsearchpath=$testbindir;;
+         *) func_append dllsearchpath ":$testbindir";;
+         esac
+         ;;
+       esac
+       continue
+       ;;
+
+      -l*)
+       if test X-lc = "X$arg" || test X-lm = "X$arg"; then
+         case $host in
+         *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-beos* | *-cegcc* | *-*-haiku*)
+           # These systems don't actually have a C or math library (as such)
+           continue
+           ;;
+         *-*-os2*)
+           # These systems don't actually have a C library (as such)
+           test X-lc = "X$arg" && continue
+           ;;
+         *-*-openbsd* | *-*-freebsd* | *-*-dragonfly* | *-*-bitrig*)
+           # Do not include libc due to us having libc/libc_r.
+           test X-lc = "X$arg" && continue
+           ;;
+         *-*-rhapsody* | *-*-darwin1.[012])
+           # Rhapsody C and math libraries are in the System framework
+           func_append deplibs " System.ltframework"
+           continue
+           ;;
+         *-*-sco3.2v5* | *-*-sco5v6*)
+           # Causes problems with __ctype
+           test X-lc = "X$arg" && continue
+           ;;
+         *-*-sysv4.2uw2* | *-*-sysv5* | *-*-unixware* | *-*-OpenUNIX*)
+           # Compiler inserts libc in the correct place for threads to work
+           test X-lc = "X$arg" && continue
+           ;;
+         esac
+       elif test X-lc_r = "X$arg"; then
+        case $host in
+        *-*-openbsd* | *-*-freebsd* | *-*-dragonfly* | *-*-bitrig*)
+          # Do not include libc_r directly, use -pthread flag.
+          continue
+          ;;
+        esac
+       fi
+       func_append deplibs " $arg"
+       continue
+       ;;
+
+      -mllvm)
+       prev=mllvm
+       continue
+       ;;
+
+      -module)
+       module=yes
+       continue
+       ;;
+
+      # Tru64 UNIX uses -model [arg] to determine the layout of C++
+      # classes, name mangling, and exception handling.
+      # Darwin uses the -arch flag to determine output architecture.
+      -model|-arch|-isysroot|--sysroot)
+       func_append compiler_flags " $arg"
+       func_append compile_command " $arg"
+       func_append finalize_command " $arg"
+       prev=xcompiler
+       continue
+       ;;
+
+      -mt|-mthreads|-kthread|-Kthread|-pthread|-pthreads|--thread-safe \
+      |-threads|-fopenmp|-openmp|-mp|-xopenmp|-omp|-qsmp=*)
+       func_append compiler_flags " $arg"
+       func_append compile_command " $arg"
+       func_append finalize_command " $arg"
+       case "$new_inherited_linker_flags " in
+           *" $arg "*) ;;
+           * ) func_append new_inherited_linker_flags " $arg" ;;
+       esac
+       continue
+       ;;
+
+      -multi_module)
+       single_module=$wl-multi_module
+       continue
+       ;;
+
+      -no-fast-install)
+       fast_install=no
+       continue
+       ;;
+
+      -no-install)
+       case $host in
+       *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-*-darwin* | *-cegcc*)
+         # The PATH hackery in wrapper scripts is required on Windows
+         # and Darwin in order for the loader to find any dlls it needs.
+         func_warning "'-no-install' is ignored for $host"
+         func_warning "assuming '-no-fast-install' instead"
+         fast_install=no
+         ;;
+       *) no_install=yes ;;
+       esac
+       continue
+       ;;
+
+      -no-undefined)
+       allow_undefined=no
+       continue
+       ;;
+
+      -objectlist)
+       prev=objectlist
+       continue
+       ;;
+
+      -os2dllname)
+       prev=os2dllname
+       continue
+       ;;
+
+      -o) prev=output ;;
+
+      -precious-files-regex)
+       prev=precious_regex
+       continue
+       ;;
+
+      -release)
+       prev=release
+       continue
+       ;;
+
+      -rpath)
+       prev=rpath
+       continue
+       ;;
+
+      -R)
+       prev=xrpath
+       continue
+       ;;
+
+      -R*)
+       func_stripname '-R' '' "$arg"
+       dir=$func_stripname_result
+       # We need an absolute path.
+       case $dir in
+       [\\/]* | [A-Za-z]:[\\/]*) ;;
+       =*)
+         func_stripname '=' '' "$dir"
+         dir=$lt_sysroot$func_stripname_result
+         ;;
+       *)
+         func_fatal_error "only absolute run-paths are allowed"
+         ;;
+       esac
+       case "$xrpath " in
+       *" $dir "*) ;;
+       *) func_append xrpath " $dir" ;;
+       esac
+       continue
+       ;;
+
+      -shared)
+       # The effects of -shared are defined in a previous loop.
+       continue
+       ;;
+
+      -shrext)
+       prev=shrext
+       continue
+       ;;
+
+      -static-uninstalled-libs | -static-libtool-libs)
+       # The effects of -static-uninstalled-libs are defined in a previous
+       # loop.  We used to do the same as -all-static on platforms that
+       # didn't have a PIC flag, but the assumption that the effects
+       # would be equivalent was wrong.  It would break on at least
+       # Digital Unix and AIX.
+       continue
+       ;;
+
+      -thread-safe)
+       thread_safe=yes
+       continue
+       ;;
+
+      -version-info)
+       prev=vinfo
+       continue
+       ;;
+
+      -version-number)
+       prev=vinfo
+       vinfo_number=yes
+       continue
+       ;;
+
+      -weak)
+        prev=weak
+       continue
+       ;;
+
+      -Wc,*)
+       func_stripname '-Wc,' '' "$arg"
+       args=$func_stripname_result
+       arg=
+       save_ifs=$IFS; IFS=,
+       for flag in $args; do
+         IFS=$save_ifs
+          func_quote_for_eval "$flag"
+         func_append arg " $func_quote_for_eval_result"
+         func_append compiler_flags " $func_quote_for_eval_result"
+       done
+       IFS=$save_ifs
+       func_stripname ' ' '' "$arg"
+       arg=$func_stripname_result
+       ;;
+
+      -Wl,*)
+       func_stripname '-Wl,' '' "$arg"
+       args=$func_stripname_result
+       arg=
+       save_ifs=$IFS; IFS=,
+       for flag in $args; do
+         IFS=$save_ifs
+          func_quote_for_eval "$flag"
+         func_append arg " $wl$func_quote_for_eval_result"
+         func_append compiler_flags " $wl$func_quote_for_eval_result"
+         func_append linker_flags " $func_quote_for_eval_result"
+       done
+       IFS=$save_ifs
+       func_stripname ' ' '' "$arg"
+       arg=$func_stripname_result
+       ;;
+
+      -Xcompiler)
+       prev=xcompiler
+       continue
+       ;;
+
+      -Xlinker)
+       prev=xlinker
+       continue
+       ;;
+
+      -XCClinker)
+       prev=xcclinker
+       continue
+       ;;
+
+      # -msg_* for osf cc
+      -msg_*)
+       func_quote_for_eval "$arg"
+       arg=$func_quote_for_eval_result
+       ;;
+
+      # Flags to be passed through unchanged, with rationale:
+      # -64, -mips[0-9]      enable 64-bit mode for the SGI compiler
+      # -r[0-9][0-9]*        specify processor for the SGI compiler
+      # -xarch=*, -xtarget=* enable 64-bit mode for the Sun compiler
+      # +DA*, +DD*           enable 64-bit mode for the HP compiler
+      # -q*                  compiler args for the IBM compiler
+      # -m*, -t[45]*, -txscale* architecture-specific flags for GCC
+      # -F/path              path to uninstalled frameworks, gcc on darwin
+      # -p, -pg, --coverage, -fprofile-*  profiling flags for GCC
+      # -fstack-protector*   stack protector flags for GCC
+      # @file                GCC response files
+      # -tp=*                Portland pgcc target processor selection
+      # --sysroot=*          for sysroot support
+      # -O*, -g*, -flto*, -fwhopr*, -fuse-linker-plugin GCC link-time optimization
+      # -stdlib=*            select c++ std lib with clang
+      -64|-mips[0-9]|-r[0-9][0-9]*|-xarch=*|-xtarget=*|+DA*|+DD*|-q*|-m*| \
+      -t[45]*|-txscale*|-p|-pg|--coverage|-fprofile-*|-F*|@*|-tp=*|--sysroot=*| \
+      -O*|-g*|-flto*|-fwhopr*|-fuse-linker-plugin|-fstack-protector*|-stdlib=*)
+        func_quote_for_eval "$arg"
+       arg=$func_quote_for_eval_result
+        func_append compile_command " $arg"
+        func_append finalize_command " $arg"
+        func_append compiler_flags " $arg"
+        continue
+        ;;
+
+      -Z*)
+        if test os2 = "`expr $host : '.*\(os2\)'`"; then
+          # OS/2 uses -Zxxx to specify OS/2-specific options
+         compiler_flags="$compiler_flags $arg"
+         func_append compile_command " $arg"
+         func_append finalize_command " $arg"
+         case $arg in
+         -Zlinker | -Zstack)
+           prev=xcompiler
+           ;;
+         esac
+         continue
+        else
+         # Otherwise treat like 'Some other compiler flag' below
+         func_quote_for_eval "$arg"
+         arg=$func_quote_for_eval_result
+        fi
+       ;;
+
+      # Some other compiler flag.
+      -* | +*)
+        func_quote_for_eval "$arg"
+       arg=$func_quote_for_eval_result
+       ;;
+
+      *.$objext)
+       # A standard object.
+       func_append objs " $arg"
+       ;;
+
+      *.lo)
+       # A libtool-controlled object.
+
+       # Check to see that this really is a libtool object.
+       if func_lalib_unsafe_p "$arg"; then
+         pic_object=
+         non_pic_object=
+
+         # Read the .lo file
+         func_source "$arg"
+
+         if test -z "$pic_object" ||
+            test -z "$non_pic_object" ||
+            test none = "$pic_object" &&
+            test none = "$non_pic_object"; then
+           func_fatal_error "cannot find name of object for '$arg'"
+         fi
+
+         # Extract subdirectory from the argument.
+         func_dirname "$arg" "/" ""
+         xdir=$func_dirname_result
+
+         test none = "$pic_object" || {
+           # Prepend the subdirectory the object is found in.
+           pic_object=$xdir$pic_object
+
+           if test dlfiles = "$prev"; then
+             if test yes = "$build_libtool_libs" && test yes = "$dlopen_support"; then
+               func_append dlfiles " $pic_object"
+               prev=
+               continue
+             else
+               # If libtool objects are unsupported, then we need to preload.
+               prev=dlprefiles
+             fi
+           fi
+
+           # CHECK ME:  I think I busted this.  -Ossama
+           if test dlprefiles = "$prev"; then
+             # Preload the old-style object.
+             func_append dlprefiles " $pic_object"
+             prev=
+           fi
+
+           # A PIC object.
+           func_append libobjs " $pic_object"
+           arg=$pic_object
+         }
+
+         # Non-PIC object.
+         if test none != "$non_pic_object"; then
+           # Prepend the subdirectory the object is found in.
+           non_pic_object=$xdir$non_pic_object
+
+           # A standard non-PIC object
+           func_append non_pic_objects " $non_pic_object"
+           if test -z "$pic_object" || test none = "$pic_object"; then
+             arg=$non_pic_object
+           fi
+         else
+           # If the PIC object exists, use it instead.
+           # $xdir was prepended to $pic_object above.
+           non_pic_object=$pic_object
+           func_append non_pic_objects " $non_pic_object"
+         fi
+       else
+         # Only an error if not doing a dry-run.
+         if $opt_dry_run; then
+           # Extract subdirectory from the argument.
+           func_dirname "$arg" "/" ""
+           xdir=$func_dirname_result
+
+           func_lo2o "$arg"
+           pic_object=$xdir$objdir/$func_lo2o_result
+           non_pic_object=$xdir$func_lo2o_result
+           func_append libobjs " $pic_object"
+           func_append non_pic_objects " $non_pic_object"
+         else
+           func_fatal_error "'$arg' is not a valid libtool object"
+         fi
+       fi
+       ;;
+
+      *.$libext)
+       # An archive.
+       func_append deplibs " $arg"
+       func_append old_deplibs " $arg"
+       continue
+       ;;
+
+      *.la)
+       # A libtool-controlled library.
+
+       func_resolve_sysroot "$arg"
+       if test dlfiles = "$prev"; then
+         # This library was specified with -dlopen.
+         func_append dlfiles " $func_resolve_sysroot_result"
+         prev=
+       elif test dlprefiles = "$prev"; then
+         # The library was specified with -dlpreopen.
+         func_append dlprefiles " $func_resolve_sysroot_result"
+         prev=
+       else
+         func_append deplibs " $func_resolve_sysroot_result"
+       fi
+       continue
+       ;;
+
+      # Some other compiler argument.
+      *)
+       # Unknown arguments in both finalize_command and compile_command need
+       # to be aesthetically quoted because they are evaled later.
+       func_quote_for_eval "$arg"
+       arg=$func_quote_for_eval_result
+       ;;
+      esac # arg
+
+      # Now actually substitute the argument into the commands.
+      if test -n "$arg"; then
+       func_append compile_command " $arg"
+       func_append finalize_command " $arg"
+      fi
+    done # argument parsing loop
+
+    test -n "$prev" && \
+      func_fatal_help "the '$prevarg' option requires an argument"
+
+    if test yes = "$export_dynamic" && test -n "$export_dynamic_flag_spec"; then
+      eval arg=\"$export_dynamic_flag_spec\"
+      func_append compile_command " $arg"
+      func_append finalize_command " $arg"
+    fi
+
+    oldlibs=
+    # calculate the name of the file, without its directory
+    func_basename "$output"
+    outputname=$func_basename_result
+    libobjs_save=$libobjs
+
+    if test -n "$shlibpath_var"; then
+      # get the directories listed in $shlibpath_var
+      eval shlib_search_path=\`\$ECHO \"\$$shlibpath_var\" \| \$SED \'s/:/ /g\'\`
+    else
+      shlib_search_path=
+    fi
+    eval sys_lib_search_path=\"$sys_lib_search_path_spec\"
+    eval sys_lib_dlsearch_path=\"$sys_lib_dlsearch_path_spec\"
+
+    # Definition is injected by LT_CONFIG during libtool generation.
+    func_munge_path_list sys_lib_dlsearch_path "$LT_SYS_LIBRARY_PATH"
+
+    func_dirname "$output" "/" ""
+    output_objdir=$func_dirname_result$objdir
+    func_to_tool_file "$output_objdir/"
+    tool_output_objdir=$func_to_tool_file_result
+    # Create the object directory.
+    func_mkdir_p "$output_objdir"
+
+    # Determine the type of output
+    case $output in
+    "")
+      func_fatal_help "you must specify an output file"
+      ;;
+    *.$libext) linkmode=oldlib ;;
+    *.lo | *.$objext) linkmode=obj ;;
+    *.la) linkmode=lib ;;
+    *) linkmode=prog ;; # Anything else should be a program.
+    esac
+
+    specialdeplibs=
+
+    libs=
+    # Find all interdependent deplibs by searching for libraries
+    # that are linked more than once (e.g. -la -lb -la)
+    for deplib in $deplibs; do
+      if $opt_preserve_dup_deps; then
+       case "$libs " in
+       *" $deplib "*) func_append specialdeplibs " $deplib" ;;
+       esac
+      fi
+      func_append libs " $deplib"
+    done
+
+    if test lib = "$linkmode"; then
+      libs="$predeps $libs $compiler_lib_search_path $postdeps"
+
+      # Compute libraries that are listed more than once in $predeps
+      # $postdeps and mark them as special (i.e., whose duplicates are
+      # not to be eliminated).
+      pre_post_deps=
+      if $opt_duplicate_compiler_generated_deps; then
+       for pre_post_dep in $predeps $postdeps; do
+         case "$pre_post_deps " in
+         *" $pre_post_dep "*) func_append specialdeplibs " $pre_post_deps" ;;
+         esac
+         func_append pre_post_deps " $pre_post_dep"
+       done
+      fi
+      pre_post_deps=
+    fi
+
+    deplibs=
+    newdependency_libs=
+    newlib_search_path=
+    need_relink=no # whether we're linking any uninstalled libtool libraries
+    notinst_deplibs= # not-installed libtool libraries
+    notinst_path= # paths that contain not-installed libtool libraries
+
+    case $linkmode in
+    lib)
+       passes="conv dlpreopen link"
+       for file in $dlfiles $dlprefiles; do
+         case $file in
+         *.la) ;;
+         *)
+           func_fatal_help "libraries can '-dlopen' only libtool libraries: $file"
+           ;;
+         esac
+       done
+       ;;
+    prog)
+       compile_deplibs=
+       finalize_deplibs=
+       alldeplibs=false
+       newdlfiles=
+       newdlprefiles=
+       passes="conv scan dlopen dlpreopen link"
+       ;;
+    *)  passes="conv"
+       ;;
+    esac
+
+    for pass in $passes; do
+      # The preopen pass in lib mode reverses $deplibs; put it back here
+      # so that -L comes before libs that need it for instance...
+      if test lib,link = "$linkmode,$pass"; then
+       ## FIXME: Find the place where the list is rebuilt in the wrong
+       ##        order, and fix it there properly
+        tmp_deplibs=
+       for deplib in $deplibs; do
+         tmp_deplibs="$deplib $tmp_deplibs"
+       done
+       deplibs=$tmp_deplibs
+      fi
+
+      if test lib,link = "$linkmode,$pass" ||
+        test prog,scan = "$linkmode,$pass"; then
+       libs=$deplibs
+       deplibs=
+      fi
+      if test prog = "$linkmode"; then
+       case $pass in
+       dlopen) libs=$dlfiles ;;
+       dlpreopen) libs=$dlprefiles ;;
+       link) libs="$deplibs %DEPLIBS% $dependency_libs" ;;
+       esac
+      fi
+      if test lib,dlpreopen = "$linkmode,$pass"; then
+       # Collect and forward deplibs of preopened libtool libs
+       for lib in $dlprefiles; do
+         # Ignore non-libtool-libs
+         dependency_libs=
+         func_resolve_sysroot "$lib"
+         case $lib in
+         *.la) func_source "$func_resolve_sysroot_result" ;;
+         esac
+
+         # Collect preopened libtool deplibs, except any this library
+         # has declared as weak libs
+         for deplib in $dependency_libs; do
+           func_basename "$deplib"
+            deplib_base=$func_basename_result
+           case " $weak_libs " in
+           *" $deplib_base "*) ;;
+           *) func_append deplibs " $deplib" ;;
+           esac
+         done
+       done
+       libs=$dlprefiles
+      fi
+      if test dlopen = "$pass"; then
+       # Collect dlpreopened libraries
+       save_deplibs=$deplibs
+       deplibs=
+      fi
+
+      for deplib in $libs; do
+       lib=
+       found=false
+       case $deplib in
+       -mt|-mthreads|-kthread|-Kthread|-pthread|-pthreads|--thread-safe \
+        |-threads|-fopenmp|-openmp|-mp|-xopenmp|-omp|-qsmp=*)
+         if test prog,link = "$linkmode,$pass"; then
+           compile_deplibs="$deplib $compile_deplibs"
+           finalize_deplibs="$deplib $finalize_deplibs"
+         else
+           func_append compiler_flags " $deplib"
+           if test lib = "$linkmode"; then
+               case "$new_inherited_linker_flags " in
+                   *" $deplib "*) ;;
+                   * ) func_append new_inherited_linker_flags " $deplib" ;;
+               esac
+           fi
+         fi
+         continue
+         ;;
+       -l*)
+         if test lib != "$linkmode" && test prog != "$linkmode"; then
+           func_warning "'-l' is ignored for archives/objects"
+           continue
+         fi
+         func_stripname '-l' '' "$deplib"
+         name=$func_stripname_result
+         if test lib = "$linkmode"; then
+           searchdirs="$newlib_search_path $lib_search_path $compiler_lib_search_dirs $sys_lib_search_path $shlib_search_path"
+         else
+           searchdirs="$newlib_search_path $lib_search_path $sys_lib_search_path $shlib_search_path"
+         fi
+         for searchdir in $searchdirs; do
+           for search_ext in .la $std_shrext .so .a; do
+             # Search the libtool library
+             lib=$searchdir/lib$name$search_ext
+             if test -f "$lib"; then
+               if test .la = "$search_ext"; then
+                 found=:
+               else
+                 found=false
+               fi
+               break 2
+             fi
+           done
+         done
+         if $found; then
+           # deplib is a libtool library
+           # If $allow_libtool_libs_with_static_runtimes && $deplib is a stdlib,
+           # We need to do some special things here, and not later.
+           if test yes = "$allow_libtool_libs_with_static_runtimes"; then
+             case " $predeps $postdeps " in
+             *" $deplib "*)
+               if func_lalib_p "$lib"; then
+                 library_names=
+                 old_library=
+                 func_source "$lib"
+                 for l in $old_library $library_names; do
+                   ll=$l
+                 done
+                 if test "X$ll" = "X$old_library"; then # only static version available
+                   found=false
+                   func_dirname "$lib" "" "."
+                   ladir=$func_dirname_result
+                   lib=$ladir/$old_library
+                   if test prog,link = "$linkmode,$pass"; then
+                     compile_deplibs="$deplib $compile_deplibs"
+                     finalize_deplibs="$deplib $finalize_deplibs"
+                   else
+                     deplibs="$deplib $deplibs"
+                     test lib = "$linkmode" && newdependency_libs="$deplib $newdependency_libs"
+                   fi
+                   continue
+                 fi
+               fi
+               ;;
+             *) ;;
+             esac
+           fi
+         else
+           # deplib doesn't seem to be a libtool library
+           if test prog,link = "$linkmode,$pass"; then
+             compile_deplibs="$deplib $compile_deplibs"
+             finalize_deplibs="$deplib $finalize_deplibs"
+           else
+             deplibs="$deplib $deplibs"
+             test lib = "$linkmode" && newdependency_libs="$deplib $newdependency_libs"
+           fi
+           continue
+         fi
+         ;; # -l
+       *.ltframework)
+         if test prog,link = "$linkmode,$pass"; then
+           compile_deplibs="$deplib $compile_deplibs"
+           finalize_deplibs="$deplib $finalize_deplibs"
+         else
+           deplibs="$deplib $deplibs"
+           if test lib = "$linkmode"; then
+               case "$new_inherited_linker_flags " in
+                   *" $deplib "*) ;;
+                   * ) func_append new_inherited_linker_flags " $deplib" ;;
+               esac
+           fi
+         fi
+         continue
+         ;;
+       -L*)
+         case $linkmode in
+         lib)
+           deplibs="$deplib $deplibs"
+           test conv = "$pass" && continue
+           newdependency_libs="$deplib $newdependency_libs"
+           func_stripname '-L' '' "$deplib"
+           func_resolve_sysroot "$func_stripname_result"
+           func_append newlib_search_path " $func_resolve_sysroot_result"
+           ;;
+         prog)
+           if test conv = "$pass"; then
+             deplibs="$deplib $deplibs"
+             continue
+           fi
+           if test scan = "$pass"; then
+             deplibs="$deplib $deplibs"
+           else
+             compile_deplibs="$deplib $compile_deplibs"
+             finalize_deplibs="$deplib $finalize_deplibs"
+           fi
+           func_stripname '-L' '' "$deplib"
+           func_resolve_sysroot "$func_stripname_result"
+           func_append newlib_search_path " $func_resolve_sysroot_result"
+           ;;
+         *)
+           func_warning "'-L' is ignored for archives/objects"
+           ;;
+         esac # linkmode
+         continue
+         ;; # -L
+       -R*)
+         if test link = "$pass"; then
+           func_stripname '-R' '' "$deplib"
+           func_resolve_sysroot "$func_stripname_result"
+           dir=$func_resolve_sysroot_result
+           # Make sure the xrpath contains only unique directories.
+           case "$xrpath " in
+           *" $dir "*) ;;
+           *) func_append xrpath " $dir" ;;
+           esac
+         fi
+         deplibs="$deplib $deplibs"
+         continue
+         ;;
+       *.la)
+         func_resolve_sysroot "$deplib"
+         lib=$func_resolve_sysroot_result
+         ;;
+       *.$libext)
+         if test conv = "$pass"; then
+           deplibs="$deplib $deplibs"
+           continue
+         fi
+         case $linkmode in
+         lib)
+           # Linking convenience modules into shared libraries is allowed,
+           # but linking other static libraries is non-portable.
+           case " $dlpreconveniencelibs " in
+           *" $deplib "*) ;;
+           *)
+             valid_a_lib=false
+             case $deplibs_check_method in
+               match_pattern*)
+                 set dummy $deplibs_check_method; shift
+                 match_pattern_regex=`expr "$deplibs_check_method" : "$1 \(.*\)"`
+                 if eval "\$ECHO \"$deplib\"" 2>/dev/null | $SED 10q \
+                   | $EGREP "$match_pattern_regex" > /dev/null; then
+                   valid_a_lib=:
+                 fi
+               ;;
+               pass_all)
+                 valid_a_lib=:
+               ;;
+             esac
+             if $valid_a_lib; then
+               echo
+               $ECHO "*** Warning: Linking the shared library $output against the"
+               $ECHO "*** static library $deplib is not portable!"
+               deplibs="$deplib $deplibs"
+             else
+               echo
+               $ECHO "*** Warning: Trying to link with static lib archive $deplib."
+               echo "*** I have the capability to make that library automatically link in when"
+               echo "*** you link to this library.  But I can only do this if you have a"
+               echo "*** shared version of the library, which you do not appear to have"
+               echo "*** because the file extensions .$libext of this argument makes me believe"
+               echo "*** that it is just a static archive that I should not use here."
+             fi
+             ;;
+           esac
+           continue
+           ;;
+         prog)
+           if test link != "$pass"; then
+             deplibs="$deplib $deplibs"
+           else
+             compile_deplibs="$deplib $compile_deplibs"
+             finalize_deplibs="$deplib $finalize_deplibs"
+           fi
+           continue
+           ;;
+         esac # linkmode
+         ;; # *.$libext
+       *.lo | *.$objext)
+         if test conv = "$pass"; then
+           deplibs="$deplib $deplibs"
+         elif test prog = "$linkmode"; then
+           if test dlpreopen = "$pass" || test yes != "$dlopen_support" || test no = "$build_libtool_libs"; then
+             # If there is no dlopen support or we're linking statically,
+             # we need to preload.
+             func_append newdlprefiles " $deplib"
+             compile_deplibs="$deplib $compile_deplibs"
+             finalize_deplibs="$deplib $finalize_deplibs"
+           else
+             func_append newdlfiles " $deplib"
+           fi
+         fi
+         continue
+         ;;
+       %DEPLIBS%)
+         alldeplibs=:
+         continue
+         ;;
+       esac # case $deplib
+
+       $found || test -f "$lib" \
+         || func_fatal_error "cannot find the library '$lib' or unhandled argument '$deplib'"
+
+       # Check to see that this really is a libtool archive.
+       func_lalib_unsafe_p "$lib" \
+         || func_fatal_error "'$lib' is not a valid libtool archive"
+
+       func_dirname "$lib" "" "."
+       ladir=$func_dirname_result
+
+       dlname=
+       dlopen=
+       dlpreopen=
+       libdir=
+       library_names=
+       old_library=
+       inherited_linker_flags=
+       # If the library was installed with an old release of libtool,
+       # it will not redefine variables installed, or shouldnotlink
+       installed=yes
+       shouldnotlink=no
+       avoidtemprpath=
+
+
+       # Read the .la file
+       func_source "$lib"
+
+       # Convert "-framework foo" to "foo.ltframework"
+       if test -n "$inherited_linker_flags"; then
+         tmp_inherited_linker_flags=`$ECHO "$inherited_linker_flags" | $SED 's/-framework \([^ $]*\)/\1.ltframework/g'`
+         for tmp_inherited_linker_flag in $tmp_inherited_linker_flags; do
+           case " $new_inherited_linker_flags " in
+             *" $tmp_inherited_linker_flag "*) ;;
+             *) func_append new_inherited_linker_flags " $tmp_inherited_linker_flag";;
+           esac
+         done
+       fi
+       dependency_libs=`$ECHO " $dependency_libs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
+       if test lib,link = "$linkmode,$pass" ||
+          test prog,scan = "$linkmode,$pass" ||
+          { test prog != "$linkmode" && test lib != "$linkmode"; }; then
+         test -n "$dlopen" && func_append dlfiles " $dlopen"
+         test -n "$dlpreopen" && func_append dlprefiles " $dlpreopen"
+       fi
+
+       if test conv = "$pass"; then
+         # Only check for convenience libraries
+         deplibs="$lib $deplibs"
+         if test -z "$libdir"; then
+           if test -z "$old_library"; then
+             func_fatal_error "cannot find name of link library for '$lib'"
+           fi
+           # It is a libtool convenience library, so add in its objects.
+           func_append convenience " $ladir/$objdir/$old_library"
+           func_append old_convenience " $ladir/$objdir/$old_library"
+         elif test prog != "$linkmode" && test lib != "$linkmode"; then
+           func_fatal_error "'$lib' is not a convenience library"
+         fi
+         tmp_libs=
+         for deplib in $dependency_libs; do
+           deplibs="$deplib $deplibs"
+           if $opt_preserve_dup_deps; then
+             case "$tmp_libs " in
+             *" $deplib "*) func_append specialdeplibs " $deplib" ;;
+             esac
+           fi
+           func_append tmp_libs " $deplib"
+         done
+         continue
+       fi # $pass = conv
+
+
+       # Get the name of the library we link against.
+       linklib=
+       if test -n "$old_library" &&
+          { test yes = "$prefer_static_libs" ||
+            test built,no = "$prefer_static_libs,$installed"; }; then
+         linklib=$old_library
+       else
+         for l in $old_library $library_names; do
+           linklib=$l
+         done
+       fi
+       if test -z "$linklib"; then
+         func_fatal_error "cannot find name of link library for '$lib'"
+       fi
+
+       # This library was specified with -dlopen.
+       if test dlopen = "$pass"; then
+         test -z "$libdir" \
+           && func_fatal_error "cannot -dlopen a convenience library: '$lib'"
+         if test -z "$dlname" ||
+            test yes != "$dlopen_support" ||
+            test no = "$build_libtool_libs"
+         then
+           # If there is no dlname, no dlopen support or we're linking
+           # statically, we need to preload.  We also need to preload any
+           # dependent libraries so libltdl's deplib preloader doesn't
+           # bomb out in the load deplibs phase.
+           func_append dlprefiles " $lib $dependency_libs"
+         else
+           func_append newdlfiles " $lib"
+         fi
+         continue
+       fi # $pass = dlopen
+
+       # We need an absolute path.
+       case $ladir in
+       [\\/]* | [A-Za-z]:[\\/]*) abs_ladir=$ladir ;;
+       *)
+         abs_ladir=`cd "$ladir" && pwd`
+         if test -z "$abs_ladir"; then
+           func_warning "cannot determine absolute directory name of '$ladir'"
+           func_warning "passing it literally to the linker, although it might fail"
+           abs_ladir=$ladir
+         fi
+         ;;
+       esac
+       func_basename "$lib"
+       laname=$func_basename_result
+
+       # Find the relevant object directory and library name.
+       if test yes = "$installed"; then
+         if test ! -f "$lt_sysroot$libdir/$linklib" && test -f "$abs_ladir/$linklib"; then
+           func_warning "library '$lib' was moved."
+           dir=$ladir
+           absdir=$abs_ladir
+           libdir=$abs_ladir
+         else
+           dir=$lt_sysroot$libdir
+           absdir=$lt_sysroot$libdir
+         fi
+         test yes = "$hardcode_automatic" && avoidtemprpath=yes
+       else
+         if test ! -f "$ladir/$objdir/$linklib" && test -f "$abs_ladir/$linklib"; then
+           dir=$ladir
+           absdir=$abs_ladir
+           # Remove this search path later
+           func_append notinst_path " $abs_ladir"
+         else
+           dir=$ladir/$objdir
+           absdir=$abs_ladir/$objdir
+           # Remove this search path later
+           func_append notinst_path " $abs_ladir"
+         fi
+       fi # $installed = yes
+       func_stripname 'lib' '.la' "$laname"
+       name=$func_stripname_result
+
+       # This library was specified with -dlpreopen.
+       if test dlpreopen = "$pass"; then
+         if test -z "$libdir" && test prog = "$linkmode"; then
+           func_fatal_error "only libraries may -dlpreopen a convenience library: '$lib'"
+         fi
+         case $host in
+           # special handling for platforms with PE-DLLs.
+           *cygwin* | *mingw* | *cegcc* )
+             # Linker will automatically link against shared library if both
+             # static and shared are present.  Therefore, ensure we extract
+             # symbols from the import library if a shared library is present
+             # (otherwise, the dlopen module name will be incorrect).  We do
+             # this by putting the import library name into $newdlprefiles.
+             # We recover the dlopen module name by 'saving' the la file
+             # name in a special purpose variable, and (later) extracting the
+             # dlname from the la file.
+             if test -n "$dlname"; then
+               func_tr_sh "$dir/$linklib"
+               eval "libfile_$func_tr_sh_result=\$abs_ladir/\$laname"
+               func_append newdlprefiles " $dir/$linklib"
+             else
+               func_append newdlprefiles " $dir/$old_library"
+               # Keep a list of preopened convenience libraries to check
+               # that they are being used correctly in the link pass.
+               test -z "$libdir" && \
+                 func_append dlpreconveniencelibs " $dir/$old_library"
+             fi
+           ;;
+           * )
+             # Prefer using a static library (so that no silly _DYNAMIC symbols
+             # are required to link).
+             if test -n "$old_library"; then
+               func_append newdlprefiles " $dir/$old_library"
+               # Keep a list of preopened convenience libraries to check
+               # that they are being used correctly in the link pass.
+               test -z "$libdir" && \
+                 func_append dlpreconveniencelibs " $dir/$old_library"
+             # Otherwise, use the dlname, so that lt_dlopen finds it.
+             elif test -n "$dlname"; then
+               func_append newdlprefiles " $dir/$dlname"
+             else
+               func_append newdlprefiles " $dir/$linklib"
+             fi
+           ;;
+         esac
+       fi # $pass = dlpreopen
+
+       if test -z "$libdir"; then
+         # Link the convenience library
+         if test lib = "$linkmode"; then
+           deplibs="$dir/$old_library $deplibs"
+         elif test prog,link = "$linkmode,$pass"; then
+           compile_deplibs="$dir/$old_library $compile_deplibs"
+           finalize_deplibs="$dir/$old_library $finalize_deplibs"
+         else
+           deplibs="$lib $deplibs" # used for prog,scan pass
+         fi
+         continue
+       fi
+
+
+       if test prog = "$linkmode" && test link != "$pass"; then
+         func_append newlib_search_path " $ladir"
+         deplibs="$lib $deplibs"
+
+         linkalldeplibs=false
+         if test no != "$link_all_deplibs" || test -z "$library_names" ||
+            test no = "$build_libtool_libs"; then
+           linkalldeplibs=:
+         fi
+
+         tmp_libs=
+         for deplib in $dependency_libs; do
+           case $deplib in
+           -L*) func_stripname '-L' '' "$deplib"
+                func_resolve_sysroot "$func_stripname_result"
+                func_append newlib_search_path " $func_resolve_sysroot_result"
+                ;;
+           esac
+           # Need to link against all dependency_libs?
+           if $linkalldeplibs; then
+             deplibs="$deplib $deplibs"
+           else
+             # Need to hardcode shared library paths
+             # or/and link against static libraries
+             newdependency_libs="$deplib $newdependency_libs"
+           fi
+           if $opt_preserve_dup_deps; then
+             case "$tmp_libs " in
+             *" $deplib "*) func_append specialdeplibs " $deplib" ;;
+             esac
+           fi
+           func_append tmp_libs " $deplib"
+         done # for deplib
+         continue
+       fi # $linkmode = prog...
+
+       if test prog,link = "$linkmode,$pass"; then
+         if test -n "$library_names" &&
+            { { test no = "$prefer_static_libs" ||
+                test built,yes = "$prefer_static_libs,$installed"; } ||
+              test -z "$old_library"; }; then
+           # We need to hardcode the library path
+           if test -n "$shlibpath_var" && test -z "$avoidtemprpath"; then
+             # Make sure the rpath contains only unique directories.
+             case $temp_rpath: in
+             *"$absdir:"*) ;;
+             *) func_append temp_rpath "$absdir:" ;;
+             esac
+           fi
+
+           # Hardcode the library path.
+           # Skip directories that are in the system default run-time
+           # search path.
+           case " $sys_lib_dlsearch_path " in
+           *" $absdir "*) ;;
+           *)
+             case "$compile_rpath " in
+             *" $absdir "*) ;;
+             *) func_append compile_rpath " $absdir" ;;
+             esac
+             ;;
+           esac
+           case " $sys_lib_dlsearch_path " in
+           *" $libdir "*) ;;
+           *)
+             case "$finalize_rpath " in
+             *" $libdir "*) ;;
+             *) func_append finalize_rpath " $libdir" ;;
+             esac
+             ;;
+           esac
+         fi # $linkmode,$pass = prog,link...
+
+         if $alldeplibs &&
+            { test pass_all = "$deplibs_check_method" ||
+              { test yes = "$build_libtool_libs" &&
+                test -n "$library_names"; }; }; then
+           # We only need to search for static libraries
+           continue
+         fi
+       fi
+
+       link_static=no # Whether the deplib will be linked statically
+       use_static_libs=$prefer_static_libs
+       if test built = "$use_static_libs" && test yes = "$installed"; then
+         use_static_libs=no
+       fi
+       if test -n "$library_names" &&
+          { test no = "$use_static_libs" || test -z "$old_library"; }; then
+         case $host in
+         *cygwin* | *mingw* | *cegcc* | *os2*)
+             # No point in relinking DLLs because paths are not encoded
+             func_append notinst_deplibs " $lib"
+             need_relink=no
+           ;;
+         *)
+           if test no = "$installed"; then
+             func_append notinst_deplibs " $lib"
+             need_relink=yes
+           fi
+           ;;
+         esac
+         # This is a shared library
+
+         # Warn about portability, can't link against -module's on some
+         # systems (darwin).  Don't bleat about dlopened modules though!
+         dlopenmodule=
+         for dlpremoduletest in $dlprefiles; do
+           if test "X$dlpremoduletest" = "X$lib"; then
+             dlopenmodule=$dlpremoduletest
+             break
+           fi
+         done
+         if test -z "$dlopenmodule" && test yes = "$shouldnotlink" && test link = "$pass"; then
+           echo
+           if test prog = "$linkmode"; then
+             $ECHO "*** Warning: Linking the executable $output against the loadable module"
+           else
+             $ECHO "*** Warning: Linking the shared library $output against the loadable module"
+           fi
+           $ECHO "*** $linklib is not portable!"
+         fi
+         if test lib = "$linkmode" &&
+            test yes = "$hardcode_into_libs"; then
+           # Hardcode the library path.
+           # Skip directories that are in the system default run-time
+           # search path.
+           case " $sys_lib_dlsearch_path " in
+           *" $absdir "*) ;;
+           *)
+             case "$compile_rpath " in
+             *" $absdir "*) ;;
+             *) func_append compile_rpath " $absdir" ;;
+             esac
+             ;;
+           esac
+           case " $sys_lib_dlsearch_path " in
+           *" $libdir "*) ;;
+           *)
+             case "$finalize_rpath " in
+             *" $libdir "*) ;;
+             *) func_append finalize_rpath " $libdir" ;;
+             esac
+             ;;
+           esac
+         fi
+
+         if test -n "$old_archive_from_expsyms_cmds"; then
+           # figure out the soname
+           set dummy $library_names
+           shift
+           realname=$1
+           shift
+           libname=`eval "\\$ECHO \"$libname_spec\""`
+           # use dlname if we got it. it's perfectly good, no?
+           if test -n "$dlname"; then
+             soname=$dlname
+           elif test -n "$soname_spec"; then
+             # bleh windows
+             case $host in
+             *cygwin* | mingw* | *cegcc* | *os2*)
+               func_arith $current - $age
+               major=$func_arith_result
+               versuffix=-$major
+               ;;
+             esac
+             eval soname=\"$soname_spec\"
+           else
+             soname=$realname
+           fi
+
+           # Make a new name for the extract_expsyms_cmds to use
+           soroot=$soname
+           func_basename "$soroot"
+           soname=$func_basename_result
+           func_stripname 'lib' '.dll' "$soname"
+           newlib=libimp-$func_stripname_result.a
+
+           # If the library has no export list, then create one now
+           if test -f "$output_objdir/$soname-def"; then :
+           else
+             func_verbose "extracting exported symbol list from '$soname'"
+             func_execute_cmds "$extract_expsyms_cmds" 'exit $?'
+           fi
+
+           # Create $newlib
+           if test -f "$output_objdir/$newlib"; then :; else
+             func_verbose "generating import library for '$soname'"
+             func_execute_cmds "$old_archive_from_expsyms_cmds" 'exit $?'
+           fi
+           # make sure the library variables are pointing to the new library
+           dir=$output_objdir
+           linklib=$newlib
+         fi # test -n "$old_archive_from_expsyms_cmds"
+
+         if test prog = "$linkmode" || test relink != "$opt_mode"; then
+           add_shlibpath=
+           add_dir=
+           add=
+           lib_linked=yes
+           case $hardcode_action in
+           immediate | unsupported)
+             if test no = "$hardcode_direct"; then
+               add=$dir/$linklib
+               case $host in
+                 *-*-sco3.2v5.0.[024]*) add_dir=-L$dir ;;
+                 *-*-sysv4*uw2*) add_dir=-L$dir ;;
+                 *-*-sysv5OpenUNIX* | *-*-sysv5UnixWare7.[01].[10]* | \
+                   *-*-unixware7*) add_dir=-L$dir ;;
+                 *-*-darwin* )
+                   # if the lib is a (non-dlopened) module then we cannot
+                   # link against it, someone is ignoring the earlier warnings
+                   if /usr/bin/file -L $add 2> /dev/null |
+                        $GREP ": [^:]* bundle" >/dev/null; then
+                     if test "X$dlopenmodule" != "X$lib"; then
+                       $ECHO "*** Warning: lib $linklib is a module, not a shared library"
+                       if test -z "$old_library"; then
+                         echo
+                         echo "*** And there doesn't seem to be a static archive available"
+                         echo "*** The link will probably fail, sorry"
+                       else
+                         add=$dir/$old_library
+                       fi
+                     elif test -n "$old_library"; then
+                       add=$dir/$old_library
+                     fi
+                   fi
+               esac
+             elif test no = "$hardcode_minus_L"; then
+               case $host in
+               *-*-sunos*) add_shlibpath=$dir ;;
+               esac
+               add_dir=-L$dir
+               add=-l$name
+             elif test no = "$hardcode_shlibpath_var"; then
+               add_shlibpath=$dir
+               add=-l$name
+             else
+               lib_linked=no
+             fi
+             ;;
+           relink)
+             if test yes = "$hardcode_direct" &&
+                test no = "$hardcode_direct_absolute"; then
+               add=$dir/$linklib
+             elif test yes = "$hardcode_minus_L"; then
+               add_dir=-L$absdir
+               # Try looking first in the location we're being installed to.
+               if test -n "$inst_prefix_dir"; then
+                 case $libdir in
+                   [\\/]*)
+                     func_append add_dir " -L$inst_prefix_dir$libdir"
+                     ;;
+                 esac
+               fi
+               add=-l$name
+             elif test yes = "$hardcode_shlibpath_var"; then
+               add_shlibpath=$dir
+               add=-l$name
+             else
+               lib_linked=no
+             fi
+             ;;
+           *) lib_linked=no ;;
+           esac
+
+           if test yes != "$lib_linked"; then
+             func_fatal_configuration "unsupported hardcode properties"
+           fi
+
+           if test -n "$add_shlibpath"; then
+             case :$compile_shlibpath: in
+             *":$add_shlibpath:"*) ;;
+             *) func_append compile_shlibpath "$add_shlibpath:" ;;
+             esac
+           fi
+           if test prog = "$linkmode"; then
+             test -n "$add_dir" && compile_deplibs="$add_dir $compile_deplibs"
+             test -n "$add" && compile_deplibs="$add $compile_deplibs"
+           else
+             test -n "$add_dir" && deplibs="$add_dir $deplibs"
+             test -n "$add" && deplibs="$add $deplibs"
+             if test yes != "$hardcode_direct" &&
+                test yes != "$hardcode_minus_L" &&
+                test yes = "$hardcode_shlibpath_var"; then
+               case :$finalize_shlibpath: in
+               *":$libdir:"*) ;;
+               *) func_append finalize_shlibpath "$libdir:" ;;
+               esac
+             fi
+           fi
+         fi
+
+         if test prog = "$linkmode" || test relink = "$opt_mode"; then
+           add_shlibpath=
+           add_dir=
+           add=
+           # Finalize command for both is simple: just hardcode it.
+           if test yes = "$hardcode_direct" &&
+              test no = "$hardcode_direct_absolute"; then
+             add=$libdir/$linklib
+           elif test yes = "$hardcode_minus_L"; then
+             add_dir=-L$libdir
+             add=-l$name
+           elif test yes = "$hardcode_shlibpath_var"; then
+             case :$finalize_shlibpath: in
+             *":$libdir:"*) ;;
+             *) func_append finalize_shlibpath "$libdir:" ;;
+             esac
+             add=-l$name
+           elif test yes = "$hardcode_automatic"; then
+             if test -n "$inst_prefix_dir" &&
+                test -f "$inst_prefix_dir$libdir/$linklib"; then
+               add=$inst_prefix_dir$libdir/$linklib
+             else
+               add=$libdir/$linklib
+             fi
+           else
+             # We cannot seem to hardcode it, guess we'll fake it.
+             add_dir=-L$libdir
+             # Try looking first in the location we're being installed to.
+             if test -n "$inst_prefix_dir"; then
+               case $libdir in
+                 [\\/]*)
+                   func_append add_dir " -L$inst_prefix_dir$libdir"
+                   ;;
+               esac
+             fi
+             add=-l$name
+           fi
+
+           if test prog = "$linkmode"; then
+             test -n "$add_dir" && finalize_deplibs="$add_dir $finalize_deplibs"
+             test -n "$add" && finalize_deplibs="$add $finalize_deplibs"
+           else
+             test -n "$add_dir" && deplibs="$add_dir $deplibs"
+             test -n "$add" && deplibs="$add $deplibs"
+           fi
+         fi
+       elif test prog = "$linkmode"; then
+         # Here we assume that one of hardcode_direct or hardcode_minus_L
+         # is not unsupported.  This is valid on all known static and
+         # shared platforms.
+         if test unsupported != "$hardcode_direct"; then
+           test -n "$old_library" && linklib=$old_library
+           compile_deplibs="$dir/$linklib $compile_deplibs"
+           finalize_deplibs="$dir/$linklib $finalize_deplibs"
+         else
+           compile_deplibs="-l$name -L$dir $compile_deplibs"
+           finalize_deplibs="-l$name -L$dir $finalize_deplibs"
+         fi
+       elif test yes = "$build_libtool_libs"; then
+         # Not a shared library
+         if test pass_all != "$deplibs_check_method"; then
+           # We're trying link a shared library against a static one
+           # but the system doesn't support it.
+
+           # Just print a warning and add the library to dependency_libs so
+           # that the program can be linked against the static library.
+           echo
+           $ECHO "*** Warning: This system cannot link to static lib archive $lib."
+           echo "*** I have the capability to make that library automatically link in when"
+           echo "*** you link to this library.  But I can only do this if you have a"
+           echo "*** shared version of the library, which you do not appear to have."
+           if test yes = "$module"; then
+             echo "*** But as you try to build a module library, libtool will still create "
+             echo "*** a static module, that should work as long as the dlopening application"
+             echo "*** is linked with the -dlopen flag to resolve symbols at runtime."
+             if test -z "$global_symbol_pipe"; then
+               echo
+               echo "*** However, this would only work if libtool was able to extract symbol"
+               echo "*** lists from a program, using 'nm' or equivalent, but libtool could"
+               echo "*** not find such a program.  So, this module is probably useless."
+               echo "*** 'nm' from GNU binutils and a full rebuild may help."
+             fi
+             if test no = "$build_old_libs"; then
+               build_libtool_libs=module
+               build_old_libs=yes
+             else
+               build_libtool_libs=no
+             fi
+           fi
+         else
+           deplibs="$dir/$old_library $deplibs"
+           link_static=yes
+         fi
+       fi # link shared/static library?
+
+       if test lib = "$linkmode"; then
+         if test -n "$dependency_libs" &&
+            { test yes != "$hardcode_into_libs" ||
+              test yes = "$build_old_libs" ||
+              test yes = "$link_static"; }; then
+           # Extract -R from dependency_libs
+           temp_deplibs=
+           for libdir in $dependency_libs; do
+             case $libdir in
+             -R*) func_stripname '-R' '' "$libdir"
+                  temp_xrpath=$func_stripname_result
+                  case " $xrpath " in
+                  *" $temp_xrpath "*) ;;
+                  *) func_append xrpath " $temp_xrpath";;
+                  esac;;
+             *) func_append temp_deplibs " $libdir";;
+             esac
+           done
+           dependency_libs=$temp_deplibs
+         fi
+
+         func_append newlib_search_path " $absdir"
+         # Link against this library
+         test no = "$link_static" && newdependency_libs="$abs_ladir/$laname $newdependency_libs"
+         # ... and its dependency_libs
+         tmp_libs=
+         for deplib in $dependency_libs; do
+           newdependency_libs="$deplib $newdependency_libs"
+           case $deplib in
+              -L*) func_stripname '-L' '' "$deplib"
+                   func_resolve_sysroot "$func_stripname_result";;
+              *) func_resolve_sysroot "$deplib" ;;
+            esac
+           if $opt_preserve_dup_deps; then
+             case "$tmp_libs " in
+             *" $func_resolve_sysroot_result "*)
+                func_append specialdeplibs " $func_resolve_sysroot_result" ;;
+             esac
+           fi
+           func_append tmp_libs " $func_resolve_sysroot_result"
+         done
+
+         if test no != "$link_all_deplibs"; then
+           # Add the search paths of all dependency libraries
+           for deplib in $dependency_libs; do
+             path=
+             case $deplib in
+             -L*) path=$deplib ;;
+             *.la)
+               func_resolve_sysroot "$deplib"
+               deplib=$func_resolve_sysroot_result
+               func_dirname "$deplib" "" "."
+               dir=$func_dirname_result
+               # We need an absolute path.
+               case $dir in
+               [\\/]* | [A-Za-z]:[\\/]*) absdir=$dir ;;
+               *)
+                 absdir=`cd "$dir" && pwd`
+                 if test -z "$absdir"; then
+                   func_warning "cannot determine absolute directory name of '$dir'"
+                   absdir=$dir
+                 fi
+                 ;;
+               esac
+               if $GREP "^installed=no" $deplib > /dev/null; then
+               case $host in
+               *-*-darwin*)
+                 depdepl=
+                 eval deplibrary_names=`$SED -n -e 's/^library_names=\(.*\)$/\1/p' $deplib`
+                 if test -n "$deplibrary_names"; then
+                   for tmp in $deplibrary_names; do
+                     depdepl=$tmp
+                   done
+                   if test -f "$absdir/$objdir/$depdepl"; then
+                     depdepl=$absdir/$objdir/$depdepl
+                     darwin_install_name=`$OTOOL -L $depdepl | awk '{if (NR == 2) {print $1;exit}}'`
+                      if test -z "$darwin_install_name"; then
+                          darwin_install_name=`$OTOOL64 -L $depdepl  | awk '{if (NR == 2) {print $1;exit}}'`
+                      fi
+                     func_append compiler_flags " $wl-dylib_file $wl$darwin_install_name:$depdepl"
+                     func_append linker_flags " -dylib_file $darwin_install_name:$depdepl"
+                     path=
+                   fi
+                 fi
+                 ;;
+               *)
+                 path=-L$absdir/$objdir
+                 ;;
+               esac
+               else
+                 eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $deplib`
+                 test -z "$libdir" && \
+                   func_fatal_error "'$deplib' is not a valid libtool archive"
+                 test "$absdir" != "$libdir" && \
+                   func_warning "'$deplib' seems to be moved"
+
+                 path=-L$absdir
+               fi
+               ;;
+             esac
+             case " $deplibs " in
+             *" $path "*) ;;
+             *) deplibs="$path $deplibs" ;;
+             esac
+           done
+         fi # link_all_deplibs != no
+       fi # linkmode = lib
+      done # for deplib in $libs
+      if test link = "$pass"; then
+       if test prog = "$linkmode"; then
+         compile_deplibs="$new_inherited_linker_flags $compile_deplibs"
+         finalize_deplibs="$new_inherited_linker_flags $finalize_deplibs"
+       else
+         compiler_flags="$compiler_flags "`$ECHO " $new_inherited_linker_flags" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
+       fi
+      fi
+      dependency_libs=$newdependency_libs
+      if test dlpreopen = "$pass"; then
+       # Link the dlpreopened libraries before other libraries
+       for deplib in $save_deplibs; do
+         deplibs="$deplib $deplibs"
+       done
+      fi
+      if test dlopen != "$pass"; then
+       test conv = "$pass" || {
+         # Make sure lib_search_path contains only unique directories.
+         lib_search_path=
+         for dir in $newlib_search_path; do
+           case "$lib_search_path " in
+           *" $dir "*) ;;
+           *) func_append lib_search_path " $dir" ;;
+           esac
+         done
+         newlib_search_path=
+       }
+
+       if test prog,link = "$linkmode,$pass"; then
+         vars="compile_deplibs finalize_deplibs"
+       else
+         vars=deplibs
+       fi
+       for var in $vars dependency_libs; do
+         # Add libraries to $var in reverse order
+         eval tmp_libs=\"\$$var\"
+         new_libs=
+         for deplib in $tmp_libs; do
+           # FIXME: Pedantically, this is the right thing to do, so
+           #        that some nasty dependency loop isn't accidentally
+           #        broken:
+           #new_libs="$deplib $new_libs"
+           # Pragmatically, this seems to cause very few problems in
+           # practice:
+           case $deplib in
+           -L*) new_libs="$deplib $new_libs" ;;
+           -R*) ;;
+           *)
+             # And here is the reason: when a library appears more
+             # than once as an explicit dependence of a library, or
+             # is implicitly linked in more than once by the
+             # compiler, it is considered special, and multiple
+             # occurrences thereof are not removed.  Compare this
+             # with having the same library being listed as a
+             # dependency of multiple other libraries: in this case,
+             # we know (pedantically, we assume) the library does not
+             # need to be listed more than once, so we keep only the
+             # last copy.  This is not always right, but it is rare
+             # enough that we require users that really mean to play
+             # such unportable linking tricks to link the library
+             # using -Wl,-lname, so that libtool does not consider it
+             # for duplicate removal.
+             case " $specialdeplibs " in
+             *" $deplib "*) new_libs="$deplib $new_libs" ;;
+             *)
+               case " $new_libs " in
+               *" $deplib "*) ;;
+               *) new_libs="$deplib $new_libs" ;;
+               esac
+               ;;
+             esac
+             ;;
+           esac
+         done
+         tmp_libs=
+         for deplib in $new_libs; do
+           case $deplib in
+           -L*)
+             case " $tmp_libs " in
+             *" $deplib "*) ;;
+             *) func_append tmp_libs " $deplib" ;;
+             esac
+             ;;
+           *) func_append tmp_libs " $deplib" ;;
+           esac
+         done
+         eval $var=\"$tmp_libs\"
+       done # for var
+      fi
+
+      # Add Sun CC postdeps if required:
+      test CXX = "$tagname" && {
+        case $host_os in
+        linux*)
+          case `$CC -V 2>&1 | sed 5q` in
+          *Sun\ C*) # Sun C++ 5.9
+            func_suncc_cstd_abi
+
+            if test no != "$suncc_use_cstd_abi"; then
+              func_append postdeps ' -library=Cstd -library=Crun'
+            fi
+            ;;
+          esac
+          ;;
+
+        solaris*)
+          func_cc_basename "$CC"
+          case $func_cc_basename_result in
+          CC* | sunCC*)
+            func_suncc_cstd_abi
+
+            if test no != "$suncc_use_cstd_abi"; then
+              func_append postdeps ' -library=Cstd -library=Crun'
+            fi
+            ;;
+          esac
+          ;;
+        esac
+      }
+
+      # Last step: remove runtime libs from dependency_libs
+      # (they stay in deplibs)
+      tmp_libs=
+      for i in $dependency_libs; do
+       case " $predeps $postdeps $compiler_lib_search_path " in
+       *" $i "*)
+         i=
+         ;;
+       esac
+       if test -n "$i"; then
+         func_append tmp_libs " $i"
+       fi
+      done
+      dependency_libs=$tmp_libs
+    done # for pass
+    if test prog = "$linkmode"; then
+      dlfiles=$newdlfiles
+    fi
+    if test prog = "$linkmode" || test lib = "$linkmode"; then
+      dlprefiles=$newdlprefiles
+    fi
+
+    case $linkmode in
+    oldlib)
+      if test -n "$dlfiles$dlprefiles" || test no != "$dlself"; then
+       func_warning "'-dlopen' is ignored for archives"
+      fi
+
+      case " $deplibs" in
+      *\ -l* | *\ -L*)
+       func_warning "'-l' and '-L' are ignored for archives" ;;
+      esac
+
+      test -n "$rpath" && \
+       func_warning "'-rpath' is ignored for archives"
+
+      test -n "$xrpath" && \
+       func_warning "'-R' is ignored for archives"
+
+      test -n "$vinfo" && \
+       func_warning "'-version-info/-version-number' is ignored for archives"
+
+      test -n "$release" && \
+       func_warning "'-release' is ignored for archives"
+
+      test -n "$export_symbols$export_symbols_regex" && \
+       func_warning "'-export-symbols' is ignored for archives"
+
+      # Now set the variables for building old libraries.
+      build_libtool_libs=no
+      oldlibs=$output
+      func_append objs "$old_deplibs"
+      ;;
+
+    lib)
+      # Make sure we only generate libraries of the form 'libNAME.la'.
+      case $outputname in
+      lib*)
+       func_stripname 'lib' '.la' "$outputname"
+       name=$func_stripname_result
+       eval shared_ext=\"$shrext_cmds\"
+       eval libname=\"$libname_spec\"
+       ;;
+      *)
+       test no = "$module" \
+         && func_fatal_help "libtool library '$output' must begin with 'lib'"
+
+       if test no != "$need_lib_prefix"; then
+         # Add the "lib" prefix for modules if required
+         func_stripname '' '.la' "$outputname"
+         name=$func_stripname_result
+         eval shared_ext=\"$shrext_cmds\"
+         eval libname=\"$libname_spec\"
+       else
+         func_stripname '' '.la' "$outputname"
+         libname=$func_stripname_result
+       fi
+       ;;
+      esac
+
+      if test -n "$objs"; then
+       if test pass_all != "$deplibs_check_method"; then
+         func_fatal_error "cannot build libtool library '$output' from non-libtool objects on this host:$objs"
+       else
+         echo
+         $ECHO "*** Warning: Linking the shared library $output against the non-libtool"
+         $ECHO "*** objects $objs is not portable!"
+         func_append libobjs " $objs"
+       fi
+      fi
+
+      test no = "$dlself" \
+       || func_warning "'-dlopen self' is ignored for libtool libraries"
+
+      set dummy $rpath
+      shift
+      test 1 -lt "$#" \
+       && func_warning "ignoring multiple '-rpath's for a libtool library"
+
+      install_libdir=$1
+
+      oldlibs=
+      if test -z "$rpath"; then
+       if test yes = "$build_libtool_libs"; then
+         # Building a libtool convenience library.
+         # Some compilers have problems with a '.al' extension so
+         # convenience libraries should have the same extension an
+         # archive normally would.
+         oldlibs="$output_objdir/$libname.$libext $oldlibs"
+         build_libtool_libs=convenience
+         build_old_libs=yes
+       fi
+
+       test -n "$vinfo" && \
+         func_warning "'-version-info/-version-number' is ignored for convenience libraries"
+
+       test -n "$release" && \
+         func_warning "'-release' is ignored for convenience libraries"
+      else
+
+       # Parse the version information argument.
+       save_ifs=$IFS; IFS=:
+       set dummy $vinfo 0 0 0
+       shift
+       IFS=$save_ifs
+
+       test -n "$7" && \
+         func_fatal_help "too many parameters to '-version-info'"
+
+       # convert absolute version numbers to libtool ages
+       # this retains compatibility with .la files and attempts
+       # to make the code below a bit more comprehensible
+
+       case $vinfo_number in
+       yes)
+         number_major=$1
+         number_minor=$2
+         number_revision=$3
+         #
+         # There are really only two kinds -- those that
+         # use the current revision as the major version
+         # and those that subtract age and use age as
+         # a minor version.  But, then there is irix
+         # that has an extra 1 added just for fun
+         #
+         case $version_type in
+         # correct linux to gnu/linux during the next big refactor
+         darwin|freebsd-elf|linux|osf|windows|none)
+           func_arith $number_major + $number_minor
+           current=$func_arith_result
+           age=$number_minor
+           revision=$number_revision
+           ;;
+         freebsd-aout|qnx|sunos)
+           current=$number_major
+           revision=$number_minor
+           age=0
+           ;;
+         irix|nonstopux)
+           func_arith $number_major + $number_minor
+           current=$func_arith_result
+           age=$number_minor
+           revision=$number_minor
+           lt_irix_increment=no
+           ;;
+         esac
+         ;;
+       no)
+         current=$1
+         revision=$2
+         age=$3
+         ;;
+       esac
+
+       # Check that each of the things are valid numbers.
+       case $current in
+       0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;;
+       *)
+         func_error "CURRENT '$current' must be a nonnegative integer"
+         func_fatal_error "'$vinfo' is not valid version information"
+         ;;
+       esac
+
+       case $revision in
+       0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;;
+       *)
+         func_error "REVISION '$revision' must be a nonnegative integer"
+         func_fatal_error "'$vinfo' is not valid version information"
+         ;;
+       esac
+
+       case $age in
+       0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;;
+       *)
+         func_error "AGE '$age' must be a nonnegative integer"
+         func_fatal_error "'$vinfo' is not valid version information"
+         ;;
+       esac
+
+       if test "$age" -gt "$current"; then
+         func_error "AGE '$age' is greater than the current interface number '$current'"
+         func_fatal_error "'$vinfo' is not valid version information"
+       fi
+
+       # Calculate the version variables.
+       major=
+       versuffix=
+       verstring=
+       case $version_type in
+       none) ;;
+
+       darwin)
+         # Like Linux, but with the current version available in
+         # verstring for coding it into the library header
+         func_arith $current - $age
+         major=.$func_arith_result
+         versuffix=$major.$age.$revision
+         # Darwin ld doesn't like 0 for these options...
+         func_arith $current + 1
+         minor_current=$func_arith_result
+         xlcverstring="$wl-compatibility_version $wl$minor_current $wl-current_version $wl$minor_current.$revision"
+         verstring="-compatibility_version $minor_current -current_version $minor_current.$revision"
+          # On Darwin other compilers
+          case $CC in
+              nagfor*)
+                  verstring="$wl-compatibility_version $wl$minor_current $wl-current_version $wl$minor_current.$revision"
+                  ;;
+              *)
+                  verstring="-compatibility_version $minor_current -current_version $minor_current.$revision"
+                  ;;
+          esac
+         ;;
+
+       freebsd-aout)
+         major=.$current
+         versuffix=.$current.$revision
+         ;;
+
+       freebsd-elf)
+         func_arith $current - $age
+         major=.$func_arith_result
+         versuffix=$major.$age.$revision
+         ;;
+
+       irix | nonstopux)
+         if test no = "$lt_irix_increment"; then
+           func_arith $current - $age
+         else
+           func_arith $current - $age + 1
+         fi
+         major=$func_arith_result
+
+         case $version_type in
+           nonstopux) verstring_prefix=nonstopux ;;
+           *)         verstring_prefix=sgi ;;
+         esac
+         verstring=$verstring_prefix$major.$revision
+
+         # Add in all the interfaces that we are compatible with.
+         loop=$revision
+         while test 0 -ne "$loop"; do
+           func_arith $revision - $loop
+           iface=$func_arith_result
+           func_arith $loop - 1
+           loop=$func_arith_result
+           verstring=$verstring_prefix$major.$iface:$verstring
+         done
+
+         # Before this point, $major must not contain '.'.
+         major=.$major
+         versuffix=$major.$revision
+         ;;
+
+       linux) # correct to gnu/linux during the next big refactor
+         func_arith $current - $age
+         major=.$func_arith_result
+         versuffix=$major.$age.$revision
+         ;;
+
+       osf)
+         func_arith $current - $age
+         major=.$func_arith_result
+         versuffix=.$current.$age.$revision
+         verstring=$current.$age.$revision
+
+         # Add in all the interfaces that we are compatible with.
+         loop=$age
+         while test 0 -ne "$loop"; do
+           func_arith $current - $loop
+           iface=$func_arith_result
+           func_arith $loop - 1
+           loop=$func_arith_result
+           verstring=$verstring:$iface.0
+         done
+
+         # Make executables depend on our current version.
+         func_append verstring ":$current.0"
+         ;;
+
+       qnx)
+         major=.$current
+         versuffix=.$current
+         ;;
+
+       sco)
+         major=.$current
+         versuffix=.$current
+         ;;
+
+       sunos)
+         major=.$current
+         versuffix=.$current.$revision
+         ;;
+
+       windows)
+         # Use '-' rather than '.', since we only want one
+         # extension on DOS 8.3 file systems.
+         func_arith $current - $age
+         major=$func_arith_result
+         versuffix=-$major
+         ;;
+
+       *)
+         func_fatal_configuration "unknown library version type '$version_type'"
+         ;;
+       esac
+
+       # Clear the version info if we defaulted, and they specified a release.
+       if test -z "$vinfo" && test -n "$release"; then
+         major=
+         case $version_type in
+         darwin)
+           # we can't check for "0.0" in archive_cmds due to quoting
+           # problems, so we reset it completely
+           verstring=
+           ;;
+         *)
+           verstring=0.0
+           ;;
+         esac
+         if test no = "$need_version"; then
+           versuffix=
+         else
+           versuffix=.0.0
+         fi
+       fi
+
+       # Remove version info from name if versioning should be avoided
+       if test yes,no = "$avoid_version,$need_version"; then
+         major=
+         versuffix=
+         verstring=
+       fi
+
+       # Check to see if the archive will have undefined symbols.
+       if test yes = "$allow_undefined"; then
+         if test unsupported = "$allow_undefined_flag"; then
+           if test yes = "$build_old_libs"; then
+             func_warning "undefined symbols not allowed in $host shared libraries; building static only"
+             build_libtool_libs=no
+           else
+             func_fatal_error "can't build $host shared library unless -no-undefined is specified"
+           fi
+         fi
+       else
+         # Don't allow undefined symbols.
+         allow_undefined_flag=$no_undefined_flag
+       fi
+
+      fi
+
+      func_generate_dlsyms "$libname" "$libname" :
+      func_append libobjs " $symfileobj"
+      test " " = "$libobjs" && libobjs=
+
+      if test relink != "$opt_mode"; then
+       # Remove our outputs, but don't remove object files since they
+       # may have been created when compiling PIC objects.
+       removelist=
+       tempremovelist=`$ECHO "$output_objdir/*"`
+       for p in $tempremovelist; do
+         case $p in
+           *.$objext | *.gcno)
+              ;;
+           $output_objdir/$outputname | $output_objdir/$libname.* | $output_objdir/$libname$release.*)
+              if test -n "$precious_files_regex"; then
+                if $ECHO "$p" | $EGREP -e "$precious_files_regex" >/dev/null 2>&1
+                then
+                  continue
+                fi
+              fi
+              func_append removelist " $p"
+              ;;
+           *) ;;
+         esac
+       done
+       test -n "$removelist" && \
+         func_show_eval "${RM}r \$removelist"
+      fi
+
+      # Now set the variables for building old libraries.
+      if test yes = "$build_old_libs" && test convenience != "$build_libtool_libs"; then
+       func_append oldlibs " $output_objdir/$libname.$libext"
+
+       # Transform .lo files to .o files.
+       oldobjs="$objs "`$ECHO "$libobjs" | $SP2NL | $SED "/\.$libext$/d; $lo2o" | $NL2SP`
+      fi
+
+      # Eliminate all temporary directories.
+      #for path in $notinst_path; do
+      #        lib_search_path=`$ECHO "$lib_search_path " | $SED "s% $path % %g"`
+      #        deplibs=`$ECHO "$deplibs " | $SED "s% -L$path % %g"`
+      #        dependency_libs=`$ECHO "$dependency_libs " | $SED "s% -L$path % %g"`
+      #done
+
+      if test -n "$xrpath"; then
+       # If the user specified any rpath flags, then add them.
+       temp_xrpath=
+       for libdir in $xrpath; do
+         func_replace_sysroot "$libdir"
+         func_append temp_xrpath " -R$func_replace_sysroot_result"
+         case "$finalize_rpath " in
+         *" $libdir "*) ;;
+         *) func_append finalize_rpath " $libdir" ;;
+         esac
+       done
+       if test yes != "$hardcode_into_libs" || test yes = "$build_old_libs"; then
+         dependency_libs="$temp_xrpath $dependency_libs"
+       fi
+      fi
+
+      # Make sure dlfiles contains only unique files that won't be dlpreopened
+      old_dlfiles=$dlfiles
+      dlfiles=
+      for lib in $old_dlfiles; do
+       case " $dlprefiles $dlfiles " in
+       *" $lib "*) ;;
+       *) func_append dlfiles " $lib" ;;
+       esac
+      done
+
+      # Make sure dlprefiles contains only unique files
+      old_dlprefiles=$dlprefiles
+      dlprefiles=
+      for lib in $old_dlprefiles; do
+       case "$dlprefiles " in
+       *" $lib "*) ;;
+       *) func_append dlprefiles " $lib" ;;
+       esac
+      done
+
+      if test yes = "$build_libtool_libs"; then
+       if test -n "$rpath"; then
+         case $host in
+         *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-*-beos* | *-cegcc* | *-*-haiku*)
+           # these systems don't actually have a c library (as such)!
+           ;;
+         *-*-rhapsody* | *-*-darwin1.[012])
+           # Rhapsody C library is in the System framework
+           func_append deplibs " System.ltframework"
+           ;;
+         *-*-netbsd*)
+           # Don't link with libc until the a.out ld.so is fixed.
+           ;;
+         *-*-openbsd* | *-*-freebsd* | *-*-dragonfly*)
+           # Do not include libc due to us having libc/libc_r.
+           ;;
+         *-*-sco3.2v5* | *-*-sco5v6*)
+           # Causes problems with __ctype
+           ;;
+         *-*-sysv4.2uw2* | *-*-sysv5* | *-*-unixware* | *-*-OpenUNIX*)
+           # Compiler inserts libc in the correct place for threads to work
+           ;;
+         *)
+           # Add libc to deplibs on all other systems if necessary.
+           if test yes = "$build_libtool_need_lc"; then
+             func_append deplibs " -lc"
+           fi
+           ;;
+         esac
+       fi
+
+       # Transform deplibs into only deplibs that can be linked in shared.
+       name_save=$name
+       libname_save=$libname
+       release_save=$release
+       versuffix_save=$versuffix
+       major_save=$major
+       # I'm not sure if I'm treating the release correctly.  I think
+       # release should show up in the -l (ie -lgmp5) so we don't want to
+       # add it in twice.  Is that correct?
+       release=
+       versuffix=
+       major=
+       newdeplibs=
+       droppeddeps=no
+       case $deplibs_check_method in
+       pass_all)
+         # Don't check for shared/static.  Everything works.
+         # This might be a little naive.  We might want to check
+         # whether the library exists or not.  But this is on
+         # osf3 & osf4 and I'm not really sure... Just
+         # implementing what was already the behavior.
+         newdeplibs=$deplibs
+         ;;
+       test_compile)
+         # This code stresses the "libraries are programs" paradigm to its
+         # limits. Maybe even breaks it.  We compile a program, linking it
+         # against the deplibs as a proxy for the library.  Then we can check
+         # whether they linked in statically or dynamically with ldd.
+         $opt_dry_run || $RM conftest.c
+         cat > conftest.c <<EOF
+         int main() { return 0; }
+EOF
+         $opt_dry_run || $RM conftest
+         if $LTCC $LTCFLAGS -o conftest conftest.c $deplibs; then
+           ldd_output=`ldd conftest`
+           for i in $deplibs; do
+             case $i in
+             -l*)
+               func_stripname -l '' "$i"
+               name=$func_stripname_result
+               if test yes = "$allow_libtool_libs_with_static_runtimes"; then
+                 case " $predeps $postdeps " in
+                 *" $i "*)
+                   func_append newdeplibs " $i"
+                   i=
+                   ;;
+                 esac
+               fi
+               if test -n "$i"; then
+                 libname=`eval "\\$ECHO \"$libname_spec\""`
+                 deplib_matches=`eval "\\$ECHO \"$library_names_spec\""`
+                 set dummy $deplib_matches; shift
+                 deplib_match=$1
+                 if test `expr "$ldd_output" : ".*$deplib_match"` -ne 0; then
+                   func_append newdeplibs " $i"
+                 else
+                   droppeddeps=yes
+                   echo
+                   $ECHO "*** Warning: dynamic linker does not accept needed library $i."
+                   echo "*** I have the capability to make that library automatically link in when"
+                   echo "*** you link to this library.  But I can only do this if you have a"
+                   echo "*** shared version of the library, which I believe you do not have"
+                   echo "*** because a test_compile did reveal that the linker did not use it for"
+                   echo "*** its dynamic dependency list that programs get resolved with at runtime."
+                 fi
+               fi
+               ;;
+             *)
+               func_append newdeplibs " $i"
+               ;;
+             esac
+           done
+         else
+           # Error occurred in the first compile.  Let's try to salvage
+           # the situation: Compile a separate program for each library.
+           for i in $deplibs; do
+             case $i in
+             -l*)
+               func_stripname -l '' "$i"
+               name=$func_stripname_result
+               $opt_dry_run || $RM conftest
+               if $LTCC $LTCFLAGS -o conftest conftest.c $i; then
+                 ldd_output=`ldd conftest`
+                 if test yes = "$allow_libtool_libs_with_static_runtimes"; then
+                   case " $predeps $postdeps " in
+                   *" $i "*)
+                     func_append newdeplibs " $i"
+                     i=
+                     ;;
+                   esac
+                 fi
+                 if test -n "$i"; then
+                   libname=`eval "\\$ECHO \"$libname_spec\""`
+                   deplib_matches=`eval "\\$ECHO \"$library_names_spec\""`
+                   set dummy $deplib_matches; shift
+                   deplib_match=$1
+                   if test `expr "$ldd_output" : ".*$deplib_match"` -ne 0; then
+                     func_append newdeplibs " $i"
+                   else
+                     droppeddeps=yes
+                     echo
+                     $ECHO "*** Warning: dynamic linker does not accept needed library $i."
+                     echo "*** I have the capability to make that library automatically link in when"
+                     echo "*** you link to this library.  But I can only do this if you have a"
+                     echo "*** shared version of the library, which you do not appear to have"
+                     echo "*** because a test_compile did reveal that the linker did not use this one"
+                     echo "*** as a dynamic dependency that programs can get resolved with at runtime."
+                   fi
+                 fi
+               else
+                 droppeddeps=yes
+                 echo
+                 $ECHO "*** Warning!  Library $i is needed by this library but I was not able to"
+                 echo "*** make it link in!  You will probably need to install it or some"
+                 echo "*** library that it depends on before this library will be fully"
+                 echo "*** functional.  Installing it before continuing would be even better."
+               fi
+               ;;
+             *)
+               func_append newdeplibs " $i"
+               ;;
+             esac
+           done
+         fi
+         ;;
+       file_magic*)
+         set dummy $deplibs_check_method; shift
+         file_magic_regex=`expr "$deplibs_check_method" : "$1 \(.*\)"`
+         for a_deplib in $deplibs; do
+           case $a_deplib in
+           -l*)
+             func_stripname -l '' "$a_deplib"
+             name=$func_stripname_result
+             if test yes = "$allow_libtool_libs_with_static_runtimes"; then
+               case " $predeps $postdeps " in
+               *" $a_deplib "*)
+                 func_append newdeplibs " $a_deplib"
+                 a_deplib=
+                 ;;
+               esac
+             fi
+             if test -n "$a_deplib"; then
+               libname=`eval "\\$ECHO \"$libname_spec\""`
+               if test -n "$file_magic_glob"; then
+                 libnameglob=`func_echo_all "$libname" | $SED -e $file_magic_glob`
+               else
+                 libnameglob=$libname
+               fi
+               test yes = "$want_nocaseglob" && nocaseglob=`shopt -p nocaseglob`
+               for i in $lib_search_path $sys_lib_search_path $shlib_search_path; do
+                 if test yes = "$want_nocaseglob"; then
+                   shopt -s nocaseglob
+                   potential_libs=`ls $i/$libnameglob[.-]* 2>/dev/null`
+                   $nocaseglob
+                 else
+                   potential_libs=`ls $i/$libnameglob[.-]* 2>/dev/null`
+                 fi
+                 for potent_lib in $potential_libs; do
+                     # Follow soft links.
+                     if ls -lLd "$potent_lib" 2>/dev/null |
+                        $GREP " -> " >/dev/null; then
+                       continue
+                     fi
+                     # The statement above tries to avoid entering an
+                     # endless loop below, in case of cyclic links.
+                     # We might still enter an endless loop, since a link
+                     # loop can be closed while we follow links,
+                     # but so what?
+                     potlib=$potent_lib
+                     while test -h "$potlib" 2>/dev/null; do
+                       potliblink=`ls -ld $potlib | $SED 's/.* -> //'`
+                       case $potliblink in
+                       [\\/]* | [A-Za-z]:[\\/]*) potlib=$potliblink;;
+                       *) potlib=`$ECHO "$potlib" | $SED 's|[^/]*$||'`"$potliblink";;
+                       esac
+                     done
+                     if eval $file_magic_cmd \"\$potlib\" 2>/dev/null |
+                        $SED -e 10q |
+                        $EGREP "$file_magic_regex" > /dev/null; then
+                       func_append newdeplibs " $a_deplib"
+                       a_deplib=
+                       break 2
+                     fi
+                 done
+               done
+             fi
+             if test -n "$a_deplib"; then
+               droppeddeps=yes
+               echo
+               $ECHO "*** Warning: linker path does not have real file for library $a_deplib."
+               echo "*** I have the capability to make that library automatically link in when"
+               echo "*** you link to this library.  But I can only do this if you have a"
+               echo "*** shared version of the library, which you do not appear to have"
+               echo "*** because I did check the linker path looking for a file starting"
+               if test -z "$potlib"; then
+                 $ECHO "*** with $libname but no candidates were found. (...for file magic test)"
+               else
+                 $ECHO "*** with $libname and none of the candidates passed a file format test"
+                 $ECHO "*** using a file magic. Last file checked: $potlib"
+               fi
+             fi
+             ;;
+           *)
+             # Add a -L argument.
+             func_append newdeplibs " $a_deplib"
+             ;;
+           esac
+         done # Gone through all deplibs.
+         ;;
+       match_pattern*)
+         set dummy $deplibs_check_method; shift
+         match_pattern_regex=`expr "$deplibs_check_method" : "$1 \(.*\)"`
+         for a_deplib in $deplibs; do
+           case $a_deplib in
+           -l*)
+             func_stripname -l '' "$a_deplib"
+             name=$func_stripname_result
+             if test yes = "$allow_libtool_libs_with_static_runtimes"; then
+               case " $predeps $postdeps " in
+               *" $a_deplib "*)
+                 func_append newdeplibs " $a_deplib"
+                 a_deplib=
+                 ;;
+               esac
+             fi
+             if test -n "$a_deplib"; then
+               libname=`eval "\\$ECHO \"$libname_spec\""`
+               for i in $lib_search_path $sys_lib_search_path $shlib_search_path; do
+                 potential_libs=`ls $i/$libname[.-]* 2>/dev/null`
+                 for potent_lib in $potential_libs; do
+                   potlib=$potent_lib # see symlink-check above in file_magic test
+                   if eval "\$ECHO \"$potent_lib\"" 2>/dev/null | $SED 10q | \
+                      $EGREP "$match_pattern_regex" > /dev/null; then
+                     func_append newdeplibs " $a_deplib"
+                     a_deplib=
+                     break 2
+                   fi
+                 done
+               done
+             fi
+             if test -n "$a_deplib"; then
+               droppeddeps=yes
+               echo
+               $ECHO "*** Warning: linker path does not have real file for library $a_deplib."
+               echo "*** I have the capability to make that library automatically link in when"
+               echo "*** you link to this library.  But I can only do this if you have a"
+               echo "*** shared version of the library, which you do not appear to have"
+               echo "*** because I did check the linker path looking for a file starting"
+               if test -z "$potlib"; then
+                 $ECHO "*** with $libname but no candidates were found. (...for regex pattern test)"
+               else
+                 $ECHO "*** with $libname and none of the candidates passed a file format test"
+                 $ECHO "*** using a regex pattern. Last file checked: $potlib"
+               fi
+             fi
+             ;;
+           *)
+             # Add a -L argument.
+             func_append newdeplibs " $a_deplib"
+             ;;
+           esac
+         done # Gone through all deplibs.
+         ;;
+       none | unknown | *)
+         newdeplibs=
+         tmp_deplibs=`$ECHO " $deplibs" | $SED 's/ -lc$//; s/ -[LR][^ ]*//g'`
+         if test yes = "$allow_libtool_libs_with_static_runtimes"; then
+           for i in $predeps $postdeps; do
+             # can't use Xsed below, because $i might contain '/'
+             tmp_deplibs=`$ECHO " $tmp_deplibs" | $SED "s|$i||"`
+           done
+         fi
+         case $tmp_deplibs in
+         *[!\  \ ]*)
+           echo
+           if test none = "$deplibs_check_method"; then
+             echo "*** Warning: inter-library dependencies are not supported in this platform."
+           else
+             echo "*** Warning: inter-library dependencies are not known to be supported."
+           fi
+           echo "*** All declared inter-library dependencies are being dropped."
+           droppeddeps=yes
+           ;;
+         esac
+         ;;
+       esac
+       versuffix=$versuffix_save
+       major=$major_save
+       release=$release_save
+       libname=$libname_save
+       name=$name_save
+
+       case $host in
+       *-*-rhapsody* | *-*-darwin1.[012])
+         # On Rhapsody replace the C library with the System framework
+         newdeplibs=`$ECHO " $newdeplibs" | $SED 's/ -lc / System.ltframework /'`
+         ;;
+       esac
+
+       if test yes = "$droppeddeps"; then
+         if test yes = "$module"; then
+           echo
+           echo "*** Warning: libtool could not satisfy all declared inter-library"
+           $ECHO "*** dependencies of module $libname.  Therefore, libtool will create"
+           echo "*** a static module, that should work as long as the dlopening"
+           echo "*** application is linked with the -dlopen flag."
+           if test -z "$global_symbol_pipe"; then
+             echo
+             echo "*** However, this would only work if libtool was able to extract symbol"
+             echo "*** lists from a program, using 'nm' or equivalent, but libtool could"
+             echo "*** not find such a program.  So, this module is probably useless."
+             echo "*** 'nm' from GNU binutils and a full rebuild may help."
+           fi
+           if test no = "$build_old_libs"; then
+             oldlibs=$output_objdir/$libname.$libext
+             build_libtool_libs=module
+             build_old_libs=yes
+           else
+             build_libtool_libs=no
+           fi
+         else
+           echo "*** The inter-library dependencies that have been dropped here will be"
+           echo "*** automatically added whenever a program is linked with this library"
+           echo "*** or is declared to -dlopen it."
+
+           if test no = "$allow_undefined"; then
+             echo
+             echo "*** Since this library must not contain undefined symbols,"
+             echo "*** because either the platform does not support them or"
+             echo "*** it was explicitly requested with -no-undefined,"
+             echo "*** libtool will only create a static version of it."
+             if test no = "$build_old_libs"; then
+               oldlibs=$output_objdir/$libname.$libext
+               build_libtool_libs=module
+               build_old_libs=yes
+             else
+               build_libtool_libs=no
+             fi
+           fi
+         fi
+       fi
+       # Done checking deplibs!
+       deplibs=$newdeplibs
+      fi
+      # Time to change all our "foo.ltframework" stuff back to "-framework foo"
+      case $host in
+       *-*-darwin*)
+         newdeplibs=`$ECHO " $newdeplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
+         new_inherited_linker_flags=`$ECHO " $new_inherited_linker_flags" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
+         deplibs=`$ECHO " $deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
+         ;;
+      esac
+
+      # move library search paths that coincide with paths to not yet
+      # installed libraries to the beginning of the library search list
+      new_libs=
+      for path in $notinst_path; do
+       case " $new_libs " in
+       *" -L$path/$objdir "*) ;;
+       *)
+         case " $deplibs " in
+         *" -L$path/$objdir "*)
+           func_append new_libs " -L$path/$objdir" ;;
+         esac
+         ;;
+       esac
+      done
+      for deplib in $deplibs; do
+       case $deplib in
+       -L*)
+         case " $new_libs " in
+         *" $deplib "*) ;;
+         *) func_append new_libs " $deplib" ;;
+         esac
+         ;;
+       *) func_append new_libs " $deplib" ;;
+       esac
+      done
+      deplibs=$new_libs
+
+      # All the library-specific variables (install_libdir is set above).
+      library_names=
+      old_library=
+      dlname=
+
+      # Test again, we may have decided not to build it any more
+      if test yes = "$build_libtool_libs"; then
+       # Remove $wl instances when linking with ld.
+       # FIXME: should test the right _cmds variable.
+       case $archive_cmds in
+         *\$LD\ *) wl= ;;
+        esac
+       if test yes = "$hardcode_into_libs"; then
+         # Hardcode the library paths
+         hardcode_libdirs=
+         dep_rpath=
+         rpath=$finalize_rpath
+         test relink = "$opt_mode" || rpath=$compile_rpath$rpath
+         for libdir in $rpath; do
+           if test -n "$hardcode_libdir_flag_spec"; then
+             if test -n "$hardcode_libdir_separator"; then
+               func_replace_sysroot "$libdir"
+               libdir=$func_replace_sysroot_result
+               if test -z "$hardcode_libdirs"; then
+                 hardcode_libdirs=$libdir
+               else
+                 # Just accumulate the unique libdirs.
+                 case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in
+                 *"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*)
+                   ;;
+                 *)
+                   func_append hardcode_libdirs "$hardcode_libdir_separator$libdir"
+                   ;;
+                 esac
+               fi
+             else
+               eval flag=\"$hardcode_libdir_flag_spec\"
+               func_append dep_rpath " $flag"
+             fi
+           elif test -n "$runpath_var"; then
+             case "$perm_rpath " in
+             *" $libdir "*) ;;
+             *) func_append perm_rpath " $libdir" ;;
+             esac
+           fi
+         done
+         # Substitute the hardcoded libdirs into the rpath.
+         if test -n "$hardcode_libdir_separator" &&
+            test -n "$hardcode_libdirs"; then
+           libdir=$hardcode_libdirs
+           eval "dep_rpath=\"$hardcode_libdir_flag_spec\""
+         fi
+         if test -n "$runpath_var" && test -n "$perm_rpath"; then
+           # We should set the runpath_var.
+           rpath=
+           for dir in $perm_rpath; do
+             func_append rpath "$dir:"
+           done
+           eval "$runpath_var='$rpath\$$runpath_var'; export $runpath_var"
+         fi
+         test -n "$dep_rpath" && deplibs="$dep_rpath $deplibs"
+       fi
+
+       shlibpath=$finalize_shlibpath
+       test relink = "$opt_mode" || shlibpath=$compile_shlibpath$shlibpath
+       if test -n "$shlibpath"; then
+         eval "$shlibpath_var='$shlibpath\$$shlibpath_var'; export $shlibpath_var"
+       fi
+
+       # Get the real and link names of the library.
+       eval shared_ext=\"$shrext_cmds\"
+       eval library_names=\"$library_names_spec\"
+       set dummy $library_names
+       shift
+       realname=$1
+       shift
+
+       if test -n "$soname_spec"; then
+         eval soname=\"$soname_spec\"
+       else
+         soname=$realname
+       fi
+       if test -z "$dlname"; then
+         dlname=$soname
+       fi
+
+       lib=$output_objdir/$realname
+       linknames=
+       for link
+       do
+         func_append linknames " $link"
+       done
+
+       # Use standard objects if they are pic
+       test -z "$pic_flag" && libobjs=`$ECHO "$libobjs" | $SP2NL | $SED "$lo2o" | $NL2SP`
+       test "X$libobjs" = "X " && libobjs=
+
+       delfiles=
+       if test -n "$export_symbols" && test -n "$include_expsyms"; then
+         $opt_dry_run || cp "$export_symbols" "$output_objdir/$libname.uexp"
+         export_symbols=$output_objdir/$libname.uexp
+         func_append delfiles " $export_symbols"
+       fi
+
+       orig_export_symbols=
+       case $host_os in
+       cygwin* | mingw* | cegcc*)
+         if test -n "$export_symbols" && test -z "$export_symbols_regex"; then
+           # exporting using user supplied symfile
+           func_dll_def_p "$export_symbols" || {
+             # and it's NOT already a .def file. Must figure out
+             # which of the given symbols are data symbols and tag
+             # them as such. So, trigger use of export_symbols_cmds.
+             # export_symbols gets reassigned inside the "prepare
+             # the list of exported symbols" if statement, so the
+             # include_expsyms logic still works.
+             orig_export_symbols=$export_symbols
+             export_symbols=
+             always_export_symbols=yes
+           }
+         fi
+         ;;
+       esac
+
+       # Prepare the list of exported symbols
+       if test -z "$export_symbols"; then
+         if test yes = "$always_export_symbols" || test -n "$export_symbols_regex"; then
+           func_verbose "generating symbol list for '$libname.la'"
+           export_symbols=$output_objdir/$libname.exp
+           $opt_dry_run || $RM $export_symbols
+           cmds=$export_symbols_cmds
+           save_ifs=$IFS; IFS='~'
+           for cmd1 in $cmds; do
+             IFS=$save_ifs
+             # Take the normal branch if the nm_file_list_spec branch
+             # doesn't work or if tool conversion is not needed.
+             case $nm_file_list_spec~$to_tool_file_cmd in
+               *~func_convert_file_noop | *~func_convert_file_msys_to_w32 | ~*)
+                 try_normal_branch=yes
+                 eval cmd=\"$cmd1\"
+                 func_len " $cmd"
+                 len=$func_len_result
+                 ;;
+               *)
+                 try_normal_branch=no
+                 ;;
+             esac
+             if test yes = "$try_normal_branch" \
+                && { test "$len" -lt "$max_cmd_len" \
+                     || test "$max_cmd_len" -le -1; }
+             then
+               func_show_eval "$cmd" 'exit $?'
+               skipped_export=false
+             elif test -n "$nm_file_list_spec"; then
+               func_basename "$output"
+               output_la=$func_basename_result
+               save_libobjs=$libobjs
+               save_output=$output
+               output=$output_objdir/$output_la.nm
+               func_to_tool_file "$output"
+               libobjs=$nm_file_list_spec$func_to_tool_file_result
+               func_append delfiles " $output"
+               func_verbose "creating $NM input file list: $output"
+               for obj in $save_libobjs; do
+                 func_to_tool_file "$obj"
+                 $ECHO "$func_to_tool_file_result"
+               done > "$output"
+               eval cmd=\"$cmd1\"
+               func_show_eval "$cmd" 'exit $?'
+               output=$save_output
+               libobjs=$save_libobjs
+               skipped_export=false
+             else
+               # The command line is too long to execute in one step.
+               func_verbose "using reloadable object file for export list..."
+               skipped_export=:
+               # Break out early, otherwise skipped_export may be
+               # set to false by a later but shorter cmd.
+               break
+             fi
+           done
+           IFS=$save_ifs
+           if test -n "$export_symbols_regex" && test : != "$skipped_export"; then
+             func_show_eval '$EGREP -e "$export_symbols_regex" "$export_symbols" > "${export_symbols}T"'
+             func_show_eval '$MV "${export_symbols}T" "$export_symbols"'
+           fi
+         fi
+       fi
+
+       if test -n "$export_symbols" && test -n "$include_expsyms"; then
+         tmp_export_symbols=$export_symbols
+         test -n "$orig_export_symbols" && tmp_export_symbols=$orig_export_symbols
+         $opt_dry_run || eval '$ECHO "$include_expsyms" | $SP2NL >> "$tmp_export_symbols"'
+       fi
+
+       if test : != "$skipped_export" && test -n "$orig_export_symbols"; then
+         # The given exports_symbols file has to be filtered, so filter it.
+         func_verbose "filter symbol list for '$libname.la' to tag DATA exports"
+         # FIXME: $output_objdir/$libname.filter potentially contains lots of
+         # 's' commands, which not all seds can handle. GNU sed should be fine
+         # though. Also, the filter scales superlinearly with the number of
+         # global variables. join(1) would be nice here, but unfortunately
+         # isn't a blessed tool.
+         $opt_dry_run || $SED -e '/[ ,]DATA/!d;s,\(.*\)\([ \,].*\),s|^\1$|\1\2|,' < $export_symbols > $output_objdir/$libname.filter
+         func_append delfiles " $export_symbols $output_objdir/$libname.filter"
+         export_symbols=$output_objdir/$libname.def
+         $opt_dry_run || $SED -f $output_objdir/$libname.filter < $orig_export_symbols > $export_symbols
+       fi
+
+       tmp_deplibs=
+       for test_deplib in $deplibs; do
+         case " $convenience " in
+         *" $test_deplib "*) ;;
+         *)
+           func_append tmp_deplibs " $test_deplib"
+           ;;
+         esac
+       done
+       deplibs=$tmp_deplibs
+
+       if test -n "$convenience"; then
+         if test -n "$whole_archive_flag_spec" &&
+           test yes = "$compiler_needs_object" &&
+           test -z "$libobjs"; then
+           # extract the archives, so we have objects to list.
+           # TODO: could optimize this to just extract one archive.
+           whole_archive_flag_spec=
+         fi
+         if test -n "$whole_archive_flag_spec"; then
+           save_libobjs=$libobjs
+           eval libobjs=\"\$libobjs $whole_archive_flag_spec\"
+           test "X$libobjs" = "X " && libobjs=
+         else
+           gentop=$output_objdir/${outputname}x
+           func_append generated " $gentop"
+
+           func_extract_archives $gentop $convenience
+           func_append libobjs " $func_extract_archives_result"
+           test "X$libobjs" = "X " && libobjs=
+         fi
+       fi
+
+       if test yes = "$thread_safe" && test -n "$thread_safe_flag_spec"; then
+         eval flag=\"$thread_safe_flag_spec\"
+         func_append linker_flags " $flag"
+       fi
+
+       # Make a backup of the uninstalled library when relinking
+       if test relink = "$opt_mode"; then
+         $opt_dry_run || eval '(cd $output_objdir && $RM ${realname}U && $MV $realname ${realname}U)' || exit $?
+       fi
+
+       # Do each of the archive commands.
+       if test yes = "$module" && test -n "$module_cmds"; then
+         if test -n "$export_symbols" && test -n "$module_expsym_cmds"; then
+           eval test_cmds=\"$module_expsym_cmds\"
+           cmds=$module_expsym_cmds
+         else
+           eval test_cmds=\"$module_cmds\"
+           cmds=$module_cmds
+         fi
+       else
+         if test -n "$export_symbols" && test -n "$archive_expsym_cmds"; then
+           eval test_cmds=\"$archive_expsym_cmds\"
+           cmds=$archive_expsym_cmds
+         else
+           eval test_cmds=\"$archive_cmds\"
+           cmds=$archive_cmds
+         fi
+       fi
+
+       if test : != "$skipped_export" &&
+          func_len " $test_cmds" &&
+          len=$func_len_result &&
+          test "$len" -lt "$max_cmd_len" || test "$max_cmd_len" -le -1; then
+         :
+       else
+         # The command line is too long to link in one step, link piecewise
+         # or, if using GNU ld and skipped_export is not :, use a linker
+         # script.
+
+         # Save the value of $output and $libobjs because we want to
+         # use them later.  If we have whole_archive_flag_spec, we
+         # want to use save_libobjs as it was before
+         # whole_archive_flag_spec was expanded, because we can't
+         # assume the linker understands whole_archive_flag_spec.
+         # This may have to be revisited, in case too many
+         # convenience libraries get linked in and end up exceeding
+         # the spec.
+         if test -z "$convenience" || test -z "$whole_archive_flag_spec"; then
+           save_libobjs=$libobjs
+         fi
+         save_output=$output
+         func_basename "$output"
+         output_la=$func_basename_result
+
+         # Clear the reloadable object creation command queue and
+         # initialize k to one.
+         test_cmds=
+         concat_cmds=
+         objlist=
+         last_robj=
+         k=1
+
+         if test -n "$save_libobjs" && test : != "$skipped_export" && test yes = "$with_gnu_ld"; then
+           output=$output_objdir/$output_la.lnkscript
+           func_verbose "creating GNU ld script: $output"
+           echo 'INPUT (' > $output
+           for obj in $save_libobjs
+           do
+             func_to_tool_file "$obj"
+             $ECHO "$func_to_tool_file_result" >> $output
+           done
+           echo ')' >> $output
+           func_append delfiles " $output"
+           func_to_tool_file "$output"
+           output=$func_to_tool_file_result
+         elif test -n "$save_libobjs" && test : != "$skipped_export" && test -n "$file_list_spec"; then
+           output=$output_objdir/$output_la.lnk
+           func_verbose "creating linker input file list: $output"
+           : > $output
+           set x $save_libobjs
+           shift
+           firstobj=
+           if test yes = "$compiler_needs_object"; then
+             firstobj="$1 "
+             shift
+           fi
+           for obj
+           do
+             func_to_tool_file "$obj"
+             $ECHO "$func_to_tool_file_result" >> $output
+           done
+           func_append delfiles " $output"
+           func_to_tool_file "$output"
+           output=$firstobj\"$file_list_spec$func_to_tool_file_result\"
+         else
+           if test -n "$save_libobjs"; then
+             func_verbose "creating reloadable object files..."
+             output=$output_objdir/$output_la-$k.$objext
+             eval test_cmds=\"$reload_cmds\"
+             func_len " $test_cmds"
+             len0=$func_len_result
+             len=$len0
+
+             # Loop over the list of objects to be linked.
+             for obj in $save_libobjs
+             do
+               func_len " $obj"
+               func_arith $len + $func_len_result
+               len=$func_arith_result
+               if test -z "$objlist" ||
+                  test "$len" -lt "$max_cmd_len"; then
+                 func_append objlist " $obj"
+               else
+                 # The command $test_cmds is almost too long, add a
+                 # command to the queue.
+                 if test 1 -eq "$k"; then
+                   # The first file doesn't have a previous command to add.
+                   reload_objs=$objlist
+                   eval concat_cmds=\"$reload_cmds\"
+                 else
+                   # All subsequent reloadable object files will link in
+                   # the last one created.
+                   reload_objs="$objlist $last_robj"
+                   eval concat_cmds=\"\$concat_cmds~$reload_cmds~\$RM $last_robj\"
+                 fi
+                 last_robj=$output_objdir/$output_la-$k.$objext
+                 func_arith $k + 1
+                 k=$func_arith_result
+                 output=$output_objdir/$output_la-$k.$objext
+                 objlist=" $obj"
+                 func_len " $last_robj"
+                 func_arith $len0 + $func_len_result
+                 len=$func_arith_result
+               fi
+             done
+             # Handle the remaining objects by creating one last
+             # reloadable object file.  All subsequent reloadable object
+             # files will link in the last one created.
+             test -z "$concat_cmds" || concat_cmds=$concat_cmds~
+             reload_objs="$objlist $last_robj"
+             eval concat_cmds=\"\$concat_cmds$reload_cmds\"
+             if test -n "$last_robj"; then
+               eval concat_cmds=\"\$concat_cmds~\$RM $last_robj\"
+             fi
+             func_append delfiles " $output"
+
+           else
+             output=
+           fi
+
+           ${skipped_export-false} && {
+             func_verbose "generating symbol list for '$libname.la'"
+             export_symbols=$output_objdir/$libname.exp
+             $opt_dry_run || $RM $export_symbols
+             libobjs=$output
+             # Append the command to create the export file.
+             test -z "$concat_cmds" || concat_cmds=$concat_cmds~
+             eval concat_cmds=\"\$concat_cmds$export_symbols_cmds\"
+             if test -n "$last_robj"; then
+               eval concat_cmds=\"\$concat_cmds~\$RM $last_robj\"
+             fi
+           }
+
+           test -n "$save_libobjs" &&
+             func_verbose "creating a temporary reloadable object file: $output"
+
+           # Loop through the commands generated above and execute them.
+           save_ifs=$IFS; IFS='~'
+           for cmd in $concat_cmds; do
+             IFS=$save_ifs
+             $opt_quiet || {
+                 func_quote_for_expand "$cmd"
+                 eval "func_echo $func_quote_for_expand_result"
+             }
+             $opt_dry_run || eval "$cmd" || {
+               lt_exit=$?
+
+               # Restore the uninstalled library and exit
+               if test relink = "$opt_mode"; then
+                 ( cd "$output_objdir" && \
+                   $RM "${realname}T" && \
+                   $MV "${realname}U" "$realname" )
+               fi
+
+               exit $lt_exit
+             }
+           done
+           IFS=$save_ifs
+
+           if test -n "$export_symbols_regex" && ${skipped_export-false}; then
+             func_show_eval '$EGREP -e "$export_symbols_regex" "$export_symbols" > "${export_symbols}T"'
+             func_show_eval '$MV "${export_symbols}T" "$export_symbols"'
+           fi
+         fi
+
+          ${skipped_export-false} && {
+           if test -n "$export_symbols" && test -n "$include_expsyms"; then
+             tmp_export_symbols=$export_symbols
+             test -n "$orig_export_symbols" && tmp_export_symbols=$orig_export_symbols
+             $opt_dry_run || eval '$ECHO "$include_expsyms" | $SP2NL >> "$tmp_export_symbols"'
+           fi
+
+           if test -n "$orig_export_symbols"; then
+             # The given exports_symbols file has to be filtered, so filter it.
+             func_verbose "filter symbol list for '$libname.la' to tag DATA exports"
+             # FIXME: $output_objdir/$libname.filter potentially contains lots of
+             # 's' commands, which not all seds can handle. GNU sed should be fine
+             # though. Also, the filter scales superlinearly with the number of
+             # global variables. join(1) would be nice here, but unfortunately
+             # isn't a blessed tool.
+             $opt_dry_run || $SED -e '/[ ,]DATA/!d;s,\(.*\)\([ \,].*\),s|^\1$|\1\2|,' < $export_symbols > $output_objdir/$libname.filter
+             func_append delfiles " $export_symbols $output_objdir/$libname.filter"
+             export_symbols=$output_objdir/$libname.def
+             $opt_dry_run || $SED -f $output_objdir/$libname.filter < $orig_export_symbols > $export_symbols
+           fi
+         }
+
+         libobjs=$output
+         # Restore the value of output.
+         output=$save_output
+
+         if test -n "$convenience" && test -n "$whole_archive_flag_spec"; then
+           eval libobjs=\"\$libobjs $whole_archive_flag_spec\"
+           test "X$libobjs" = "X " && libobjs=
+         fi
+         # Expand the library linking commands again to reset the
+         # value of $libobjs for piecewise linking.
+
+         # Do each of the archive commands.
+         if test yes = "$module" && test -n "$module_cmds"; then
+           if test -n "$export_symbols" && test -n "$module_expsym_cmds"; then
+             cmds=$module_expsym_cmds
+           else
+             cmds=$module_cmds
+           fi
+         else
+           if test -n "$export_symbols" && test -n "$archive_expsym_cmds"; then
+             cmds=$archive_expsym_cmds
+           else
+             cmds=$archive_cmds
+           fi
+         fi
+       fi
+
+       if test -n "$delfiles"; then
+         # Append the command to remove temporary files to $cmds.
+         eval cmds=\"\$cmds~\$RM $delfiles\"
+       fi
+
+       # Add any objects from preloaded convenience libraries
+       if test -n "$dlprefiles"; then
+         gentop=$output_objdir/${outputname}x
+         func_append generated " $gentop"
+
+         func_extract_archives $gentop $dlprefiles
+         func_append libobjs " $func_extract_archives_result"
+         test "X$libobjs" = "X " && libobjs=
+       fi
+
+       save_ifs=$IFS; IFS='~'
+       for cmd in $cmds; do
+         IFS=$sp$nl
+         eval cmd=\"$cmd\"
+         IFS=$save_ifs
+         $opt_quiet || {
+           func_quote_for_expand "$cmd"
+           eval "func_echo $func_quote_for_expand_result"
+         }
+         $opt_dry_run || eval "$cmd" || {
+           lt_exit=$?
+
+           # Restore the uninstalled library and exit
+           if test relink = "$opt_mode"; then
+             ( cd "$output_objdir" && \
+               $RM "${realname}T" && \
+               $MV "${realname}U" "$realname" )
+           fi
+
+           exit $lt_exit
+         }
+       done
+       IFS=$save_ifs
+
+       # Restore the uninstalled library and exit
+       if test relink = "$opt_mode"; then
+         $opt_dry_run || eval '(cd $output_objdir && $RM ${realname}T && $MV $realname ${realname}T && $MV ${realname}U $realname)' || exit $?
+
+         if test -n "$convenience"; then
+           if test -z "$whole_archive_flag_spec"; then
+             func_show_eval '${RM}r "$gentop"'
+           fi
+         fi
+
+         exit $EXIT_SUCCESS
+       fi
+
+       # Create links to the real library.
+       for linkname in $linknames; do
+         if test "$realname" != "$linkname"; then
+           func_show_eval '(cd "$output_objdir" && $RM "$linkname" && $LN_S "$realname" "$linkname")' 'exit $?'
+         fi
+       done
+
+       # If -module or -export-dynamic was specified, set the dlname.
+       if test yes = "$module" || test yes = "$export_dynamic"; then
+         # On all known operating systems, these are identical.
+         dlname=$soname
+       fi
+      fi
+      ;;
+
+    obj)
+      if test -n "$dlfiles$dlprefiles" || test no != "$dlself"; then
+       func_warning "'-dlopen' is ignored for objects"
+      fi
+
+      case " $deplibs" in
+      *\ -l* | *\ -L*)
+       func_warning "'-l' and '-L' are ignored for objects" ;;
+      esac
+
+      test -n "$rpath" && \
+       func_warning "'-rpath' is ignored for objects"
+
+      test -n "$xrpath" && \
+       func_warning "'-R' is ignored for objects"
+
+      test -n "$vinfo" && \
+       func_warning "'-version-info' is ignored for objects"
+
+      test -n "$release" && \
+       func_warning "'-release' is ignored for objects"
+
+      case $output in
+      *.lo)
+       test -n "$objs$old_deplibs" && \
+         func_fatal_error "cannot build library object '$output' from non-libtool objects"
+
+       libobj=$output
+       func_lo2o "$libobj"
+       obj=$func_lo2o_result
+       ;;
+      *)
+       libobj=
+       obj=$output
+       ;;
+      esac
+
+      # Delete the old objects.
+      $opt_dry_run || $RM $obj $libobj
+
+      # Objects from convenience libraries.  This assumes
+      # single-version convenience libraries.  Whenever we create
+      # different ones for PIC/non-PIC, this we'll have to duplicate
+      # the extraction.
+      reload_conv_objs=
+      gentop=
+      # if reload_cmds runs $LD directly, get rid of -Wl from
+      # whole_archive_flag_spec and hope we can get by with turning comma
+      # into space.
+      case $reload_cmds in
+        *\$LD[\ \$]*) wl= ;;
+      esac
+      if test -n "$convenience"; then
+       if test -n "$whole_archive_flag_spec"; then
+         eval tmp_whole_archive_flags=\"$whole_archive_flag_spec\"
+         test -n "$wl" || tmp_whole_archive_flags=`$ECHO "$tmp_whole_archive_flags" | $SED 's|,| |g'`
+         reload_conv_objs=$reload_objs\ $tmp_whole_archive_flags
+       else
+         gentop=$output_objdir/${obj}x
+         func_append generated " $gentop"
+
+         func_extract_archives $gentop $convenience
+         reload_conv_objs="$reload_objs $func_extract_archives_result"
+       fi
+      fi
+
+      # If we're not building shared, we need to use non_pic_objs
+      test yes = "$build_libtool_libs" || libobjs=$non_pic_objects
+
+      # Create the old-style object.
+      reload_objs=$objs$old_deplibs' '`$ECHO "$libobjs" | $SP2NL | $SED "/\.$libext$/d; /\.lib$/d; $lo2o" | $NL2SP`' '$reload_conv_objs
+
+      output=$obj
+      func_execute_cmds "$reload_cmds" 'exit $?'
+
+      # Exit if we aren't doing a library object file.
+      if test -z "$libobj"; then
+       if test -n "$gentop"; then
+         func_show_eval '${RM}r "$gentop"'
+       fi
+
+       exit $EXIT_SUCCESS
+      fi
+
+      test yes = "$build_libtool_libs" || {
+       if test -n "$gentop"; then
+         func_show_eval '${RM}r "$gentop"'
+       fi
+
+       # Create an invalid libtool object if no PIC, so that we don't
+       # accidentally link it into a program.
+       # $show "echo timestamp > $libobj"
+       # $opt_dry_run || eval "echo timestamp > $libobj" || exit $?
+       exit $EXIT_SUCCESS
+      }
+
+      if test -n "$pic_flag" || test default != "$pic_mode"; then
+       # Only do commands if we really have different PIC objects.
+       reload_objs="$libobjs $reload_conv_objs"
+       output=$libobj
+       func_execute_cmds "$reload_cmds" 'exit $?'
+      fi
+
+      if test -n "$gentop"; then
+       func_show_eval '${RM}r "$gentop"'
+      fi
+
+      exit $EXIT_SUCCESS
+      ;;
+
+    prog)
+      case $host in
+       *cygwin*) func_stripname '' '.exe' "$output"
+                 output=$func_stripname_result.exe;;
+      esac
+      test -n "$vinfo" && \
+       func_warning "'-version-info' is ignored for programs"
+
+      test -n "$release" && \
+       func_warning "'-release' is ignored for programs"
+
+      $preload \
+       && test unknown,unknown,unknown = "$dlopen_support,$dlopen_self,$dlopen_self_static" \
+       && func_warning "'LT_INIT([dlopen])' not used. Assuming no dlopen support."
+
+      case $host in
+      *-*-rhapsody* | *-*-darwin1.[012])
+       # On Rhapsody replace the C library is the System framework
+       compile_deplibs=`$ECHO " $compile_deplibs" | $SED 's/ -lc / System.ltframework /'`
+       finalize_deplibs=`$ECHO " $finalize_deplibs" | $SED 's/ -lc / System.ltframework /'`
+       ;;
+      esac
+
+      case $host in
+      *-*-darwin*)
+       # Don't allow lazy linking, it breaks C++ global constructors
+       # But is supposedly fixed on 10.4 or later (yay!).
+       if test CXX = "$tagname"; then
+         case ${MACOSX_DEPLOYMENT_TARGET-10.0} in
+           10.[0123])
+             func_append compile_command " $wl-bind_at_load"
+             func_append finalize_command " $wl-bind_at_load"
+           ;;
+         esac
+       fi
+       # Time to change all our "foo.ltframework" stuff back to "-framework foo"
+       compile_deplibs=`$ECHO " $compile_deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
+       finalize_deplibs=`$ECHO " $finalize_deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
+       ;;
+      esac
+
+
+      # move library search paths that coincide with paths to not yet
+      # installed libraries to the beginning of the library search list
+      new_libs=
+      for path in $notinst_path; do
+       case " $new_libs " in
+       *" -L$path/$objdir "*) ;;
+       *)
+         case " $compile_deplibs " in
+         *" -L$path/$objdir "*)
+           func_append new_libs " -L$path/$objdir" ;;
+         esac
+         ;;
+       esac
+      done
+      for deplib in $compile_deplibs; do
+       case $deplib in
+       -L*)
+         case " $new_libs " in
+         *" $deplib "*) ;;
+         *) func_append new_libs " $deplib" ;;
+         esac
+         ;;
+       *) func_append new_libs " $deplib" ;;
+       esac
+      done
+      compile_deplibs=$new_libs
+
+
+      func_append compile_command " $compile_deplibs"
+      func_append finalize_command " $finalize_deplibs"
+
+      if test -n "$rpath$xrpath"; then
+       # If the user specified any rpath flags, then add them.
+       for libdir in $rpath $xrpath; do
+         # This is the magic to use -rpath.
+         case "$finalize_rpath " in
+         *" $libdir "*) ;;
+         *) func_append finalize_rpath " $libdir" ;;
+         esac
+       done
+      fi
+
+      # Now hardcode the library paths
+      rpath=
+      hardcode_libdirs=
+      for libdir in $compile_rpath $finalize_rpath; do
+       if test -n "$hardcode_libdir_flag_spec"; then
+         if test -n "$hardcode_libdir_separator"; then
+           if test -z "$hardcode_libdirs"; then
+             hardcode_libdirs=$libdir
+           else
+             # Just accumulate the unique libdirs.
+             case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in
+             *"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*)
+               ;;
+             *)
+               func_append hardcode_libdirs "$hardcode_libdir_separator$libdir"
+               ;;
+             esac
+           fi
+         else
+           eval flag=\"$hardcode_libdir_flag_spec\"
+           func_append rpath " $flag"
+         fi
+       elif test -n "$runpath_var"; then
+         case "$perm_rpath " in
+         *" $libdir "*) ;;
+         *) func_append perm_rpath " $libdir" ;;
+         esac
+       fi
+       case $host in
+       *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*)
+         testbindir=`$ECHO "$libdir" | $SED -e 's*/lib$*/bin*'`
+         case :$dllsearchpath: in
+         *":$libdir:"*) ;;
+         ::) dllsearchpath=$libdir;;
+         *) func_append dllsearchpath ":$libdir";;
+         esac
+         case :$dllsearchpath: in
+         *":$testbindir:"*) ;;
+         ::) dllsearchpath=$testbindir;;
+         *) func_append dllsearchpath ":$testbindir";;
+         esac
+         ;;
+       esac
+      done
+      # Substitute the hardcoded libdirs into the rpath.
+      if test -n "$hardcode_libdir_separator" &&
+        test -n "$hardcode_libdirs"; then
+       libdir=$hardcode_libdirs
+       eval rpath=\" $hardcode_libdir_flag_spec\"
+      fi
+      compile_rpath=$rpath
+
+      rpath=
+      hardcode_libdirs=
+      for libdir in $finalize_rpath; do
+       if test -n "$hardcode_libdir_flag_spec"; then
+         if test -n "$hardcode_libdir_separator"; then
+           if test -z "$hardcode_libdirs"; then
+             hardcode_libdirs=$libdir
+           else
+             # Just accumulate the unique libdirs.
+             case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in
+             *"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*)
+               ;;
+             *)
+               func_append hardcode_libdirs "$hardcode_libdir_separator$libdir"
+               ;;
+             esac
+           fi
+         else
+           eval flag=\"$hardcode_libdir_flag_spec\"
+           func_append rpath " $flag"
+         fi
+       elif test -n "$runpath_var"; then
+         case "$finalize_perm_rpath " in
+         *" $libdir "*) ;;
+         *) func_append finalize_perm_rpath " $libdir" ;;
+         esac
+       fi
+      done
+      # Substitute the hardcoded libdirs into the rpath.
+      if test -n "$hardcode_libdir_separator" &&
+        test -n "$hardcode_libdirs"; then
+       libdir=$hardcode_libdirs
+       eval rpath=\" $hardcode_libdir_flag_spec\"
+      fi
+      finalize_rpath=$rpath
+
+      if test -n "$libobjs" && test yes = "$build_old_libs"; then
+       # Transform all the library objects into standard objects.
+       compile_command=`$ECHO "$compile_command" | $SP2NL | $SED "$lo2o" | $NL2SP`
+       finalize_command=`$ECHO "$finalize_command" | $SP2NL | $SED "$lo2o" | $NL2SP`
+      fi
+
+      func_generate_dlsyms "$outputname" "@PROGRAM@" false
+
+      # template prelinking step
+      if test -n "$prelink_cmds"; then
+       func_execute_cmds "$prelink_cmds" 'exit $?'
+      fi
+
+      wrappers_required=:
+      case $host in
+      *cegcc* | *mingw32ce*)
+        # Disable wrappers for cegcc and mingw32ce hosts, we are cross compiling anyway.
+        wrappers_required=false
+        ;;
+      *cygwin* | *mingw* )
+        test yes = "$build_libtool_libs" || wrappers_required=false
+        ;;
+      *)
+        if test no = "$need_relink" || test yes != "$build_libtool_libs"; then
+          wrappers_required=false
+        fi
+        ;;
+      esac
+      $wrappers_required || {
+       # Replace the output file specification.
+       compile_command=`$ECHO "$compile_command" | $SED 's%@OUTPUT@%'"$output"'%g'`
+       link_command=$compile_command$compile_rpath
+
+       # We have no uninstalled library dependencies, so finalize right now.
+       exit_status=0
+       func_show_eval "$link_command" 'exit_status=$?'
+
+       if test -n "$postlink_cmds"; then
+         func_to_tool_file "$output"
+         postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'`
+         func_execute_cmds "$postlink_cmds" 'exit $?'
+       fi
+
+       # Delete the generated files.
+       if test -f "$output_objdir/${outputname}S.$objext"; then
+         func_show_eval '$RM "$output_objdir/${outputname}S.$objext"'
+       fi
+
+       exit $exit_status
+      }
+
+      if test -n "$compile_shlibpath$finalize_shlibpath"; then
+       compile_command="$shlibpath_var=\"$compile_shlibpath$finalize_shlibpath\$$shlibpath_var\" $compile_command"
+      fi
+      if test -n "$finalize_shlibpath"; then
+       finalize_command="$shlibpath_var=\"$finalize_shlibpath\$$shlibpath_var\" $finalize_command"
+      fi
+
+      compile_var=
+      finalize_var=
+      if test -n "$runpath_var"; then
+       if test -n "$perm_rpath"; then
+         # We should set the runpath_var.
+         rpath=
+         for dir in $perm_rpath; do
+           func_append rpath "$dir:"
+         done
+         compile_var="$runpath_var=\"$rpath\$$runpath_var\" "
+       fi
+       if test -n "$finalize_perm_rpath"; then
+         # We should set the runpath_var.
+         rpath=
+         for dir in $finalize_perm_rpath; do
+           func_append rpath "$dir:"
+         done
+         finalize_var="$runpath_var=\"$rpath\$$runpath_var\" "
+       fi
+      fi
+
+      if test yes = "$no_install"; then
+       # We don't need to create a wrapper script.
+       link_command=$compile_var$compile_command$compile_rpath
+       # Replace the output file specification.
+       link_command=`$ECHO "$link_command" | $SED 's%@OUTPUT@%'"$output"'%g'`
+       # Delete the old output file.
+       $opt_dry_run || $RM $output
+       # Link the executable and exit
+       func_show_eval "$link_command" 'exit $?'
+
+       if test -n "$postlink_cmds"; then
+         func_to_tool_file "$output"
+         postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'`
+         func_execute_cmds "$postlink_cmds" 'exit $?'
+       fi
+
+       exit $EXIT_SUCCESS
+      fi
+
+      case $hardcode_action,$fast_install in
+        relink,*)
+         # Fast installation is not supported
+         link_command=$compile_var$compile_command$compile_rpath
+         relink_command=$finalize_var$finalize_command$finalize_rpath
+
+         func_warning "this platform does not like uninstalled shared libraries"
+         func_warning "'$output' will be relinked during installation"
+         ;;
+        *,yes)
+         link_command=$finalize_var$compile_command$finalize_rpath
+         relink_command=`$ECHO "$compile_var$compile_command$compile_rpath" | $SED 's%@OUTPUT@%\$progdir/\$file%g'`
+          ;;
+       *,no)
+         link_command=$compile_var$compile_command$compile_rpath
+         relink_command=$finalize_var$finalize_command$finalize_rpath
+          ;;
+       *,needless)
+         link_command=$finalize_var$compile_command$finalize_rpath
+         relink_command=
+          ;;
+      esac
+
+      # Replace the output file specification.
+      link_command=`$ECHO "$link_command" | $SED 's%@OUTPUT@%'"$output_objdir/$outputname"'%g'`
+
+      # Delete the old output files.
+      $opt_dry_run || $RM $output $output_objdir/$outputname $output_objdir/lt-$outputname
+
+      func_show_eval "$link_command" 'exit $?'
+
+      if test -n "$postlink_cmds"; then
+       func_to_tool_file "$output_objdir/$outputname"
+       postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output_objdir/$outputname"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'`
+       func_execute_cmds "$postlink_cmds" 'exit $?'
+      fi
+
+      # Now create the wrapper script.
+      func_verbose "creating $output"
+
+      # Quote the relink command for shipping.
+      if test -n "$relink_command"; then
+       # Preserve any variables that may affect compiler behavior
+       for var in $variables_saved_for_relink; do
+         if eval test -z \"\${$var+set}\"; then
+           relink_command="{ test -z \"\${$var+set}\" || $lt_unset $var || { $var=; export $var; }; }; $relink_command"
+         elif eval var_value=\$$var; test -z "$var_value"; then
+           relink_command="$var=; export $var; $relink_command"
+         else
+           func_quote_for_eval "$var_value"
+           relink_command="$var=$func_quote_for_eval_result; export $var; $relink_command"
+         fi
+       done
+       relink_command="(cd `pwd`; $relink_command)"
+       relink_command=`$ECHO "$relink_command" | $SED "$sed_quote_subst"`
+      fi
+
+      # Only actually do things if not in dry run mode.
+      $opt_dry_run || {
+       # win32 will think the script is a binary if it has
+       # a .exe suffix, so we strip it off here.
+       case $output in
+         *.exe) func_stripname '' '.exe' "$output"
+                output=$func_stripname_result ;;
+       esac
+       # test for cygwin because mv fails w/o .exe extensions
+       case $host in
+         *cygwin*)
+           exeext=.exe
+           func_stripname '' '.exe' "$outputname"
+           outputname=$func_stripname_result ;;
+         *) exeext= ;;
+       esac
+       case $host in
+         *cygwin* | *mingw* )
+           func_dirname_and_basename "$output" "" "."
+           output_name=$func_basename_result
+           output_path=$func_dirname_result
+           cwrappersource=$output_path/$objdir/lt-$output_name.c
+           cwrapper=$output_path/$output_name.exe
+           $RM $cwrappersource $cwrapper
+           trap "$RM $cwrappersource $cwrapper; exit $EXIT_FAILURE" 1 2 15
+
+           func_emit_cwrapperexe_src > $cwrappersource
+
+           # The wrapper executable is built using the $host compiler,
+           # because it contains $host paths and files. If cross-
+           # compiling, it, like the target executable, must be
+           # executed on the $host or under an emulation environment.
+           $opt_dry_run || {
+             $LTCC $LTCFLAGS -o $cwrapper $cwrappersource
+             $STRIP $cwrapper
+           }
+
+           # Now, create the wrapper script for func_source use:
+           func_ltwrapper_scriptname $cwrapper
+           $RM $func_ltwrapper_scriptname_result
+           trap "$RM $func_ltwrapper_scriptname_result; exit $EXIT_FAILURE" 1 2 15
+           $opt_dry_run || {
+             # note: this script will not be executed, so do not chmod.
+             if test "x$build" = "x$host"; then
+               $cwrapper --lt-dump-script > $func_ltwrapper_scriptname_result
+             else
+               func_emit_wrapper no > $func_ltwrapper_scriptname_result
+             fi
+           }
+         ;;
+         * )
+           $RM $output
+           trap "$RM $output; exit $EXIT_FAILURE" 1 2 15
+
+           func_emit_wrapper no > $output
+           chmod +x $output
+         ;;
+       esac
+      }
+      exit $EXIT_SUCCESS
+      ;;
+    esac
+
+    # See if we need to build an old-fashioned archive.
+    for oldlib in $oldlibs; do
+
+      case $build_libtool_libs in
+        convenience)
+         oldobjs="$libobjs_save $symfileobj"
+         addlibs=$convenience
+         build_libtool_libs=no
+         ;;
+       module)
+         oldobjs=$libobjs_save
+         addlibs=$old_convenience
+         build_libtool_libs=no
+          ;;
+       *)
+         oldobjs="$old_deplibs $non_pic_objects"
+         $preload && test -f "$symfileobj" \
+           && func_append oldobjs " $symfileobj"
+         addlibs=$old_convenience
+         ;;
+      esac
+
+      if test -n "$addlibs"; then
+       gentop=$output_objdir/${outputname}x
+       func_append generated " $gentop"
+
+       func_extract_archives $gentop $addlibs
+       func_append oldobjs " $func_extract_archives_result"
+      fi
+
+      # Do each command in the archive commands.
+      if test -n "$old_archive_from_new_cmds" && test yes = "$build_libtool_libs"; then
+       cmds=$old_archive_from_new_cmds
+      else
+
+       # Add any objects from preloaded convenience libraries
+       if test -n "$dlprefiles"; then
+         gentop=$output_objdir/${outputname}x
+         func_append generated " $gentop"
+
+         func_extract_archives $gentop $dlprefiles
+         func_append oldobjs " $func_extract_archives_result"
+       fi
+
+       # POSIX demands no paths to be encoded in archives.  We have
+       # to avoid creating archives with duplicate basenames if we
+       # might have to extract them afterwards, e.g., when creating a
+       # static archive out of a convenience library, or when linking
+       # the entirety of a libtool archive into another (currently
+       # not supported by libtool).
+       if (for obj in $oldobjs
+           do
+             func_basename "$obj"
+             $ECHO "$func_basename_result"
+           done | sort | sort -uc >/dev/null 2>&1); then
+         :
+       else
+         echo "copying selected object files to avoid basename conflicts..."
+         gentop=$output_objdir/${outputname}x
+         func_append generated " $gentop"
+         func_mkdir_p "$gentop"
+         save_oldobjs=$oldobjs
+         oldobjs=
+         counter=1
+         for obj in $save_oldobjs
+         do
+           func_basename "$obj"
+           objbase=$func_basename_result
+           case " $oldobjs " in
+           " ") oldobjs=$obj ;;
+           *[\ /]"$objbase "*)
+             while :; do
+               # Make sure we don't pick an alternate name that also
+               # overlaps.
+               newobj=lt$counter-$objbase
+               func_arith $counter + 1
+               counter=$func_arith_result
+               case " $oldobjs " in
+               *[\ /]"$newobj "*) ;;
+               *) if test ! -f "$gentop/$newobj"; then break; fi ;;
+               esac
+             done
+             func_show_eval "ln $obj $gentop/$newobj || cp $obj $gentop/$newobj"
+             func_append oldobjs " $gentop/$newobj"
+             ;;
+           *) func_append oldobjs " $obj" ;;
+           esac
+         done
+       fi
+       func_to_tool_file "$oldlib" func_convert_file_msys_to_w32
+       tool_oldlib=$func_to_tool_file_result
+       eval cmds=\"$old_archive_cmds\"
+
+       func_len " $cmds"
+       len=$func_len_result
+       if test "$len" -lt "$max_cmd_len" || test "$max_cmd_len" -le -1; then
+         cmds=$old_archive_cmds
+       elif test -n "$archiver_list_spec"; then
+         func_verbose "using command file archive linking..."
+         for obj in $oldobjs
+         do
+           func_to_tool_file "$obj"
+           $ECHO "$func_to_tool_file_result"
+         done > $output_objdir/$libname.libcmd
+         func_to_tool_file "$output_objdir/$libname.libcmd"
+         oldobjs=" $archiver_list_spec$func_to_tool_file_result"
+         cmds=$old_archive_cmds
+       else
+         # the command line is too long to link in one step, link in parts
+         func_verbose "using piecewise archive linking..."
+         save_RANLIB=$RANLIB
+         RANLIB=:
+         objlist=
+         concat_cmds=
+         save_oldobjs=$oldobjs
+         oldobjs=
+         # Is there a better way of finding the last object in the list?
+         for obj in $save_oldobjs
+         do
+           last_oldobj=$obj
+         done
+         eval test_cmds=\"$old_archive_cmds\"
+         func_len " $test_cmds"
+         len0=$func_len_result
+         len=$len0
+         for obj in $save_oldobjs
+         do
+           func_len " $obj"
+           func_arith $len + $func_len_result
+           len=$func_arith_result
+           func_append objlist " $obj"
+           if test "$len" -lt "$max_cmd_len"; then
+             :
+           else
+             # the above command should be used before it gets too long
+             oldobjs=$objlist
+             if test "$obj" = "$last_oldobj"; then
+               RANLIB=$save_RANLIB
+             fi
+             test -z "$concat_cmds" || concat_cmds=$concat_cmds~
+             eval concat_cmds=\"\$concat_cmds$old_archive_cmds\"
+             objlist=
+             len=$len0
+           fi
+         done
+         RANLIB=$save_RANLIB
+         oldobjs=$objlist
+         if test -z "$oldobjs"; then
+           eval cmds=\"\$concat_cmds\"
+         else
+           eval cmds=\"\$concat_cmds~\$old_archive_cmds\"
+         fi
+       fi
+      fi
+      func_execute_cmds "$cmds" 'exit $?'
+    done
+
+    test -n "$generated" && \
+      func_show_eval "${RM}r$generated"
+
+    # Now create the libtool archive.
+    case $output in
+    *.la)
+      old_library=
+      test yes = "$build_old_libs" && old_library=$libname.$libext
+      func_verbose "creating $output"
+
+      # Preserve any variables that may affect compiler behavior
+      for var in $variables_saved_for_relink; do
+       if eval test -z \"\${$var+set}\"; then
+         relink_command="{ test -z \"\${$var+set}\" || $lt_unset $var || { $var=; export $var; }; }; $relink_command"
+       elif eval var_value=\$$var; test -z "$var_value"; then
+         relink_command="$var=; export $var; $relink_command"
+       else
+         func_quote_for_eval "$var_value"
+         relink_command="$var=$func_quote_for_eval_result; export $var; $relink_command"
+       fi
+      done
+      # Quote the link command for shipping.
+      relink_command="(cd `pwd`; $SHELL \"$progpath\" $preserve_args --mode=relink $libtool_args @inst_prefix_dir@)"
+      relink_command=`$ECHO "$relink_command" | $SED "$sed_quote_subst"`
+      if test yes = "$hardcode_automatic"; then
+       relink_command=
+      fi
+
+      # Only create the output if not a dry run.
+      $opt_dry_run || {
+       for installed in no yes; do
+         if test yes = "$installed"; then
+           if test -z "$install_libdir"; then
+             break
+           fi
+           output=$output_objdir/${outputname}i
+           # Replace all uninstalled libtool libraries with the installed ones
+           newdependency_libs=
+           for deplib in $dependency_libs; do
+             case $deplib in
+             *.la)
+               func_basename "$deplib"
+               name=$func_basename_result
+               func_resolve_sysroot "$deplib"
+               eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $func_resolve_sysroot_result`
+               test -z "$libdir" && \
+                 func_fatal_error "'$deplib' is not a valid libtool archive"
+               func_append newdependency_libs " ${lt_sysroot:+=}$libdir/$name"
+               ;;
+             -L*)
+               func_stripname -L '' "$deplib"
+               func_replace_sysroot "$func_stripname_result"
+               func_append newdependency_libs " -L$func_replace_sysroot_result"
+               ;;
+             -R*)
+               func_stripname -R '' "$deplib"
+               func_replace_sysroot "$func_stripname_result"
+               func_append newdependency_libs " -R$func_replace_sysroot_result"
+               ;;
+             *) func_append newdependency_libs " $deplib" ;;
+             esac
+           done
+           dependency_libs=$newdependency_libs
+           newdlfiles=
+
+           for lib in $dlfiles; do
+             case $lib in
+             *.la)
+               func_basename "$lib"
+               name=$func_basename_result
+               eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $lib`
+               test -z "$libdir" && \
+                 func_fatal_error "'$lib' is not a valid libtool archive"
+               func_append newdlfiles " ${lt_sysroot:+=}$libdir/$name"
+               ;;
+             *) func_append newdlfiles " $lib" ;;
+             esac
+           done
+           dlfiles=$newdlfiles
+           newdlprefiles=
+           for lib in $dlprefiles; do
+             case $lib in
+             *.la)
+               # Only pass preopened files to the pseudo-archive (for
+               # eventual linking with the app. that links it) if we
+               # didn't already link the preopened objects directly into
+               # the library:
+               func_basename "$lib"
+               name=$func_basename_result
+               eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $lib`
+               test -z "$libdir" && \
+                 func_fatal_error "'$lib' is not a valid libtool archive"
+               func_append newdlprefiles " ${lt_sysroot:+=}$libdir/$name"
+               ;;
+             esac
+           done
+           dlprefiles=$newdlprefiles
+         else
+           newdlfiles=
+           for lib in $dlfiles; do
+             case $lib in
+               [\\/]* | [A-Za-z]:[\\/]*) abs=$lib ;;
+               *) abs=`pwd`"/$lib" ;;
+             esac
+             func_append newdlfiles " $abs"
+           done
+           dlfiles=$newdlfiles
+           newdlprefiles=
+           for lib in $dlprefiles; do
+             case $lib in
+               [\\/]* | [A-Za-z]:[\\/]*) abs=$lib ;;
+               *) abs=`pwd`"/$lib" ;;
+             esac
+             func_append newdlprefiles " $abs"
+           done
+           dlprefiles=$newdlprefiles
+         fi
+         $RM $output
+         # place dlname in correct position for cygwin
+         # In fact, it would be nice if we could use this code for all target
+         # systems that can't hard-code library paths into their executables
+         # and that have no shared library path variable independent of PATH,
+         # but it turns out we can't easily determine that from inspecting
+         # libtool variables, so we have to hard-code the OSs to which it
+         # applies here; at the moment, that means platforms that use the PE
+         # object format with DLL files.  See the long comment at the top of
+         # tests/bindir.at for full details.
+         tdlname=$dlname
+         case $host,$output,$installed,$module,$dlname in
+           *cygwin*,*lai,yes,no,*.dll | *mingw*,*lai,yes,no,*.dll | *cegcc*,*lai,yes,no,*.dll)
+             # If a -bindir argument was supplied, place the dll there.
+             if test -n "$bindir"; then
+               func_relative_path "$install_libdir" "$bindir"
+               tdlname=$func_relative_path_result/$dlname
+             else
+               # Otherwise fall back on heuristic.
+               tdlname=../bin/$dlname
+             fi
+             ;;
+         esac
+         $ECHO > $output "\
+# $outputname - a libtool library file
+# Generated by $PROGRAM (GNU $PACKAGE) $VERSION
+#
+# Please DO NOT delete this file!
+# It is necessary for linking the library.
+
+# The name that we can dlopen(3).
+dlname='$tdlname'
+
+# Names of this library.
+library_names='$library_names'
+
+# The name of the static archive.
+old_library='$old_library'
+
+# Linker flags that cannot go in dependency_libs.
+inherited_linker_flags='$new_inherited_linker_flags'
+
+# Libraries that this one depends upon.
+dependency_libs='$dependency_libs'
+
+# Names of additional weak libraries provided by this library
+weak_library_names='$weak_libs'
+
+# Version information for $libname.
+current=$current
+age=$age
+revision=$revision
+
+# Is this an already installed library?
+installed=$installed
+
+# Should we warn about portability when linking against -modules?
+shouldnotlink=$module
+
+# Files to dlopen/dlpreopen
+dlopen='$dlfiles'
+dlpreopen='$dlprefiles'
+
+# Directory that this library needs to be installed in:
+libdir='$install_libdir'"
+         if test no,yes = "$installed,$need_relink"; then
+           $ECHO >> $output "\
+relink_command=\"$relink_command\""
+         fi
+       done
+      }
+
+      # Do a symbolic link so that the libtool archive can be found in
+      # LD_LIBRARY_PATH before the program is installed.
+      func_show_eval '( cd "$output_objdir" && $RM "$outputname" && $LN_S "../$outputname" "$outputname" )' 'exit $?'
+      ;;
+    esac
+    exit $EXIT_SUCCESS
+}
+
+if test link = "$opt_mode" || test relink = "$opt_mode"; then
+  func_mode_link ${1+"$@"}
+fi
+
+
+# func_mode_uninstall arg...
+func_mode_uninstall ()
+{
+    $debug_cmd
+
+    RM=$nonopt
+    files=
+    rmforce=false
+    exit_status=0
+
+    # This variable tells wrapper scripts just to set variables rather
+    # than running their programs.
+    libtool_install_magic=$magic
+
+    for arg
+    do
+      case $arg in
+      -f) func_append RM " $arg"; rmforce=: ;;
+      -*) func_append RM " $arg" ;;
+      *) func_append files " $arg" ;;
+      esac
+    done
+
+    test -z "$RM" && \
+      func_fatal_help "you must specify an RM program"
+
+    rmdirs=
+
+    for file in $files; do
+      func_dirname "$file" "" "."
+      dir=$func_dirname_result
+      if test . = "$dir"; then
+       odir=$objdir
+      else
+       odir=$dir/$objdir
+      fi
+      func_basename "$file"
+      name=$func_basename_result
+      test uninstall = "$opt_mode" && odir=$dir
+
+      # Remember odir for removal later, being careful to avoid duplicates
+      if test clean = "$opt_mode"; then
+       case " $rmdirs " in
+         *" $odir "*) ;;
+         *) func_append rmdirs " $odir" ;;
+       esac
+      fi
+
+      # Don't error if the file doesn't exist and rm -f was used.
+      if { test -L "$file"; } >/dev/null 2>&1 ||
+        { test -h "$file"; } >/dev/null 2>&1 ||
+        test -f "$file"; then
+       :
+      elif test -d "$file"; then
+       exit_status=1
+       continue
+      elif $rmforce; then
+       continue
+      fi
+
+      rmfiles=$file
+
+      case $name in
+      *.la)
+       # Possibly a libtool archive, so verify it.
+       if func_lalib_p "$file"; then
+         func_source $dir/$name
+
+         # Delete the libtool libraries and symlinks.
+         for n in $library_names; do
+           func_append rmfiles " $odir/$n"
+         done
+         test -n "$old_library" && func_append rmfiles " $odir/$old_library"
+
+         case $opt_mode in
+         clean)
+           case " $library_names " in
+           *" $dlname "*) ;;
+           *) test -n "$dlname" && func_append rmfiles " $odir/$dlname" ;;
+           esac
+           test -n "$libdir" && func_append rmfiles " $odir/$name $odir/${name}i"
+           ;;
+         uninstall)
+           if test -n "$library_names"; then
+             # Do each command in the postuninstall commands.
+             func_execute_cmds "$postuninstall_cmds" '$rmforce || exit_status=1'
+           fi
+
+           if test -n "$old_library"; then
+             # Do each command in the old_postuninstall commands.
+             func_execute_cmds "$old_postuninstall_cmds" '$rmforce || exit_status=1'
+           fi
+           # FIXME: should reinstall the best remaining shared library.
+           ;;
+         esac
+       fi
+       ;;
+
+      *.lo)
+       # Possibly a libtool object, so verify it.
+       if func_lalib_p "$file"; then
+
+         # Read the .lo file
+         func_source $dir/$name
+
+         # Add PIC object to the list of files to remove.
+         if test -n "$pic_object" && test none != "$pic_object"; then
+           func_append rmfiles " $dir/$pic_object"
+         fi
+
+         # Add non-PIC object to the list of files to remove.
+         if test -n "$non_pic_object" && test none != "$non_pic_object"; then
+           func_append rmfiles " $dir/$non_pic_object"
+         fi
+       fi
+       ;;
+
+      *)
+       if test clean = "$opt_mode"; then
+         noexename=$name
+         case $file in
+         *.exe)
+           func_stripname '' '.exe' "$file"
+           file=$func_stripname_result
+           func_stripname '' '.exe' "$name"
+           noexename=$func_stripname_result
+           # $file with .exe has already been added to rmfiles,
+           # add $file without .exe
+           func_append rmfiles " $file"
+           ;;
+         esac
+         # Do a test to see if this is a libtool program.
+         if func_ltwrapper_p "$file"; then
+           if func_ltwrapper_executable_p "$file"; then
+             func_ltwrapper_scriptname "$file"
+             relink_command=
+             func_source $func_ltwrapper_scriptname_result
+             func_append rmfiles " $func_ltwrapper_scriptname_result"
+           else
+             relink_command=
+             func_source $dir/$noexename
+           fi
+
+           # note $name still contains .exe if it was in $file originally
+           # as does the version of $file that was added into $rmfiles
+           func_append rmfiles " $odir/$name $odir/${name}S.$objext"
+           if test yes = "$fast_install" && test -n "$relink_command"; then
+             func_append rmfiles " $odir/lt-$name"
+           fi
+           if test "X$noexename" != "X$name"; then
+             func_append rmfiles " $odir/lt-$noexename.c"
+           fi
+         fi
+       fi
+       ;;
+      esac
+      func_show_eval "$RM $rmfiles" 'exit_status=1'
+    done
+
+    # Try to remove the $objdir's in the directories where we deleted files
+    for dir in $rmdirs; do
+      if test -d "$dir"; then
+       func_show_eval "rmdir $dir >/dev/null 2>&1"
+      fi
+    done
+
+    exit $exit_status
+}
+
+if test uninstall = "$opt_mode" || test clean = "$opt_mode"; then
+  func_mode_uninstall ${1+"$@"}
+fi
+
+test -z "$opt_mode" && {
+  help=$generic_help
+  func_fatal_help "you must specify a MODE"
+}
+
+test -z "$exec_cmd" && \
+  func_fatal_help "invalid operation mode '$opt_mode'"
+
+if test -n "$exec_cmd"; then
+  eval exec "$exec_cmd"
+  exit $EXIT_FAILURE
+fi
+
+exit $exit_status
+
+
+# The TAGs below are defined such that we never get into a situation
+# where we disable both kinds of libraries.  Given conflicting
+# choices, we go for a static library, that is the most portable,
+# since we can't tell whether shared libraries were disabled because
+# the user asked for that or because the platform doesn't support
+# them.  This is particularly important on AIX, because we don't
+# support having both static and shared libraries enabled at the same
+# time on that platform, so we default to a shared-only configuration.
+# If a disable-shared tag is given, we'll fallback to a static-only
+# configuration.  But we'll never go from static-only to shared-only.
+
+# ### BEGIN LIBTOOL TAG CONFIG: disable-shared
+build_libtool_libs=no
+build_old_libs=yes
+# ### END LIBTOOL TAG CONFIG: disable-shared
+
+# ### BEGIN LIBTOOL TAG CONFIG: disable-static
+build_old_libs=`case $build_libtool_libs in yes) echo no;; *) echo yes;; esac`
+# ### END LIBTOOL TAG CONFIG: disable-static
+
+# Local Variables:
+# mode:shell-script
+# sh-indentation:2
+# End:
diff --git a/build-aux/missing b/build-aux/missing
new file mode 100755 (executable)
index 0000000..c6e3795
--- /dev/null
@@ -0,0 +1,215 @@
+#! /bin/sh
+# Common wrapper for a few potentially missing GNU programs.
+
+scriptversion=2016-01-11.22; # UTC
+
+# Copyright (C) 1996-2017 Free Software Foundation, Inc.
+# Originally written by Fran,cois Pinard <pinard@iro.umontreal.ca>, 1996.
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2, or (at your option)
+# any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+# As a special exception to the GNU General Public License, if you
+# distribute this file as part of a program that contains a
+# configuration script generated by Autoconf, you may include it under
+# the same distribution terms that you use for the rest of that program.
+
+if test $# -eq 0; then
+  echo 1>&2 "Try '$0 --help' for more information"
+  exit 1
+fi
+
+case $1 in
+
+  --is-lightweight)
+    # Used by our autoconf macros to check whether the available missing
+    # script is modern enough.
+    exit 0
+    ;;
+
+  --run)
+    # Back-compat with the calling convention used by older automake.
+    shift
+    ;;
+
+  -h|--h|--he|--hel|--help)
+    echo "\
+$0 [OPTION]... PROGRAM [ARGUMENT]...
+
+Run 'PROGRAM [ARGUMENT]...', returning a proper advice when this fails due
+to PROGRAM being missing or too old.
+
+Options:
+  -h, --help      display this help and exit
+  -v, --version   output version information and exit
+
+Supported PROGRAM values:
+  aclocal   autoconf  autoheader   autom4te  automake  makeinfo
+  bison     yacc      flex         lex       help2man
+
+Version suffixes to PROGRAM as well as the prefixes 'gnu-', 'gnu', and
+'g' are ignored when checking the name.
+
+Send bug reports to <bug-automake@gnu.org>."
+    exit $?
+    ;;
+
+  -v|--v|--ve|--ver|--vers|--versi|--versio|--version)
+    echo "missing $scriptversion (GNU Automake)"
+    exit $?
+    ;;
+
+  -*)
+    echo 1>&2 "$0: unknown '$1' option"
+    echo 1>&2 "Try '$0 --help' for more information"
+    exit 1
+    ;;
+
+esac
+
+# Run the given program, remember its exit status.
+"$@"; st=$?
+
+# If it succeeded, we are done.
+test $st -eq 0 && exit 0
+
+# Also exit now if we it failed (or wasn't found), and '--version' was
+# passed; such an option is passed most likely to detect whether the
+# program is present and works.
+case $2 in --version|--help) exit $st;; esac
+
+# Exit code 63 means version mismatch.  This often happens when the user
+# tries to use an ancient version of a tool on a file that requires a
+# minimum version.
+if test $st -eq 63; then
+  msg="probably too old"
+elif test $st -eq 127; then
+  # Program was missing.
+  msg="missing on your system"
+else
+  # Program was found and executed, but failed.  Give up.
+  exit $st
+fi
+
+perl_URL=http://www.perl.org/
+flex_URL=http://flex.sourceforge.net/
+gnu_software_URL=http://www.gnu.org/software
+
+program_details ()
+{
+  case $1 in
+    aclocal|automake)
+      echo "The '$1' program is part of the GNU Automake package:"
+      echo "<$gnu_software_URL/automake>"
+      echo "It also requires GNU Autoconf, GNU m4 and Perl in order to run:"
+      echo "<$gnu_software_URL/autoconf>"
+      echo "<$gnu_software_URL/m4/>"
+      echo "<$perl_URL>"
+      ;;
+    autoconf|autom4te|autoheader)
+      echo "The '$1' program is part of the GNU Autoconf package:"
+      echo "<$gnu_software_URL/autoconf/>"
+      echo "It also requires GNU m4 and Perl in order to run:"
+      echo "<$gnu_software_URL/m4/>"
+      echo "<$perl_URL>"
+      ;;
+  esac
+}
+
+give_advice ()
+{
+  # Normalize program name to check for.
+  normalized_program=`echo "$1" | sed '
+    s/^gnu-//; t
+    s/^gnu//; t
+    s/^g//; t'`
+
+  printf '%s\n' "'$1' is $msg."
+
+  configure_deps="'configure.ac' or m4 files included by 'configure.ac'"
+  case $normalized_program in
+    autoconf*)
+      echo "You should only need it if you modified 'configure.ac',"
+      echo "or m4 files included by it."
+      program_details 'autoconf'
+      ;;
+    autoheader*)
+      echo "You should only need it if you modified 'acconfig.h' or"
+      echo "$configure_deps."
+      program_details 'autoheader'
+      ;;
+    automake*)
+      echo "You should only need it if you modified 'Makefile.am' or"
+      echo "$configure_deps."
+      program_details 'automake'
+      ;;
+    aclocal*)
+      echo "You should only need it if you modified 'acinclude.m4' or"
+      echo "$configure_deps."
+      program_details 'aclocal'
+      ;;
+   autom4te*)
+      echo "You might have modified some maintainer files that require"
+      echo "the 'autom4te' program to be rebuilt."
+      program_details 'autom4te'
+      ;;
+    bison*|yacc*)
+      echo "You should only need it if you modified a '.y' file."
+      echo "You may want to install the GNU Bison package:"
+      echo "<$gnu_software_URL/bison/>"
+      ;;
+    lex*|flex*)
+      echo "You should only need it if you modified a '.l' file."
+      echo "You may want to install the Fast Lexical Analyzer package:"
+      echo "<$flex_URL>"
+      ;;
+    help2man*)
+      echo "You should only need it if you modified a dependency" \
+           "of a man page."
+      echo "You may want to install the GNU Help2man package:"
+      echo "<$gnu_software_URL/help2man/>"
+    ;;
+    makeinfo*)
+      echo "You should only need it if you modified a '.texi' file, or"
+      echo "any other file indirectly affecting the aspect of the manual."
+      echo "You might want to install the Texinfo package:"
+      echo "<$gnu_software_URL/texinfo/>"
+      echo "The spurious makeinfo call might also be the consequence of"
+      echo "using a buggy 'make' (AIX, DU, IRIX), in which case you might"
+      echo "want to install GNU make:"
+      echo "<$gnu_software_URL/make/>"
+      ;;
+    *)
+      echo "You might have modified some files without having the proper"
+      echo "tools for further handling them.  Check the 'README' file, it"
+      echo "often tells you about the needed prerequisites for installing"
+      echo "this package.  You may also peek at any GNU archive site, in"
+      echo "case some other package contains this missing '$1' program."
+      ;;
+  esac
+}
+
+give_advice "$1" | sed -e '1s/^/WARNING: /' \
+                       -e '2,$s/^/         /' >&2
+
+# Propagate the correct exit status (expected to be 127 for a program
+# not found, 63 for a program that failed due to version mismatch).
+exit $st
+
+# Local variables:
+# eval: (add-hook 'write-file-hooks 'time-stamp)
+# time-stamp-start: "scriptversion="
+# time-stamp-format: "%:y-%02m-%02d.%02H"
+# time-stamp-time-zone: "UTC0"
+# time-stamp-end: "; # UTC"
+# End:
diff --git a/callback/COPYING b/callback/COPYING
new file mode 100644 (file)
index 0000000..a3d1815
--- /dev/null
@@ -0,0 +1,340 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+                          51 Franklin Street, Fifth Floor,
+                          Boston, MA 02110-1301, USA.
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The licenses for most software are designed to take away your
+freedom to share and change it.  By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users.  This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it.  (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.)  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+  To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have.  You must make sure that they, too, receive or can get the
+source code.  And you must show them these terms so they know their
+rights.
+
+  We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+  Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software.  If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+  Finally, any free program is threatened constantly by software
+patents.  We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary.  To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+\f
+                    GNU GENERAL PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License.  The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language.  (Hereinafter, translation is included without limitation in
+the term "modification".)  Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope.  The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+  1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+  2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+    a) You must cause the modified files to carry prominent notices
+    stating that you changed the files and the date of any change.
+
+    b) You must cause any work that you distribute or publish, that in
+    whole or in part contains or is derived from the Program or any
+    part thereof, to be licensed as a whole at no charge to all third
+    parties under the terms of this License.
+
+    c) If the modified program normally reads commands interactively
+    when run, you must cause it, when started running for such
+    interactive use in the most ordinary way, to print or display an
+    announcement including an appropriate copyright notice and a
+    notice that there is no warranty (or else, saying that you provide
+    a warranty) and that users may redistribute the program under
+    these conditions, and telling the user how to view a copy of this
+    License.  (Exception: if the Program itself is interactive but
+    does not normally print such an announcement, your work based on
+    the Program is not required to print an announcement.)
+\f
+These requirements apply to the modified work as a whole.  If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works.  But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+  3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+    a) Accompany it with the complete corresponding machine-readable
+    source code, which must be distributed under the terms of Sections
+    1 and 2 above on a medium customarily used for software interchange; or,
+
+    b) Accompany it with a written offer, valid for at least three
+    years, to give any third party, for a charge no more than your
+    cost of physically performing source distribution, a complete
+    machine-readable copy of the corresponding source code, to be
+    distributed under the terms of Sections 1 and 2 above on a medium
+    customarily used for software interchange; or,
+
+    c) Accompany it with the information you received as to the offer
+    to distribute corresponding source code.  (This alternative is
+    allowed only for noncommercial distribution and only if you
+    received the program in object code or executable form with such
+    an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it.  For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable.  However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+\f
+  4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License.  Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+  5. You are not required to accept this License, since you have not
+signed it.  However, nothing else grants you permission to modify or
+distribute the Program or its derivative works.  These actions are
+prohibited by law if you do not accept this License.  Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+  6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions.  You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+  7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all.  For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices.  Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+\f
+  8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded.  In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+  9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number.  If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation.  If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+  10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission.  For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this.  Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+                            NO WARRANTY
+
+  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+                     END OF TERMS AND CONDITIONS
+\f
+        Appendix: How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software Foundation,
+    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+    Gnomovision version 69, Copyright (C) year  name of author
+    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  Here is a sample; alter the names:
+
+  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+  `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+  <signature of Ty Coon>, 1 April 1989
+  Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs.  If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library.  If this is what you want to do, use the GNU Library General
+Public License instead of this License.
diff --git a/callback/MIGRATION b/callback/MIGRATION
new file mode 100644 (file)
index 0000000..6ce7402
--- /dev/null
@@ -0,0 +1,79 @@
+Migration Guide
+===============
+
+When switching from vacall+trampoline to callback, you need to make the
+following changes to your code:
+
+       vacall+trampoline                       callback
+       -----------------                       --------
+
+                              -- Include files --
+
+#include "vacall/vacall.h"              #include "callback/callback.h"
+#include "trampoline/trampoline.h"
+
+                          -- Variable declarations --
+
+static void* trampvar;
+
+                           -- Callback declaration --
+                                
+static void                             static void
+mycallback (va_alist args)              mycallback (void* data, va_alist args)
+{                                       {
+  void* data = trampvar;                  ...
+  ...
+
+                              -- Initialization --
+
+vacall_function = &mycallback;
+
+                          -- Allocating a callback --
+
+void* trampoline =                      void* trampoline =
+  alloc_trampoline(                       alloc_callback(&mycallback,data);
+    (__TR_function)&vacall,
+    &trampvar,
+    data);
+
+                          -- Testing for a callback --
+
+if                                      if
+(is_trampoline(address)                 (is_callback(address)
+ && (trampoline_address(address)         && (callback_address(address)
+     == (__TR_function)&vacall)              == &mycallback)
+ && (trampoline_variable(address)       )
+     == &trampvar)
+)
+
+void* data = trampoline_data(address);  void* data = callback_data(address);
+
+                         -- Deallocating a callback --
+
+free_trampoline(address);               free_callback(address);
+
+                                -- Libraries --
+
+libvacall.a libtrampoline.a             libcallback.a
+
+
+================================================================================
+Copyright (C) 1995-1998 Bruno Haible
+
+This manual is free documentation.  It is dually licensed under the
+GNU FDL and the GNU GPL.  This means that you can redistribute this
+manual under either of these two licenses, at your choice.
+
+This manual is covered by the GNU FDL.  Permission is granted to copy,
+distribute and/or modify this document under the terms of the
+GNU Free Documentation License (FDL), either version 1.2 of the
+License, or (at your option) any later version published by the
+Free Software Foundation (FSF); with no Invariant Sections, with no
+Front-Cover Text, and with no Back-Cover Texts.
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/fdl-1.2>.
+
+This manual is covered by the GNU GPL.  You can redistribute it and/or
+modify it under the terms of the GNU General Public License (GPL), either
+version 2 of the License, or (at your option) any later version published
+by the Free Software Foundation (FSF).
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
diff --git a/callback/Makefile.in b/callback/Makefile.in
new file mode 100644 (file)
index 0000000..06b8203
--- /dev/null
@@ -0,0 +1,236 @@
+# Makefile for callback
+
+#### Start of system configuration section. ####
+
+HOST = @host@
+CPU = @HOST_CPU_C_ABI@
+
+# Directories used by "make":
+srcdir = @srcdir@
+
+# Directories used by "make install":
+prefix = @prefix@
+local_prefix = /usr/local
+exec_prefix = @exec_prefix@
+libdir = @libdir@
+includedir = @includedir@
+mandir = @mandir@
+datadir = @datadir@
+datarootdir = @datarootdir@
+htmldir = $(datadir)/html
+
+# Programs used by "make":
+# C compiler
+CC = @CC@
+CFLAGS = @CFLAGS@
+CPP = @CPP@
+# C++ compiler
+CXX = @CXX@
+CXXFLAGS = @CXXFLAGS@
+# Both C and C++ compiler
+CPPFLAGS = @CPPFLAGS@
+INCLUDES = -I. -I$(srcdir) -I.. -I$(srcdir)/.. -I$(srcdir)/vacall_r
+LDFLAGS = @LDFLAGS@
+LIBTOOL = @LIBTOOL@
+LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile
+LIBTOOL_LINK = $(LIBTOOL) --mode=link
+LIBTOOL_INSTALL = $(LIBTOOL) --mode=install
+LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall
+AR = @AR@
+AR_FLAGS = rc
+RANLIB = @RANLIB@
+RM = rm -f
+@SET_MAKE@
+
+# Programs used by "make install":
+INSTALL = @INSTALL@
+INSTALL_PROGRAM = @INSTALL_PROGRAM@
+INSTALL_DATA = @INSTALL_DATA@
+
+# Libtool options for linking with the thread library.
+LTLIBTHREAD = @LTLIBTHREAD@
+
+#### End of system configuration section. ####
+
+SHELL = /bin/sh
+
+# Needed by $(LIBTOOL).
+top_builddir = ..
+
+# Limit the set of exported symbols, on those platforms where libtool supports it.
+# Currently this excludes the symbols from gnulib modules.
+LIBCALLBACK_EXPORTED_SYMBOLS_REGEX = '^callback_|_callback$$|^trampoline_r_data0$$'
+
+# Before making a release, change this according to the libtool documentation,
+# section "Library interface versions".
+LIBCALLBACK_VERSION_INFO = 1:2:0
+
+all : all-subdirs libcallback.la $(srcdir)/callback.3 $(srcdir)/callback.html
+
+all-subdirs : force
+       cd @callback_subdir@ && $(MAKE) all
+
+callback-libapi.lo : $(srcdir)/callback-libapi.c $(srcdir)/callback.h $(srcdir)/trampoline_r/trampoline_r.h ../config.h
+       $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) -I$(srcdir)/trampoline_r $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/callback-libapi.c
+
+callback-compat.lo : $(srcdir)/callback-compat.c ../config.h
+       $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/callback-compat.c
+
+libcallback.la : vacall_r/libvacall.la trampoline_r/libtrampoline.la callback-libapi.lo callback-compat.lo
+       $(LIBTOOL_LINK) $(CC) -o libcallback.la -rpath $(libdir) -no-undefined -export-symbols-regex $(LIBCALLBACK_EXPORTED_SYMBOLS_REGEX) -version-info $(LIBCALLBACK_VERSION_INFO) vacall_r/vacall.lo vacall_r/vacall-libapi.lo vacall_r/vacall-structcpy.lo trampoline_r/*.lo callback-libapi.lo callback-compat.lo ../gnulib-lib/libgnu.la $(LDFLAGS) $(LTLIBTHREAD)
+
+# Installs the library and include files only. Typically called with only
+# $(libdir) and $(includedir) - don't use $(prefix) and $(exec_prefix) here.
+install-lib : all force
+       cd vacall_r && $(MAKE) install-lib libdir='$(libdir)' includedir='$(includedir)'
+       mkdir -p $(libdir)
+       $(LIBTOOL_INSTALL) $(INSTALL_DATA) libcallback.la $(libdir)/libcallback.la
+       mkdir -p $(includedir)
+       $(INSTALL_DATA) $(srcdir)/callback.h $(includedir)/callback.h
+
+install : force
+       cd vacall_r && $(MAKE) install
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(exec_prefix)
+       mkdir -p $(DESTDIR)$(libdir)
+       $(LIBTOOL_INSTALL) $(INSTALL_DATA) libcallback.la $(DESTDIR)$(libdir)/libcallback.la
+       mkdir -p $(DESTDIR)$(includedir)
+       $(INSTALL_DATA) $(srcdir)/callback.h $(DESTDIR)$(includedir)/callback.h
+       mkdir -p $(DESTDIR)$(mandir)
+       mkdir -p $(DESTDIR)$(mandir)/man3
+       $(INSTALL_DATA) $(srcdir)/callback.3 $(DESTDIR)$(mandir)/man3/callback.3
+       mkdir -p $(DESTDIR)$(datadir)
+       mkdir -p $(DESTDIR)$(htmldir)
+       $(INSTALL_DATA) $(srcdir)/callback.html $(DESTDIR)$(htmldir)/callback.html
+
+installdirs : force
+       cd vacall_r && $(MAKE) installdirs
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(exec_prefix)
+       mkdir -p $(DESTDIR)$(libdir)
+       mkdir -p $(DESTDIR)$(includedir)
+       mkdir -p $(DESTDIR)$(mandir)
+       mkdir -p $(DESTDIR)$(mandir)/man3
+       mkdir -p $(DESTDIR)$(datadir)
+       mkdir -p $(DESTDIR)$(htmldir)
+
+uninstall : force
+       cd vacall_r && $(MAKE) uninstall
+       $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libcallback.la
+       $(RM) $(DESTDIR)$(includedir)/callback.h
+       $(RM) $(DESTDIR)$(mandir)/man3/callback.3
+       $(RM) $(DESTDIR)$(htmldir)/callback.html
+
+test1.@OBJEXT@ : $(srcdir)/test1.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/test1.c
+
+test1 : test1.@OBJEXT@ libcallback.la
+       $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ test1.@OBJEXT@ libcallback.la $(LDFLAGS) -o test1
+
+minitests.@OBJEXT@ : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/minitests.c
+
+minitests.s : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/minitests.c
+
+minitests : minitests.@OBJEXT@ libcallback.la
+       $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ minitests.@OBJEXT@ libcallback.la $(LDFLAGS) -o minitests
+
+minitests-c++.@OBJEXT@ : $(srcdir)/minitests-c++.cc $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h
+       $(CXX) $(INCLUDES) $(CPPFLAGS) $(CXXFLAGS) -c $(srcdir)/minitests-c++.cc
+
+minitests-c++ : minitests-c++.@OBJEXT@ libcallback.la
+       $(LIBTOOL_LINK) $(CXX) $(CXXFLAGS) @GCC_X_NONE@ minitests-c++.@OBJEXT@ libcallback.la $(LDFLAGS) -o minitests-c++
+
+check-subdirs : force
+       cd @callback_subdir@ && $(MAKE) check
+
+check : all check-subdirs test1 minitests
+       ./test1
+       ./minitests > minitests.out
+       LC_ALL=C uniq -u < minitests.out > minitests.output.$(HOST)
+       test '!' -s minitests.output.$(HOST)
+@IF_CXX@       ./minitests-c++ > minitests-c++.out
+@IF_CXX@       LC_ALL=C uniq -u < minitests-c++.out > minitests-c++.output.$(HOST)
+@IF_CXX@       test '!' -s minitests-c++.output.$(HOST)
+@IF_CXX@check : minitests-c++
+
+tests.@OBJEXT@ : $(srcdir)/tests.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/tests.c
+
+tests.s : $(srcdir)/tests.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/tests.c
+
+tests : tests.@OBJEXT@ libcallback.la
+       $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ tests.@OBJEXT@ libcallback.la $(LDFLAGS) -o tests
+
+extracheck-subdirs : force
+       cd @callback_subdir@ && $(MAKE) extracheck
+
+extracheck : all extracheck-subdirs tests
+       ./tests > tests.out
+       LC_ALL=C uniq -u < tests.out > tests.output.$(HOST)
+       test '!' -s tests.output.$(HOST)
+
+MOSTLYCLEANDIRS = .libs _libs
+MOSTLYCLEANFILES = \
+  *.@OBJEXT@ *.lo core \
+  libcallback.* \
+  test1.@OBJEXT@ test1 \
+  minitests.@OBJEXT@ minitests.s minitests minitests.out \
+  minitests-c++.@OBJEXT@ minitests-c++ minitests-c++.out \
+  tests.@OBJEXT@ tests.s tests tests.out
+
+mostlyclean : force
+       cd @callback_subdir@ && $(MAKE) mostlyclean
+       $(RM) -r $(MOSTLYCLEANDIRS)
+       $(RM) $(MOSTLYCLEANFILES)
+
+clean : force
+       cd @callback_subdir@ && $(MAKE) clean
+       $(RM) -r $(MOSTLYCLEANDIRS)
+       $(RM) $(MOSTLYCLEANFILES)
+
+DISTCLEANFILES = \
+  Makefile \
+  minitests.output.* minitests-c++.output.* tests.output.*
+
+distclean : force
+       cd @callback_subdir@ && if test -f Makefile; then $(MAKE) distclean; fi
+       $(RM) -r $(MOSTLYCLEANDIRS)
+       $(RM) $(MOSTLYCLEANFILES)
+       $(RM) $(DISTCLEANFILES)
+
+maintainer-clean : force
+       cd @callback_subdir@ && if test -f Makefile; then $(MAKE) maintainer-clean; fi
+       $(RM) -r $(MOSTLYCLEANDIRS)
+       $(RM) $(MOSTLYCLEANFILES)
+       $(RM) $(DISTCLEANFILES)
+
+
+# List of source files (committed in version control).
+SOURCE_FILES = \
+  COPYING MIGRATION PLATFORMS README callback.3 callback.html elf-hack.txt \
+  Makefile.maint \
+  Makefile.in \
+  callback.h \
+  callback-libapi.c \
+  callback-compat.c \
+  test1.c \
+  minitests.c minitests-c++.cc \
+  tests.c
+# List of distributed files generated by Makefile.maint.
+GENERATED_FILES = \
+  callback.man
+# List of distributed files.
+DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES)
+
+distdir : $(DISTFILES)
+       for file in $(DISTFILES); do \
+         if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \
+         cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \
+       done
+       test -d '$(distdir)'/@callback_subdir@ || mkdir '$(distdir)'/@callback_subdir@; cd @callback_subdir@ && $(MAKE) distdir distdir='$(distdir)'/@callback_subdir@
+
+
+force :
diff --git a/callback/Makefile.maint b/callback/Makefile.maint
new file mode 100644 (file)
index 0000000..c60fbae
--- /dev/null
@@ -0,0 +1,29 @@
+# maintainer -*-Makefile-*-
+
+SHELL = /bin/sh
+MAKE = make
+
+# ==================== Easily regeneratable files ====================
+
+ROFF_MAN = groff -Tutf8 -mandoc
+
+all : callback.man \
+      vacall_r/vacall-i386-msvc.c \
+      trampoline_r/trampoline_r.man
+
+callback.man : callback.3
+       $(ROFF_MAN) callback.3 > callback.man
+
+vacall_r/vacall-i386-msvc.c : vacall_r/vacall-i386-macro.S
+       cd vacall_r && $(MAKE) -f Makefile.maint vacall-i386-msvc.c
+
+trampoline_r/trampoline_r.man : trampoline_r/trampoline_r.3
+       cd trampoline_r && $(MAKE) -f Makefile.maint trampoline_r.man
+
+totally-clean : force
+       $(RM) callback.man
+       cd vacall_r && $(MAKE) -f Makefile.maint totally-clean
+       cd trampoline_r && $(MAKE) -f Makefile.maint totally-clean
+
+
+force :
diff --git a/callback/PLATFORMS b/callback/PLATFORMS
new file mode 100644 (file)
index 0000000..ab8b5e6
--- /dev/null
@@ -0,0 +1,43 @@
+Supported CPUs:  (Put the GNU config.guess values here.)
+     i386       i486-pc-linux (gcc), i686-unknown-gnu0.9 (gcc),
+                i386-pc-solaris2.6 (gcc), i386-pc-solaris2.10 (gcc, cc),
+                i386-w64-mingw32 (gcc, MSVC 14),
+                i586-unknown-freebsd11.0 (cc), i386-unknown-dragonfly3.8 (gcc),
+                i386-unknown-netbsdelf7.0 (gcc), i386-unknown-openbsd6.0 (gcc),
+                i586-pc-haiku (gcc-x86), i386-pc-minix (clang)
+     m68k       m68k-unknown-linux (gcc)
+     mips       mips-sgi-irix5.3 (gcc), mips-sgi-irix6.4 (cc -32, -n32, -64),
+                mips-sgi-irix6.5 (cc -32, -n32, gcc -mabi=n32),
+                mips-unknown-linux (gcc -mabi=32),
+                mips64-unknown-linux (gcc -mabi=n32, gcc -mabi=64)
+     sparc      sparc-sun-sunos4.1.3_U1 (gcc), sparc-sun-solaris2.4 (gcc),
+                sparc-sun-solaris2.10 (gcc, cc),
+                sparc64-sun-solaris2.10 (gcc -m64, cc -xarch=generic64),
+                sparc-unknown-linux (gcc), sparc64-unknown-linux (gcc),
+                sparc-unknown-netbsdelf7.1 (gcc),
+                sparc64-unknown-netbsd8.0 (gcc)
+     alpha      alpha-dec-osf3.2 (gcc), alpha-dec-osf4.0 (gcc, cc),
+                alphaev67-unknown-linux (gcc)
+     hppa       hppa1.1-hp-hpux9.05 (cc), hppa1.1-hp-hpux10.01 (cc),
+                hppa2.0-hp-hpux10.20 (cc +DA1.1), hppa2.0w-hp-hpux11.31 (cc),
+                hppa-unknown-linux (gcc)
+     hppa64     hppa64-hp-hpux11.31 (cc +DD64)
+     arm        armv5tejl-unknown-linux (gcc), armv6l-unknown-linux (gcc),
+                armv7l-unknown-linux (gcc)
+     arm64      aarch64-unknown-linux (gcc)
+     powerpc    powerpc-ibm-aix7.1.3.0 (xlc, gcc), powerpc-unknown-linux (gcc),
+                powerpc-apple-darwin6.8 (gcc), powerpc-apple-darwin9.8.0 (gcc)
+     powerpc64  powerpc-ibm-aix7.1.3.0 (gcc -maix64, xlc -q64; AR="ar -X 64"),
+                powerpc64-unknown-linux (gcc -m64),
+                powerpc64le-unknown-linux (gcc)
+     ia64       ia64-unknown-linux (gcc)
+     x86_64     x86_64-suse-linux (gcc), x86_64-unknown-linux (gcc -mx32),
+                x86_64-pc-solaris2.10 (gcc -m64, cc -xarch=generic64),
+                x86_64-pc-cygwin (gcc), x86_64-w64-mingw32 (gcc, MSVC 14),
+                x86_64-unknown-freebsd11.0 (cc), x86_64-unknown-netbsd7.0 (gcc),
+                x86_64-unknown-openbsd6.0 (gcc)
+     s390       s390x-ibm-linux (gcc -m31)
+     s390x      s390x-ibm-linux (gcc)
+     riscv32    riscv32-unknown-linux (gcc -mabi=ilp32d)
+     riscv64    riscv64-unknown-linux (gcc -mabi=lp64d)
+
diff --git a/callback/README b/callback/README
new file mode 100644 (file)
index 0000000..3b655d9
--- /dev/null
@@ -0,0 +1,66 @@
+callback - closures with variable arguments as first-class C functions
+
+This library implements closures with variable arguments and variable return
+values as first-class C functions. A closure consists of a regular C function
+and a piece of data which gets passed to the C function when the closure is
+called.
+
+This library is especially suited to the implementation of call-back functions
+in embedded interpreters.
+
+
+Installation instructions:
+
+    Configure the parent directory. Then:
+        cd callback
+        make
+        make check
+        make install
+
+
+Files in this package:
+
+    Documentation:
+
+        README          this text
+        COPYING         free software license
+        PLATFORMS       list of supported platforms
+        MIGRATION       migration guide from vacall+trampoline
+        callback.3      manual page in Unix man format
+        callback.man    manual page
+        callback.html   manual page in HTML format
+
+    Source:
+
+        callback.h      include file
+        tests.c         test program
+        vacall_r/*      a reentrant version of the vacall package
+        trampoline_r/*  a reentrant version of the trampoline package
+
+    Building:
+
+        Makefile.in     Makefile master
+
+    Porting:
+
+        Makefile.devel  developer's Makefile
+        call-used-registers.txt  table of call-used registers on different CPUs
+
+
+Copyright notice:
+
+Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+This program is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
diff --git a/callback/callback-compat.c b/callback/callback-compat.c
new file mode 100644 (file)
index 0000000..fd3fc64
--- /dev/null
@@ -0,0 +1,24 @@
+/*
+ * Copyright 2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "config.h"
+
+#include <stdlib.h>
+
+/* A dummy symbol, so that GNU clisp's autoconfiguration recognizes this
+   library. */
+void trampoline_r_data0 (void) { abort(); }
diff --git a/callback/callback-libapi.c b/callback/callback-libapi.c
new file mode 100644 (file)
index 0000000..f1384c5
--- /dev/null
@@ -0,0 +1,53 @@
+/*
+ * Copyright 2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "config.h"
+
+#define __TR_function obsolete__TR_function
+#include "callback.h"
+#undef __TR_function
+#include "trampoline_r.h"
+
+/* This is the implementation of the library API.
+   The symbols that the linker sees are all prefixed with 'callback_',
+   to avoid potential collisions with other libraries. */
+
+callback_t alloc_callback (callback_function_t address, void* data)
+{
+  return alloc_trampoline_r((__TR_function)callback_get_receiver(),(void*)address,data);
+}
+
+void free_callback (callback_t callback)
+{
+  free_trampoline_r (callback);
+}
+
+int is_callback (void* callback)
+{
+  return is_trampoline_r(callback)
+         && trampoline_r_address((__TR_function)callback) == (__TR_function)callback_get_receiver();
+}
+
+callback_function_t callback_address (callback_t callback)
+{
+  return (callback_function_t)trampoline_r_data0(callback);
+}
+
+void* callback_data (callback_t callback)
+{
+  return trampoline_r_data1(callback);
+}
diff --git a/callback/callback.3 b/callback/callback.3
new file mode 100644 (file)
index 0000000..5214077
--- /dev/null
@@ -0,0 +1,273 @@
+.\" Copyright (C) 1995-2017 Bruno Haible
+.\"
+.\" This manual is free documentation.  It is dually licensed under the
+.\" GNU FDL and the GNU GPL.  This means that you can redistribute this
+.\" manual under either of these two licenses, at your choice.
+.\"
+.\" This manual is covered by the GNU FDL.  Permission is granted to copy,
+.\" distribute and/or modify this document under the terms of the
+.\" GNU Free Documentation License (FDL), either version 1.2 of the
+.\" License, or (at your option) any later version published by the
+.\" Free Software Foundation (FSF); with no Invariant Sections, with no
+.\" Front-Cover Text, and with no Back-Cover Texts.
+.\" A copy of the license is at <https://www.gnu.org/licenses/old-licenses/fdl-1.2>.
+.\"
+.\" This manual is covered by the GNU GPL.  You can redistribute it and/or
+.\" modify it under the terms of the GNU General Public License (GPL), either
+.\" version 2 of the License, or (at your option) any later version published
+.\" by the Free Software Foundation (FSF).
+.\" A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
+.\"
+.TH CALLBACK 3 "1 January 2017"
+.SH NAME
+callback \- closures with variable arguments as first-class C functions
+.SH SYNOPSIS
+.B #include <callback.h>
+.LP
+.nf
+.BI "void " function " (void* " data ", va_alist " alist ")"
+.BI "{"
+.BI "  va_start_" type "(" alist "[, " return_type "]);"
+.BI "  " arg " = va_arg_" type "(" alist "[, " arg_type "]);"
+.BI "  va_return_" type "(" alist "[[, " return_type "], " return_value "]);"
+.BI "}"
+.fi
+.LP
+.IB callback " = alloc_callback(" "&function" ", " data ");"
+.LP
+.BI "free_callback(" callback ");"
+.LP
+.nf
+.BI "is_callback(" callback ")"
+.BI "callback_address(" callback ")"
+.BI "callback_data(" callback ")"
+.fi
+.SH DESCRIPTION
+.LP
+These functions implement
+.I closures
+with variable arguments as first-class C functions.
+
+Closures as
+.I first-class C functions
+means that they fit into a function pointer and can be called exactly
+like any other C function. Moreover, they can be called with variable
+arguments and can return variable return values.
+
+.IB callback " = alloc_callback(" "&function" ", " data ")"
+allocates a callback. When
+.I callback
+gets called, it arranges to call
+.IR function ","
+passing
+.I data
+as first argument and, as second argument, the entire sequence of arguments
+passed to
+.IR callback .
+
+Function calling conventions differ considerably on different machines,
+therefore the arguments are accessed and the result value is stored
+through the same macros as used by the
+.I vacall
+package, see below.
+
+The callbacks are functions with indefinite extent:
+.I callback
+is only deallocated when
+.BI free_callback( callback )
+is called.
+
+.BI "is_callback(" callback ")"
+checks whether the C function
+.I callback
+was produced by a call to
+.IR alloc_callback .
+If this returns true, the arguments given to
+.I alloc_callback
+can be retrieved:
+.RS 4
+.LP
+.BI "callback_address(" callback ")"
+returns
+.IR "&function" ,
+.LP
+.BI "callback_data(" callback ")"
+returns
+.IR data .
+.RE
+
+.SH VACALL MACROS
+
+Within
+.IR function ,
+the following macros can be used to walk through the argument list and
+specify a return value:
+.RS 0
+.TP
+.BI "va_start_" type "(" alist "[, " return_type "]);"
+starts the walk through the argument list and specifies the return type.
+.TP
+.IB arg " = va_arg_" type "(" alist "[, " arg_type "]);"
+fetches the next argument from the argument list.
+.TP
+.BI "va_return_" type "(" alist "[[, " return_type "], " return_value "]);"
+ends the walk through the argument list and specifies the return value.
+.RE
+
+The
+.I type
+in
+.BI va_start_ type
+and
+.BI va_return_ type
+shall be one of
+.BR void ", " int ", " uint ", " long ", " ulong ", " longlong ", " ulonglong ", " double ", " struct ", " ptr
+or (for ANSI C calling conventions only)
+.BR char ", " schar ", " uchar ", " short ", " ushort ", " float ,
+depending on the class of
+.IR return_type .
+
+The
+.I type
+specifiers in
+.BI va_start_ type
+and
+.BI va_return_ type
+must be the same.
+The
+.I return_type
+specifiers passed to
+.BI va_start_ type
+and
+.BI va_return_ type
+must be the same.
+
+The
+.I type
+in
+.BI va_arg_ type
+shall be one of
+.BR int ", " uint ", " long ", " ulong ", " longlong ", " ulonglong ", " double ", " struct ", " ptr
+or (for ANSI C calling conventions only)
+.BR char ", " schar ", " uchar ", " short ", " ushort ", " float ,
+depending on the class of
+.IR arg_type .
+
+In
+.BI "va_start_struct(" alist ", " return_type ", " splittable );
+the
+.I splittable
+flag specifies whether the struct
+.I return_type
+can be returned in registers such that every struct field fits entirely in
+a single register. This needs to be specified for structs of size
+2*sizeof(long). For structs of size <= sizeof(long),
+.I splittable
+is ignored and assumed to be 1. For structs of size > 2*sizeof(long),
+.I splittable
+is ignored and assumed to be 0. There are some handy macros for this:
+.nf
+.BI "va_word_splittable_1 (" type1 )
+.BI "va_word_splittable_2 (" type1 ", " type2 )
+.BI "va_word_splittable_3 (" type1 ", " type2 ", " type3 )
+.BI "va_word_splittable_4 (" type1 ", " type2 ", " type3 ", " type4 )
+.fi
+For a struct with three slots
+.nf
+.BI "struct { " "type1 id1" "; " "type2 id2" "; " "type3 id3" "; }"
+.fi
+you can specify
+.I splittable
+as
+.BI "va_word_splittable_3 (" type1 ", " type2 ", " type3 )
+.RB .
+
+.SH NOTES
+
+Functions which want to emulate Kernighan & Ritchie style functions (i.e.,
+in ANSI C, functions without a typed argument list) cannot use the
+.I type
+values
+.BR char ", " schar ", " uchar ", " short ", " ushort ", " float .
+As prescribed by the default K&R C expression promotions, they have
+to use
+.B int
+instead of
+.BR char ", " schar ", " uchar ", " short ", " ushort
+and
+.B double
+instead of
+.BR float .
+
+The macros
+.BR va_start_longlong(\|) ,
+.BR va_start_ulonglong(\|) ,
+.BR va_return_longlong(\|) ,
+.BR va_return_ulonglong(\|) ,
+.B va_arg_longlong(\|)
+and
+.B va_arg_ulonglong(\|)
+work only if the C compiler has a working
+.B long long
+64-bit integer type.
+
+The struct types used in
+.B va_start_struct(\|)
+and
+.B va_struct(\|)
+must only contain (signed or unsigned) int, long, long long or pointer fields.
+Struct types containing (signed or unsigned) char, short, float, double or
+other structs are not supported.
+
+.SH SEE ALSO
+.BR vacall (3),
+.BR trampoline (3).
+
+.SH BUGS
+
+The current implementations have been tested on a selection of common
+cases but there are probably still many bugs.
+
+There are typically built-in limits on the size of the argument-list,
+which may also include the size of any structure arguments.
+
+The decision whether a struct is to be returned in registers or in memory
+considers only the struct's size and alignment. This is inaccurate: for
+example, gcc on m68k-next returns
+.B "struct { char a,b,c; }"
+in registers and
+.B "struct { char a[3]; }"
+in memory, although both types have the same size and the same alignment.
+
+The argument list can only be walked once.
+
+.SH NON-BUGS
+
+All information is passed in CPU registers and the stack. The
+.B callback
+package is therefore multithread-safe.
+
+.SH PORTING
+
+Porting
+.B callback
+consists in first porting the
+.B vacall
+and
+.B trampoline
+packages, then choosing a CPU register for passing the closure from
+.B trampoline
+to
+.BR vacall .
+This register is normally the register designated by STATIC_CHAIN_REGNUM
+in the gcc source, file
+.RI gcc-2.7.2/config/ cpu / cpu .h.
+
+.SH AUTHOR
+
+Bruno Haible <bruno@clisp.org>
+
+.SH ACKNOWLEDGEMENTS
+
+Many ideas were cribbed from the gcc source.
+
diff --git a/callback/callback.h b/callback/callback.h
new file mode 100644 (file)
index 0000000..667b067
--- /dev/null
@@ -0,0 +1,90 @@
+/*
+ * Copyright 1997-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#ifndef _CALLBACK_H
+#define _CALLBACK_H
+
+#include "ffcall-version.h"
+
+/* Defines the type 'va_alist' and the va_* macros. */
+#include "vacall_r.h"
+
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+
+/* This type denotes an opaque function pointer.
+   You need to cast it to an actual function pointer type (with correct return
+   type) before you can actually invoke it. */
+#ifdef __cplusplus
+typedef int (*callback_t) (...);
+#else
+typedef int (*callback_t) ();
+#endif
+/* A deprecated alias of this type. */
+typedef callback_t __TR_function;
+
+/* This type denotes a callback implementation.
+   DATA is the pointer that was passed to alloc_callback().
+   ALIST allows to iterate over the argument list. */
+typedef void (*callback_function_t) (void* /* DATA */, va_alist /* ALIST */);
+
+
+/* Allocates a callback.
+   It returns a function pointer whose signature depends on the behaviour
+   of ADDRESS.
+   When invoked, it passes DATA as first argument to ADDRESS and the actual
+   arguments as a va_alist to ADDRESS. It returns the value passed to a
+   va_return_* macro by ADDRESS.
+   The callback has indefinite extent. It can be accessed until a call to
+   free_callback().
+ */
+extern callback_t alloc_callback (callback_function_t /* ADDRESS */, void* /* DATA */);
+
+/* Frees the memory used by a callback.
+   CALLBACK must be the result of an alloc_callback() invocation.
+   After this call, CALLBACK must not be used any more - neither invoked,
+   not used as an argument to other functions.
+ */
+extern void free_callback (callback_t /* CALLBACK */);
+
+
+/* Tests whether a given pointer is a function pointer returned by
+   alloc_callback(). Returns 1 for yes, 0 for no.
+   If yes, it can be cast to callback_t.
+ */
+extern int is_callback (void* /* CALLBACK */);
+
+/* Returns the ADDRESS argument passed to the alloc_callback() invocation.
+   CALLBACK must be the result of an alloc_callback() invocation.
+ */
+extern callback_function_t callback_address (callback_t /* CALLBACK */);
+
+/* Returns the DATA argument passed to the alloc_callback() invocation.
+   CALLBACK must be the result of an alloc_callback() invocation.
+ */
+extern void* callback_data (callback_t /* CALLBACK */);
+
+
+#ifdef __cplusplus
+}
+#endif
+
+
+#endif /* _CALLBACK_H */
diff --git a/callback/callback.html b/callback/callback.html
new file mode 100644 (file)
index 0000000..bc0c675
--- /dev/null
@@ -0,0 +1,290 @@
+<HTML>
+<HEAD>
+<!--
+Copyright (C) 1995-2017 Bruno Haible
+
+This manual is free documentation.  It is dually licensed under the
+GNU FDL and the GNU GPL.  This means that you can redistribute this
+manual under either of these two licenses, at your choice.
+
+This manual is covered by the GNU FDL.  Permission is granted to copy,
+distribute and/or modify this document under the terms of the
+GNU Free Documentation License (FDL), either version 1.2 of the
+License, or (at your option) any later version published by the
+Free Software Foundation (FSF); with no Invariant Sections, with no
+Front-Cover Text, and with no Back-Cover Texts.
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/fdl-1.2>.
+
+This manual is covered by the GNU GPL.  You can redistribute it and/or
+modify it under the terms of the GNU General Public License (GPL), either
+version 2 of the License, or (at your option) any later version published
+by the Free Software Foundation (FSF).
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
+-->
+<TITLE> CALLBACK manual page </TITLE>
+</HEAD>
+<BODY>
+<H1>CALLBACK manual page</H1>
+
+<UL>
+<LI> <A HREF="#Name">Name</A>
+<LI> <A HREF="#Synopsis">Synopsis</A>
+<LI> <A HREF="#Description">Description</A>
+<LI> <A HREF="#VACALL macros">VACALL macros</A>
+<LI> <A HREF="#Notes">Notes</A>
+<LI> <A HREF="#See also">See also</A>
+<LI> <A HREF="#Bugs">Bugs</A>
+<LI> <A HREF="#Non-Bugs">Non-Bugs</A>
+<LI> <A HREF="#Porting">Porting</A>
+<LI> <A HREF="#Author">Author</A>
+<LI> <A HREF="#Acknowledgements">Acknowledgements</A>
+</UL>
+<P>
+
+<HR>
+
+<A NAME="Name">
+<H2>Name</H2>
+</A>
+
+callback - closures with variable arguments as first-class
+C functions
+
+<A NAME="Synopsis">
+<H2>Synopsis</H2>
+</A>
+
+<PRE>
+<CODE>#include &lt;callback.h&gt;</CODE>
+</PRE>
+<P>
+<PRE>
+<CODE>void <VAR>function</VAR> (void* <VAR>data</VAR>, va_alist <VAR>alist</VAR>)</CODE>
+<CODE>{</CODE>
+<CODE>  va_start_<VAR>type</VAR>(<VAR>alist</VAR>[, <VAR>return_type</VAR>]);</CODE>
+<CODE>  arg = va_arg_<VAR>type</VAR>(<VAR>alist</VAR>[, <VAR>arg_type</VAR>]);</CODE>
+<CODE>  va_return_<VAR>type</VAR>(<VAR>alist</VAR>[[, <VAR>return_type</VAR>], <VAR>return_value</VAR>]);</CODE>
+<CODE>}</CODE>
+</PRE>
+<P>
+<PRE>
+<CODE><VAR>callback</VAR> = alloc_callback(<VAR>&function</VAR>, <VAR>data</VAR>);</CODE>
+</PRE>
+<P>
+<PRE>
+<CODE>free_callback(<VAR>callback</VAR>);</CODE>
+</PRE>
+<P>
+<PRE>
+<CODE>is_callback(<VAR>callback</VAR>)</CODE>
+<CODE>callback_address(<VAR>callback</VAR>)</CODE>
+<CODE>callback_data(<VAR>callback</VAR>)</CODE>
+</PRE>
+
+<A NAME="Description">
+<H2>Description</H2>
+</A>
+
+These functions implement <EM>closures</EM> with variable arguments
+as first-class C functions.
+<P>
+Closures  as  <EM>first-class  C functions</EM> means that they fit
+into a function pointer and can be called exactly like any
+other  C function. Moreover, they can be called with variable
+arguments and can return variable return values.
+<P>
+<CODE><VAR>callback</VAR> = alloc_callback(<VAR>&function</VAR>, <VAR>data</VAR>)</CODE>
+allocates  a
+callback.  When  <VAR>callback</VAR> gets called, it arranges to call
+<VAR>function</VAR>, passing <VAR>data</VAR> as first argument  and,  as  second
+argument, the entire sequence of arguments passed to <VAR>callback</VAR>.
+<P>
+Function calling conventions differ considerably  on  different
+machines, therefore the arguments are accessed and
+the result value is stored through the same macros as used
+by the <EM>vacall</EM> package, see below.
+<P>
+The  callbacks are functions with indefinite extent: <CODE><VAR>callback</VAR></CODE>
+is only deallocated when  <CODE>free_callback(<VAR>callback</VAR>)</CODE>  is
+called.
+<P>
+<CODE>is_callback(<VAR>callback</VAR>)</CODE>
+checks whether the C function <CODE><VAR>callback</VAR></CODE>
+was produced by a call to  <CODE>alloc_callback</CODE>.   If  this
+returns true, the arguments given to <CODE>alloc_callback</CODE> can be
+retrieved:
+<UL>
+<LI> <CODE>callback_address(<VAR>callback</VAR>)</CODE> returns <VAR>&function</VAR>,
+<LI> <CODE>callback_data(<VAR>callback</VAR>)</CODE> returns <VAR>data</VAR>.
+</UL>
+
+<A NAME="VACALL macros">
+<H2>VACALL macros</H2>
+</A>
+
+Within <VAR>function</VAR>, the following macros can be used to walk
+through the argument list and specify a return value:
+<P>
+<PRE>
+<CODE>va_start_<VAR>type</VAR>(<VAR>alist</VAR>[, <VAR>return_type</VAR>]);</CODE>
+</PRE>
+starts the walk through the argument list and specifies the return type.
+<P>
+<PRE>
+<CODE>arg = va_arg_<VAR>type</VAR>(<VAR>alist</VAR>[, <VAR>arg_type</VAR>]);</CODE>
+</PRE>
+fetches the next argument from the argument list.
+<P>
+<PRE>
+<CODE>va_return_<VAR>type</VAR>(<VAR>alist</VAR>[[, <VAR>return_type</VAR>], <VAR>return_value</VAR>]);</CODE>
+</PRE>
+ends  the walk through the argument list and specifies the return value.
+<P>
+The <VAR>type</VAR> in <CODE>va_start_<VAR>type</VAR></CODE>
+ and <CODE>va_return_<VAR>type</VAR></CODE> shall be  one
+of <CODE>void</CODE>,  <CODE>int</CODE>,  <CODE>uint</CODE>, <CODE>long</CODE>,
+<CODE>ulong</CODE>, <CODE>longlong</CODE>, <CODE>ulonglong</CODE>,
+<CODE>double</CODE>, <CODE>struct</CODE>, <CODE>ptr</CODE>
+or
+(for ANSI C calling conventions only)
+<CODE>char</CODE>, <CODE>schar</CODE>,  <CODE>uchar</CODE>,
+<CODE>short</CODE>,   <CODE>ushort</CODE>,   <CODE>float</CODE>,
+depending   on  the  class  of <VAR>return_type</VAR>.
+<P>
+The <VAR>type</VAR> specifiers in
+<CODE>va_start_<VAR>type</VAR></CODE> and <CODE>va_return_<VAR>type</VAR></CODE>
+ must be the same.
+The <VAR>return_type</VAR> specifiers   passed    to
+<CODE>va_start_<VAR>type</VAR></CODE> and <CODE>va_return_<VAR>type</VAR></CODE>
+ must be the same.
+<P>
+The <VAR>type</VAR> in <CODE>va_arg_<VAR>type</VAR></CODE>
+shall be one of <CODE>int</CODE>,  <CODE>uint</CODE>, <CODE>long</CODE>,
+<CODE>ulong</CODE>, <CODE>longlong</CODE>, <CODE>ulonglong</CODE>,
+<CODE>double</CODE>, <CODE>struct</CODE>, <CODE>ptr</CODE>
+or (for ANSI C calling  conventions  only)
+<CODE>char</CODE>, <CODE>schar</CODE>,  <CODE>uchar</CODE>,
+<CODE>short</CODE>,   <CODE>ushort</CODE>,   <CODE>float</CODE>,
+depending   on  the  class  of <VAR>arg_type</VAR>.
+<P>
+In <CODE>va_start_struct(<VAR>alist</VAR>, <VAR>return_type</VAR>, <VAR>splittable</VAR>);</CODE> the
+<VAR>splittable</VAR> flag specifies whether the struct <VAR>return_type</VAR> can
+be returned in registers such that every struct field fits
+entirely  in a single register. This needs to be specified
+for structs of size <SAMP>2*sizeof(long)</SAMP>. For structs of size
+&lt;= <SAMP>sizeof(long)</SAMP>,  splittable  is ignored and assumed to be 1.
+For  structs  of  size  &gt; <SAMP>2*sizeof(long)</SAMP>,  splittable  is
+ignored  and  assumed to be 0. There are some handy macros
+for this:
+<PRE>
+<CODE>va_word_splittable_1 (<VAR>type1</VAR>)</CODE>
+<CODE>va_word_splittable_2 (<VAR>type1</VAR>, <VAR>type2</VAR>)</CODE>
+<CODE>va_word_splittable_3 (<VAR>type1</VAR>, <VAR>type2</VAR>, <VAR>type3</VAR>)</CODE>
+<CODE>va_word_splittable_4 (<VAR>type1</VAR>, <VAR>type2</VAR>, <VAR>type3</VAR>, <VAR>type4</VAR>)</CODE>
+</PRE>
+For a struct with three slots
+<PRE>
+<CODE>struct { <VAR>type1 id1</VAR>; <VAR>type2 id2</VAR>; <VAR>type3 id3</VAR>; }</CODE>
+</PRE>
+you can specify <VAR>splittable</VAR> as
+<CODE>va_word_splittable_3 (<VAR>type1</VAR>, <VAR>type2</VAR>, <VAR>type3</VAR>)</CODE>.
+
+<A NAME="Notes">
+<H2>Notes</H2>
+</A>
+
+<OL>
+<LI> Functions which want to emulate Kernighan &amp; Ritchie  style
+functions  (i.e.,  in  ANSI  C,  functions without a typed
+argument list) cannot use the <VAR>type</VAR>  values
+<CODE>char</CODE>, <CODE>schar</CODE>,  <CODE>uchar</CODE>,
+<CODE>short</CODE>,   <CODE>ushort</CODE>,   <CODE>float</CODE>.
+As prescribed by the default
+K&amp;R C expression promotions, they have to use <CODE>int</CODE>  instead
+of <CODE>char</CODE>, <CODE>schar</CODE>,  <CODE>uchar</CODE>,
+<CODE>short</CODE>,   <CODE>ushort</CODE> and <CODE>double</CODE> instead of
+<CODE>float</CODE>.
+<P>
+<LI> The macros <CODE>va_start_longlong()</CODE>,
+<CODE>va_start_ulonglong()</CODE>, <CODE>va_return_longlong()</CODE>,
+<CODE>va_return_ulonglong()</CODE>, <CODE>va_arg_longlong()</CODE> and
+<CODE>va_arg_ulonglong()</CODE> work only if the C compiler has a working
+<CODE>long long</CODE> 64-bit integer type.
+<P>
+<LI> The struct types used in <CODE>va_start_struct()</CODE> and
+<CODE>va_struct()</CODE> must only contain (signed or unsigned) int,
+long, long long or pointer fields. Struct types containing
+(signed or unsigned) char, short, float, double or other
+structs are not supported.
+<P>
+</OL>
+
+<A NAME="See also">
+<H2>See also</H2>
+</A>
+
+<A HREF="vacall(3)"><CODE><B>vacall</B></CODE></A>(3), <A HREF="trampoline(3)"><CODE><B>trampoline</B></CODE></A>(3).
+
+<A NAME="Bugs">
+<H2>Bugs</H2>
+</A>
+
+The  current  implementations have been tested on a selection
+of common cases but there  are  probably  still  many
+bugs.
+<P>
+There  are  typically  built-in  limits on the size of the
+argument-list, which may also  include  the  size  of  any
+structure arguments.
+<P>
+The decision whether a struct is to be returned in registers or in memory
+considers only the struct's size and alignment. This is inaccurate: for
+example, gcc on m68k-next returns
+<CODE>struct { char a,b,c; }</CODE>
+in registers and
+<CODE>struct { char a[3]; }</CODE>
+in memory, although both types have the same size and the same alignment.
+<P>
+The argument list can only be walked once.
+
+<A NAME="Non-Bugs">
+<H2>Non-Bugs</H2>
+</A>
+
+All  information is passed in CPU registers and the stack.
+The <CODE><B>callback</B></CODE> package is therefore multithread-safe.
+
+<A NAME="Porting">
+<H2>Porting</H2>
+</A>
+
+Porting <CODE><B>callback</B></CODE> consists in first porting the <CODE><B>vacall</B></CODE>  and
+<CODE><B>trampoline</B></CODE>  packages,  then  choosing  a  CPU register for
+passing the closure from <EM>trampoline</EM> to <EM>vacall</EM>.  This
+register    is    normally   the   register   designated   by
+<CODE>STATIC_CHAIN_REGNUM</CODE> in the gcc source, file
+<SAMP>gcc-2.7.2/config/<VAR>cpu</VAR>/<VAR>cpu</VAR>.h</SAMP>.
+
+<A NAME="Author">
+<H2>Author</H2>
+</A>
+
+Bruno Haible &lt;bruno@clisp.org&gt;
+
+<A NAME="Acknowledgements">
+<H2>Acknowledgements</H2>
+</A>
+
+Many ideas were cribbed from the gcc source.
+<P>
+
+<HR>
+
+<ADDRESS>CALLBACK manual page<BR>
+Bruno Haible &lt;bruno@clisp.org&gt;
+</ADDRESS>
+<P>
+Last modified: 1 January 2017.
+
+</BODY>
+</HTML>
diff --git a/callback/callback.man b/callback/callback.man
new file mode 100644 (file)
index 0000000..8f3a81d
--- /dev/null
@@ -0,0 +1,164 @@
+CALLBACK(3)                Library Functions Manual                CALLBACK(3)
+
+
+
+\e[1mNAME\e[0m
+       callback - closures with variable arguments as first-class C functions
+
+\e[1mSYNOPSIS\e[0m
+       \e[1m#include <callback.h>\e[0m
+
+       \e[1mvoid \e[4m\e[22mfunction\e[24m \e[1m(void* \e[4m\e[22mdata\e[24m\e[1m, va_alist \e[4m\e[22malist\e[24m\e[1m)\e[0m
+       \e[1m{\e[0m
+         \e[1mva_start_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[, \e[4m\e[22mreturn_type\e[24m\e[1m]);\e[0m
+         \e[4marg\e[24m \e[1m= va_arg_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[, \e[4m\e[22marg_type\e[24m\e[1m]);\e[0m
+         \e[1mva_return_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[[, \e[4m\e[22mreturn_type\e[24m\e[1m], \e[4m\e[22mreturn_value\e[24m\e[1m]);\e[0m
+       \e[1m}\e[0m
+
+       \e[4mcallback\e[24m \e[1m= alloc_callback(\e[4m\e[22m&function\e[24m\e[1m, \e[4m\e[22mdata\e[24m\e[1m);\e[0m
+
+       \e[1mfree_callback(\e[4m\e[22mcallback\e[24m\e[1m);\e[0m
+
+       \e[1mis_callback(\e[4m\e[22mcallback\e[24m\e[1m)\e[0m
+       \e[1mcallback_address(\e[4m\e[22mcallback\e[24m\e[1m)\e[0m
+       \e[1mcallback_data(\e[4m\e[22mcallback\e[24m\e[1m)\e[0m
+
+\e[1mDESCRIPTION\e[0m
+       These  functions  implement  \e[4mclosures\e[24m with variable arguments as first-
+       class C functions.
+
+       Closures as \e[4mfirst-class\e[24m \e[4mC\e[24m \e[4mfunctions\e[24m means that they fit into a function
+       pointer  and can be called exactly like any other C function. Moreover,
+       they can be called with variable  arguments  and  can  return  variable
+       return values.
+
+       \e[4mcallback\e[24m  \e[1m=  alloc_callback(\e[4m\e[22m&function\e[24m\e[1m, \e[4m\e[22mdata\e[24m\e[1m) \e[22mallocates a callback. When
+       \e[4mcallback\e[24m gets called, it arranges to call  \e[4mfunction\e[24m,  passing  \e[4mdata\e[24m  as
+       first  argument  and,  as second argument, the entire sequence of argu‐
+       ments passed to \e[4mcallback\e[24m.
+
+       Function calling conventions differ considerably on different machines,
+       therefore  the  arguments  are  accessed and the result value is stored
+       through the same macros as used by the \e[4mvacall\e[24m package, see below.
+
+       The callbacks are functions with indefinite extent:  \e[4mcallback\e[24m  is  only
+       deallocated when \e[1mfree_callback(\e[4m\e[22mcallback\e[24m\e[1m) \e[22mis called.
+
+       \e[1mis_callback(\e[4m\e[22mcallback\e[24m\e[1m)  \e[22mchecks  whether the C function \e[4mcallback\e[24m was pro‐
+       duced by a call to \e[4malloc_callback\e[24m.  If this returns true, the arguments
+       given to \e[4malloc_callback\e[24m can be retrieved:
+
+           \e[1mcallback_address(\e[4m\e[22mcallback\e[24m\e[1m) \e[22mreturns \e[4m&function\e[24m,
+
+           \e[1mcallback_data(\e[4m\e[22mcallback\e[24m\e[1m) \e[22mreturns \e[4mdata\e[24m.
+
+
+\e[1mVACALL MACROS\e[0m
+       Within  \e[4mfunction\e[24m,  the following macros can be used to walk through the
+       argument list and specify a return value:
+
+       \e[1mva_start_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[, \e[4m\e[22mreturn_type\e[24m\e[1m]);\e[0m
+              starts the walk through the  argument  list  and  specifies  the
+              return type.
+
+       \e[4marg\e[24m \e[1m= va_arg_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[, \e[4m\e[22marg_type\e[24m\e[1m]);\e[0m
+              fetches the next argument from the argument list.
+
+       \e[1mva_return_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[[, \e[4m\e[22mreturn_type\e[24m\e[1m], \e[4m\e[22mreturn_value\e[24m\e[1m]);\e[0m
+              ends the walk through the argument list and specifies the return
+              value.
+
+       The \e[4mtype\e[24m in \e[1mva_start_\e[4m\e[22mtype\e[24m and \e[1mva_return_\e[4m\e[22mtype\e[24m shall be one of \e[1mvoid\e[22m, \e[1mint\e[22m,
+       \e[1muint\e[22m,  \e[1mlong\e[22m,  \e[1mulong\e[22m,  \e[1mlonglong\e[22m,  \e[1mulonglong\e[22m, \e[1mdouble\e[22m, \e[1mstruct\e[22m, \e[1mptr \e[22mor (for
+       ANSI C calling conventions only) \e[1mchar\e[22m,  \e[1mschar\e[22m,  \e[1muchar\e[22m,  \e[1mshort\e[22m,  \e[1mushort\e[22m,
+       \e[1mfloat\e[22m, depending on the class of \e[4mreturn_type\e[24m.
+
+       The  \e[4mtype\e[24m  specifiers  in  \e[1mva_start_\e[4m\e[22mtype\e[24m and \e[1mva_return_\e[4m\e[22mtype\e[24m must be the
+       same.   The  \e[4mreturn_type\e[24m  specifiers  passed   to   \e[1mva_start_\e[4m\e[22mtype\e[24m   and
+       \e[1mva_return_\e[4m\e[22mtype\e[24m must be the same.
+
+       The  \e[4mtype\e[24m  in \e[1mva_arg_\e[4m\e[22mtype\e[24m shall be one of \e[1mint\e[22m, \e[1muint\e[22m, \e[1mlong\e[22m, \e[1mulong\e[22m, \e[1mlong‐\e[0m
+       \e[1mlong\e[22m, \e[1mulonglong\e[22m, \e[1mdouble\e[22m, \e[1mstruct\e[22m, \e[1mptr \e[22mor (for ANSI C calling conventions
+       only)  \e[1mchar\e[22m, \e[1mschar\e[22m, \e[1muchar\e[22m, \e[1mshort\e[22m, \e[1mushort\e[22m, \e[1mfloat\e[22m, depending on the class
+       of \e[4marg_type\e[24m.
+
+       In \e[1mva_start_struct(\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22mreturn_type\e[24m\e[1m, \e[4m\e[22msplittable\e[24m\e[1m); \e[22mthe \e[4msplittable\e[24m flag
+       specifies  whether  the struct \e[4mreturn_type\e[24m can be returned in registers
+       such that every struct field fits entirely in a single  register.  This
+       needs  to  be specified for structs of size 2*sizeof(long). For structs
+       of size <= sizeof(long), \e[4msplittable\e[24m is ignored and assumed to be 1. For
+       structs  of size > 2*sizeof(long), \e[4msplittable\e[24m is ignored and assumed to
+       be 0. There are some handy macros for this:
+       \e[1mva_word_splittable_1 (\e[4m\e[22mtype1\e[24m\e[1m)\e[0m
+       \e[1mva_word_splittable_2 (\e[4m\e[22mtype1\e[24m\e[1m, \e[4m\e[22mtype2\e[24m\e[1m)\e[0m
+       \e[1mva_word_splittable_3 (\e[4m\e[22mtype1\e[24m\e[1m, \e[4m\e[22mtype2\e[24m\e[1m, \e[4m\e[22mtype3\e[24m\e[1m)\e[0m
+       \e[1mva_word_splittable_4 (\e[4m\e[22mtype1\e[24m\e[1m, \e[4m\e[22mtype2\e[24m\e[1m, \e[4m\e[22mtype3\e[24m\e[1m, \e[4m\e[22mtype4\e[24m\e[1m)\e[0m
+       For a struct with three slots
+       \e[1mstruct { \e[4m\e[22mtype1\e[24m \e[4mid1\e[24m\e[1m; \e[4m\e[22mtype2\e[24m \e[4mid2\e[24m\e[1m; \e[4m\e[22mtype3\e[24m \e[4mid3\e[24m\e[1m; }\e[0m
+       you can  specify  \e[4msplittable\e[24m  as  \e[1mva_word_splittable_3  (\e[4m\e[22mtype1\e[24m\e[1m,  \e[4m\e[22mtype2\e[24m\e[1m,\e[0m
+       \e[4mtype3\e[24m\e[1m) \e[22m.
+
+
+\e[1mNOTES\e[0m
+       Functions  which  want  to  emulate Kernighan & Ritchie style functions
+       (i.e., in ANSI C, functions without a typed argument list)  cannot  use
+       the  \e[4mtype\e[24m  values  \e[1mchar\e[22m,  \e[1mschar\e[22m,  \e[1muchar\e[22m, \e[1mshort\e[22m, \e[1mushort\e[22m, \e[1mfloat\e[22m.  As pre‐
+       scribed by the default K&R C expression promotions, they  have  to  use
+       \e[1mint  \e[22minstead of \e[1mchar\e[22m, \e[1mschar\e[22m, \e[1muchar\e[22m, \e[1mshort\e[22m, \e[1mushort \e[22mand \e[1mdouble \e[22minstead of
+       \e[1mfloat\e[22m.
+
+       The macros \e[1mva_start_longlong()\e[22m,  \e[1mva_start_ulonglong()\e[22m,  \e[1mva_return_long‐\e[0m
+       \e[1mlong()\e[22m, \e[1mva_return_ulonglong()\e[22m, \e[1mva_arg_longlong() \e[22mand \e[1mva_arg_ulonglong()\e[0m
+       work only if the C compiler has a  working  \e[1mlong  long  \e[22m64-bit  integer
+       type.
+
+       The  struct  types  used in \e[1mva_start_struct() \e[22mand \e[1mva_struct() \e[22mmust only
+       contain (signed or unsigned) int, long, long long  or  pointer  fields.
+       Struct types containing (signed or unsigned) char, short, float, double
+       or other structs are not supported.
+
+
+\e[1mSEE ALSO\e[0m
+       \e[1mvacall\e[22m(3), \e[1mtrampoline\e[22m(3).
+
+
+\e[1mBUGS\e[0m
+       The current implementations have been tested on a selection  of  common
+       cases but there are probably still many bugs.
+
+       There  are  typically built-in limits on the size of the argument-list,
+       which may also include the size of any structure arguments.
+
+       The decision whether a struct is to be returned in registers or in mem‐
+       ory considers only the struct's size and alignment. This is inaccurate:
+       for example, gcc on m68k-next returns \e[1mstruct { char a,b,c; } \e[22min  regis‐
+       ters  and \e[1mstruct { char a[3]; } \e[22min memory, although both types have the
+       same size and the same alignment.
+
+       The argument list can only be walked once.
+
+
+\e[1mNON-BUGS\e[0m
+       All information is passed in CPU registers and the stack. The  \e[1mcallback\e[0m
+       package is therefore multithread-safe.
+
+
+\e[1mPORTING\e[0m
+       Porting  \e[1mcallback  \e[22mconsists  in first porting the \e[1mvacall \e[22mand \e[1mtrampoline\e[0m
+       packages, then choosing a CPU register for  passing  the  closure  from
+       \e[1mtrampoline  \e[22mto  \e[1mvacall\e[22m.   This register is normally the register desig‐
+       nated by STATIC_CHAIN_REGNUM in the  gcc  source,  file  gcc-2.7.2/con‐
+       fig/\e[4mcpu\e[24m/\e[4mcpu\e[24m.h.
+
+
+\e[1mAUTHOR\e[0m
+       Bruno Haible <bruno@clisp.org>
+
+
+\e[1mACKNOWLEDGEMENTS\e[0m
+       Many ideas were cribbed from the gcc source.
+
+
+
+
+                                1 January 2017                     CALLBACK(3)
diff --git a/callback/elf-hack.txt b/callback/elf-hack.txt
new file mode 100644 (file)
index 0000000..9b5eee4
--- /dev/null
@@ -0,0 +1,53 @@
+Workaround against the ELF symbol resolving routine
+===================================================
+
+On Solaris 2.6 / i386, when the function being jumped to is an external symbol
+of a shared library, the jump actually points to an ELF indirect jump:
+  jmp *PTR
+where PTR initially contains the address of some resolving routine which
+will replace the PTR contents with the actual code address of the function
+and then jump to the function.
+Unfortunately, this resolving routine clobbers all three registers:
+%eax, %edx, %ecx. But %ecx is the register in which we pass the env_t
+(that points to function and data) to callback_receiver.
+
+The same effect is also seen on Linux / x86_64, where r10 is clobbered by the
+resolving routine (called '_dl_runtime_resolve' in glibc).
+See https://savannah.gnu.org/bugs/?32466 .
+
+The same thing can happen on all platforms that support ELF, since the
+lexical closure register is always a call-used register (see file
+call-used-registers.txt).
+
+On i386 (and m68k), it would be possible to solve this by passing the env_t
+as an extra argument on the stack and restore it to the lexical closure
+register at the beginning of callback_receiver. But this approach becomes too
+complex for the other CPUs.
+
+It is not possible to make a first call to callback_receiver to "straighten
+things out", because during this first call the lexical closure register gets
+clobbered and callback_receiver then invokes undefined behaviour.
+
+It may be possible to fix this, on some platforms,
+  - by use of "ld -r" to combine object files, so that the code in
+    trampoline_r.o can access callback_receiver directly, or
+  - by use of symbol visibility control, so that callback_receiver is
+    not an external symbol of the shared library any more, or
+  - by an appropriate use of dlsym().
+But this is highly platform dependent (linker, compiler, libc) and there may
+be some platforms for which none of these approaches works.
+
+A workaround that was implemented in January 2017 was to
+  1) modify trampoline_r so that it produces a trampoline that pushes the
+     env_t on the stack (preserving correct stack alignment) instead of
+     putting it in the lexical closure register,
+  2) insert a couple of instructions at the beginning of callback_receiver
+     that pops this value off the stack and puts in in the lexical closure
+     register.
+
+An even simpler workaround is to make callback_receiver a static function,
+so that the ELF linker does not even see it. Instead introduce a function
+callback_get_receiver that returns &callback_receiver. This function is global,
+but since it has a normal calling convention, the ELF symbol resolving routine
+does not cause trouble the first time callback_get_receiver() is invoked.
+
diff --git a/callback/minitests-c++.cc b/callback/minitests-c++.cc
new file mode 100644 (file)
index 0000000..1738e11
--- /dev/null
@@ -0,0 +1,18 @@
+/*
+ * Copyright 2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "minitests.c"
diff --git a/callback/minitests.c b/callback/minitests.c
new file mode 100644 (file)
index 0000000..b0f50fe
--- /dev/null
@@ -0,0 +1,19 @@
+/*
+ * Copyright 1999-2001 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#define SKIP_EXTRA_STRUCTS
+#include "tests.c"
diff --git a/callback/test1.c b/callback/test1.c
new file mode 100644 (file)
index 0000000..16625f2
--- /dev/null
@@ -0,0 +1,52 @@
+/* Trampoline test */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "config.h"  /* Define __${host_cpu}__ */
+
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "callback.h"
+
+#define MAGIC1  0x9db9af42
+#define MAGIC2  0xa2f9d045
+#define MAGIC3  0x7aff3cb4
+
+int f (int x)
+{
+  return x + MAGIC3;
+}
+
+void vf (void* data, va_alist alist)
+{
+  if (data != (void*)MAGIC1) { printf("wrong data\n"); exit(1); }
+  va_start_int(alist);
+ {int a = va_arg_int(alist);
+  int r = f(a);
+  va_return_int(alist, r);
+}}
+
+int main ()
+{
+  callback_t cf = alloc_callback(&vf, (void*)MAGIC1);
+  if ((*cf)(MAGIC2) == MAGIC2+MAGIC3)
+    { free_callback(cf); printf("Works, test1 passed.\n"); exit(0); }
+  else
+    { printf("Doesn't work!\n"); exit(1); }
+}
diff --git a/callback/tests.c b/callback/tests.c
new file mode 100644 (file)
index 0000000..4972c5b
--- /dev/null
@@ -0,0 +1,2386 @@
+/* Some random tests for vacall. */
+
+/*
+ * Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include "callback.h"
+
+#include "testcases.c"
+
+#if defined(__m68k__) && defined(__GNUC__)
+/* "gcc-2.6.3 -freg-struct-return" returns  T = struct { char c[3]; }  (which
+ * has size 4 !) in memory, in contrast to  struct { char a,b,c; }  and
+ * struct { char c[4]; }  and  struct { char a,b,c,d; }  which have the same
+ * size and the same alignment but are returned in registers. I don't know why.
+ */
+#define SKIP_T
+#endif
+#if defined(__sparc__) && defined(__sun) && defined(__SUNPRO_C) /* SUNWspro cc */
+/* SunPRO cc miscompiles the simulator function for X_BcdB: d.i[1] is
+ * temporarily stored in %l2 and put onto the stack from %l2, but in between
+ * the copy of X has used %l2 as a counter without saving and restoring its
+ * value.
+ */
+#define SKIP_X
+#endif
+#if defined(__mipsn32__) && !defined(__GNUC__)
+/* The X test crashes for an unknown reason. */
+#define SKIP_X
+#endif
+
+
+/* These functions simulate the behaviour of the functions defined in testcases.c. */
+
+/* void tests */
+void v_v_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&v_v) { fprintf(out,"wrong data for v_v\n"); exit(1); }
+  va_start_void(alist);
+  fprintf(out,"void f(void):\n");
+  fflush(out);
+  va_return_void(alist);
+}
+
+/* int tests */
+void i_v_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&i_v) { fprintf(out,"wrong data for i_v\n"); exit(1); }
+  va_start_int(alist);
+ {int r=99;
+  fprintf(out,"int f(void):");
+  fflush(out);
+  va_return_int(alist, r);
+}}
+void i_i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&i_i) { fprintf(out,"wrong data for i_i\n"); exit(1); }
+  va_start_int(alist);
+ {int a = va_arg_int(alist);
+  int r=a+1;
+  fprintf(out,"int f(int):(%d)",a);
+  fflush(out);
+  va_return_int(alist, r);
+}}
+void i_i2_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&i_i2) { fprintf(out,"wrong data for i_i2\n"); exit(1); }
+  va_start_int(alist);
+ {int a = va_arg_int(alist);
+  int b = va_arg_int(alist);
+  int r=a+b;
+  fprintf(out,"int f(2*int):(%d,%d)",a,b);
+  fflush(out);
+  va_return_int(alist, r);
+}}
+void i_i4_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&i_i4) { fprintf(out,"wrong data for i_i4\n"); exit(1); }
+  va_start_int(alist);
+ {int a = va_arg_int(alist);
+  int b = va_arg_int(alist);
+  int c = va_arg_int(alist);
+  int d = va_arg_int(alist);
+  int r=a+b+c+d;
+  fprintf(out,"int f(4*int):(%d,%d,%d,%d)",a,b,c,d);
+  fflush(out);
+  va_return_int(alist, r);
+}}
+void i_i8_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&i_i8) { fprintf(out,"wrong data for i_i8\n"); exit(1); }
+  va_start_int(alist);
+ {int a = va_arg_int(alist);
+  int b = va_arg_int(alist);
+  int c = va_arg_int(alist);
+  int d = va_arg_int(alist);
+  int e = va_arg_int(alist);
+  int f = va_arg_int(alist);
+  int g = va_arg_int(alist);
+  int h = va_arg_int(alist);
+  int r=a+b+c+d+e+f+g+h;
+  fprintf(out,"int f(8*int):(%d,%d,%d,%d,%d,%d,%d,%d)",a,b,c,d,e,f,g,h);
+  fflush(out);
+  va_return_int(alist, r);
+}}
+void i_i16_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&i_i16) { fprintf(out,"wrong data for i_i16\n"); exit(1); }
+  va_start_int(alist);
+ {int a = va_arg_int(alist);
+  int b = va_arg_int(alist);
+  int c = va_arg_int(alist);
+  int d = va_arg_int(alist);
+  int e = va_arg_int(alist);
+  int f = va_arg_int(alist);
+  int g = va_arg_int(alist);
+  int h = va_arg_int(alist);
+  int i = va_arg_int(alist);
+  int j = va_arg_int(alist);
+  int k = va_arg_int(alist);
+  int l = va_arg_int(alist);
+  int m = va_arg_int(alist);
+  int n = va_arg_int(alist);
+  int o = va_arg_int(alist);
+  int p = va_arg_int(alist);
+  int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p;
+  fprintf(out,"int f(16*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)",
+          a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p);
+  fflush(out);
+  va_return_int(alist, r);
+}}
+void i_i32_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&i_i32) { fprintf(out,"wrong data for i_i32\n"); exit(1); }
+  va_start_int(alist);
+ {int a = va_arg_int(alist);
+  int b = va_arg_int(alist);
+  int c = va_arg_int(alist);
+  int d = va_arg_int(alist);
+  int e = va_arg_int(alist);
+  int f = va_arg_int(alist);
+  int g = va_arg_int(alist);
+  int h = va_arg_int(alist);
+  int i = va_arg_int(alist);
+  int j = va_arg_int(alist);
+  int k = va_arg_int(alist);
+  int l = va_arg_int(alist);
+  int m = va_arg_int(alist);
+  int n = va_arg_int(alist);
+  int o = va_arg_int(alist);
+  int p = va_arg_int(alist);
+  int aa = va_arg_int(alist);
+  int ab = va_arg_int(alist);
+  int ac = va_arg_int(alist);
+  int ad = va_arg_int(alist);
+  int ae = va_arg_int(alist);
+  int af = va_arg_int(alist);
+  int ag = va_arg_int(alist);
+  int ah = va_arg_int(alist);
+  int ai = va_arg_int(alist);
+  int aj = va_arg_int(alist);
+  int ak = va_arg_int(alist);
+  int al = va_arg_int(alist);
+  int am = va_arg_int(alist);
+  int an = va_arg_int(alist);
+  int ao = va_arg_int(alist);
+  int ap = va_arg_int(alist);
+  int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+aa+ab+ac+ad+ae+af+ag+ah+ai+aj+ak+al+am+an+ao+ap;
+  fprintf(out,"int f(32*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)",
+          a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,aa,ab,ac,ad,ae,af,ag,ah,ai,aj,ak,al,am,an,ao,ap);
+  fflush(out);
+  va_return_int(alist, r);
+}}
+
+/* float tests */
+void f_f_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f) { fprintf(out,"wrong data for f_f\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float r=a+1.0;
+  fprintf(out,"float f(float):(%g)",a);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f2_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f2) { fprintf(out,"wrong data for f_f2\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float r=a+b;
+  fprintf(out,"float f(2*float):(%g,%g)",a,b);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f4_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f4) { fprintf(out,"wrong data for f_f4\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float c = va_arg_float(alist);
+  float d = va_arg_float(alist);
+  float r=a+b+c+d;
+  fprintf(out,"float f(4*float):(%g,%g,%g,%g)",a,b,c,d);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f8_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f8) { fprintf(out,"wrong data for f_f8\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float c = va_arg_float(alist);
+  float d = va_arg_float(alist);
+  float e = va_arg_float(alist);
+  float f = va_arg_float(alist);
+  float g = va_arg_float(alist);
+  float h = va_arg_float(alist);
+  float r=a+b+c+d+e+f+g+h;
+  fprintf(out,"float f(8*float):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f16_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f16) { fprintf(out,"wrong data for f_f16\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float c = va_arg_float(alist);
+  float d = va_arg_float(alist);
+  float e = va_arg_float(alist);
+  float f = va_arg_float(alist);
+  float g = va_arg_float(alist);
+  float h = va_arg_float(alist);
+  float i = va_arg_float(alist);
+  float j = va_arg_float(alist);
+  float k = va_arg_float(alist);
+  float l = va_arg_float(alist);
+  float m = va_arg_float(alist);
+  float n = va_arg_float(alist);
+  float o = va_arg_float(alist);
+  float p = va_arg_float(alist);
+  float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p;
+  fprintf(out,"float f(16*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f24_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f24) { fprintf(out,"wrong data for f_f24\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float c = va_arg_float(alist);
+  float d = va_arg_float(alist);
+  float e = va_arg_float(alist);
+  float f = va_arg_float(alist);
+  float g = va_arg_float(alist);
+  float h = va_arg_float(alist);
+  float i = va_arg_float(alist);
+  float j = va_arg_float(alist);
+  float k = va_arg_float(alist);
+  float l = va_arg_float(alist);
+  float m = va_arg_float(alist);
+  float n = va_arg_float(alist);
+  float o = va_arg_float(alist);
+  float p = va_arg_float(alist);
+  float q = va_arg_float(alist);
+  float s = va_arg_float(alist);
+  float t = va_arg_float(alist);
+  float u = va_arg_float(alist);
+  float v = va_arg_float(alist);
+  float w = va_arg_float(alist);
+  float x = va_arg_float(alist);
+  float y = va_arg_float(alist);
+  float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+v+w+x+y;
+  fprintf(out,"float f(24*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,v,w,x,y);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+
+/* double tests */
+void d_d_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d) { fprintf(out,"wrong data for d_d\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double r=a+1.0;
+  fprintf(out,"double f(double):(%g)",a);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_d2_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d2) { fprintf(out,"wrong data for d_d2\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  double r=a+b;
+  fprintf(out,"double f(2*double):(%g,%g)",a,b);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_d4_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d4) { fprintf(out,"wrong data for d_d4\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  double c = va_arg_double(alist);
+  double d = va_arg_double(alist);
+  double r=a+b+c+d;
+  fprintf(out,"double f(4*double):(%g,%g,%g,%g)",a,b,c,d);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_d8_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d8) { fprintf(out,"wrong data for d_d8\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  double c = va_arg_double(alist);
+  double d = va_arg_double(alist);
+  double e = va_arg_double(alist);
+  double f = va_arg_double(alist);
+  double g = va_arg_double(alist);
+  double h = va_arg_double(alist);
+  double r=a+b+c+d+e+f+g+h;
+  fprintf(out,"double f(8*double):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_d16_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d16) { fprintf(out,"wrong data for d_d16\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  double c = va_arg_double(alist);
+  double d = va_arg_double(alist);
+  double e = va_arg_double(alist);
+  double f = va_arg_double(alist);
+  double g = va_arg_double(alist);
+  double h = va_arg_double(alist);
+  double i = va_arg_double(alist);
+  double j = va_arg_double(alist);
+  double k = va_arg_double(alist);
+  double l = va_arg_double(alist);
+  double m = va_arg_double(alist);
+  double n = va_arg_double(alist);
+  double o = va_arg_double(alist);
+  double p = va_arg_double(alist);
+  double r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p;
+  fprintf(out,"double f(16*double):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+
+/* pointer tests */
+void vp_vpdpcpsp_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&vp_vpdpcpsp) { fprintf(out,"wrong data for vp_vpdpcpsp\n"); exit(1); }
+  va_start_ptr(alist, void*);
+ {void* a = va_arg_ptr(alist, void*);
+  double* b = va_arg_ptr(alist, double*);
+  char* c = va_arg_ptr(alist, char*);
+  Int* d = va_arg_ptr(alist, Int*);
+  void* ret = (char*)b + 1;
+  fprintf(out,"void* f(void*,double*,char*,Int*):(0x%p,0x%p,0x%p,0x%p)",a,b,c,d);
+  fflush(out);
+  va_return_ptr(alist, void*, ret);
+}}
+
+/* mixed number tests */
+void uc_ucsil_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&uc_ucsil) { fprintf(out,"wrong data for uc_ucsil\n"); exit(1); }
+  va_start_uchar(alist);
+ {uchar a = va_arg_uchar(alist);
+  ushort b = va_arg_ushort(alist);
+  uint c = va_arg_uint(alist);
+  ulong d = va_arg_ulong(alist);
+  uchar r = (uchar)-1;
+  fprintf(out,"uchar f(uchar,ushort,uint,ulong):(%u,%u,%u,%lu)",a,b,c,d);
+  fflush(out);
+  va_return_uchar(alist, r);
+}}
+void d_iidd_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_iidd) { fprintf(out,"wrong data for d_iidd\n"); exit(1); }
+  va_start_double(alist);
+ {int a = va_arg_int(alist);
+  int b = va_arg_int(alist);
+  double c = va_arg_double(alist);
+  double d = va_arg_double(alist);
+  double r=a+b+c+d;
+  fprintf(out,"double f(int,int,double,double):(%d,%d,%g,%g)",a,b,c,d);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_iiidi_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_iiidi) { fprintf(out,"wrong data for d_iiidi\n"); exit(1); }
+  va_start_double(alist);
+ {int a = va_arg_int(alist);
+  int b = va_arg_int(alist);
+  int c = va_arg_int(alist);
+  double d = va_arg_double(alist);
+  int e = va_arg_int(alist);
+  double r=a+b+c+d+e;
+  fprintf(out,"double f(int,int,int,double,int):(%d,%d,%d,%g,%d)",a,b,c,d,e);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_idid_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_idid) { fprintf(out,"wrong data for d_idid\n"); exit(1); }
+  va_start_double(alist);
+ {int a = va_arg_int(alist);
+  double b = va_arg_double(alist);
+  int c = va_arg_int(alist);
+  double d = va_arg_double(alist);
+  double r=a+b+c+d;
+  fprintf(out,"double f(int,double,int,double):(%d,%g,%d,%g)",a,b,c,d);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_fdi_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_fdi) { fprintf(out,"wrong data for d_fdi\n"); exit(1); }
+  va_start_double(alist);
+ {float a = va_arg_float(alist);
+  double b = va_arg_double(alist);
+  int c = va_arg_int(alist);
+  double r=a+b+c;
+  fprintf(out,"double f(float,double,int):(%g,%g,%d)",a,b,c);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void us_cdcd_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&us_cdcd) { fprintf(out,"wrong data for us_cdcd\n"); exit(1); }
+  va_start_ushort(alist);
+ {char a = va_arg_char(alist);
+  double b = va_arg_double(alist);
+  char c = va_arg_char(alist);
+  double d = va_arg_double(alist);
+  ushort r = (ushort)(a + b + c + d);
+  fprintf(out,"ushort f(char,double,char,double):('%c',%g,'%c',%g)",a,b,c,d);
+  fflush(out);
+  va_return_ushort(alist, r);
+}}
+void ll_iiilli_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&ll_iiilli) { fprintf(out,"wrong data for ll_iiilli\n"); exit(1); }
+  va_start_longlong(alist);
+ {int a = va_arg_int(alist);
+  int b = va_arg_int(alist);
+  int c = va_arg_int(alist);
+  long long d = va_arg_longlong(alist);
+  int e = va_arg_int(alist);
+  long long r = (long long)(int)a + (long long)(int)b + (long long)(int)c + d + (long long)e;
+  fprintf(out,"long long f(int,int,int,long long,int):(%d,%d,%d,0x%lx%08lx,%d)",a,b,c,(long)(d>>32),(long)(d&0xffffffff),e);
+  fflush(out);
+  va_return_longlong(alist, r);
+}}
+void ll_flli_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&ll_flli) { fprintf(out,"wrong data for ll_flli\n"); exit(1); }
+  va_start_longlong(alist);
+ {float a = va_arg_float(alist);
+  long long b = va_arg_longlong(alist);
+  int c = va_arg_int(alist);
+  long long r = (long long)(int)a + b + (long long)c;
+  fprintf(out,"long long f(float,long long,int):(%g,0x%lx%08lx,0x%lx)",a,(long)(b>>32),(long)(b&0xffffffff),(long)c);
+  fflush(out);
+  va_return_longlong(alist, r);
+}}
+void f_fi_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_fi) { fprintf(out,"wrong data for f_fi\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  int z = va_arg_int(alist);
+  float r=a+z;
+  fprintf(out,"float f(float,int):(%g,%d)",a,z);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f2i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f2i) { fprintf(out,"wrong data for f_f2i\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  int z = va_arg_int(alist);
+  float r=a+b+z;
+  fprintf(out,"float f(2*float,int):(%g,%g,%d)",a,b,z);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f3i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f3i) { fprintf(out,"wrong data for f_f3i\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float c = va_arg_float(alist);
+  int z = va_arg_int(alist);
+  float r=a+b+c+z;
+  fprintf(out,"float f(3*float,int):(%g,%g,%g,%d)",a,b,c,z);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f4i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f4i) { fprintf(out,"wrong data for f_f4i\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float c = va_arg_float(alist);
+  float d = va_arg_float(alist);
+  int z = va_arg_int(alist);
+  float r=a+b+c+d+z;
+  fprintf(out,"float f(4*float,int):(%g,%g,%g,%g,%d)",a,b,c,d,z);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f7i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f7i) { fprintf(out,"wrong data for f_f7i\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float c = va_arg_float(alist);
+  float d = va_arg_float(alist);
+  float e = va_arg_float(alist);
+  float f = va_arg_float(alist);
+  float g = va_arg_float(alist);
+  int z = va_arg_int(alist);
+  float r=a+b+c+d+e+f+g+z;
+  fprintf(out,"float f(7*float,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f8i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f8i) { fprintf(out,"wrong data for f_f8i\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float c = va_arg_float(alist);
+  float d = va_arg_float(alist);
+  float e = va_arg_float(alist);
+  float f = va_arg_float(alist);
+  float g = va_arg_float(alist);
+  float h = va_arg_float(alist);
+  int z = va_arg_int(alist);
+  float r=a+b+c+d+e+f+g+h+z;
+  fprintf(out,"float f(8*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f12i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f12i) { fprintf(out,"wrong data for f_f12i\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float c = va_arg_float(alist);
+  float d = va_arg_float(alist);
+  float e = va_arg_float(alist);
+  float f = va_arg_float(alist);
+  float g = va_arg_float(alist);
+  float h = va_arg_float(alist);
+  float i = va_arg_float(alist);
+  float j = va_arg_float(alist);
+  float k = va_arg_float(alist);
+  float l = va_arg_float(alist);
+  int z = va_arg_int(alist);
+  float r=a+b+c+d+e+f+g+h+i+j+k+l+z;
+  fprintf(out,"float f(12*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void f_f13i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f13i) { fprintf(out,"wrong data for f_f13i\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float c = va_arg_float(alist);
+  float d = va_arg_float(alist);
+  float e = va_arg_float(alist);
+  float f = va_arg_float(alist);
+  float g = va_arg_float(alist);
+  float h = va_arg_float(alist);
+  float i = va_arg_float(alist);
+  float j = va_arg_float(alist);
+  float k = va_arg_float(alist);
+  float l = va_arg_float(alist);
+  float m = va_arg_float(alist);
+  int z = va_arg_int(alist);
+  float r=a+b+c+d+e+f+g+h+i+j+k+l+m+z;
+  fprintf(out,"float f(13*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void d_di_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_di) { fprintf(out,"wrong data for d_di\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  int z = va_arg_int(alist);
+  double r=a+z;
+  fprintf(out,"double f(double,int):(%g,%d)",a,z);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_d2i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d2i) { fprintf(out,"wrong data for d_d2i\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  int z = va_arg_int(alist);
+  double r=a+b+z;
+  fprintf(out,"double f(2*double,int):(%g,%g,%d)",a,b,z);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_d3i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d3i) { fprintf(out,"wrong data for d_d3i\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  double c = va_arg_double(alist);
+  int z = va_arg_int(alist);
+  double r=a+b+c+z;
+  fprintf(out,"double f(3*double,int):(%g,%g,%g,%d)",a,b,c,z);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_d4i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d4i) { fprintf(out,"wrong data for d_d4i\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  double c = va_arg_double(alist);
+  double d = va_arg_double(alist);
+  int z = va_arg_int(alist);
+  double r=a+b+c+d+z;
+  fprintf(out,"double f(4*double,int):(%g,%g,%g,%g,%d)",a,b,c,d,z);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_d7i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d7i) { fprintf(out,"wrong data for d_d7i\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  double c = va_arg_double(alist);
+  double d = va_arg_double(alist);
+  double e = va_arg_double(alist);
+  double f = va_arg_double(alist);
+  double g = va_arg_double(alist);
+  int z = va_arg_int(alist);
+  double r=a+b+c+d+e+f+g+z;
+  fprintf(out,"double f(7*double,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_d8i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d8i) { fprintf(out,"wrong data for d_d8i\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  double c = va_arg_double(alist);
+  double d = va_arg_double(alist);
+  double e = va_arg_double(alist);
+  double f = va_arg_double(alist);
+  double g = va_arg_double(alist);
+  double h = va_arg_double(alist);
+  int z = va_arg_int(alist);
+  double r=a+b+c+d+e+f+g+h+z;
+  fprintf(out,"double f(8*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_d12i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d12i) { fprintf(out,"wrong data for d_d12i\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  double c = va_arg_double(alist);
+  double d = va_arg_double(alist);
+  double e = va_arg_double(alist);
+  double f = va_arg_double(alist);
+  double g = va_arg_double(alist);
+  double h = va_arg_double(alist);
+  double i = va_arg_double(alist);
+  double j = va_arg_double(alist);
+  double k = va_arg_double(alist);
+  double l = va_arg_double(alist);
+  int z = va_arg_int(alist);
+  double r=a+b+c+d+e+f+g+h+i+j+k+l+z;
+  fprintf(out,"double f(12*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_d13i_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d13i) { fprintf(out,"wrong data for d_d13i\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  double c = va_arg_double(alist);
+  double d = va_arg_double(alist);
+  double e = va_arg_double(alist);
+  double f = va_arg_double(alist);
+  double g = va_arg_double(alist);
+  double h = va_arg_double(alist);
+  double i = va_arg_double(alist);
+  double j = va_arg_double(alist);
+  double k = va_arg_double(alist);
+  double l = va_arg_double(alist);
+  double m = va_arg_double(alist);
+  int z = va_arg_int(alist);
+  double r=a+b+c+d+e+f+g+h+i+j+k+l+m+z;
+  fprintf(out,"double f(13*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+
+/* small structure return tests */
+void S1_v_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&S1_v) { fprintf(out,"wrong data for S1_v\n"); exit(1); }
+ {Size1 r;
+  va_start_struct(alist, Size1, 1);
+  r = Size1_1;
+  fprintf(out,"Size1 f(void):");
+  fflush(out);
+  va_return_struct(alist, Size1, r);
+}}
+void S2_v_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&S2_v) { fprintf(out,"wrong data for S2_v\n"); exit(1); }
+ {Size2 r;
+  va_start_struct(alist, Size2, 1);
+  r = Size2_1;
+  fprintf(out,"Size2 f(void):");
+  fflush(out);
+  va_return_struct(alist, Size2, r);
+}}
+void S3_v_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&S3_v) { fprintf(out,"wrong data for S3_v\n"); exit(1); }
+ {Size3 r;
+  va_start_struct(alist, Size3, 1);
+  r = Size3_1;
+  fprintf(out,"Size3 f(void):");
+  fflush(out);
+  va_return_struct(alist, Size3, r);
+}}
+void S4_v_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&S4_v) { fprintf(out,"wrong data for S4_v\n"); exit(1); }
+ {Size4 r;
+  va_start_struct(alist, Size4, 1);
+  r = Size4_1;
+  fprintf(out,"Size4 f(void):");
+  fflush(out);
+  va_return_struct(alist, Size4, r);
+}}
+void S7_v_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&S7_v) { fprintf(out,"wrong data for S7_v\n"); exit(1); }
+ {Size7 r;
+  va_start_struct(alist, Size7, 1);
+  r = Size7_1;
+  fprintf(out,"Size7 f(void):");
+  fflush(out);
+  va_return_struct(alist, Size7, r);
+}}
+void S8_v_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&S8_v) { fprintf(out,"wrong data for S8_v\n"); exit(1); }
+ {Size8 r;
+  va_start_struct(alist, Size8, 1);
+  r = Size8_1;
+  fprintf(out,"Size8 f(void):");
+  fflush(out);
+  va_return_struct(alist, Size8, r);
+}}
+void S12_v_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&S12_v) { fprintf(out,"wrong data for S12_v\n"); exit(1); }
+ {Size12 r;
+  va_start_struct(alist, Size12, 1);
+  r = Size12_1;
+  fprintf(out,"Size12 f(void):");
+  fflush(out);
+  va_return_struct(alist, Size12, r);
+}}
+void S15_v_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&S15_v) { fprintf(out,"wrong data for S15_v\n"); exit(1); }
+ {Size15 r;
+  va_start_struct(alist, Size15, 1);
+  r = Size15_1;
+  fprintf(out,"Size15 f(void):");
+  fflush(out);
+  va_return_struct(alist, Size15, r);
+}}
+void S16_v_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&S16_v) { fprintf(out,"wrong data for S16_v\n"); exit(1); }
+ {Size16 r;
+  va_start_struct(alist, Size16, 1);
+  r = Size16_1;
+  fprintf(out,"Size16 f(void):");
+  fflush(out);
+  va_return_struct(alist, Size16, r);
+}}
+
+/* structure tests */
+void I_III_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&I_III) { fprintf(out,"wrong data for I_III\n"); exit(1); }
+ {Int a;
+  Int b;
+  Int c;
+  Int r;
+  va_start_struct(alist, Int, 1);
+  a = va_arg_struct(alist, Int);
+  b = va_arg_struct(alist, Int);
+  c = va_arg_struct(alist, Int);
+  r.x = a.x + b.x + c.x;
+  fprintf(out,"Int f(Int,Int,Int):({%d},{%d},{%d})",a.x,b.x,c.x);
+  fflush(out);
+  va_return_struct(alist, Int, r);
+}}
+#ifndef SKIP_EXTRA_STRUCTS
+void C_CdC_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&C_CdC) { fprintf(out,"wrong data for C_CdC\n"); exit(1); }
+ {Char a;
+  double b;
+  Char c;
+  Char r;
+  va_start_struct(alist, Char, 1);
+  a = va_arg_struct(alist, Char);
+  b = va_arg_double(alist);
+  c = va_arg_struct(alist, Char);
+  r.x = (a.x + c.x)/2;
+  fprintf(out,"Char f(Char,double,Char):({'%c'},%g,{'%c'})",a.x,b,c.x);
+  fflush(out);
+  va_return_struct(alist, Char, r);
+}}
+void F_Ffd_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&F_Ffd) { fprintf(out,"wrong data for F_Ffd\n"); exit(1); }
+ {Float a;
+  float b;
+  double c;
+  Float r;
+  va_start_struct(alist, Float, va_word_splittable_1(float));
+  a = va_arg_struct(alist, Float);
+  b = va_arg_float(alist);
+  c = va_arg_double(alist);
+  r.x = a.x + b + c;
+  fprintf(out,"Float f(Float,float,double):({%g},%g,%g)",a.x,b,c);
+  fflush(out);
+  va_return_struct(alist, Float, r);
+}}
+void D_fDd_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&D_fDd) { fprintf(out,"wrong data for D_fDd\n"); exit(1); }
+ {float a;
+  Double b;
+  double c;
+  Double r;
+  va_start_struct(alist, Double, va_word_splittable_1(double));
+  a = va_arg_float(alist);
+  b = va_arg_struct(alist, Double);
+  c = va_arg_double(alist);
+  r.x = a + b.x + c;
+  fprintf(out,"Double f(float,Double,double):(%g,{%g},%g)",a,b.x,c);
+  fflush(out);
+  va_return_struct(alist, Double, r);
+}}
+void D_Dfd_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&D_Dfd) { fprintf(out,"wrong data for D_Dfd\n"); exit(1); }
+ {Double a;
+  float b;
+  double c;
+  Double r;
+  va_start_struct(alist, Double, va_word_splittable_1(double));
+  a = va_arg_struct(alist, Double);
+  b = va_arg_float(alist);
+  c = va_arg_double(alist);
+  r.x = a.x + b + c;
+  fprintf(out,"Double f(Double,float,double):({%g},%g,%g)",a.x,b,c);
+  fflush(out);
+  va_return_struct(alist, Double, r);
+}}
+#endif
+void J_JiJ_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&J_JiJ) { fprintf(out,"wrong data for J_JiJ\n"); exit(1); }
+ {J a;
+  int b;
+  J c;
+  J r;
+  va_start_struct(alist, J, va_word_splittable_2(long,long));
+  a = va_arg_struct(alist, J);
+  b = va_arg_int(alist);
+  c = va_arg_struct(alist, J);
+  r.l1 = a.l1+c.l1; r.l2 = a.l2+b+c.l2;
+  fprintf(out,"J f(J,int,J):({%ld,%ld},%d,{%ld,%ld})",a.l1,a.l2,b,c.l1,c.l2);
+  fflush(out);
+  va_return_struct(alist, J, r);
+}}
+#ifndef SKIP_EXTRA_STRUCTS
+void T_TcT_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&T_TcT) { fprintf(out,"wrong data for T_TcT\n"); exit(1); }
+ {T a;
+  char b;
+  T c;
+  T r;
+  va_start_struct(alist, T, 1);
+  a = va_arg_struct(alist, T);
+  b = va_arg_char(alist);
+  c = va_arg_struct(alist, T);
+  r.c[0]='b'; r.c[1]=c.c[1]; r.c[2]=c.c[2];
+  fprintf(out,"T f(T,char,T):({\"%c%c%c\"},'%c',{\"%c%c%c\"})",a.c[0],a.c[1],a.c[2],b,c.c[0],c.c[1],c.c[2]);
+  fflush(out);
+  va_return_struct(alist, T, r);
+}}
+void X_BcdB_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&X_BcdB) { fprintf(out,"wrong data for X_BcdB\n"); exit(1); }
+ {B a;
+  char b;
+  double c;
+  B d;
+  static X xr={"return val",'R'};
+  X r;
+  va_start_struct(alist, X, 0);
+  a = va_arg_struct(alist, B);
+  b = va_arg_char(alist);
+  c = va_arg_double(alist);
+  d = va_arg_struct(alist, B);
+  r = xr;
+  r.c1 = b;
+  fprintf(out,"X f(B,char,double,B):({%g,{%d,%d,%d}},'%c',%g,{%g,{%d,%d,%d}})",
+          a.d,a.i[0],a.i[1],a.i[2],b,c,d.d,d.i[0],d.i[1],d.i[2]);
+  fflush(out);
+  va_return_struct(alist, X, r);
+}}
+#endif
+
+/* gpargs boundary tests */
+void l_l0J_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l0J) { fprintf(out,"wrong data for l_l0J\n"); exit(1); }
+  va_start_long(alist);
+ {J b = va_arg_struct(alist, J);
+  long c = va_arg_long(alist);
+  long r = b.l1 + b.l2 + c;
+  fprintf(out,"long f(J,long):(%ld,%ld,%ld)",b.l1,b.l2,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l1J_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l1J) { fprintf(out,"wrong data for l_l1J\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  J b = va_arg_struct(alist, J);
+  long c = va_arg_long(alist);
+  long r = a1 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(long,J,long):(%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l2J_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l2J) { fprintf(out,"wrong data for l_l2J\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  J b = va_arg_struct(alist, J);
+  long c = va_arg_long(alist);
+  long r = a1 + a2 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(2*long,J,long):(%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l3J_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l3J) { fprintf(out,"wrong data for l_l3J\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  J b = va_arg_struct(alist, J);
+  long c = va_arg_long(alist);
+  long r = a1 + a2 + a3 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(3*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l4J_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l4J) { fprintf(out,"wrong data for l_l4J\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  J b = va_arg_struct(alist, J);
+  long c = va_arg_long(alist);
+  long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(4*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l5J_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l5J) { fprintf(out,"wrong data for l_l5J\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long a5 = va_arg_long(alist);
+  J b = va_arg_struct(alist, J);
+  long c = va_arg_long(alist);
+  long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(5*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l6J_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l6J) { fprintf(out,"wrong data for l_l6J\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long a5 = va_arg_long(alist);
+  long a6 = va_arg_long(alist);
+  J b = va_arg_struct(alist, J);
+  long c = va_arg_long(alist);
+  long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(6*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l7J_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l7J) { fprintf(out,"wrong data for l_l7J\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long a5 = va_arg_long(alist);
+  long a6 = va_arg_long(alist);
+  long a7 = va_arg_long(alist);
+  J b = va_arg_struct(alist, J);
+  long c = va_arg_long(alist);
+  long r = a1 + a2 + a3 + a4 + a5 + a6 + a7 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(7*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,a7,b.l1,b.l2,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l0K_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l0K) { fprintf(out,"wrong data for l_l0K\n"); exit(1); }
+  va_start_long(alist);
+ {K b = va_arg_struct(alist, K);
+  long c = va_arg_long(alist);
+  long r = b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(K,long):(%ld,%ld,%ld,%ld,%ld)",b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l1K_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l1K) { fprintf(out,"wrong data for l_l1K\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  K b = va_arg_struct(alist, K);
+  long c = va_arg_long(alist);
+  long r = a1 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l2K_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l2K) { fprintf(out,"wrong data for l_l2K\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  K b = va_arg_struct(alist, K);
+  long c = va_arg_long(alist);
+  long r = a1 + a2 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(2*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l3K_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l3K) { fprintf(out,"wrong data for l_l3K\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  K b = va_arg_struct(alist, K);
+  long c = va_arg_long(alist);
+  long r = a1 + a2 + a3 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(3*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l4K_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l4K) { fprintf(out,"wrong data for l_l4K\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  K b = va_arg_struct(alist, K);
+  long c = va_arg_long(alist);
+  long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(4*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l5K_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l5K) { fprintf(out,"wrong data for l_l5K\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long a5 = va_arg_long(alist);
+  K b = va_arg_struct(alist, K);
+  long c = va_arg_long(alist);
+  long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(5*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void l_l6K_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&l_l6K) { fprintf(out,"wrong data for l_l6K\n"); exit(1); }
+  va_start_long(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long a5 = va_arg_long(alist);
+  long a6 = va_arg_long(alist);
+  K b = va_arg_struct(alist, K);
+  long c = va_arg_long(alist);
+  long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(6*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  va_return_long(alist, r);
+}}
+void f_f17l3L_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&f_f17l3L) { fprintf(out,"wrong data for f_f17l3L\n"); exit(1); }
+  va_start_float(alist);
+ {float a = va_arg_float(alist);
+  float b = va_arg_float(alist);
+  float c = va_arg_float(alist);
+  float d = va_arg_float(alist);
+  float e = va_arg_float(alist);
+  float f = va_arg_float(alist);
+  float g = va_arg_float(alist);
+  float h = va_arg_float(alist);
+  float i = va_arg_float(alist);
+  float j = va_arg_float(alist);
+  float k = va_arg_float(alist);
+  float l = va_arg_float(alist);
+  float m = va_arg_float(alist);
+  float n = va_arg_float(alist);
+  float o = va_arg_float(alist);
+  float p = va_arg_float(alist);
+  float q = va_arg_float(alist);
+  long s = va_arg_long(alist);
+  long t = va_arg_long(alist);
+  long u = va_arg_long(alist);
+  L z = va_arg_struct(alist, L);
+  float r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6;
+  fprintf(out,"float f(17*float,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6);
+  fflush(out);
+  va_return_float(alist, r);
+}}
+void d_d17l3L_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_d17l3L) { fprintf(out,"wrong data for d_d17l3L\n"); exit(1); }
+  va_start_double(alist);
+ {double a = va_arg_double(alist);
+  double b = va_arg_double(alist);
+  double c = va_arg_double(alist);
+  double d = va_arg_double(alist);
+  double e = va_arg_double(alist);
+  double f = va_arg_double(alist);
+  double g = va_arg_double(alist);
+  double h = va_arg_double(alist);
+  double i = va_arg_double(alist);
+  double j = va_arg_double(alist);
+  double k = va_arg_double(alist);
+  double l = va_arg_double(alist);
+  double m = va_arg_double(alist);
+  double n = va_arg_double(alist);
+  double o = va_arg_double(alist);
+  double p = va_arg_double(alist);
+  double q = va_arg_double(alist);
+  long s = va_arg_long(alist);
+  long t = va_arg_long(alist);
+  long u = va_arg_long(alist);
+  L z = va_arg_struct(alist, L);
+  double r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6;
+  fprintf(out,"double f(17*double,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void ll_l2ll_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&ll_l2ll) { fprintf(out,"wrong data for ll_l2ll\n"); exit(1); }
+  va_start_longlong(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long long b = va_arg_longlong(alist);
+  long c = va_arg_long(alist);
+  long long r = (long long) (a1 + a2) + b + c;
+  fprintf(out,"long long f(2*long,long long,long):(%ld,%ld,0x%lx%08lx,%ld)",a1,a2,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  va_return_longlong(alist, r);
+}}
+void ll_l3ll_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&ll_l3ll) { fprintf(out,"wrong data for ll_l3ll\n"); exit(1); }
+  va_start_longlong(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long long b = va_arg_longlong(alist);
+  long c = va_arg_long(alist);
+  long long r = (long long) (a1 + a2 + a3) + b + c;
+  fprintf(out,"long long f(3*long,long long,long):(%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  va_return_longlong(alist, r);
+}}
+void ll_l4ll_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&ll_l4ll) { fprintf(out,"wrong data for ll_l4ll\n"); exit(1); }
+  va_start_longlong(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long long b = va_arg_longlong(alist);
+  long c = va_arg_long(alist);
+  long long r = (long long) (a1 + a2 + a3 + a4) + b + c;
+  fprintf(out,"long long f(4*long,long long,long):(%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  va_return_longlong(alist, r);
+}}
+void ll_l5ll_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&ll_l5ll) { fprintf(out,"wrong data for ll_l5ll\n"); exit(1); }
+  va_start_longlong(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long a5 = va_arg_long(alist);
+  long long b = va_arg_longlong(alist);
+  long c = va_arg_long(alist);
+  long long r = (long long) (a1 + a2 + a3 + a4 + a5) + b + c;
+  fprintf(out,"long long f(5*long,long long,long):(%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  va_return_longlong(alist, r);
+}}
+void ll_l6ll_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&ll_l6ll) { fprintf(out,"wrong data for ll_l6ll\n"); exit(1); }
+  va_start_longlong(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long a5 = va_arg_long(alist);
+  long a6 = va_arg_long(alist);
+  long long b = va_arg_longlong(alist);
+  long c = va_arg_long(alist);
+  long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6) + b + c;
+  fprintf(out,"long long f(6*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  va_return_longlong(alist, r);
+}}
+void ll_l7ll_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&ll_l7ll) { fprintf(out,"wrong data for ll_l7ll\n"); exit(1); }
+  va_start_longlong(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long a5 = va_arg_long(alist);
+  long a6 = va_arg_long(alist);
+  long a7 = va_arg_long(alist);
+  long long b = va_arg_longlong(alist);
+  long c = va_arg_long(alist);
+  long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c;
+  fprintf(out,"long long f(7*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,a7,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  va_return_longlong(alist, r);
+}}
+void d_l2d_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_l2d) { fprintf(out,"wrong data for d_l2d\n"); exit(1); }
+  va_start_double(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  double b = va_arg_double(alist);
+  long c = va_arg_long(alist);
+  double r = (double) (a1 + a2) + b + c;
+  fprintf(out,"double f(2*long,double,long):(%ld,%ld,%g,%ld)",a1,a2,b,c);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_l3d_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_l3d) { fprintf(out,"wrong data for d_l3d\n"); exit(1); }
+  va_start_double(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  double b = va_arg_double(alist);
+  long c = va_arg_long(alist);
+  double r = (double) (a1 + a2 + a3) + b + c;
+  fprintf(out,"double f(3*long,double,long):(%ld,%ld,%ld,%g,%ld)",a1,a2,a3,b,c);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_l4d_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_l4d) { fprintf(out,"wrong data for d_l4d\n"); exit(1); }
+  va_start_double(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  double b = va_arg_double(alist);
+  long c = va_arg_long(alist);
+  double r = (double) (a1 + a2 + a3 + a4) + b + c;
+  fprintf(out,"double f(4*long,double,long):(%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,b,c);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_l5d_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_l5d) { fprintf(out,"wrong data for d_l5d\n"); exit(1); }
+  va_start_double(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long a5 = va_arg_long(alist);
+  double b = va_arg_double(alist);
+  long c = va_arg_long(alist);
+  double r = (double) (a1 + a2 + a3 + a4 + a5) + b + c;
+  fprintf(out,"double f(5*long,double,long):(%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,b,c);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_l6d_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_l6d) { fprintf(out,"wrong data for d_l6d\n"); exit(1); }
+  va_start_double(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long a5 = va_arg_long(alist);
+  long a6 = va_arg_long(alist);
+  double b = va_arg_double(alist);
+  long c = va_arg_long(alist);
+  double r = (double) (a1 + a2 + a3 + a4 + a5 + a6) + b + c;
+  fprintf(out,"double f(6*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,b,c);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void d_l7d_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&d_l7d) { fprintf(out,"wrong data for d_l7d\n"); exit(1); }
+  va_start_double(alist);
+ {long a1 = va_arg_long(alist);
+  long a2 = va_arg_long(alist);
+  long a3 = va_arg_long(alist);
+  long a4 = va_arg_long(alist);
+  long a5 = va_arg_long(alist);
+  long a6 = va_arg_long(alist);
+  long a7 = va_arg_long(alist);
+  double b = va_arg_double(alist);
+  long c = va_arg_long(alist);
+  double r = (double) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c;
+  fprintf(out,"double f(7*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,a7,b,c);
+  fflush(out);
+  va_return_double(alist, r);
+}}
+void v_clobber_K_simulator (void* data, va_alist alist)
+{
+  if (data != (void*)&v_clobber_K) { fprintf(out,"wrong data for v_clobber_K\n"); exit(1); }
+  va_start_void(alist);
+ {K k = va_arg_struct(alist, K);
+  k.l1 += 1;
+  k.l2 += 10;
+  k.l3 += 100;
+  k.l4 += 1000;
+  va_return_void(alist);
+}}
+
+
+/*
+ * The way we run these tests - first call the function directly, then
+ * through vacall() - there is the danger that arguments or results seem
+ * to be passed correctly, but what we are seeing are in fact the vestiges
+ * (traces) or the previous call. This may seriously fake the test.
+ * Avoid this by clearing the registers between the first and the second call.
+ */
+long clear_traces_i (long a, long b, long c, long d, long e, long f, long g, long h,
+                     long i, long j, long k, long l, long m, long n, long o, long p)
+{ return 0; }
+float clear_traces_f (float a, float b, float c, float d, float e, float f, float g,
+                      float h, float i, float j, float k, float l, float m, float n,
+                      float o, float p)
+{ return 0.0; }
+double clear_traces_d (double a, double b, double c, double d, double e, double f, double g,
+                       double h, double i, double j, double k, double l, double m, double n,
+                       double o, double p)
+{ return 0.0; }
+J clear_traces_J (void)
+{ J j; j.l1 = j.l2 = 0; return j; }
+void clear_traces (void)
+{ clear_traces_i(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0);
+  clear_traces_f(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0);
+  clear_traces_d(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0);
+  clear_traces_J();
+}
+
+int main (void)
+{
+  callback_t callback;
+
+  out = stdout;
+
+  /* void tests */
+  v_v();
+  clear_traces();
+  callback = alloc_callback(&v_v_simulator,(void*)&v_v);
+  ((void (*) (void)) callback) ();
+
+  /* int tests */
+  { int ir;
+
+    ir = i_v();
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    callback = alloc_callback(&i_v_simulator,(void*)&i_v);
+    ir = ((int (*) (void)) callback) ();
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i(i1);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    callback = alloc_callback(&i_i_simulator,(void*)&i_i);
+    ir = ((int (*) (int)) callback) (i1);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i2(i1,i2);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    callback = alloc_callback(&i_i2_simulator,(void*)&i_i2);
+    ir = ((int (*) (int,int)) callback) (i1,i2);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i4(i1,i2,i3,i4);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    callback = alloc_callback(&i_i4_simulator,(void*)&i_i4);
+    ir = ((int (*) (int,int,int,int)) callback) (i1,i2,i3,i4);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i8(i1,i2,i3,i4,i5,i6,i7,i8);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    callback = alloc_callback(&i_i8_simulator,(void*)&i_i8);
+    ir = ((int (*) (int,int,int,int,int,int,int,int)) callback) (i1,i2,i3,i4,i5,i6,i7,i8);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i16(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    callback = alloc_callback(&i_i16_simulator,(void*)&i_i16);
+    ir = ((int (*) (int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int)) callback) (i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i32(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16,i17,i18,i19,i20,i21,i22,i23,i24,i25,i26,i27,i28,i29,i30,i31,i32);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    callback = alloc_callback(&i_i32_simulator,(void*)&i_i32);
+    ir = ((int (*) (int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int)) callback) (i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16,i17,i18,i19,i20,i21,i22,i23,i24,i25,i26,i27,i28,i29,i30,i31,i32);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+  }
+
+  /* float tests */
+  { float fr;
+
+    fr = f_f(f1);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f_simulator,(void*)&f_f);
+    fr = ((float (*) (float)) callback) (f1);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f2(f1,f2);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f2_simulator,(void*)&f_f2);
+    fr = ((float (*) (float,float)) callback) (f1,f2);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f4(f1,f2,f3,f4);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f4_simulator,(void*)&f_f4);
+    fr = ((float (*) (float,float,float,float)) callback) (f1,f2,f3,f4);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f8(f1,f2,f3,f4,f5,f6,f7,f8);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f8_simulator,(void*)&f_f8);
+    fr = ((float (*) (float,float,float,float,float,float,float,float)) callback) (f1,f2,f3,f4,f5,f6,f7,f8);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f16(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f16_simulator,(void*)&f_f16);
+    fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f24(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f24_simulator,(void*)&f_f24);
+    fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+  }
+
+  /* double tests */
+  { double dr;
+
+    dr = d_d(d1);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d_simulator,(void*)&d_d);
+    dr = ((double (*) (double)) callback) (d1);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d2(d1,d2);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d2_simulator,(void*)&d_d2);
+    dr = ((double (*) (double,double)) callback) (d1,d2);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d4(d1,d2,d3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d4_simulator,(void*)&d_d4);
+    dr = ((double (*) (double,double,double,double)) callback) (d1,d2,d3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d8(d1,d2,d3,d4,d5,d6,d7,d8);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d8_simulator,(void*)&d_d8);
+    dr = ((double (*) (double,double,double,double,double,double,double,double)) callback) (d1,d2,d3,d4,d5,d6,d7,d8);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d16(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d16_simulator,(void*)&d_d16);
+    dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double)) callback) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+  }
+
+  /* pointer tests */
+  { void* vpr;
+
+    vpr = vp_vpdpcpsp(&uc1,&d2,str3,&I4);
+    fprintf(out,"->0x%p\n",vpr);
+    fflush(out);
+    vpr = 0; clear_traces();
+    callback = alloc_callback(&vp_vpdpcpsp_simulator,(void*)&vp_vpdpcpsp);
+    vpr = ((void* (*) (void*,double*,char*,Int*)) callback) (&uc1,&d2,str3,&I4);
+    fprintf(out,"->0x%p\n",vpr);
+    fflush(out);
+  }
+
+  /* mixed number tests */
+  { uchar ucr;
+    ushort usr;
+    float fr;
+    double dr;
+    long long llr;
+
+    ucr = uc_ucsil(uc1,us2,ui3,ul4);
+    fprintf(out,"->%u\n",ucr);
+    fflush(out);
+    ucr = 0; clear_traces();
+    callback = alloc_callback(&uc_ucsil_simulator,(void*)&uc_ucsil);
+    ucr = ((uchar (*) (uchar,ushort,uint,ulong)) callback) (uc1,us2,ui3,ul4);
+    fprintf(out,"->%u\n",ucr);
+    fflush(out);
+
+    dr = d_iidd(i1,i2,d3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_iidd_simulator,(void*)&d_iidd);
+    dr = ((double (*) (int,int,double,double)) callback) (i1,i2,d3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_iiidi(i1,i2,i3,d4,i5);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_iiidi_simulator,(void*)&d_iiidi);
+    dr = ((double (*) (int,int,int,double,int)) callback) (i1,i2,i3,d4,i5);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_idid(i1,d2,i3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_idid_simulator,(void*)&d_idid);
+    dr = ((double (*) (int,double,int,double)) callback) (i1,d2,i3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_fdi(f1,d2,i3);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_fdi_simulator,(void*)&d_fdi);
+    dr = ((double (*) (float,double,int)) callback) (f1,d2,i3);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    usr = us_cdcd(c1,d2,c3,d4);
+    fprintf(out,"->%u\n",usr);
+    fflush(out);
+    usr = 0; clear_traces();
+    callback = alloc_callback(&us_cdcd_simulator,(void*)&us_cdcd);
+    usr = ((ushort (*) (char,double,char,double)) callback) (c1,d2,c3,d4);
+    fprintf(out,"->%u\n",usr);
+    fflush(out);
+
+    llr = ll_iiilli(i1,i2,i3,ll1,i13);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    callback = alloc_callback(&ll_iiilli_simulator,(void*)&ll_iiilli);
+    llr = ((long long (*) (int,int,int,long long,int)) callback) (i1,i2,i3,ll1,i13);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_flli(f13,ll1,i13);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    callback = alloc_callback(&ll_flli_simulator,(void*)&ll_flli);
+    llr = ((long long (*) (float,long long,int)) callback) (f13,ll1,i13);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    fr = f_fi(f1,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_fi_simulator,(void*)&f_fi);
+    fr = ((float (*) (float,int)) callback) (f1,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f2i(f1,f2,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f2i_simulator,(void*)&f_f2i);
+    fr = ((float (*) (float,float,int)) callback) (f1,f2,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f3i(f1,f2,f3,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f3i_simulator,(void*)&f_f3i);
+    fr = ((float (*) (float,float,float,int)) callback) (f1,f2,f3,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f4i(f1,f2,f3,f4,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f4i_simulator,(void*)&f_f4i);
+    fr = ((float (*) (float,float,float,float,int)) callback) (f1,f2,f3,f4,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f7i(f1,f2,f3,f4,f5,f6,f7,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f7i_simulator,(void*)&f_f7i);
+    fr = ((float (*) (float,float,float,float,float,float,float,int)) callback) (f1,f2,f3,f4,f5,f6,f7,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f8i(f1,f2,f3,f4,f5,f6,f7,f8,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f8i_simulator,(void*)&f_f8i);
+    fr = ((float (*) (float,float,float,float,float,float,float,float,int)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f12i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f12i_simulator,(void*)&f_f12i);
+    fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,int)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f13i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f13i_simulator,(void*)&f_f13i);
+    fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,int)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    dr = d_di(d1,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_di_simulator,(void*)&d_di);
+    dr = ((double (*) (double,int)) callback) (d1,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d2i(d1,d2,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d2i_simulator,(void*)&d_d2i);
+    dr = ((double (*) (double,double,int)) callback) (d1,d2,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d3i(d1,d2,d3,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d3i_simulator,(void*)&d_d3i);
+    dr = ((double (*) (double,double,double,int)) callback) (d1,d2,d3,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d4i(d1,d2,d3,d4,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d4i_simulator,(void*)&d_d4i);
+    dr = ((double (*) (double,double,double,double,int)) callback) (d1,d2,d3,d4,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d7i(d1,d2,d3,d4,d5,d6,d7,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d7i_simulator,(void*)&d_d7i);
+    dr = ((double (*) (double,double,double,double,double,double,double,int)) callback) (d1,d2,d3,d4,d5,d6,d7,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d8i(d1,d2,d3,d4,d5,d6,d7,d8,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d8i_simulator,(void*)&d_d8i);
+    dr = ((double (*) (double,double,double,double,double,double,double,double,int)) callback) (d1,d2,d3,d4,d5,d6,d7,d8,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d12i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d12i_simulator,(void*)&d_d12i);
+    dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,int)) callback) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d13i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d13i_simulator,(void*)&d_d13i);
+    dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,int)) callback) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+  }
+
+  /* small structure return tests */
+  {
+    Size1 r = S1_v();
+    fprintf(out,"->{%c}\n",r.x1);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    callback = alloc_callback(&S1_v_simulator,(void*)&S1_v);
+    r = ((Size1 (*) (void)) callback) ();
+    fprintf(out,"->{%c}\n",r.x1);
+    fflush(out);
+  }
+  {
+    Size2 r = S2_v();
+    fprintf(out,"->{%c%c}\n",r.x1,r.x2);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    callback = alloc_callback(&S2_v_simulator,(void*)&S2_v);
+    r = ((Size2 (*) (void)) callback) ();
+    fprintf(out,"->{%c%c}\n",r.x1,r.x2);
+    fflush(out);
+  }
+  {
+    Size3 r = S3_v();
+    fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    callback = alloc_callback(&S3_v_simulator,(void*)&S3_v);
+    r = ((Size3 (*) (void)) callback) ();
+    fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3);
+    fflush(out);
+  }
+  {
+    Size4 r = S4_v();
+    fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    callback = alloc_callback(&S4_v_simulator,(void*)&S4_v);
+    r = ((Size4 (*) (void)) callback) ();
+    fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4);
+    fflush(out);
+  }
+  {
+    Size7 r = S7_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    callback = alloc_callback(&S7_v_simulator,(void*)&S7_v);
+    r = ((Size7 (*) (void)) callback) ();
+    fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7);
+    fflush(out);
+  }
+  {
+    Size8 r = S8_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    callback = alloc_callback(&S8_v_simulator,(void*)&S8_v);
+    r = ((Size8 (*) (void)) callback) ();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8);
+    fflush(out);
+  }
+  {
+    Size12 r = S12_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    callback = alloc_callback(&S12_v_simulator,(void*)&S12_v);
+    r = ((Size12 (*) (void)) callback) ();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12);
+    fflush(out);
+  }
+  {
+    Size15 r = S15_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    callback = alloc_callback(&S15_v_simulator,(void*)&S15_v);
+    r = ((Size15 (*) (void)) callback) ();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15);
+    fflush(out);
+  }
+  {
+    Size16 r = S16_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    callback = alloc_callback(&S16_v_simulator,(void*)&S16_v);
+    r = ((Size16 (*) (void)) callback) ();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16);
+    fflush(out);
+  }
+
+  /* structure tests */
+  { Int Ir;
+    Char Cr;
+    Float Fr;
+    Double Dr;
+    J Jr;
+    T Tr;
+    X Xr;
+
+    Ir = I_III(I1,I2,I3);
+    fprintf(out,"->{%d}\n",Ir.x);
+    fflush(out);
+    Ir.x = 0; clear_traces();
+    callback = alloc_callback(&I_III_simulator,(void*)&I_III);
+    Ir = ((Int (*) (Int,Int,Int)) callback) (I1,I2,I3);
+    fprintf(out,"->{%d}\n",Ir.x);
+    fflush(out);
+
+#ifndef SKIP_EXTRA_STRUCTS
+    Cr = C_CdC(C1,d2,C3);
+    fprintf(out,"->{'%c'}\n",Cr.x);
+    fflush(out);
+    Cr.x = '\0'; clear_traces();
+    callback = alloc_callback(&C_CdC_simulator,(void*)&C_CdC);
+    Cr = ((Char (*) (Char,double,Char)) callback) (C1,d2,C3);
+    fprintf(out,"->{'%c'}\n",Cr.x);
+    fflush(out);
+
+    Fr = F_Ffd(F1,f2,d3);
+    fprintf(out,"->{%g}\n",Fr.x);
+    fflush(out);
+    Fr.x = 0.0; clear_traces();
+    callback = alloc_callback(&F_Ffd_simulator,(void*)&F_Ffd);
+    Fr = ((Float (*) (Float,float,double)) callback) (F1,f2,d3);
+    fprintf(out,"->{%g}\n",Fr.x);
+    fflush(out);
+
+    Dr = D_fDd(f1,D2,d3);
+    fprintf(out,"->{%g}\n",Dr.x);
+    fflush(out);
+    Dr.x = 0.0; clear_traces();
+    callback = alloc_callback(&D_fDd_simulator,(void*)&D_fDd);
+    Dr = ((Double (*) (float,Double,double)) callback) (f1,D2,d3);
+    fprintf(out,"->{%g}\n",Dr.x);
+    fflush(out);
+
+    Dr = D_Dfd(D1,f2,d3);
+    fprintf(out,"->{%g}\n",Dr.x);
+    fflush(out);
+    Dr.x = 0.0; clear_traces();
+    callback = alloc_callback(&D_Dfd_simulator,(void*)&D_Dfd);
+    Dr = ((Double (*) (Double,float,double)) callback) (D1,f2,d3);
+    fprintf(out,"->{%g}\n",Dr.x);
+    fflush(out);
+#endif
+
+    Jr = J_JiJ(J1,i2,J2);
+    fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2);
+    fflush(out);
+    Jr.l1 = Jr.l2 = 0; clear_traces();
+    callback = alloc_callback(&J_JiJ_simulator,(void*)&J_JiJ);
+    Jr = ((J (*) (J,int,J)) callback) (J1,i2,J2);
+    fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2);
+    fflush(out);
+
+#ifndef SKIP_EXTRA_STRUCTS
+#ifndef SKIP_T
+    Tr = T_TcT(T1,' ',T2);
+    fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]);
+    fflush(out);
+    Tr.c[0] = Tr.c[1] = Tr.c[2] = 0; clear_traces();
+    callback = alloc_callback(&T_TcT_simulator,(void*)&T_TcT);
+    Tr = ((T (*) (T,char,T)) callback) (T1,' ',T2);
+    fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]);
+    fflush(out);
+#endif
+
+#ifndef SKIP_X
+    Xr = X_BcdB(B1,c2,d3,B2);
+    fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1);
+    fflush(out);
+    Xr.c[0]=Xr.c1='\0'; clear_traces();
+    callback = alloc_callback(&X_BcdB_simulator,(void*)&X_BcdB);
+    Xr = ((X (*) (B,char,double,B)) callback) (B1,c2,d3,B2);
+    fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1);
+    fflush(out);
+#endif
+#endif
+  }
+
+  /* gpargs boundary tests */
+  { long lr;
+    long long llr;
+    float fr;
+    double dr;
+
+    lr = l_l0J(J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l0J_simulator,(void*)l_l0J);
+    lr = ((long (*) (J,long)) callback) (J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l1J(l1,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l1J_simulator,(void*)l_l1J);
+    lr = ((long (*) (long,J,long)) callback) (l1,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l2J(l1,l2,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l2J_simulator,(void*)l_l2J);
+    lr = ((long (*) (long,long,J,long)) callback) (l1,l2,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l3J(l1,l2,l3,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l3J_simulator,(void*)l_l3J);
+    lr = ((long (*) (long,long,long,J,long)) callback) (l1,l2,l3,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l4J(l1,l2,l3,l4,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l4J_simulator,(void*)l_l4J);
+    lr = ((long (*) (long,long,long,long,J,long)) callback) (l1,l2,l3,l4,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l5J(l1,l2,l3,l4,l5,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l5J_simulator,(void*)l_l5J);
+    lr = ((long (*) (long,long,long,long,long,J,long)) callback) (l1,l2,l3,l4,l5,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l6J(l1,l2,l3,l4,l5,l6,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l6J_simulator,(void*)l_l6J);
+    lr = ((long (*) (long,long,long,long,long,long,J,long)) callback) (l1,l2,l3,l4,l5,l6,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l7J(l1,l2,l3,l4,l5,l6,l7,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l7J_simulator,(void*)l_l7J);
+    lr = ((long (*) (long,long,long,long,long,long,long,J,long)) callback) (l1,l2,l3,l4,l5,l6,l7,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l0K(K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l0K_simulator,(void*)l_l0K);
+    lr = ((long (*) (K,long)) callback) (K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l1K(l1,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l1K_simulator,(void*)l_l1K);
+    lr = ((long (*) (long,K,long)) callback) (l1,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l2K(l1,l2,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l2K_simulator,(void*)l_l2K);
+    lr = ((long (*) (long,long,K,long)) callback) (l1,l2,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l3K(l1,l2,l3,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l3K_simulator,(void*)l_l3K);
+    lr = ((long (*) (long,long,long,K,long)) callback) (l1,l2,l3,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l4K(l1,l2,l3,l4,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l4K_simulator,(void*)l_l4K);
+    lr = ((long (*) (long,long,long,long,K,long)) callback) (l1,l2,l3,l4,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l5K(l1,l2,l3,l4,l5,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l5K_simulator,(void*)l_l5K);
+    lr = ((long (*) (long,long,long,long,long,K,long)) callback) (l1,l2,l3,l4,l5,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l6K(l1,l2,l3,l4,l5,l6,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    callback = alloc_callback(&l_l6K_simulator,(void*)l_l6K);
+    lr = ((long (*) (long,long,long,long,long,long,K,long)) callback) (l1,l2,l3,l4,l5,l6,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    fr = f_f17l3L(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,l6,l7,l8,L1);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    callback = alloc_callback(&f_f17l3L_simulator,(void*)&f_f17l3L);
+    fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,long,long,long,L)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,l6,l7,l8,L1);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    dr = d_d17l3L(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16,d17,l6,l7,l8,L1);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_d17l3L_simulator,(void*)&d_d17l3L);
+    dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,long,long,long,L)) callback) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16,d17,l6,l7,l8,L1);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    llr = ll_l2ll(l1,l2,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    callback = alloc_callback(&ll_l2ll_simulator,(void*)ll_l2ll);
+    llr = ((long long (*) (long,long,long long,long)) callback) (l1,l2,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_l3ll(l1,l2,l3,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    callback = alloc_callback(&ll_l3ll_simulator,(void*)ll_l3ll);
+    llr = ((long long (*) (long,long,long,long long,long)) callback) (l1,l2,l3,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_l4ll(l1,l2,l3,l4,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    callback = alloc_callback(&ll_l4ll_simulator,(void*)ll_l4ll);
+    llr = ((long long (*) (long,long,long,long,long long,long)) callback) (l1,l2,l3,l4,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_l5ll(l1,l2,l3,l4,l5,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    callback = alloc_callback(&ll_l5ll_simulator,(void*)ll_l5ll);
+    llr = ((long long (*) (long,long,long,long,long,long long,long)) callback) (l1,l2,l3,l4,l5,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_l6ll(l1,l2,l3,l4,l5,l6,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    callback = alloc_callback(&ll_l6ll_simulator,(void*)ll_l6ll);
+    llr = ((long long (*) (long,long,long,long,long,long,long long,long)) callback) (l1,l2,l3,l4,l5,l6,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_l7ll(l1,l2,l3,l4,l5,l6,l7,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    callback = alloc_callback(&ll_l7ll_simulator,(void*)ll_l7ll);
+    llr = ((long long (*) (long,long,long,long,long,long,long,long long,long)) callback) (l1,l2,l3,l4,l5,l6,l7,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    dr = d_l2d(l1,l2,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_l2d_simulator,(void*)d_l2d);
+    dr = ((double (*) (long,long,double,long)) callback) (l1,l2,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_l3d(l1,l2,l3,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_l3d_simulator,(void*)d_l3d);
+    dr = ((double (*) (long,long,long,double,long)) callback) (l1,l2,l3,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_l4d(l1,l2,l3,l4,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_l4d_simulator,(void*)d_l4d);
+    dr = ((double (*) (long,long,long,long,double,long)) callback) (l1,l2,l3,l4,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_l5d(l1,l2,l3,l4,l5,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_l5d_simulator,(void*)d_l5d);
+    dr = ((double (*) (long,long,long,long,long,double,long)) callback) (l1,l2,l3,l4,l5,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_l6d(l1,l2,l3,l4,l5,l6,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_l6d_simulator,(void*)d_l6d);
+    dr = ((double (*) (long,long,long,long,long,long,double,long)) callback) (l1,l2,l3,l4,l5,l6,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_l7d(l1,l2,l3,l4,l5,l6,l7,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    callback = alloc_callback(&d_l7d_simulator,(void*)d_l7d);
+    dr = ((double (*) (long,long,long,long,long,long,long,double,long)) callback) (l1,l2,l3,l4,l5,l6,l7,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+  }
+
+  /* by-value tests */
+  /* This test is trivial, since a copy of k is allocated on the callee's stack.
+     But anyway... */
+  { K k;
+
+    k.l1 = l1;
+    k.l2 = l2;
+    k.l3 = l3;
+    k.l4 = l4;
+    fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4);
+    fflush(out);
+    clear_traces();
+    callback = alloc_callback(&v_clobber_K_simulator,(void*)v_clobber_K);
+    ((void (*) (K)) callback) (k);
+    fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4);
+    fflush(out);
+  }
+
+  exit(0);
+}
diff --git a/callback/trampoline_r/COPYING b/callback/trampoline_r/COPYING
new file mode 100644 (file)
index 0000000..a3d1815
--- /dev/null
@@ -0,0 +1,340 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+                          51 Franklin Street, Fifth Floor,
+                          Boston, MA 02110-1301, USA.
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The licenses for most software are designed to take away your
+freedom to share and change it.  By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users.  This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it.  (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.)  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+  To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have.  You must make sure that they, too, receive or can get the
+source code.  And you must show them these terms so they know their
+rights.
+
+  We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+  Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software.  If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+  Finally, any free program is threatened constantly by software
+patents.  We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary.  To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+\f
+                    GNU GENERAL PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License.  The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language.  (Hereinafter, translation is included without limitation in
+the term "modification".)  Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope.  The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+  1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+  2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+    a) You must cause the modified files to carry prominent notices
+    stating that you changed the files and the date of any change.
+
+    b) You must cause any work that you distribute or publish, that in
+    whole or in part contains or is derived from the Program or any
+    part thereof, to be licensed as a whole at no charge to all third
+    parties under the terms of this License.
+
+    c) If the modified program normally reads commands interactively
+    when run, you must cause it, when started running for such
+    interactive use in the most ordinary way, to print or display an
+    announcement including an appropriate copyright notice and a
+    notice that there is no warranty (or else, saying that you provide
+    a warranty) and that users may redistribute the program under
+    these conditions, and telling the user how to view a copy of this
+    License.  (Exception: if the Program itself is interactive but
+    does not normally print such an announcement, your work based on
+    the Program is not required to print an announcement.)
+\f
+These requirements apply to the modified work as a whole.  If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works.  But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+  3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+    a) Accompany it with the complete corresponding machine-readable
+    source code, which must be distributed under the terms of Sections
+    1 and 2 above on a medium customarily used for software interchange; or,
+
+    b) Accompany it with a written offer, valid for at least three
+    years, to give any third party, for a charge no more than your
+    cost of physically performing source distribution, a complete
+    machine-readable copy of the corresponding source code, to be
+    distributed under the terms of Sections 1 and 2 above on a medium
+    customarily used for software interchange; or,
+
+    c) Accompany it with the information you received as to the offer
+    to distribute corresponding source code.  (This alternative is
+    allowed only for noncommercial distribution and only if you
+    received the program in object code or executable form with such
+    an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it.  For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable.  However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+\f
+  4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License.  Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+  5. You are not required to accept this License, since you have not
+signed it.  However, nothing else grants you permission to modify or
+distribute the Program or its derivative works.  These actions are
+prohibited by law if you do not accept this License.  Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+  6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions.  You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+  7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all.  For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices.  Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+\f
+  8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded.  In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+  9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number.  If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation.  If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+  10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission.  For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this.  Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+                            NO WARRANTY
+
+  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+                     END OF TERMS AND CONDITIONS
+\f
+        Appendix: How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software Foundation,
+    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+    Gnomovision version 69, Copyright (C) year  name of author
+    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  Here is a sample; alter the names:
+
+  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+  `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+  <signature of Ty Coon>, 1 April 1989
+  Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs.  If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library.  If this is what you want to do, use the GNU Library General
+Public License instead of this License.
diff --git a/callback/trampoline_r/Makefile.devel b/callback/trampoline_r/Makefile.devel
new file mode 100644 (file)
index 0000000..7abb351
--- /dev/null
@@ -0,0 +1,217 @@
+# This is the developer's -*-Makefile-*-, not the user's makefile.
+# Do not use it unless you know exactly what you do!
+
+THISFILE = Makefile.devel
+RM = rm -f
+
+# ============ Rules that require cross-compilation tools ============
+
+GCC = gcc
+GCCFLAGS = -O2 -fomit-frame-pointer -fPIC
+CPP = $(GCC) -E
+CROSS_TOOL = cross
+
+precompiled : \
+  cache-sparc-macro.S cache-sparc64-macro.S \
+  cache-alpha-macro.S \
+  cache-hppa-macro.S cache-hppa64-macro.S \
+  cache-powerpc-linux-macro.S cache-powerpc-macos.s \
+  cache-powerpc64-elfv2-macro.S
+
+
+cache-sparc-linux.s : cache-sparc.c $(THISFILE)
+       $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -D__sparc__ -S cache-sparc.c -o cache-sparc-linux.s
+
+cache-sparc-macro.S : cache-sparc-linux.s ../../common/asm-sparc.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-sparc.h"' ; ../../common/asm-sparc.sh < cache-sparc-linux.s ; cat ../../common/noexecstack.h) > cache-sparc-macro.S
+
+cache-sparc64-linux.s : cache-sparc.c $(THISFILE)
+       $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 $(GCCFLAGS) -D__sparc64__ -S cache-sparc.c -o cache-sparc64-linux.s
+
+cache-sparc64-macro.S : cache-sparc64-linux.s ../../common/asm-sparc.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-sparc.h"' ; ../../common/asm-sparc.sh < cache-sparc64-linux.s ; cat ../../common/noexecstack.h) > cache-sparc64-macro.S
+
+
+cache-alpha-linux.s : cache-alpha.c $(THISFILE)
+       $(CROSS_TOOL) alpha-linux gcc -V 4.0.2 $(GCCFLAGS) -D__alpha__ -S cache-alpha.c -o cache-alpha-linux.s
+
+cache-alpha-macro.S : cache-alpha-linux.s ../../common/asm-alpha.sh ../../common/noexecstack.h $(THISFILE)
+       (../../common/asm-alpha.sh < cache-alpha-linux.s ; cat ../../common/noexecstack.h) > cache-alpha-macro.S
+
+
+cache-hppa-linux.s : cache-hppa.c $(THISFILE)
+       $(CROSS_TOOL) hppa-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa__ -S cache-hppa.c -o cache-hppa-linux.s
+
+cache-hppa-macro.S : cache-hppa-linux.s ../../common/asm-hppa.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-hppa.h"' ; ../../common/asm-hppa.sh < cache-hppa-linux.s ; cat ../../common/noexecstack.h) > cache-hppa-macro.S
+
+
+cache-hppa64-linux.s : cache-hppa.c $(THISFILE)
+       $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa64__ -S cache-hppa.c -o cache-hppa64-linux.s
+
+cache-hppa64-macro.S : cache-hppa64-linux.s ../../common/asm-hppa64.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-hppa64.h"' ; ../../common/asm-hppa64.sh < cache-hppa64-linux.s ; cat ../../common/noexecstack.h) > cache-hppa64-macro.S
+
+
+cache-powerpc-linux.s : cache-powerpc.c $(THISFILE)
+       $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S cache-powerpc.c -o cache-powerpc-linux.s
+
+cache-powerpc-linux-macro.S : cache-powerpc-linux.s ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE)
+       (../../common/asm-powerpc.sh < cache-powerpc-linux.s ; cat ../../common/noexecstack.h) > cache-powerpc-linux-macro.S
+
+cache-powerpc-macos.s : cache-powerpc.c $(THISFILE)
+       $(CROSS_TOOL) powerpc-darwin gcc -V 3.3.6 $(GCCFLAGS) -D__powerpc__ -S cache-powerpc.c -o cache-powerpc-macos.s
+
+
+cache-powerpc64-elfv2-linux.s : cache-powerpc64.c $(THISFILE)
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -S cache-powerpc64.c -o cache-powerpc64-elfv2-linux-le.s
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -S cache-powerpc64.c -o cache-powerpc64-elfv2-linux-be.s
+       cmp cache-powerpc64-elfv2-linux-le.s cache-powerpc64-elfv2-linux-be.s > /dev/null
+       mv cache-powerpc64-elfv2-linux-le.s cache-powerpc64-elfv2-linux.s
+       $(RM) cache-powerpc64-elfv2-linux-be.s
+
+cache-powerpc64-elfv2-macro.S : cache-powerpc64-elfv2-linux.s ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE)
+       (../../common/asm-powerpc.sh < cache-powerpc64-elfv2-linux.s ; cat ../../common/noexecstack.h) > cache-powerpc64-elfv2-macro.S
+
+
+# --------------- Older rules ---------------
+
+OLDGCCFLAGS = -O2 -fomit-frame-pointer
+ASPREFIX = /usr1/gnu/lib
+
+proto-precompiled : proto-i386.s proto-m68k.s proto-mips.s proto-mipsn32.s proto-mips64.s proto-sparc.s proto-sparc64.s proto-alpha.s proto-hppa.s proto-hppa64.s proto-arm.s proto-arm64.s proto-powerpc-aix.s proto-powerpc-sysv4.s proto-powerpc-macos.s proto-powerpc64-aix.s proto-powerpc64-elfv2.s proto-ia64.c proto-x86_64.c proto-x86_64-x32.s proto-s390.s proto-s390x.s proto-riscv32.s proto-riscv64.s
+
+proto-i386.s : proto.c
+       $(GCC) -V 2.7.2 -b i486-linuxaout $(OLDGCCFLAGS) -D__i386__ -S proto.c -o $@
+
+proto-m68k.s : proto.c
+       $(GCC) -V egcs-2.91.57 -b m68k-sun $(OLDGCCFLAGS) -D__m68k__ -S proto.c -o $@
+
+proto-mips.s : proto.c
+       $(GCC) -V 2.95.2 -b mips-sgi $(OLDGCCFLAGS) -D__mips__ -S proto.c -o $@ -mabicalls
+
+proto-mipsn32.s : proto.c
+       $(GCC) -V 2.95.2 -b mips-sgi-irix6 $(OLDGCCFLAGS) -D__mipsn32__ -S proto.c -o $@ -mabicalls
+
+proto-mips64.s : proto64.c
+       $(GCC) -V 2.95.2 -b mips-sgi -mips3 -mlong64 $(OLDGCCFLAGS) -D__mips64__ -S proto64.c -o $@ -mabicalls
+
+proto-sparc.s : proto.c
+       $(GCC) -V 2.95.2 -b sparc-sun $(OLDGCCFLAGS) -D__sparc__ -S proto.c -o $@
+
+proto-sparc64.s : proto64.c
+       sparc64-linux-gcc -V 2.95.2 -b sparc64-linux $(OLDGCCFLAGS) -D__sparc64__ -S proto64.c -o $@
+
+proto-alpha.s : proto64.c
+       $(GCC) -V 2.7.2 -b alpha-dec-osf $(OLDGCCFLAGS) -D__alpha__ -S proto64.c -o $@
+
+proto-hppa.s : proto.c
+       $(GCC) -V 2.6.3 -b hppa1.0-hpux $(OLDGCCFLAGS) -D__hppa__ -S proto.c -o $@
+
+proto-hppa64.s : proto64.c
+       $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(OLDGCCFLAGS) -D__hppa64__ -S proto64.c -o $@
+
+proto-arm.s : proto.c
+       $(CROSS_TOOL) arm-linux gcc -V 3.1 $(OLDGCCFLAGS) -fno-omit-frame-pointer -D__arm__ -S proto.c -o $@
+
+proto-arm64.s : proto64.c
+       $(CROSS_TOOL) aarch64-linux gcc-5.4.0 $(OLDGCCFLAGS) -D__arm64__ -S proto64.c -o $@
+
+proto-powerpc-aix.s : proto.c
+       $(GCC) -V 2.95.2 -b rs6000 -mno-power -mno-power2 -mno-powerpc -mnew-mnemonics $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@
+
+proto-powerpc-sysv4.s : proto.c
+       $(GCC) -V 2.95.2 -b ppc-linux -mno-power -mno-power2 -mno-powerpc $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@
+
+proto-powerpc-macos.s : proto.c
+       $(GCC) -V 3.3.2 -b powerpc-darwin $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@
+
+proto-powerpc64-aix.s : proto64.c
+       $(CROSS_TOOL) powerpc64-linux gcc $(OLDGCCFLAGS) -D__powerpc64__ -S proto64.c -o $@
+
+proto-powerpc64-elfv2.s : proto64.c
+       $(CROSS_TOOL) powerpc64le-linux gcc -mabi=elfv2 $(OLDGCCFLAGS) -D__powerpc64__ -S proto64.c -o $@
+
+proto-ia64.s : proto64.c
+       $(GCC) -V 2.9-ia64-000216 -b ia64-hp-linux $(OLDGCCFLAGS) -D__ia64__ -S proto64.c -o $@
+
+proto-x86_64.s : proto64.c
+       $(GCC) -V 3.2.2 -b x86_64-suse-linux $(OLDGCCFLAGS) -D__x86_64__ -S proto64.c -o $@
+
+proto-x86_64-x32.s : proto.c
+       $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mx32 $(OLDGCCFLAGS) -fno-asynchronous-unwind-tables -D__x86_64__ -D__x86_64_x32__ -S proto.c -o $@
+
+proto-s390.s : proto.c
+       $(CROSS_TOOL) s390-linux gcc -V 3.1 $(OLDGCCFLAGS) -D__s390__ -S proto.c -o $@
+
+proto-s390x.s : proto64.c
+       $(CROSS_TOOL) s390x-linux gcc-5.4.0 $(OLDGCCFLAGS) -D__s390x__ -S proto64.c -o $@
+
+proto-riscv32.s : proto.c
+       $(CROSS_TOOL) riscv32-linux gcc-7.3.0 $(OLDGCCFLAGS) -D__riscv32__ -S proto.c -o $@
+
+proto-riscv64.s : proto64.c
+       $(CROSS_TOOL) riscv64-linux gcc-7.3.0 $(OLDGCCFLAGS) -D__riscv64__ -S proto64.c -o $@
+
+tramp-i386.o : tramp-i386.s
+       $(ASPREFIX)/i486-linux/bin/as tramp-i386.s -o $@
+
+tramp-m68k.o : tramp-m68k.s
+       $(ASPREFIX)/m68k-linux/bin/as tramp-m68k.s -o $@
+
+tramp-mips.o : tramp-mips.s
+       $(ASPREFIX)/mips-linux/bin/as tramp-mips.s -o $@
+
+tramp-mips64.o : tramp-mips64.s
+       $(ASPREFIX)/mips-linux/bin/as -mips64 -mabi=64 tramp-mips64.s -o $@
+
+tramp-sparc.o : tramp-sparc.s
+       $(ASPREFIX)/sparc-sun/bin/as tramp-sparc.s -o $@
+
+tramp-sparc64.o : tramp-sparc64.s
+       $(ASPREFIX)/sparc64-linux/bin/as tramp-sparc64.s -o $@
+
+tramp-alpha.o : tramp-alpha.s
+       $(ASPREFIX)/alpha-linux/bin/as tramp-alpha.s -o $@
+
+tramp-hppa.o : tramp-hppa.s
+       $(ASPREFIX)/hppa1.0-hpux/bin/as tramp-hppa.s -o $@
+
+tramp-hppa64.o : tramp-hppa64.s
+       $(CROSS_TOOL) hppa64-linux as tramp-hppa64.s -o $@
+
+tramp-arm.o : tramp-arm.s
+       $(CROSS_TOOL) arm-linux as tramp-arm.s -o $@
+
+tramp-arm64.o : tramp-arm64.s
+       $(CROSS_TOOL) aarch64-linux as tramp-arm64.s -o $@
+
+tramp-powerpc-old.o : tramp-powerpc-old.s
+       $(ASPREFIX)/rs6000/bin/as tramp-powerpc-old.s -o $@
+
+tramp-powerpc-sysv4.o : tramp-powerpc-sysv4.s
+       $(ASPREFIX)/ppc-linux/bin/as tramp-powerpc-sysv4.s -o $@
+
+tramp-powerpc64-elfv2.o : tramp-powerpc64-elfv2.s
+       $(CROSS_TOOL) powerpc64le-linux as tramp-powerpc64-elfv2.s -o $@
+
+tramp-ia64.o : tramp-ia64.s
+       /nue/usr/ia64-hp-linux/bin/as tramp-ia64.s -o $@
+
+tramp-x86_64.o : tramp-x86_64.s
+       $(ASPREFIX)/x86_64-linux/bin/as tramp-x86_64.s -o $@
+
+tramp-x86_64-x32.o : tramp-x86_64-x32.s
+       $(CROSS_TOOL) x86_64-linux as tramp-x86_64-x32.s -o $@
+
+tramp-s390.o : tramp-s390.s
+       $(CROSS_TOOL) s390-linux as tramp-s390.s -o $@
+
+tramp-s390x.o : tramp-s390x.s
+       $(CROSS_TOOL) s390x-linux as tramp-s390x.s -o $@
+
+tramp-riscv32.o : tramp-riscv32.s
+       $(CROSS_TOOL) riscv32-linux as tramp-riscv32.s -o $@
+
+tramp-riscv64.o : tramp-riscv64.s
+       $(CROSS_TOOL) riscv64-linux as tramp-riscv64.s -o $@
diff --git a/callback/trampoline_r/Makefile.in b/callback/trampoline_r/Makefile.in
new file mode 100644 (file)
index 0000000..ee88507
--- /dev/null
@@ -0,0 +1,257 @@
+# Makefile for trampoline
+
+#### Start of system configuration section. ####
+
+HOST = @host@
+CPU = @HOST_CPU_C_ABI@
+OS = @host_os@
+
+# Directories used by "make":
+srcdir = @srcdir@
+
+# Directories used by "make install":
+prefix = @prefix@
+local_prefix = /usr/local
+exec_prefix = @exec_prefix@
+libdir = @libdir@
+includedir = @includedir@
+mandir = @mandir@
+datadir = @datadir@
+datarootdir = @datarootdir@
+htmldir = $(datadir)/html
+
+# Programs used by "make":
+CC = @CC@
+CFLAGS = @CFLAGS@
+CPPFLAGS = @CPPFLAGS@
+CPP = @CPP@
+INCLUDES = -I. -I$(srcdir) -I../.. -I$(srcdir)/../..
+INCLUDES_WITH_GNULIB = $(INCLUDES) -I../../gnulib-lib -I$(srcdir)/../../gnulib-lib
+ASPFLAGS = `if test @AS_UNDERSCORE@ = true; then echo '-DASM_UNDERSCORE'; fi`
+LDFLAGS = @LDFLAGS@
+LIBTOOL = @LIBTOOL@
+LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile
+LIBTOOL_LINK = $(LIBTOOL) --mode=link
+LIBTOOL_INSTALL = $(LIBTOOL) --mode=install
+LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall
+AR = @AR@
+AR_FLAGS = rc
+RANLIB = @RANLIB@
+RM = rm -f
+@SET_MAKE@
+
+# Programs used by "make install":
+INSTALL = @INSTALL@
+INSTALL_PROGRAM = @INSTALL_PROGRAM@
+INSTALL_DATA = @INSTALL_DATA@
+
+# Libtool options for linking with the thread library.
+LTLIBTHREAD = @LTLIBTHREAD@
+
+#### End of system configuration section. ####
+
+SHELL = /bin/sh
+
+# Needed by $(LIBTOOL).
+top_builddir = ../..
+
+OBJECTS = trampoline.lo @CPU_OBJECTS@
+
+all : $(OBJECTS) libtrampoline.la $(srcdir)/trampoline_r.3 $(srcdir)/trampoline_r.html
+
+trampoline.lo : $(srcdir)/trampoline.c $(srcdir)/trampoline_r.h
+       $(LIBTOOL_COMPILE) $(CC) $(INCLUDES_WITH_GNULIB) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/trampoline.c
+
+tramp-hppa.lo : tramp-hppa.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-hppa.s
+
+tramp-hppa.s : $(srcdir)/tramp-hppa-macro.S $(srcdir)/../../common/noexecstack.h
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/tramp-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > tramp-hppa.s
+
+tramp-hppa64.lo : tramp-hppa64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-hppa64.s
+
+tramp-hppa64.s : $(srcdir)/tramp-hppa64-macro.S $(srcdir)/../../common/noexecstack.h
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/tramp-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > tramp-hppa64.s
+
+tramp-powerpc.lo : tramp-powerpc.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-powerpc.s
+
+tramp-powerpc.s : $(srcdir)/tramp-powerpc-aix.S
+       $(CPP) $(srcdir)/tramp-powerpc-aix.S > tramp-powerpc.s
+
+tramp-powerpc64.lo : tramp-powerpc64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-powerpc64.s
+
+tramp-powerpc64.s : $(srcdir)/tramp-powerpc64-aix.S $(srcdir)/../../common/noexecstack.h
+       $(CPP) -I$(srcdir)/../../common $(srcdir)/tramp-powerpc64-aix.S > tramp-powerpc64.s
+
+tramp-ia64.lo : tramp-ia64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-ia64.s
+
+tramp-ia64.s : $(srcdir)/tramp-ia64-macro.S $(srcdir)/../../common/noexecstack.h
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/tramp-ia64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > tramp-ia64.s
+
+cache-sparc.lo : cache-sparc.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-sparc.s
+
+cache-sparc.s : $(srcdir)/cache-sparc-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common - < $(srcdir)/cache-sparc-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > cache-sparc.s
+
+cache-sparc64.lo : cache-sparc64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-sparc64.s
+
+cache-sparc64.s : $(srcdir)/cache-sparc64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common - < $(srcdir)/cache-sparc64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > cache-sparc64.s
+
+cache-alpha.lo : cache-alpha.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-alpha.s
+
+cache-alpha.s : $(srcdir)/cache-alpha-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/cache-alpha-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-alpha.s
+
+cache-hppa.lo : cache-hppa.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-hppa.s
+
+cache-hppa.s : $(srcdir)/cache-hppa-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/cache-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > cache-hppa.s
+
+cache-hppa64.lo : cache-hppa64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-hppa64.s
+
+cache-hppa64.s : $(srcdir)/cache-hppa64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/cache-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > cache-hppa64.s
+
+cache-powerpc.lo : cache-powerpc.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-powerpc.s
+
+cache-powerpc.s : $(srcdir)/cache-powerpc-linux-macro.S $(srcdir)/cache-powerpc-macos.s
+       case "$(OS)" in \
+         macos* | darwin*) syntax=macos;; \
+         *) syntax=linux;; \
+       esac; \
+       case $${syntax} in \
+         macos) \
+           grep -v '\.machine' $(srcdir)/cache-powerpc-$${syntax}.s > cache-powerpc.s || exit 1 ;; \
+         linux) \
+           $(CPP) $(ASPFLAGS) $(srcdir)/cache-powerpc-$${syntax}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-powerpc.s || exit 1 ;; \
+         *) \
+           cp $(srcdir)/cache-powerpc-$${syntax}.s cache-powerpc.s || exit 1 ;; \
+       esac
+
+cache-powerpc64-elfv2.lo : cache-powerpc64-elfv2.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-powerpc64-elfv2.s
+
+cache-powerpc64-elfv2.s : $(srcdir)/cache-powerpc64-elfv2-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/cache-powerpc64-elfv2-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-powerpc64-elfv2.s
+
+libtrampoline.la : $(OBJECTS) ../../gnulib-lib/libgnu.la
+       $(LIBTOOL_LINK) $(CC) -o libtrampoline.la -rpath $(libdir) -no-undefined $(OBJECTS) ../../gnulib-lib/libgnu.la $(LDFLAGS) $(LTLIBTHREAD)
+
+# Installs the library and include files only. Typically called with only
+# $(libdir) and $(includedir) - don't use $(prefix) and $(exec_prefix) here.
+install-lib : all force
+       mkdir -p $(includedir)
+       $(INSTALL_DATA) $(srcdir)/trampoline_r.h $(includedir)/trampoline_r.h
+
+install : all force
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(exec_prefix)
+#      mkdir -p $(DESTDIR)$(libdir)
+#      $(LIBTOOL_INSTALL) $(INSTALL_DATA) libtrampoline.la $(DESTDIR)$(libdir)/libtrampoline.la
+       mkdir -p $(DESTDIR)$(includedir)
+       $(INSTALL_DATA) $(srcdir)/trampoline_r.h $(DESTDIR)$(includedir)/trampoline_r.h
+       mkdir -p $(DESTDIR)$(mandir)
+       mkdir -p $(DESTDIR)$(mandir)/man3
+       $(INSTALL_DATA) $(srcdir)/trampoline_r.3 $(DESTDIR)$(mandir)/man3/trampoline_r.3
+       mkdir -p $(DESTDIR)$(datadir)
+       mkdir -p $(DESTDIR)$(htmldir)
+       $(INSTALL_DATA) $(srcdir)/trampoline_r.html $(DESTDIR)$(htmldir)/trampoline_r.html
+
+installdirs : force
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(exec_prefix)
+#      mkdir -p $(DESTDIR)$(libdir)
+       mkdir -p $(DESTDIR)$(includedir)
+       mkdir -p $(DESTDIR)$(mandir)
+       mkdir -p $(DESTDIR)$(mandir)/man3
+       mkdir -p $(DESTDIR)$(datadir)
+       mkdir -p $(DESTDIR)$(htmldir)
+
+uninstall : force
+#      $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libtrampoline.la
+       $(RM) $(DESTDIR)$(includedir)/trampoline_r.h
+       $(RM) $(DESTDIR)$(mandir)/man3/trampoline_r.3
+       $(RM) $(DESTDIR)$(htmldir)/trampoline_r.html
+
+test1.@OBJEXT@ : $(srcdir)/test1.c $(srcdir)/trampoline_r.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/test1.c
+
+test1 : test1.@OBJEXT@ libtrampoline.la
+       $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ test1.@OBJEXT@ libtrampoline.la $(LDFLAGS) -o test1
+
+test2.@OBJEXT@ : $(srcdir)/test2.c $(srcdir)/trampoline_r.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/test2.c
+
+test2 : test2.@OBJEXT@ libtrampoline.la
+       $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ test2.@OBJEXT@ libtrampoline.la $(LDFLAGS) -o test2
+
+check1 : all test1
+       ./test1
+
+check : all test1 test2
+       ./test1
+       ./test2
+       touch tests.passed.$(HOST)
+
+extracheck : check
+
+mostlyclean : clean
+
+clean : force
+       $(RM) $(OBJECTS) `echo $(OBJECTS) | sed -e 's/\.lo/.@OBJEXT@/g'` tramp-hppa.s tramp-hppa64.s tramp-powerpc.s tramp-powerpc64.s tramp-ia64.s cache-sparc.s cache-sparc64.s cache-alpha.s cache-hppa.s cache-hppa64.s cache-powerpc.s cache-powerpc64-elfv2.s libtrampoline.* core
+       $(RM) -r .libs _libs
+       $(RM) test1.@OBJEXT@ test1 test2.@OBJEXT@ test2
+
+distclean : clean
+       $(RM) Makefile tests.passed.*
+
+maintainer-clean : distclean
+
+
+# List of source files (committed in version control or generated by Makefile.devel).
+SOURCE_FILES = \
+  COPYING \
+  PORTING README trampoline_r.3 trampoline_r.html \
+  Makefile.devel \
+  Makefile.maint \
+  Makefile.in \
+  trampoline_r.h \
+  trampoline.c \
+  tramp-hppa-macro.S \
+  tramp-hppa64-macro.S \
+  tramp-powerpc-aix.S \
+  tramp-powerpc64-aix.S \
+  tramp-ia64-macro.S \
+  cache.c \
+  cache-alpha.c cache-alpha-linux.s cache-alpha-macro.S \
+  cache-hppa.c cache-hppa-linux.s cache-hppa-macro.S cache-hppa64-linux.s cache-hppa64-macro.S \
+  cache-powerpc.c cache-powerpc-linux.s cache-powerpc-linux-macro.S cache-powerpc-macos.s \
+  cache-powerpc64.c cache-powerpc64-elfv2-linux.s cache-powerpc64-elfv2-macro.S \
+  cache-sparc.c cache-sparc-linux.s cache-sparc-macro.S cache-sparc64-linux.s cache-sparc64-macro.S \
+  test1.c \
+  test2.c
+# List of distributed files generated by Makefile.maint.
+GENERATED_FILES = \
+  trampoline_r.man
+# List of distributed files.
+DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES)
+
+distdir : $(DISTFILES)
+       for file in $(DISTFILES); do \
+         if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \
+         cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \
+       done
+
+
+force :
diff --git a/callback/trampoline_r/Makefile.maint b/callback/trampoline_r/Makefile.maint
new file mode 100644 (file)
index 0000000..bc9c542
--- /dev/null
@@ -0,0 +1,30 @@
+# maintainer -*-Makefile-*-
+
+RM = rm -f
+
+# ==================== Easily regeneratable files ====================
+
+ROFF_MAN = groff -Tutf8 -mandoc
+
+all : trampoline_r.man
+
+trampoline_r.man : trampoline_r.3
+       $(ROFF_MAN) trampoline_r.3 > trampoline_r.man
+
+totally-clean : force
+       $(RM) trampoline_r.man
+
+
+# Files copied from other directories
+
+COPIED_FILES = \
+  PORTING \
+  cache.c \
+  cache-alpha.c \
+  cache-hppa.c
+copied-files : $(COPIED_FILES)
+$(COPIED_FILES) : % : ../../trampoline/%
+       cp $< $@
+
+
+force :
diff --git a/callback/trampoline_r/PORTING b/callback/trampoline_r/PORTING
new file mode 100644 (file)
index 0000000..46b6042
--- /dev/null
@@ -0,0 +1,95 @@
+The list of CPUs and platforms TRAMPOLINE has been ported to can be found
+at the top of file trampoline.c.
+
+To port TRAMPOLINE to a new platform, three issues may have to be resolved:
+A. a new CPU - how to build the trampoline?
+B. a new OS - how to make code in malloc'ed memory executable?
+C. a new CPU or OS - how to flush the instruction cache?
+
+
+A. a new CPU - how to build the trampoline?
+
+   The trampoline is a short sequence of machine instructions which puts
+   the constant <data> into <variable>, then jumps to <address>. The only
+   registers that are allowed to be modified are call-used registers. No
+   stack manipulations are allowed since the trampoline has to pass its
+   arguments along to the function at <address>.
+
+   1. To find out which instructions are available for "move"/"store" and
+      "jump", compile proto.c for your CPU:
+
+          make -f Makefile.devel proto-${CPU}.s
+      or
+          gcc -O2 -fomit-frame-pointer -S proto.c -o proto-${CPU}.s
+
+   2. Write down the instructions for the trampoline in a file tramp-${CPU}.s,
+      using constants for <data>, <variable>, <address>. Assemble it:
+
+          gcc -c tramp-${CPU}.s
+
+      Verify that the jump actually goes to <address>. (Beware: Some CPUs have
+      program-counter relative jumps.)
+
+          gdb tramp-${CPU}.o
+          disassemble tramp
+
+   3. Take a hex dump of tramp-${CPU}.o
+
+          hexdump -e '"%06.6_ax " 16/1 " %02X" "\n"' < tramp-${CPU}.o
+      or
+          od -tx1 -Ax < tramp-${CPU}.o
+      or
+          od -x +x < tramp-${CPU}.o
+
+      Look out for the magic numbers you used for <data>, <variable> and
+      <address>.
+
+   4. Write the code which builds up a trampoline in memory, in trampoline.c.
+
+   5. Try it:
+
+          make
+          make check1
+
+   6. Write the is_tramp() macro and the tramp_xxx() accessor macros
+      in trampoline.c.
+
+   7. Try it:
+
+          make
+          make check
+
+
+B. a new OS - how to make code in malloc'ed memory executable?
+
+   ‘configure’ will find out whether code stored in malloc'ed memory is
+   executable, or whether virtual memory protections have to be set in order
+   to allow this. (The test is pretty simple: it copies a small function
+   to malloc'ed memory and tries to executed it. The test could also fail
+   because the compiler produced non-position-independent code or because
+   of alignment issues.)
+
+   To set virtual memory protections on a page of memory, your system should
+   provide the mprotect() and getpagesize() functions. If it does not, find
+   a substitute.
+
+
+C. a new CPU or OS - how to flush the instruction cache?
+
+   CPUs which have separate data and instruction caches need to flush
+   (part of) the instruction cache when alloc_trampoline() is called.
+   (There may have been an old trampoline at the same location, and the
+   instruction cache is not updated when the new trampoline is built.
+   The effect can be that when the new trampoline is called, the old one
+   will still be executed.)
+
+   To flush the instruction cache, some CPUs have special instruction which
+   can be put into gcc "asm" statements. On some CPUs these instructions are
+   privileged, you therefore need to call some system or library function.
+   On other CPUs, the only way to flush the instruction cache is to execute
+   a long sequence of "nop" or "jump" instructions. This is hairy.
+
+
+When you are done with porting to a new platform, or even if TRAMPOLINE
+passes the "make check" out of the box without modifications, please report
+your results to the author of TRAMPOLINE, for inclusion in the next release.
diff --git a/callback/trampoline_r/README b/callback/trampoline_r/README
new file mode 100644 (file)
index 0000000..486839e
--- /dev/null
@@ -0,0 +1,12 @@
+This directory contains a reentrant version of the trampoline package.
+
+Instead of clobbering a global variable, a pointer to data0,data1,...
+is passed to the called function in a special CPU register.
+
+The number of supported data words (data0,data1) is arbitrary; 3 or 4
+or more would work as well if trampoline.c was modified appropriately.
+Two words are needed, however, for passing closures through vacall_r
+without an additional malloc() call per closure.
+
+The include file <trampoline.h> is renamed to <trampoline_r.h>.
+
diff --git a/callback/trampoline_r/cache-alpha-linux.s b/callback/trampoline_r/cache-alpha-linux.s
new file mode 100644 (file)
index 0000000..6754a16
--- /dev/null
@@ -0,0 +1,20 @@
+       .set noreorder
+       .set volatile
+       .set noat
+       .set nomacro
+       .text
+       .align 2
+       .align 4
+       .globl __TR_clear_cache
+       .ent __TR_clear_cache
+$__TR_clear_cache..ng:
+__TR_clear_cache:
+       .frame $30,0,$26,0
+       .prologue 0
+       .set    macro
+       call_pal 0x86
+       .set    nomacro
+       ret $31,($26),1
+       .end __TR_clear_cache
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/callback/trampoline_r/cache-alpha-macro.S b/callback/trampoline_r/cache-alpha-macro.S
new file mode 100644 (file)
index 0000000..e350f4c
--- /dev/null
@@ -0,0 +1,21 @@
+       .set noreorder
+       .set volatile
+       .set noat
+       .set nomacro
+       .text
+       .align 2
+       .align 4
+       .globl __TR_clear_cache
+       .ent __TR_clear_cache
+$__TR_clear_cache..ng:
+__TR_clear_cache:
+       .frame $30,0,$26,0
+       .prologue 0
+       .set    macro
+       call_pal 0x86
+       .set    nomacro
+       ret $31,($26),1
+       .end __TR_clear_cache
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/trampoline_r/cache-alpha.c b/callback/trampoline_r/cache-alpha.c
new file mode 100644 (file)
index 0000000..ad20947
--- /dev/null
@@ -0,0 +1,24 @@
+/* Instruction cache flushing for alpha */
+
+/*
+ * Copyright 1997 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+void __TR_clear_cache (void)
+{
+  /* Taken from gforth-0.3.0. */
+  asm volatile ("call_pal 0x86"); /* imb (instruction-memory barrier) */
+}
diff --git a/callback/trampoline_r/cache-hppa-linux.s b/callback/trampoline_r/cache-hppa-linux.s
new file mode 100644 (file)
index 0000000..b9c9a6d
--- /dev/null
@@ -0,0 +1,33 @@
+       .LEVEL 1.1
+       .text
+       .align 4
+.globl __TR_clear_cache
+               .type            __TR_clear_cache,@function
+__TR_clear_cache:
+       .PROC
+       .CALLINFO FRAME=0,NO_CALLS
+       .ENTRY
+#APP
+       fdc 0(0,%r26)
+       fdc 0(0,%r25)
+       sync
+       mfsp %sr0,%r20
+       ldsid (0,%r26),%r26
+       mtsp %r26,%sr0
+       fic 0(%sr0,%r26)
+       fic 0(%sr0,%r25)
+       sync
+       mtsp %r20,%sr0
+       nop
+       nop
+       nop
+       nop
+       nop
+       nop
+#NO_APP
+       bv,n %r0(%r2)
+       .EXIT
+       .PROCEND
+.Lfe1:
+       .size   __TR_clear_cache,.Lfe1-__TR_clear_cache
+       .ident  "GCC: (GNU) 3.1"
diff --git a/callback/trampoline_r/cache-hppa-macro.S b/callback/trampoline_r/cache-hppa-macro.S
new file mode 100644 (file)
index 0000000..7c39646
--- /dev/null
@@ -0,0 +1,36 @@
+#include "asm-hppa.h"
+       .LEVEL 1.1
+       IMPORT_MILLICODE($$dyncall)
+       TEXT1()
+       TEXT2()
+       .align 4
+GLOBL(__TR_clear_cache)
+               DECLARE_FUNCTION(__TR_clear_cache)
+DEF(__TR_clear_cache)
+       .PROC
+       .CALLINFO FRAME=0,NO_CALLS
+       .ENTRY
+       fdc 0(0,%r26)
+       fdc 0(0,%r25)
+       sync
+       mfsp %sr0,%r20
+       ldsid (0,%r26),%r26
+       mtsp %r26,%sr0
+       fic 0(%sr0,%r26)
+       fic 0(%sr0,%r25)
+       sync
+       mtsp %r20,%sr0
+       nop
+       nop
+       nop
+       nop
+       nop
+       nop
+       bv,n %r0(%r2)
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(__TR_clear_cache)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/trampoline_r/cache-hppa.c b/callback/trampoline_r/cache-hppa.c
new file mode 100644 (file)
index 0000000..2174716
--- /dev/null
@@ -0,0 +1,65 @@
+/* Instruction cache flushing for hppa */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#ifdef __hppa64__
+/* Tell GCC not to clobber the registers that are call-saved in the HP C
+   calling convention. */
+register long arg0 __asm__("r26");
+register long arg1 __asm__("r25");
+register long arg2 __asm__("r24");
+register long arg3 __asm__("r23");
+register long arg4 __asm__("r22");
+register long arg5 __asm__("r21");
+register long arg6 __asm__("r20");
+register long arg7 __asm__("r19");
+#endif
+
+/*
+ * This assumes that the range [first_addr..last_addr] lies in at most two
+ * cache lines.
+ */
+void __TR_clear_cache (char* first_addr, char* last_addr)
+{
+  register int tmp1;
+  register int tmp2;
+  /* Flush the relevant data cache lines. (Yes, this is needed. I tried it.) */
+  asm volatile ("fdc 0(0,%0)"
+         "\n\t" "fdc 0(0,%1)"
+         "\n\t" "sync"
+                :
+                : "r" (first_addr), "r" (last_addr)
+               );
+  /* Flush the relevant instruction cache lines. */
+  asm volatile ("mfsp %%sr0,%1"
+         "\n\t" "ldsid (0,%4),%0"
+         "\n\t" "mtsp %0,%%sr0"
+         "\n\t" "fic 0(%%sr0,%2)"
+         "\n\t" "fic 0(%%sr0,%3)"
+         "\n\t" "sync"
+         "\n\t" "mtsp %1,%%sr0"
+         "\n\t" "nop"
+         "\n\t" "nop"
+         "\n\t" "nop"
+         "\n\t" "nop"
+         "\n\t" "nop"
+         "\n\t" "nop"
+                : "=r" (tmp1), "=r" (tmp2)
+                : "r" (first_addr), "r" (last_addr), "r" (first_addr)
+               );
+}
diff --git a/callback/trampoline_r/cache-hppa64-linux.s b/callback/trampoline_r/cache-hppa64-linux.s
new file mode 100644 (file)
index 0000000..928f35f
--- /dev/null
@@ -0,0 +1,35 @@
+       .LEVEL 2.0w
+       .text
+       .align 8
+.globl __TR_clear_cache
+               .type            __TR_clear_cache,@function
+__TR_clear_cache:
+       .PROC
+       .CALLINFO FRAME=128,NO_CALLS
+       .ENTRY
+       ldo 128(%r30),%r30
+#APP
+       fdc 0(0,%r26)
+       fdc 0(0,%r25)
+       sync
+       mfsp %sr0,%r31
+       ldsid (0,%r26),%r28
+       mtsp %r28,%sr0
+       fic 0(%sr0,%r26)
+       fic 0(%sr0,%r25)
+       sync
+       mtsp %r31,%sr0
+       nop
+       nop
+       nop
+       nop
+       nop
+       nop
+#NO_APP
+       bve (%r2)
+       ldo -128(%r30),%r30
+       .EXIT
+       .PROCEND
+.Lfe1:
+       .size   __TR_clear_cache,.Lfe1-__TR_clear_cache
+       .ident  "GCC: (GNU) 3.1"
diff --git a/callback/trampoline_r/cache-hppa64-macro.S b/callback/trampoline_r/cache-hppa64-macro.S
new file mode 100644 (file)
index 0000000..e5344ae
--- /dev/null
@@ -0,0 +1,37 @@
+#include "asm-hppa64.h"
+       .LEVEL 2.0w
+       TEXT1()
+       TEXT2()
+       .align 8
+GLOBL(__TR_clear_cache)
+               DECLARE_FUNCTION(__TR_clear_cache)
+DEF(__TR_clear_cache)
+       .PROC
+       .CALLINFO FRAME=128,NO_CALLS
+       .ENTRY
+       ldo 128(%r30),%r30
+       fdc 0(0,%r26)
+       fdc 0(0,%r25)
+       sync
+       mfsp %sr0,%r31
+       ldsid (0,%r26),%r28
+       mtsp %r28,%sr0
+       fic 0(%sr0,%r26)
+       fic 0(%sr0,%r25)
+       sync
+       mtsp %r31,%sr0
+       nop
+       nop
+       nop
+       nop
+       nop
+       nop
+       bve (%r2)
+       ldo -128(%r30),%r30
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(__TR_clear_cache)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/trampoline_r/cache-powerpc-linux-macro.S b/callback/trampoline_r/cache-powerpc-linux-macro.S
new file mode 100644 (file)
index 0000000..9fb39b2
--- /dev/null
@@ -0,0 +1,31 @@
+       .file   "cache-powerpc.c"
+       .section        ".text"
+       .align 2
+       .globl __TR_clear_cache
+       .type   __TR_clear_cache, @function
+__TR_clear_cache:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-32(1)
+       icbi 0,3; dcbf 0,3
+       addi 0,3,4
+       icbi 0,0; dcbf 0,0
+       addi 9,3,8
+       icbi 0,9; dcbf 0,9
+       addi 0,3,12
+       icbi 0,0; dcbf 0,0
+       addi 9,3,16
+       icbi 0,9; dcbf 0,9
+       addi 3,3,20
+       icbi 0,3; dcbf 0,3
+       sync; isync
+       addi 1,1,32
+       blr
+       .size   __TR_clear_cache, .-__TR_clear_cache
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/trampoline_r/cache-powerpc-linux.s b/callback/trampoline_r/cache-powerpc-linux.s
new file mode 100644 (file)
index 0000000..11788b3
--- /dev/null
@@ -0,0 +1,42 @@
+       .file   "cache-powerpc.c"
+       .section        ".text"
+       .align 2
+       .globl __TR_clear_cache
+       .type   __TR_clear_cache, @function
+__TR_clear_cache:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-32(1)
+#APP
+       icbi 0,3; dcbf 0,3
+#NO_APP
+       addi 0,3,4
+#APP
+       icbi 0,0; dcbf 0,0
+#NO_APP
+       addi 9,3,8
+#APP
+       icbi 0,9; dcbf 0,9
+#NO_APP
+       addi 0,3,12
+#APP
+       icbi 0,0; dcbf 0,0
+#NO_APP
+       addi 9,3,16
+#APP
+       icbi 0,9; dcbf 0,9
+#NO_APP
+       addi 3,3,20
+#APP
+       icbi 0,3; dcbf 0,3
+       sync; isync
+#NO_APP
+       addi 1,1,32
+       blr
+       .size   __TR_clear_cache, .-__TR_clear_cache
+       .section        .note.GNU-stack,"",@progbits
+       .ident  "GCC: (GNU) 3.3.6"
diff --git a/callback/trampoline_r/cache-powerpc-macos.s b/callback/trampoline_r/cache-powerpc-macos.s
new file mode 100644 (file)
index 0000000..c468cf3
--- /dev/null
@@ -0,0 +1,17 @@
+.text
+       .align 2
+       .globl ___TR_clear_cache
+___TR_clear_cache:
+       icbi 0,r3; dcbf 0,r3
+       addi r0,r3,4
+       icbi 0,r0; dcbf 0,r0
+       addi r9,r3,8
+       icbi 0,r9; dcbf 0,r9
+       addi r0,r3,12
+       icbi 0,r0; dcbf 0,r0
+       addi r9,r3,16
+       icbi 0,r9; dcbf 0,r9
+       addi r3,r3,20
+       icbi 0,r3; dcbf 0,r3
+       sync; isync
+       blr
diff --git a/callback/trampoline_r/cache-powerpc.c b/callback/trampoline_r/cache-powerpc.c
new file mode 100644 (file)
index 0000000..88dbb0b
--- /dev/null
@@ -0,0 +1,32 @@
+/* Instruction cache flushing for powerpc, not on AIX */
+
+/*
+ * Copyright 1997-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+void __TR_clear_cache (char* first_addr)
+{
+  /* Taken from egcs-1.1.2/gcc/config/rs6000/tramp.asm. */
+  /* The number of asm statements here depends on the value of TRAMP_LENGTH
+     for __powerpcsysv4__. */
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+4));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+8));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+12));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+16));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+20));
+  asm volatile ("sync; isync");
+}
diff --git a/callback/trampoline_r/cache-powerpc64-elfv2-linux.s b/callback/trampoline_r/cache-powerpc64-elfv2-linux.s
new file mode 100644 (file)
index 0000000..e51aef5
--- /dev/null
@@ -0,0 +1,42 @@
+       .file   "cache-powerpc64.c"
+       .machine power4
+       .abiversion 2
+       .section        ".toc","aw"
+       .section        ".text"
+       .align 2
+       .p2align 4,,15
+       .globl __TR_clear_cache
+       .type   __TR_clear_cache, @function
+__TR_clear_cache:
+#APP
+ # 25 "cache-powerpc64.c" 1
+       icbi 0,3; dcbf 0,3
+ # 0 "" 2
+#NO_APP
+       addi 9,3,4
+#APP
+ # 26 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+#NO_APP
+       addi 9,3,8
+#APP
+ # 27 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+#NO_APP
+       addi 3,3,12
+#APP
+ # 28 "cache-powerpc64.c" 1
+       icbi 0,3; dcbf 0,3
+ # 0 "" 2
+ # 29 "cache-powerpc64.c" 1
+       sync; isync
+ # 0 "" 2
+#NO_APP
+       blr
+       .long 0
+       .byte 0,0,0,0,0,0,0,0
+       .size   __TR_clear_cache,.-__TR_clear_cache
+       .ident  "GCC: (GNU) 5.4.0"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/callback/trampoline_r/cache-powerpc64-elfv2-macro.S b/callback/trampoline_r/cache-powerpc64-elfv2-macro.S
new file mode 100644 (file)
index 0000000..81c43d0
--- /dev/null
@@ -0,0 +1,35 @@
+       .file   "cache-powerpc64.c"
+       .machine power4
+       .abiversion 2
+       .section        ".toc","aw"
+       .section        ".text"
+       .align 2
+       .p2align 4,,15
+       .globl __TR_clear_cache
+       .type   __TR_clear_cache, @function
+__TR_clear_cache:
+ # 25 "cache-powerpc64.c" 1
+       icbi 0,3; dcbf 0,3
+ # 0 "" 2
+       addi 9,3,4
+ # 26 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+       addi 9,3,8
+ # 27 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+       addi 3,3,12
+ # 28 "cache-powerpc64.c" 1
+       icbi 0,3; dcbf 0,3
+ # 0 "" 2
+ # 29 "cache-powerpc64.c" 1
+       sync; isync
+ # 0 "" 2
+       blr
+       .long 0
+       .byte 0,0,0,0,0,0,0,0
+       .size   __TR_clear_cache,.-__TR_clear_cache
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/trampoline_r/cache-powerpc64.c b/callback/trampoline_r/cache-powerpc64.c
new file mode 100644 (file)
index 0000000..76a2b72
--- /dev/null
@@ -0,0 +1,30 @@
+/* Instruction cache flushing for powerpc64, not the AIX ABI */
+
+/*
+ * Copyright 1997-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+void __TR_clear_cache (char* first_addr)
+{
+  /* Taken from egcs-1.1.2/gcc/config/rs6000/tramp.asm. */
+  /* The number of asm statements here depends on the value of TRAMP_LENGTH-2*8
+     for __powerpc64_elfv2__. */
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+4));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+8));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+12));
+  asm volatile ("sync; isync");
+}
diff --git a/callback/trampoline_r/cache-sparc-linux.s b/callback/trampoline_r/cache-sparc-linux.s
new file mode 100644 (file)
index 0000000..2fa77f5
--- /dev/null
@@ -0,0 +1,15 @@
+       .file   "cache-sparc.c"
+       .section        ".text"
+       .align 4
+       .global __TR_clear_cache_2
+       .type   __TR_clear_cache_2,#function
+       .proc   020
+__TR_clear_cache_2:
+       !#PROLOGUE# 0
+       iflush %o0+0;iflush %o0+8
+       nop
+       retl
+       nop
+.LLfe1:
+       .size   __TR_clear_cache_2,.LLfe1-__TR_clear_cache_2
+       .ident  "GCC: (GNU) 3.1"
diff --git a/callback/trampoline_r/cache-sparc-macro.S b/callback/trampoline_r/cache-sparc-macro.S
new file mode 100644 (file)
index 0000000..b633dc5
--- /dev/null
@@ -0,0 +1,17 @@
+#include "asm-sparc.h"
+       .section        ".text"
+       .align 4
+       .global C(__TR_clear_cache_2)
+       DECLARE_FUNCTION(__TR_clear_cache_2)
+       .proc   020
+FUNBEGIN(__TR_clear_cache_2)
+       !$PROLOGUE$ 0
+       iflush %o0+0;iflush %o0+8
+       nop
+       retl
+       nop
+L(Lfe1):
+       FUNEND(__TR_clear_cache_2)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/trampoline_r/cache-sparc.c b/callback/trampoline_r/cache-sparc.c
new file mode 100644 (file)
index 0000000..81bc434
--- /dev/null
@@ -0,0 +1,29 @@
+/* Instruction cache flushing for sparc */
+
+/*
+ * Copyright 1996-1999 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/*
+ * This assumes that the range [first_addr..last_addr] lies in at most two
+ * cache lines.
+ */
+void __TR_clear_cache_2 (char* first_addr, char* last_addr)
+{
+  asm volatile ("iflush %0+0;" /* the +0 is needed by gas, says gforth-0.3.0 */
+                "iflush %0+8"
+                : : "r" (first_addr));
+}
diff --git a/callback/trampoline_r/cache-sparc64-linux.s b/callback/trampoline_r/cache-sparc64-linux.s
new file mode 100644 (file)
index 0000000..eb13421
--- /dev/null
@@ -0,0 +1,13 @@
+       .file   "cache-sparc.c"
+       .section        ".text"
+       .align 4
+       .global __TR_clear_cache_2
+       .type   __TR_clear_cache_2, #function
+       .proc   020
+__TR_clear_cache_2:
+       iflush %o0+0;iflush %o0+8
+       jmp     %o7+8
+        nop
+       .size   __TR_clear_cache_2, .-__TR_clear_cache_2
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        ".note.GNU-stack"
diff --git a/callback/trampoline_r/cache-sparc64-macro.S b/callback/trampoline_r/cache-sparc64-macro.S
new file mode 100644 (file)
index 0000000..039fd8e
--- /dev/null
@@ -0,0 +1,14 @@
+#include "asm-sparc.h"
+       .section        ".text"
+       .align 4
+       .global C(__TR_clear_cache_2)
+       DECLARE_FUNCTION(__TR_clear_cache_2)
+       .proc   020
+FUNBEGIN(__TR_clear_cache_2)
+       iflush %o0+0;iflush %o0+8
+       jmp     %o7+8
+        nop
+       FUNEND(__TR_clear_cache_2)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/trampoline_r/cache.c b/callback/trampoline_r/cache.c
new file mode 100644 (file)
index 0000000..7d34af9
--- /dev/null
@@ -0,0 +1,143 @@
+/* This file is derived from gcc-2.6.3/libgcc2.c, section L_clear_cache */
+
+/* Copyright (C) 1989-2017 Free Software Foundation, Inc.
+
+   This program is free software: you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 2 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
+
+
+/* Clear part of an instruction cache. */
+
+/* Our emphasis here is _not_ to clear as few cache lines as possible
+ * or with as few machine instructions as possible, but to do it _right_.
+ */
+
+
+
+/* This code is apparently untested!! */
+
+/* This is from Andreas Stolcke <stolcke@ICSI.Berkeley.EDU>. */
+#if defined(__mips__) || defined(__mips64__)
+#include <sys/cachectl.h>
+#define CLEAR_INSN_CACHE(BEG, END)   \
+   cacheflush (BEG, END - BEG, BCACHE)
+#endif
+
+void
+__TR_clear_cache (beg, end)
+     char *beg, *end;
+{
+#ifdef CLEAR_INSN_CACHE 
+  CLEAR_INSN_CACHE (beg, end);
+#else
+#ifdef INSN_CACHE_SIZE /* This is actually dead code!! */
+#define INSN_CACHE_PLANE_SIZE (INSN_CACHE_SIZE / INSN_CACHE_DEPTH)
+  static char array[INSN_CACHE_SIZE + INSN_CACHE_PLANE_SIZE + INSN_CACHE_LINE_WIDTH];
+  static int initialized = 0;
+  int offset;
+  void *start_addr;
+  void *end_addr;
+  typedef (*function_ptr) ();
+
+#if (INSN_CACHE_SIZE / INSN_CACHE_LINE_WIDTH) < 16
+  /* It's cheaper to clear the whole cache.
+     Put in a series of jump instructions so that calling the beginning
+     of the cache will clear the whole thing.  */
+
+  if (! initialized)
+    {
+      int ptr = (((int) array + INSN_CACHE_LINE_WIDTH - 1)
+                & -INSN_CACHE_LINE_WIDTH);
+      int end_ptr = ptr + INSN_CACHE_SIZE;
+
+      while (ptr < end_ptr)
+       {
+         *(INSTRUCTION_TYPE *)ptr
+           = JUMP_AHEAD_INSTRUCTION + INSN_CACHE_LINE_WIDTH;
+         ptr += INSN_CACHE_LINE_WIDTH;
+       }
+      *(INSTRUCTION_TYPE *)(ptr - INSN_CACHE_LINE_WIDTH) = RETURN_INSTRUCTION;
+
+      initialized = 1;
+    }
+
+  /* Call the beginning of the sequence.  */
+  (((function_ptr) (((int) array + INSN_CACHE_LINE_WIDTH - 1)
+                   & -INSN_CACHE_LINE_WIDTH))
+   ());
+
+#else /* Cache is large.  */
+
+  if (! initialized)
+    {
+      int ptr = (((int) array + INSN_CACHE_LINE_WIDTH - 1)
+                & -INSN_CACHE_LINE_WIDTH);
+
+      while (ptr < (int) array + sizeof array)
+       {
+         *(INSTRUCTION_TYPE *)ptr = RETURN_INSTRUCTION;
+         ptr += INSN_CACHE_LINE_WIDTH;
+       }
+
+      initialized = 1;
+    }
+
+  /* Find the location in array that occupies the same cache line as BEG.  */
+
+  offset = ((int) beg & -INSN_CACHE_LINE_WIDTH) & (INSN_CACHE_PLANE_SIZE - 1);
+  start_addr = (((int) (array + INSN_CACHE_PLANE_SIZE - 1)
+                & -INSN_CACHE_PLANE_SIZE)
+               + offset);
+
+  /* Compute the cache alignment of the place to stop clearing.  */
+#if 0  /* This is not needed for gcc's purposes.  */
+  /* If the block to clear is bigger than a cache plane,
+     we clear the entire cache, and OFFSET is already correct.  */ 
+  if (end < beg + INSN_CACHE_PLANE_SIZE)
+#endif
+    offset = (((int) (end + INSN_CACHE_LINE_WIDTH - 1)
+              & -INSN_CACHE_LINE_WIDTH)
+             & (INSN_CACHE_PLANE_SIZE - 1));
+
+#if INSN_CACHE_DEPTH > 1
+  end_addr = (start_addr & -INSN_CACHE_PLANE_SIZE) + offset;
+  if (end_addr <= start_addr)
+    end_addr += INSN_CACHE_PLANE_SIZE;
+
+  for (plane = 0; plane < INSN_CACHE_DEPTH; plane++)
+    {
+      int addr = start_addr + plane * INSN_CACHE_PLANE_SIZE;
+      int stop = end_addr + plane * INSN_CACHE_PLANE_SIZE;
+
+      while (addr != stop)
+       {
+         /* Call the return instruction at ADDR.  */
+         ((function_ptr) addr) ();
+
+         addr += INSN_CACHE_LINE_WIDTH;
+       }
+    }
+#else /* just one plane */
+  do
+    {
+      /* Call the return instruction at START_ADDR.  */
+      ((function_ptr) start_addr) ();
+
+      start_addr += INSN_CACHE_LINE_WIDTH;
+    }
+  while ((start_addr % INSN_CACHE_SIZE) != offset);
+#endif /* just one plane */
+#endif /* Cache is large */
+#endif /* Cache exists */
+#endif /* CLEAR_INSN_CACHE */
+}
diff --git a/callback/trampoline_r/test1.c b/callback/trampoline_r/test1.c
new file mode 100644 (file)
index 0000000..cb1bfdf
--- /dev/null
@@ -0,0 +1,105 @@
+/* Trampoline test */
+
+/*
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "trampoline_r.h"
+#include "ffcall-abi.h"  /* Define __${host_cpu}__ */
+
+/* Set when we can check that the env register is being passed correctly. */
+#if defined __GNUC__ && !defined __clang__ && !defined(__arm__)
+#define CHECK_ENV_REGISTER
+#endif
+
+#define MAGIC1  0x9db9af42
+#define MAGIC2  0x614a13c9
+#define MAGIC3  0x7aff3cb4
+#define MAGIC4  0xa2f9d045
+
+#ifdef __cplusplus
+typedef int (*function)(...);
+#else
+typedef int (*function)();
+#endif
+
+int f (int x)
+{
+#ifdef CHECK_ENV_REGISTER
+#ifdef __i386__
+register void* env __asm__("%ecx");
+#endif
+#ifdef __m68k__
+register void* env __asm__("a0");
+#endif
+#if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__)
+register void* env __asm__("$2");
+#endif
+#if defined(__sparc__) && !defined(__sparc64__)
+register void* env __asm__("%g2");
+#endif
+#ifdef __sparc64__
+register void* env __asm__("%g5");
+#endif
+#ifdef __alpha__
+register void* env __asm__("$1");
+#endif
+#if defined(__hppa__) && !defined(__hppa64__)
+register void* env __asm__("%r29");
+#endif
+#ifdef __hppa64__
+register void* env __asm__("%r31");
+#endif
+#ifdef __arm64__
+register void* env __asm__("x18");
+#endif
+#ifdef __powerpc__
+register void* env __asm__("r11");
+#endif
+#ifdef __ia64__
+register void* env __asm__("r15");
+#endif
+#ifdef __x86_64__
+register void* env __asm__("r10");
+#endif
+#if defined(__s390__) || defined(__s390x__)
+register void* env __asm__("r0");
+#endif
+#if defined(__riscv32__) || defined(__riscv64__)
+register void* env __asm__("t2");
+#endif
+
+  return x + (int)(long)((void**)env)[0] + (int)(long)((void**)env)[1] + MAGIC3;
+#else
+  return x + MAGIC3;
+#endif
+}
+
+int main ()
+{
+  function cf = alloc_trampoline_r((function)&f, (void*)MAGIC1, (void*)MAGIC2);
+#ifdef CHECK_ENV_REGISTER
+  if ((*cf)(MAGIC4) == MAGIC1+MAGIC2+MAGIC3+MAGIC4)
+#else
+  if ((*cf)(MAGIC4) == MAGIC3+MAGIC4)
+#endif
+    { free_trampoline_r(cf); printf("Works, test1 passed.\n"); exit(0); }
+  else
+    { printf("Doesn't work!\n"); exit(1); }
+}
diff --git a/callback/trampoline_r/test2.c b/callback/trampoline_r/test2.c
new file mode 100644 (file)
index 0000000..cd4bd1f
--- /dev/null
@@ -0,0 +1,52 @@
+/* Trampoline accessor test */
+
+/*
+ * Copyright 1995-2005 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "trampoline_r.h"
+
+#ifdef __cplusplus
+typedef int (*function)(...);
+#else
+typedef int (*function)();
+#endif
+
+int f (int x)
+{ return x; }
+
+#define MAGIC1  0x9db9af42
+#define MAGIC2  0x614a13c9
+
+int main ()
+{
+  function cf = alloc_trampoline_r((function)&f, (void*)MAGIC1, (void*)MAGIC2);
+  if (is_trampoline_r((void*)&main))
+    { printf("is_trampoline_r(&main) returns true!\n"); exit(1); }
+  if (!is_trampoline_r((void*)cf))
+    { printf("is_trampoline_r() returns false!\n"); exit(1); }
+  if (trampoline_r_address(cf) != (function)&f)
+    { printf("trampoline_r_address() doesn't work!\n"); exit(1); }
+  if (trampoline_r_data0(cf) != (void*)MAGIC1)
+    { printf("trampoline_r_data0() doesn't work!\n"); exit(1); }
+  if (trampoline_r_data1(cf) != (void*)MAGIC2)
+    { printf("trampoline_r_data1() doesn't work!\n"); exit(1); }
+  printf("test2 passed.\n");
+  exit(0);
+}
diff --git a/callback/trampoline_r/tramp-hppa-macro.S b/callback/trampoline_r/tramp-hppa-macro.S
new file mode 100644 (file)
index 0000000..f223283
--- /dev/null
@@ -0,0 +1,49 @@
+; Trampoline for hppa CPU
+
+; Copyright 1997-2017 Bruno Haible <bruno@clisp.org>
+;
+; This program is free software: you can redistribute it and/or modify
+; it under the terms of the GNU General Public License as published by
+; the Free Software Foundation; either version 2 of the License, or
+; (at your option) any later version.
+;
+; This program is distributed in the hope that it will be useful,
+; but WITHOUT ANY WARRANTY; without even the implied warranty of
+; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+; GNU General Public License for more details.
+;
+; You should have received a copy of the GNU General Public License
+; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+; Available registers: %r1, %r19, %r20, %r21, %r22, %r29, %r31.
+
+       .code
+       .IMPORT $global$,DATA
+       .IMPORT $$dyncall,MILLICODE
+       .code
+
+       .align 4
+       .EXPORT tramp_r,ENTRY,PRIV_LEV=3,ARGW0=GR,ARGW1=GR
+       .label tramp_r
+       .PROC
+       .CALLINFO FRAME=0,NO_CALLS
+       .ENTRY
+; The closure pointer is already in register %r19.
+; Move <data> into register %r29
+       ldw 0(0,%r19),%r29
+; Move <address> into register %r21.
+       ldw 4(0,%r19),%r21
+; Jump to it.
+       bb,>=,n %r21,30,tramp_r_2
+       depi 0,31,2,%r21
+       ldw 4(0,%r21),%r19
+       ldw 0(0,%r21),%r21
+       .label tramp_r_2
+       ldsid (0,%r21),%r1
+       mtsp %r1,%sr0
+       be,n 0(%sr0,%r21)
+       nop
+       .EXIT
+       .PROCEND
+
+#include "noexecstack.h"
diff --git a/callback/trampoline_r/tramp-hppa64-macro.S b/callback/trampoline_r/tramp-hppa64-macro.S
new file mode 100644 (file)
index 0000000..62eb419
--- /dev/null
@@ -0,0 +1,48 @@
+; Trampoline for hppa64 CPU
+
+; Copyright 2017 Bruno Haible <bruno@clisp.org>
+;
+; This program is free software: you can redistribute it and/or modify
+; it under the terms of the GNU General Public License as published by
+; the Free Software Foundation; either version 2 of the License, or
+; (at your option) any later version.
+;
+; This program is distributed in the hope that it will be useful,
+; but WITHOUT ANY WARRANTY; without even the implied warranty of
+; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+; GNU General Public License for more details.
+;
+; You should have received a copy of the GNU General Public License
+; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+; Available registers: %r1, %r27, %r31.
+; %r27 has a fixed meaning at function calls: pic_base (a.k.a. gp or dp).
+; %r31 has a fixed meaning as millicode return pointer (mrp).
+
+#include "asm-hppa64.h"
+
+       .LEVEL 2.0w
+       TEXT1()
+       TEXT2()
+       .align 8
+       GLOBL(tramp_r)
+       DECLARE_FUNCTION(tramp_r)
+DEF(tramp_r)
+       .PROC
+       .CALLINFO FRAME=0,NO_CALLS
+       .ENTRY
+; The closure pointer is already in register %r27.
+; Move <data> into register %r31.
+       ldd 0(%r27),%r31                ; get <data>
+; Jump to <function>.
+       ldd 8(%r27),%r27                ; get <function>
+       ldd 16(%r27),%r1
+       ldd 24(%r27),%r27
+       bve (%r1)                       ; jump to <function>
+        nop
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(tramp_r)
+
+#include "noexecstack.h"
diff --git a/callback/trampoline_r/tramp-ia64-macro.S b/callback/trampoline_r/tramp-ia64-macro.S
new file mode 100644 (file)
index 0000000..f2deeec
--- /dev/null
@@ -0,0 +1,43 @@
+/* Trampoline for ia64 CPU */
+
+/*
+ * Copyright 2001-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/* Available registers: r14 ... r31, r9 ... r11, r2 ... r3. */
+
+       .text
+       .align 16
+       .global tramp_r#
+       .proc tramp_r#
+tramp_r:
+       /* The closure pointer is already in register r1. */
+       ld8 r14 = [r1]          /* Move <address> into register r14. */
+       adds r15 = 8, r1
+       ;;
+       ld8 r15 = [r15]         /* Move <data> into register r15. */
+       /* Jump to r14. */
+       ld8 r17 = [r14]
+       adds r16 = 8, r14
+       ;;
+       ld8 r1 = [r16]
+       mov b6 = r17
+       ;;
+       br b6
+       ;;
+       .endp tramp_r#
+
+#include "noexecstack.h"
diff --git a/callback/trampoline_r/tramp-powerpc-aix.S b/callback/trampoline_r/tramp-powerpc-aix.S
new file mode 100644 (file)
index 0000000..2ed1eca
--- /dev/null
@@ -0,0 +1,49 @@
+/* Trampoline for powerpc CPU with AIX calling convention */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/* Available registers: r0, r11, r12. */
+/* However, r0 is special in that it cannot be used as a base register. */
+
+       .globl tramp_r
+       .globl .tramp_r
+.csect tramp_r[DS]
+tramp_r:
+       .long .tramp_r, 0, 0
+.csect .text[PR]
+.tramp_r:
+/* Move <data> into register r11 */
+       lwz 11,0(2)     /* get <data> */
+/* Get <function> */
+       lwz 12,4(2)
+/*
+ * gcc-2.6.3 source says:
+ * A function pointer is a pointer to a data area whose first word contains
+ * the actual address of the function, whose second word contains a pointer
+ * to its TOC, and whose third word contains a value to place in the static
+ * chain register (r11). But we have already placed our information in r11.
+ */
+/*     lwz 11,8(12)       pass static chain in r11 */
+       lwz 2,4(12)     /* pass TOC in r2 */
+       lwz 0,0(12)     /* actual code address */
+       mtctr 0
+       bctr
+
+_section_.text:
+.csect .data[RW]
+       .long _section_.text
diff --git a/callback/trampoline_r/tramp-powerpc64-aix.S b/callback/trampoline_r/tramp-powerpc64-aix.S
new file mode 100644 (file)
index 0000000..2221dda
--- /dev/null
@@ -0,0 +1,55 @@
+/* Trampoline for powerpc64 CPU with AIX calling convention */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/* Available registers: r0, r11, r12. */
+/* However, r0 is special in that it cannot be used as a base register. */
+
+       .machine "ppc64"
+
+#ifdef _AIX
+       .rename H.4.NO_SYMBOL{PR},""
+       .lglobl H.4.NO_SYMBOL{PR}
+
+       .globl .tramp_r
+       .csect  H.4.NO_SYMBOL{PR},7
+#else
+       .globl tramp_r
+       .globl .tramp_r
+tramp_r:
+       .quad .tramp_r
+#endif
+.tramp_r:
+/* Move <data> into register r11 */
+       ld 11,0(2)      /* get <data> */
+/* Get <function> */
+       ld 12,8(2)
+/*
+ * gcc-2.6.3 source says:
+ * A function pointer is a pointer to a data area whose first word contains
+ * the actual address of the function, whose second word contains a pointer
+ * to its TOC, and whose third word contains a value to place in the static
+ * chain register (r11). But we have already placed our information in r11.
+ */
+/*     ld 11,16(12)       pass static chain in r11 */
+       ld 2,8(12)      /* pass TOC in r2 */
+       ld 0,0(12)      /* actual code address */
+       mtctr 0
+       bctr
+
+#include "noexecstack.h"
diff --git a/callback/trampoline_r/trampoline.c b/callback/trampoline_r/trampoline.c
new file mode 100644 (file)
index 0000000..175eb42
--- /dev/null
@@ -0,0 +1,1505 @@
+/* Trampoline construction */
+
+/*
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+
+#include "config.h"
+#include "trampoline_r.h"
+
+#if defined(__hppa__) && !defined(__hppa64__)
+#if 0
+#define __hppaold__  /* Old trampoline, real machine code. */
+#else
+#define __hppanew__  /* New trampoline, just a closure. */
+#endif
+#endif
+#if defined(__hppa64__)
+#if 0
+#define __hppa64old__  /* Old trampoline, real machine code. */
+#else
+#define __hppa64new__  /* New trampoline, just a closure. */
+#endif
+#endif
+#if defined(__powerpc__) && !defined(__powerpc64__)
+#if !defined(_AIX)
+#define __powerpcsysv4__  /* SysV.4 ABI, real machine code. */
+#else
+#define __powerpcaix__  /* AIX ABI, just a closure. */
+#endif
+#endif
+#if defined(__powerpc64__) && !defined(__powerpc64_elfv2__)
+#define __powerpc64aix__  /* AIX ABI, just a closure. */
+#endif
+#if defined(__hppanew__) || defined(__hppa64new__)
+/*
+ * A function pointer is a biased pointer to a data area whose first word
+ * (hppa) or third word (hppa64) contains the actual address of the function.
+ */
+extern void tramp_r (); /* trampoline prototype */
+/* We don't need to take any special measures to make the code executable
+ * since the actual instructions are in the text segment.
+ */
+#ifndef CODE_EXECUTABLE
+#define CODE_EXECUTABLE
+#endif
+#endif
+#if defined(__powerpcaix__) || defined(__powerpc64aix__) || defined(__ia64__)
+/*
+ * A function pointer is a pointer to a data area whose first word contains
+ * the actual address of the function.
+ */
+extern void (*tramp_r) (); /* trampoline prototype */
+/* We don't need to take any special measures to make the code executable
+ * since the actual instructions are in the text segment.
+ */
+#ifndef CODE_EXECUTABLE
+#define CODE_EXECUTABLE
+#endif
+#endif
+
+#ifndef CODE_EXECUTABLE
+  /* How do we make the trampoline's code executable? */
+  #if defined(HAVE_MACH_VM) || defined(HAVE_WORKING_MPROTECT)
+    #if HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC > 0
+      /* mprotect() [or equivalent] the malloc'ed area. */
+      #define EXECUTABLE_VIA_MALLOC_THEN_MPROTECT
+    #elif HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC > 0
+      /* mprotect() [or equivalent] the mmap'ed area. */
+      #define EXECUTABLE_VIA_MMAP_THEN_MPROTECT
+    #elif defined(HAVE_MMAP_SHARED_CAN_EXEC)
+      #define EXECUTABLE_VIA_MMAP_FILE_SHARED
+    #else
+      #error "Don't know how to make memory pages executable."
+    #endif
+  #else
+    #ifdef HAVE_MMAP
+      /* Use an mmap'ed page. */
+      #define EXECUTABLE_VIA_MMAP
+    #else
+      #ifdef HAVE_SHM
+        /* Use an shmat'ed page. */
+        #define EXECUTABLE_VIA_SHM
+      #else
+        #if defined(_WIN32) && ! defined(__CYGWIN__) /* native Windows */
+          #define EXECUTABLE_VIA_VIRTUALALLOC
+        #else
+          ??
+        #endif
+      #endif
+    #endif
+  #endif
+#endif
+
+#include <stdio.h> /* declares fprintf() */
+
+#include <sys/types.h>
+#include <stdlib.h> /* declares abort(), malloc(), free() */
+#ifdef HAVE_UNISTD_H
+#include <unistd.h>
+#endif
+
+/* Define intptr_t, uintptr_t. */
+#include <stdint.h>
+
+/* Declare getpagesize(). */
+#ifdef HAVE_GETPAGESIZE
+#ifdef __cplusplus
+extern "C" RETGETPAGESIZETYPE getpagesize (void);
+#else
+extern RETGETPAGESIZETYPE getpagesize (void);
+#endif
+#else
+#ifdef HAVE_SYS_PARAM_H
+#include <sys/param.h>
+#else
+/* Not Unix, e.g. mingw32 */
+#define PAGESIZE 4096
+#endif
+#define getpagesize() PAGESIZE
+#endif
+
+/* Declare mprotect() or equivalent. */
+#if defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) || defined(EXECUTABLE_VIA_MMAP_THEN_MPROTECT)
+#ifdef HAVE_MACH_VM
+#include <sys/resource.h>
+#include <mach/mach_interface.h>
+#ifdef __osf__
+#include <mach_init.h>
+#endif
+#include <mach/machine/vm_param.h>
+#else
+#include <sys/types.h>
+#include <sys/mman.h>
+#endif
+#endif
+
+/* Declare mmap(). */
+#if defined(EXECUTABLE_VIA_MMAP) || defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+#include <sys/types.h>
+#include <sys/mman.h>
+#if !defined(PROT_EXEC) && defined(PROT_EXECUTE) /* Irix 4.0.5 needs this */
+#define PROT_EXEC PROT_EXECUTE
+#endif
+#endif
+
+/* Declare open(). */
+#if defined(EXECUTABLE_VIA_MMAP_DEVZERO) || defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+#include <sys/types.h>
+#include <unistd.h>
+#include <fcntl.h>
+#endif
+
+/* Declare shmget(), shmat(), shmctl(). */
+#ifdef EXECUTABLE_VIA_SHM
+#include <sys/types.h>
+#include <sys/ipc.h>
+#include <sys/shm.h>
+#ifdef HAVE_SYS_SYSMACROS_H
+#include <sys/sysmacros.h>
+#endif
+#endif
+
+/* Declare VirtualAlloc(), GetSystemInfo. */
+#ifdef EXECUTABLE_VIA_VIRTUALALLOC
+#define WIN32_LEAN_AND_MEAN
+#define WIN32_EXTRA_LEAN
+#include <windows.h>
+#endif
+
+/* Some old mmap() implementations require the flag MAP_FILE whenever you pass
+   an fd >= 0. */
+#ifndef MAP_FILE
+#define MAP_FILE 0
+#endif
+/* Some old mmap() implementations require the flag MAP_VARIABLE whenever you
+   pass an addr == NULL. */
+#ifndef MAP_VARIABLE
+#define MAP_VARIABLE 0
+#endif
+
+/* Support for instruction cache flush. */
+#ifdef __i386__
+#if defined(_WIN32) && ! defined(__CYGWIN__) /* native Windows */
+#define WIN32_LEAN_AND_MEAN
+#define WIN32_EXTRA_LEAN
+#include <windows.h>
+#endif
+#endif
+#if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__riscv32__) || defined(__riscv64__)
+#ifdef HAVE_SYS_CACHECTL_H /* IRIX, Linux */
+#include <sys/cachectl.h>
+#else
+#ifdef __OpenBSD__
+#include <machine/sysarch.h>
+#endif
+#endif
+#endif
+/* Inline assembly function for instruction cache flush. */
+#if defined(__sparc__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppaold__) || defined(__hppa64old__) || defined(__powerpcsysv4__) || defined(__powerpc64_elfv2__)
+#if defined(__sparc__) || defined(__sparc64__)
+extern void __TR_clear_cache_2();
+#else
+extern void __TR_clear_cache();
+#endif
+#endif
+
+/* Support for multithread-safe coding. */
+#include "glthread/lock.h"
+
+#if !defined(CODE_EXECUTABLE) && defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+/* Opens a file descriptor and attempts to make it non-inheritable. */
+static int open_noinherit (const char *filename, int flags, int mode)
+{
+# if O_CLOEXEC
+  return open (filename, flags | O_CLOEXEC, mode);
+# else
+  int fd = open (filename, flags, mode);
+#  ifdef F_SETFD
+  if (fd >= 0)
+    {
+      int flags = fcntl (fd, F_GETFD, 0);
+      if (flags >= 0)
+        fcntl (fd, F_SETFD, flags | FD_CLOEXEC);
+    }
+#  endif
+  return fd;
+# endif
+}
+#endif
+
+/* Length and alignment of trampoline */
+#ifdef __i386__
+#define TRAMP_LENGTH 12
+#define TRAMP_ALIGN 16  /* 4 for a i386, 16 for a i486 */
+#endif
+#ifdef __m68k__
+#define TRAMP_LENGTH 14
+#define TRAMP_ALIGN 16
+#endif
+#if (defined(__mips__) || defined(__mipsn32__)) && !defined(__mips64__)
+#define TRAMP_LENGTH 24
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __mips64old__
+#define TRAMP_LENGTH 56
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __mips64__
+#define TRAMP_LENGTH 32
+#define TRAMP_ALIGN 8
+#endif
+#if defined(__sparc__) && !defined(__sparc64__)
+#define TRAMP_LENGTH 16
+#define TRAMP_ALIGN 16
+#endif
+#ifdef __sparc64__
+#define TRAMP_LENGTH 32
+#define TRAMP_ALIGN 16
+#endif
+#ifdef __alpha__
+#define TRAMP_LENGTH 32
+#define TRAMP_ALIGN 8
+#endif
+#ifdef __hppaold__
+#define TRAMP_LENGTH 48
+#define TRAMP_ALIGN 16
+#endif
+#ifdef __hppanew__
+#define TRAMP_LENGTH 16
+#define TRAMP_ALIGN 16
+#define TRAMP_BIAS 2
+#endif
+#ifdef __hppa64old__
+#define TRAMP_LENGTH 80
+#define TRAMP_ALIGN 8
+#define TRAMP_BIAS 48
+#endif
+#ifdef __hppa64new__
+#define TRAMP_LENGTH 48
+#define TRAMP_ALIGN 8
+#endif
+#if defined(__arm__) || defined(__armhf__)
+#define TRAMP_LENGTH 48
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __arm64__
+#define TRAMP_LENGTH 32
+#define TRAMP_ALIGN 8
+#endif
+#ifdef __powerpcsysv4__
+#define TRAMP_LENGTH 24
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __powerpcaix__
+#define TRAMP_LENGTH 20
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __powerpc64_elfv2__
+#define TRAMP_LENGTH 32
+#define TRAMP_ALIGN 8
+#endif
+#ifdef __powerpc64aix__
+#define TRAMP_LENGTH 40
+#define TRAMP_ALIGN 8
+#endif
+#ifdef __ia64__
+#define TRAMP_LENGTH 32
+#define TRAMP_ALIGN 16
+#endif
+#ifdef __x86_64__
+#ifdef __x86_64_x32__
+#define TRAMP_LENGTH 13
+#define TRAMP_ALIGN 4
+#else
+#define TRAMP_LENGTH 22
+#define TRAMP_ALIGN 16
+#endif
+#endif
+#if defined(__s390__) && !defined(__s390x__)
+#define TRAMP_LENGTH 20
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __s390x__
+#define TRAMP_LENGTH 32
+#define TRAMP_ALIGN 8
+#endif
+#ifdef __riscv32__
+#define TRAMP_LENGTH 24
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __riscv64__
+#define TRAMP_LENGTH 32
+#define TRAMP_ALIGN 8
+#endif
+
+#ifndef TRAMP_BIAS
+#define TRAMP_BIAS 0
+#endif
+
+#define TRAMP_TOTAL_LENGTH (TRAMP_LENGTH + 2*sizeof(void*))
+
+#if !defined(CODE_EXECUTABLE)
+static long pagesize = 0;
+#endif
+
+#if !defined(CODE_EXECUTABLE) && (defined(EXECUTABLE_VIA_MMAP_DEVZERO) || defined(EXECUTABLE_VIA_MMAP_FILE_SHARED))
+
+/* Variables needed for obtaining memory pages via mmap(). */
+#if defined(EXECUTABLE_VIA_MMAP_DEVZERO)
+static int zero_fd;
+#endif
+#if defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+static int file_fd;
+static long file_length;
+#endif
+
+/* Initialization of these variables. */
+static void for_mmap_init (void)
+{
+#if defined(EXECUTABLE_VIA_MMAP_DEVZERO)
+  zero_fd = open("/dev/zero",O_RDONLY,0644);
+  if (zero_fd < 0)
+    { fprintf(stderr,"trampoline: Cannot open /dev/zero!\n"); abort(); }
+#endif
+#if defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+  {
+    char filename[100];
+    sprintf(filename, "%s/trampdata-%d-%ld", "/tmp", getpid (), random ());
+    file_fd = open_noinherit (filename, O_CREAT | O_RDWR | O_TRUNC, 0700);
+    if (file_fd < 0)
+      { fprintf(stderr,"trampoline: Cannot open %s!\n",filename); abort(); }
+    /* Remove the file from the file system as soon as possible, to make
+       sure there is no leftover after this process terminates or crashes. */
+    unlink(filename);
+  }
+  file_length = 0;
+#endif
+}
+
+/* Once-only initializer for these variables. */
+gl_once_define(static, for_mmap_once)
+
+#endif
+
+#if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT)
+/* AIX doesn't support mprotect() in malloc'ed memory. Must get pages of
+ * memory with execute permission via mmap(). Then keep a free list of
+ * free trampolines.
+ */
+static char* freelist = NULL;
+/* Lock that protects the freelist from simultaneous access from multiple
+   threads. */
+gl_lock_define_initialized(static, freelist_lock)
+#endif
+
+__TR_function alloc_trampoline_r (__TR_function address, void* data0, void* data1)
+{
+  char* function;
+  char* function_x;
+  char* data;
+
+#if !defined(CODE_EXECUTABLE)
+  /* First, get the page size once and for all. */
+  if (!pagesize)
+    {
+      /* Simultaneous execution of this initialization in multiple threads
+         is OK. */
+#if defined(EXECUTABLE_VIA_VIRTUALALLOC)
+      /* GetSystemInfo
+         <https://msdn.microsoft.com/en-us/library/ms724381.aspx>
+         <https://msdn.microsoft.com/en-us/library/ms724958.aspx> */
+      SYSTEM_INFO info;
+      GetSystemInfo(&info);
+      pagesize = info.dwPageSize;
+#elif defined(HAVE_MACH_VM)
+      pagesize = vm_page_size;
+#else
+      pagesize = getpagesize();
+#endif
+#if defined(EXECUTABLE_VIA_MMAP_DEVZERO) || defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+      /* Use a once-only initializer here, since simultaneous execution of
+         for_mmap_init() in multiple threads must be avoided. */
+      gl_once (for_mmap_once, for_mmap_init);
+#endif
+    }
+#endif
+
+  /* 1. Allocate room */
+
+#if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT)
+  gl_lock_lock(freelist_lock);
+  if (freelist == NULL)
+    { /* Get a new page. */
+      char* page;
+      char* page_end;
+#ifdef EXECUTABLE_VIA_VIRTUALALLOC
+      /* VirtualAlloc
+         <https://msdn.microsoft.com/en-us/library/aa366887.aspx>
+         <https://msdn.microsoft.com/en-us/library/aa366786.aspx> */
+      page = VirtualAlloc(NULL,pagesize,MEM_COMMIT,PAGE_EXECUTE_READWRITE);
+      if (page == NULL)
+        { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); }
+      page_end = page + pagesize;
+#else
+#ifdef EXECUTABLE_VIA_MMAP_FILE_SHARED
+      char* page_x;
+      /* Extend the file by one page. */
+      long new_file_length = file_length + pagesize;
+      if (ftruncate(file_fd,new_file_length) < 0)
+        { fprintf(stderr,"trampoline: Cannot extend backing file!\n"); abort(); }
+      /* Create separate mappings for writing and for executing. */
+      page = (char*)mmap(NULL,pagesize,PROT_READ|PROT_WRITE,MAP_SHARED,file_fd,file_length);
+      page_x = (char*)mmap(NULL,pagesize,PROT_READ|PROT_EXEC,MAP_SHARED,file_fd,file_length);
+      if (page == (char*)(-1) || page_x == (char*)(-1))
+        { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); }
+      file_length = new_file_length;
+      page_end = page + pagesize;
+      /* Link the two pages together. */
+      ((intptr_t*)page)[0] = page_x - page;
+      page = (char*)(((uintptr_t)page + sizeof(intptr_t) + TRAMP_ALIGN-1) & -TRAMP_ALIGN);
+#else
+#ifdef EXECUTABLE_VIA_MMAP_THEN_MPROTECT
+#ifdef HAVE_MMAP_ANONYMOUS
+      /* Use mmap with the MAP_ANONYMOUS or MAP_ANON flag. */
+      page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0);
+#else
+      /* Use mmap on /dev/zero. */
+      page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_FILE | MAP_VARIABLE, zero_fd, 0);
+#endif
+#endif
+#ifdef EXECUTABLE_VIA_MMAP
+#ifdef HAVE_MMAP_ANONYMOUS
+      /* Use mmap with the MAP_ANONYMOUS or MAP_ANON flag. */
+      page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE | PROT_EXEC, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0);
+#else
+      /* Use mmap on /dev/zero. */
+      page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE | PROT_EXEC, MAP_PRIVATE | MAP_FILE | MAP_VARIABLE, zero_fd, 0);
+#endif
+#endif
+#ifdef EXECUTABLE_VIA_SHM
+      int shmid = shmget(IPC_PRIVATE, pagesize, 0700|IPC_CREAT);
+      if (shmid<0)
+        { page = (char*)(-1); }
+      else
+        { page = shmat(shmid, 0, 0); shmctl(shmid, IPC_RMID, 0); }
+#endif
+      if (page == (char*)(-1))
+        { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); }
+      page_end = page + pagesize;
+#endif
+#endif
+      /* Fill it with free trampolines. */
+      { char** last = &freelist;
+        while (page+TRAMP_TOTAL_LENGTH <= page_end)
+          { *last = page; last = (char**)page;
+            page = (char*)(((uintptr_t)page + TRAMP_TOTAL_LENGTH + TRAMP_ALIGN-1) & -TRAMP_ALIGN);
+          }
+        *last = NULL;
+    } }
+  function = freelist; freelist = *(char**)freelist;
+  gl_lock_unlock(freelist_lock);
+#else
+  { char* room = (char*) malloc(sizeof(void*) + TRAMP_TOTAL_LENGTH + TRAMP_ALIGN-1);
+    if (!room)
+      { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); }
+    function = (char*)(((uintptr_t)room + sizeof(void*) + TRAMP_ALIGN-1) & -TRAMP_ALIGN);
+    ((char**)function)[-1] = room; /* backpointer for free_trampoline() */
+  }
+#endif
+
+#if !defined(CODE_EXECUTABLE) && defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+  /* Find the executable address corresponding to the writable address. */
+  { uintptr_t page = (uintptr_t) function & -(intptr_t)pagesize;
+    function_x = function + ((intptr_t*)page)[0];
+  }
+#else
+  function_x = function;
+#endif
+
+  /* 2. Fill out the trampoline */
+  data = function + TRAMP_LENGTH;
+  /* Knowing that data = function + TRAMP_LENGTH, we could certainly optimize
+   * the trampolines a little bit more, using PC relative addressing modes.
+   * But I doubt it's really worth it.
+   */
+#ifdef __i386__
+  /* function:
+   *    movl $<data>,%ecx              B9 <data>
+   *    jmp <address>                  E9 <address>-<here>
+   * here:
+   *    nop                            90
+   *    nop                            90
+   */
+  *(char *)  (function + 0) = 0xB9;
+  *(long *)  (function + 1) = (long) data;
+  *(char *)  (function + 5) = 0xE9;
+  *(long *)  (function + 6) = (long) address - (long) (function_x + 10);
+  *(short *) (function +10) = 0x9090;   /* nop nop, for alignment */
+#define is_tramp(function)  \
+  *(unsigned char *)  (function + 0) == 0xB9 && \
+  *(unsigned char *)  (function + 5) == 0xE9
+#define tramp_address(function)  \
+  *(long *)  (function + 6) + (long) (function + 10)
+#define tramp_data(function)  \
+  *(long *)  (function + 1)
+#endif
+#ifdef __m68k__
+  /* function:
+   *    movel #<data>,a0               20 7C <data>
+   *    jmp <address>                  4E F9 <address>
+   *    nop                            4E 71
+   */
+  *(short *) (function + 0) = 0x207C;
+  *(long *)  (function + 2) = (long) data;
+  *(short *) (function + 6) = 0x4EF9;
+  *(long *)  (function + 8) = (long) address;
+  *(short *) (function +12) = 0x4E71;
+#define is_tramp(function)  \
+  *(unsigned short *) (function + 0) == 0x207C && \
+  *(unsigned short *) (function + 6) == 0x4EF9 && \
+  *(unsigned short *) (function +12) == 0x4E71
+#define tramp_address(function)  \
+  *(long *)  (function + 8)
+#define tramp_data(function)  \
+  *(long *)  (function + 2)
+#endif
+#if (defined(__mips__) || defined(__mipsn32__)) && !defined(__mips64__)
+  /* function:
+   *    lw $2,16($25)                  8F 22 00 10
+   *    lw $25,20($25)                 8F 39 00 14
+   *    j $25                          03 20 00 08
+   *    nop                            00 00 00 00
+   *    .word <data>                   <data>
+   *    .word <address>                        <address>
+   */
+  *(unsigned int *) (function + 0) = 0x8F220010;
+  *(unsigned int *) (function + 4) = 0x8F390014;
+  *(unsigned int *) (function + 8) = 0x03200008;
+  *(unsigned int *) (function +12) = 0x00000000;
+  *(unsigned int *) (function +16) = (unsigned int) data;
+  *(unsigned int *) (function +20) = (unsigned int) address;
+#define TRAMP_CODE_LENGTH  16
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0x8F220010 && \
+  *(unsigned int *) (function + 4) == 0x8F390014 && \
+  *(unsigned int *) (function + 8) == 0x03200008 && \
+  *(unsigned int *) (function +12) == 0x00000000
+#define tramp_address(function)  \
+  *(unsigned int *) (function +20)
+#define tramp_data(function)  \
+  *(unsigned int *) (function +16)
+#endif
+#ifdef __mips64old__
+  /* function:
+   *    dli $2,<data>                  3C 02 hi16(hi32(<data>))
+   *                                   34 42 lo16(hi32(<data>))
+   *                                   00 02 14 38
+   *                                   34 42 hi16(lo32(<data>))
+   *                                   00 02 14 38
+   *                                   34 42 lo16(lo32(<data>))
+   *    dli $25,<address>              3C 19 hi16(hi32(<address>))
+   *                                   37 39 lo16(hi32(<address>))
+   *                                   00 19 CC 38
+   *                                   37 39 hi16(lo32(<address>))
+   *                                   00 19 CC 38
+   *                                   37 39 lo16(lo32(<address>))
+   *    j $25                          03 20 00 08
+   *    nop                            00 00 00 00
+   */
+  /* What about big endian / little endian ?? */
+  *(short *) (function + 0) = 0x3C02;
+  *(short *) (function + 2) = (unsigned long) data >> 48;
+  *(short *) (function + 4) = 0x3442;
+  *(short *) (function + 6) = ((unsigned long) data >> 32) & 0xffff;
+  *(int *)   (function + 8) = 0x00021438;
+  *(short *) (function +12) = 0x3442;
+  *(short *) (function +14) = ((unsigned long) data >> 16) & 0xffff;
+  *(int *)   (function +16) = 0x00021438;
+  *(short *) (function +20) = 0x3442;
+  *(short *) (function +22) = (unsigned long) data & 0xffff;
+  *(short *) (function +24) = 0x3C19;
+  *(short *) (function +26) = (unsigned long) address >> 48;
+  *(short *) (function +28) = 0x3739;
+  *(short *) (function +30) = ((unsigned long) address >> 32) & 0xffff;
+  *(int *)   (function +32) = 0x0019CC38;
+  *(short *) (function +36) = 0x3739;
+  *(short *) (function +38) = ((unsigned long) address >> 16) & 0xffff;
+  *(int *)   (function +40) = 0x0019CC38;
+  *(short *) (function +44) = 0x3739;
+  *(short *) (function +46) = (unsigned long) address & 0xffff;
+  *(int *)   (function +48) = 0x03200008;
+  *(int *)   (function +52) = 0x00000000;
+#define is_tramp(function)  \
+  *(unsigned short *) (function + 0) == 0x3C02 && \
+  *(unsigned short *) (function + 4) == 0x3442 && \
+  *(unsigned int *)   (function + 8) == 0x00021438 && \
+  *(unsigned short *) (function +12) == 0x3442 && \
+  *(unsigned int *)   (function +16) == 0x00021438 && \
+  *(unsigned short *) (function +20) == 0x3442 && \
+  *(unsigned short *) (function +24) == 0x3C19 && \
+  *(unsigned short *) (function +28) == 0x3739 && \
+  *(unsigned int *)   (function +32) == 0x0019CC38 && \
+  *(unsigned short *) (function +36) == 0x3739 && \
+  *(unsigned int *)   (function +40) == 0x0019CC38 && \
+  *(unsigned short *) (function +44) == 0x3739 && \
+  *(unsigned int *)   (function +48) == 0x03200008 && \
+  *(unsigned int *)   (function +52) == 0x00000000
+#define hilo(word3,word2,word1,word0)  \
+  (((unsigned long) (word3) << 48) | ((unsigned long) (word2) << 32) | \
+   ((unsigned long) (word1) << 16) | (unsigned long) (word0))
+#define tramp_address(function)  \
+  hilo(*(unsigned short *) (function +26), \
+       *(unsigned short *) (function +30), \
+       *(unsigned short *) (function +38), \
+       *(unsigned short *) (function +46))
+#define tramp_data(function)  \
+  hilo(*(unsigned short *) (function + 2), \
+       *(unsigned short *) (function + 6), \
+       *(unsigned short *) (function +14), \
+       *(unsigned short *) (function +22))
+#endif
+#ifdef __mips64__
+  /* function:
+   *    ld $2,16($25)                  DF 22 00 10
+   *    ld $25,24($25)                 DF 39 00 18
+   *    j $25                          03 20 00 08
+   *    nop                            00 00 00 00
+   *    .dword <data>                  <data>
+   *    .dword <address>               <address>
+   */
+  *(unsigned int *)  (function + 0) = 0xDF220010;
+  *(unsigned int *)  (function + 4) = 0xDF390018;
+  *(unsigned int *)  (function + 8) = 0x03200008;
+  *(unsigned int *)  (function +12) = 0x00000000;
+  *(unsigned long *) (function +16) = (unsigned long) data;
+  *(unsigned long *) (function +24) = (unsigned long) address;
+#define TRAMP_CODE_LENGTH  16
+#define is_tramp(function)  \
+  *(unsigned int *)  (function + 0) == 0xDF220010 && \
+  *(unsigned int *)  (function + 4) == 0xDF390018 && \
+  *(unsigned int *)  (function + 8) == 0x03200008 && \
+  *(unsigned int *)  (function +12) == 0x00000000
+#define tramp_address(function)  \
+  *(unsigned long *) (function +24)
+#define tramp_data(function)  \
+  *(unsigned long *) (function +16)
+#endif
+#if defined(__sparc__) && !defined(__sparc64__)
+  /* function:
+   *    sethi %hi(<data>),%g2          05000000 | (<data> >> 10)
+   *    sethi %hi(<address>),%g1       03000000 | (<address> >> 10)
+   *    jmp %g1+%lo(<address>)         81C06000 | (<address> & 0x3ff)
+   *    or %g2,%lo(<data>),%g2         8410A000 | (<data> & 0x3ff)
+   */
+#define hi(word)  ((unsigned long) (word) >> 10)
+#define lo(word)  ((unsigned long) (word) & 0x3ff)
+  *(long *) (function + 0) = 0x05000000 | hi(data);
+  *(long *) (function + 4) = 0x03000000 | hi(address);
+  *(long *) (function + 8) = 0x81C06000 | lo(address);
+  *(long *) (function +12) = 0x8410A000 | lo(data);
+#define is_tramp(function)  \
+  (*(long *) (function + 0) & 0xffc00000) == 0x05000000 && \
+  (*(long *) (function + 4) & 0xffc00000) == 0x03000000 && \
+  (*(long *) (function + 8) & 0xfffffc00) == 0x81C06000 && \
+  (*(long *) (function +12) & 0xfffffc00) == 0x8410A000
+#define hilo(hiword,loword)  (((hiword) << 10) | ((loword) & 0x3ff))
+#define tramp_address(function)  \
+  hilo(*(long *) (function + 4), *(long *) (function + 8))
+#define tramp_data(function)  \
+  hilo(*(long *) (function + 0), *(long *) (function +12))
+#endif
+#ifdef __sparc64__
+  /* function:
+   *    rd %pc,%g1                     83414000
+   *    ldx [%g1+24],%g2               C4586018
+   *    jmp %g2                                81C08000
+   *    ldx [%g1+16],%g5               CA586010
+   *    .long high32(<data>)           <data> >> 32
+   *    .long low32(<data>)            <data> & 0xffffffff
+   *    .long high32(<address>)                <address> >> 32
+   *    .long low32(<address>)         <address> & 0xffffffff
+   */
+  *(int *)  (function + 0) = 0x83414000;
+  *(int *)  (function + 4) = 0xC4586018;
+  *(int *)  (function + 8) = 0x81C08000;
+  *(int *)  (function +12) = 0xCA586010;
+  *(long *) (function +16) = (long) data;
+  *(long *) (function +24) = (long) address;
+#define TRAMP_CODE_LENGTH  16
+#define is_tramp(function)  \
+  *(int *)  (function + 0) == 0x83414000 && \
+  *(int *)  (function + 4) == 0xC4586018 && \
+  *(int *)  (function + 8) == 0x81C08000 && \
+  *(int *)  (function +12) == 0xCA586010
+#define tramp_address(function)  \
+  *(long *) (function +24)
+#define tramp_data(function)  \
+  *(long *) (function +16)
+#endif
+#ifdef __alpha__
+  /* function:
+   *    br $1,function..ng     00 00 20 C0
+   * function..ng:
+   *    ldq $27,20($1)         14 00 61 A7
+   *    ldq $1,12($1)          0C 00 21 A4
+   *    jmp $31,($27),0                00 00 FB 6B
+   *    .quad <data>           <data>
+   *    .quad <address>                <address>
+   */
+  { static int code [4] =
+      { 0xC0200000, 0xA7610014, 0xA421000C, 0x6BFB0000 };
+    int i;
+    for (i=0; i<4; i++) { ((int *) function)[i] = code[i]; }
+    ((long *) function)[2] = (long) data;
+    ((long *) function)[3] = (long) address;
+  }
+#define TRAMP_CODE_LENGTH  16
+#define is_tramp(function)  \
+  ((int *) function)[0] == 0xC0200000 && \
+  ((int *) function)[1] == 0xA7610014 && \
+  ((int *) function)[2] == 0xA421000C && \
+  ((int *) function)[3] == 0x6BFB0000
+#define tramp_address(function)  \
+  ((long *) function)[3]
+#define tramp_data(function)  \
+  ((long *) function)[2]
+#endif
+#ifdef __hppaold__
+  /* function:
+   *    ldil L'<data>,%r29             23A00000 | hi(<data>)
+   *    ldil L'<address>,%r21          22A00000 | hi(<address>)
+   *    ldo R'<data>(%r29),%r29                37BD0000 | lo(<data>)
+   *    ldo R'<address>(%r21),%r21     36B50000 | lo(<address>)
+   *    bb,>=,n %r21,30,function2      C7D5C012
+   *    depi 0,31,2,%r21               D6A01C1E
+   *    ldw 4(0,%r21),%r19             4AB30008
+   *    ldw 0(0,%r21),%r21             4AB50000
+   * function2:
+   *    ldsid (0,%r21),%r1             02A010A1
+   *    mtsp %r1,%sr0                  00011820
+   *    be,n 0(%sr0,%r21)              E2A00002
+   *    nop                            08000240
+   */
+  /* When decoding a 21-bit argument in an instruction, the hppa performs
+   * the following bit manipulation:
+   * assemble21: x[20]...x[0]
+   *       --> x[0] x[11]...x[1] x[15]..x[14] x[20]...x[16] x[13]..x[12]
+   * When encoding a 21-bit argument into an instruction, we need the
+   * to perform the reverse permutation:
+   * permute21:  y[20]...y[0]
+   *       --> y[6]...y[2] y[8]..y[7] y[1]..y[0] y[19]...y[9] y[20]
+   */
+#define assemble21(x)  \
+  ((((x) & 0x1) << 20) | (((x) & 0xFFE) << 8) | \
+   (((x) & 0xC000) >> 7) | (((x) & 0x1F0000) >> 14) | (((x) & 0x3000) >> 12))
+#define permute21(y)  \
+  ((((y) & 0x7C) << 14) | (((y) & 0x180) << 7) | (((y) & 0x3) << 12) | \
+   (((y) & 0xFFE00) >> 8) | (((y) & 0x100000) >> 20))
+#define hi(word)  permute21((unsigned long) (word) >> 11)
+#define lo(word)  (((unsigned long) (word) & 0x7FF) << 1)
+  *(long *) (function + 0) = 0x23A00000 | hi(data);
+  *(long *) (function + 4) = 0x22A00000 | hi(address);
+  *(long *) (function + 8) = 0x37BD0000 | lo(data);
+  *(long *) (function +12) = 0x36B50000 | lo(address);
+  *(long *) (function +16) = 0xC7D5C012;
+  *(long *) (function +20) = 0xD6A01C1E;
+  *(long *) (function +24) = 0x4AB30008;
+  *(long *) (function +28) = 0x4AB50000;
+  *(long *) (function +32) = 0x02A010A1;
+  *(long *) (function +36) = 0x00011820;
+  *(long *) (function +40) = 0xE2A00002;
+  *(long *) (function +44) = 0x08000240;
+#define is_tramp(function)  \
+  ((long) function & 3) == 0 && \
+  (*(long *) (function + 0) & 0xffe00000) == 0x23A00000 && \
+  (*(long *) (function + 4) & 0xffe00000) == 0x22A00000 && \
+  (*(long *) (function + 8) & 0xfffff000) == 0x37BD0000 && \
+  (*(long *) (function +12) & 0xfffff000) == 0x36B50000 && \
+  *(long *) (function +16) == 0xC7D5C012 && \
+  *(long *) (function +20) == 0xD6A01C1E && \
+  *(long *) (function +24) == 0x4AB30008 && \
+  *(long *) (function +28) == 0x4AB50000 && \
+  *(long *) (function +32) == 0x02A010A1 && \
+  *(long *) (function +36) == 0x00011820 && \
+  *(long *) (function +40) == 0xE2A00002 && \
+  *(long *) (function +44) == 0x08000240
+#define hilo(hiword,loword)  \
+  ((assemble21((unsigned long) (hiword)) << 11) | \
+   (((unsigned long) (loword) & 0xFFE) >> 1) \
+  )
+#define tramp_address(function)  \
+  hilo(*(long *) (function + 4), *(long *) (function +12))
+#define tramp_data(function)  \
+  hilo(*(long *) (function + 0), *(long *) (function + 8))
+#endif
+#ifdef __hppanew__
+  /* function:
+   *    .long   tramp_r
+   *    .long   closure
+   * closure:
+   *    .long   <data>
+   *    .long   <address>
+   */
+  { /* work around a bug in gcc 3.* */
+    void* tramp_r_address = &tramp_r;
+    *(long *) (function + 0) = ((long *) ((char*)tramp_r_address-2))[0];
+    *(long *) (function + 4) = (long) (function + 8);
+    *(long *) (function + 8) = (long) data;
+    *(long *) (function +12) = (long) address;
+  }
+#define TRAMP_CODE_LENGTH  0
+#define is_tramp(function)  \
+  ((long *) function)[0] == ((long *) ((char*)tramp_r_address-2))[0]
+#define tramp_address(function)  \
+  ((long *) function)[3]
+#define tramp_data(function)  \
+  ((long *) function)[2]
+#endif
+#ifdef __hppa64old__
+  /* function:
+   *    mfia %r27                      000014BB
+   *    ldd 32(%r27),%r31              537F0040
+   *    ldd 40(%r27),%r27              537B0050
+   *    ldd 16(%r27),%r1               53610020
+   *    ldd 24(%r27),%r27              537B0030
+   *    bve (%r1)                      E820D000
+   *     nop                           08000240
+   *    .align 8
+   *    .dword <data>
+   *    .dword <address>
+   * function_pointer:
+   *    .dword 0
+   *    .dword 0
+   *    .dword function
+   *    .dword 0
+   */
+  *(int *)  (function + 0) = 0x000014BB;
+  *(int *)  (function + 4) = 0x537F0040;
+  *(int *)  (function + 8) = 0x537B0050;
+  *(int *)  (function +12) = 0x53610020;
+  *(int *)  (function +16) = 0x537B0030;
+  *(int *)  (function +20) = 0xE820D000;
+  *(int *)  (function +24) = 0x08000240;
+  *(long *) (function +32) = (long)data;
+  *(long *) (function +40) = (long)address;
+  *(long *) (function +48) = (long)0;
+  *(long *) (function +56) = (long)0;
+  *(long *) (function +64) = (long)function;
+  *(long *) (function +72) = (long)0;
+#define TRAMP_CODE_LENGTH  28
+#define is_tramp(function)  \
+  *(int *) (function + 0) == 0x000014BB && \
+  *(int *) (function + 4) == 0x537F0040 && \
+  *(int *) (function + 8) == 0x537B0050 && \
+  *(int *) (function +12) == 0x53610020 && \
+  *(int *) (function +16) == 0x537B0030 && \
+  *(int *) (function +20) == 0xE820D000 && \
+  *(int *) (function +24) == 0x08000240
+#define tramp_address(function)  \
+  (*(unsigned long *) (function +40))
+#define tramp_data(function)  \
+  (*(unsigned long *) (function +32))
+#endif
+#ifdef __hppa64new__
+  /* function:
+   *    .dword 0
+   *    .dword 0
+   *    .dword tramp
+   *    .dword closure
+   * closure:
+   *    .dword <data>
+   *    .dword <address>
+   */
+  *(long *) (function + 0) = 0;
+  *(long *) (function + 8) = 0;
+  *(long *) (function +16) = ((long *) (void*) &tramp_r)[2];
+  *(long *) (function +24) = (long) (function + 32);
+  *(long *) (function +32) = (long) data;
+  *(long *) (function +40) = (long) address;
+#define TRAMP_CODE_LENGTH  0
+#define is_tramp(function)  \
+  ((long *) function)[2] == ((long *) (void*) &tramp_r)[2] && \
+  ((long *) function)[3] == (long) (function + 32)
+#define tramp_address(function)  \
+  ((long *) function)[5]
+#define tramp_data(function)  \
+  ((long *) function)[4]
+#endif
+#if defined(__arm__) || defined(__armhf__)
+  /* function:
+   *   mov     ip,sp                   E1A0C00D
+   *   stmdb   sp!,{r0,r1,r2,r3}       E92D000F
+   *   stmfd   sp!,{fp,ip,lr,pc}       E92DD800
+   *   sub     fp,ip,#20               E24CB014
+   *   sub     sp,sp,#8                E24DD008
+   *   ldr     ip,[pc,#12]             E59FC00C        @ Get <data>
+   *   str     ip,[sp,#0]              E58DC000        @ Put <data> on stack
+   *   mov     lr,pc                   E1A0E00F        @ Prepare call (put return address in lr)
+   *   ldr     pc,[pc,#4]              E59FF004        @ Call <address> with the same args in registers
+   *   ldmea   fp,{fp,sp,pc}           E91BA800        @ Restore fp and sp, and return to return address.
+   * _data:
+   *   .word   <data>
+   * _address:
+   *   .word   <address>
+   */
+  {
+    ((long *) function)[0] = 0xE1A0C00D;
+    ((long *) function)[1] = 0xE92D000F;
+    ((long *) function)[2] = 0xE92DD800;
+    ((long *) function)[3] = 0xE24CB014;
+    ((long *) function)[4] = 0xE24DD008;
+    ((long *) function)[5] = 0xE59FC00C;
+    ((long *) function)[6] = 0xE58DC000;
+    ((long *) function)[7] = 0xE1A0E00F;
+    ((long *) function)[8] = 0xE59FF004;
+    ((long *) function)[9] = 0xE91BA800;
+    ((long *) function)[10] = (long) data;
+    ((long *) function)[11] = (long) address;
+  }
+#define TRAMP_CODE_LENGTH  40
+#define is_tramp(function)  \
+  ((long *) function)[0] == 0xE1A0C00D && \
+  ((long *) function)[1] == 0xE92D000F && \
+  ((long *) function)[2] == 0xE92DD800 && \
+  ((long *) function)[3] == 0xE24CB014 && \
+  ((long *) function)[4] == 0xE24DD008 && \
+  ((long *) function)[5] == 0xE59FC00C && \
+  ((long *) function)[6] == 0xE58DC000 && \
+  ((long *) function)[7] == 0xE1A0E00F && \
+  ((long *) function)[8] == 0xE59FF004 && \
+  ((long *) function)[9] == 0xE91BA800
+#define tramp_address(function)  \
+  ((long *) function)[11]
+#define tramp_data(function)  \
+  ((long *) function)[10]
+#endif
+#ifdef __arm64__
+  /* function:
+   *    ldr x17,.+24           580000D1
+   *    ldr x18,.+12           58000072
+   *    br x17                 D61F0220
+   *    nop                    D503201F
+   *    .xword <data>          <data>
+   *    .xword <address>       <address>
+   */
+  *(int *)   (function + 0) = 0x580000D1;
+  *(int *)   (function + 4) = 0x58000072;
+  *(int *)   (function + 8) = 0xD61F0220;
+  *(int *)   (function +12) = 0xD503201F;
+  *(long *)  (function +16) = (unsigned long) data;
+  *(long *)  (function +24) = (unsigned long) address;
+#define TRAMP_CODE_LENGTH  16
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0x580000D1 && \
+  *(unsigned int *) (function + 4) == 0x58000072 && \
+  *(unsigned int *) (function + 8) == 0xD61F0220 && \
+  *(unsigned int *) (function +12) == 0xD503201F
+#define tramp_address(function)  \
+  (*(unsigned long *) (function +24))
+#define tramp_data(function)  \
+  (*(unsigned long *) (function +16))
+#endif
+#ifdef __powerpcsysv4__
+  /* function:
+   *    {liu|lis} 11,hi16(<data>)              3D 60 hi16(<data>)
+   *    {oril|ori} 11,11,lo16(<data>)          61 6B lo16(<data>)
+   *    {liu|lis} 0,hi16(<address>)            3C 00 hi16(<address>)
+   *    {oril|ori} 0,0,lo16(<address>)         60 00 lo16(<address>)
+   *    mtctr 0                                        7C 09 03 A6
+   *    bctr                                   4E 80 04 20
+   */
+  *(short *) (function + 0) = 0x3D60;
+  *(short *) (function + 2) = (unsigned long) data >> 16;
+  *(short *) (function + 4) = 0x616B;
+  *(short *) (function + 6) = (unsigned long) data & 0xffff;
+  *(short *) (function + 8) = 0x3C00;
+  *(short *) (function +10) = (unsigned long) address >> 16;
+  *(short *) (function +12) = 0x6000;
+  *(short *) (function +14) = (unsigned long) address & 0xffff;
+  *(long *)  (function +16) = 0x7C0903A6;
+  *(long *)  (function +20) = 0x4E800420;
+#define is_tramp(function)  \
+  *(unsigned short *) (function + 0) == 0x3D60 && \
+  *(unsigned short *) (function + 4) == 0x616B && \
+  *(unsigned short *) (function + 8) == 0x3C00 && \
+  *(unsigned short *) (function +12) == 0x6000 && \
+  *(unsigned long *)  (function +16) == 0x7C0903A6 && \
+  *(unsigned long *)  (function +20) == 0x4E800420
+#define hilo(hiword,loword)  \
+  (((unsigned long) (hiword) << 16) | (unsigned long) (loword))
+#define tramp_address(function)  \
+  hilo(*(unsigned short *) (function +10), *(unsigned short *) (function +14))
+#define tramp_data(function)  \
+  hilo(*(unsigned short *) (function + 2), *(unsigned short *) (function + 6))
+#endif
+#ifdef __powerpcaix__
+  /* function:
+   *    .long .tramp_r
+   *    .long .mytoc
+   *    .long 0
+   * .mytoc:
+   *    .long <data>
+   *    .long <address>
+   */
+  *(long *)  (function + 0) = ((long *) &tramp_r)[0];
+  *(long *)  (function + 4) = (long) (function + 12);
+  *(long *)  (function + 8) = 0;
+  *(long *)  (function +12) = (long) data;
+  *(long *)  (function +16) = (long) address;
+#define TRAMP_CODE_LENGTH  0
+#define is_tramp(function)  \
+  ((long *) function)[0] == ((long *) &tramp_r)[0]
+#define tramp_address(function)  \
+  ((long *) function)[4]
+#define tramp_data(function)  \
+  ((long *) function)[3]
+#endif
+#ifdef __powerpc64_elfv2__
+  /* function:
+   *    ld 11,16(12)           10 00 6C E9
+   *    ld 12,24(12)           18 00 8C E9
+   *    mtctr 12               A6 03 89 7D
+   *    bctr                   20 04 80 4E
+   *    .quad <data>
+   *    .quad <address>
+   */
+  *(int *)   (function + 0) = 0xE96C0010;
+  *(int *)   (function + 4) = 0xE98C0018;
+  *(int *)   (function + 8) = 0x7D8903A6;
+  *(int *)   (function +12) = 0x4E800420;
+  *(long *)  (function +16) = (unsigned long) data;
+  *(long *)  (function +24) = (unsigned long) address;
+#define TRAMP_CODE_LENGTH  16
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0xE96C0010 && \
+  *(unsigned int *) (function + 4) == 0xE98C0018 && \
+  *(unsigned int *) (function + 8) == 0x7D8903A6 && \
+  *(unsigned int *) (function +12) == 0x4E800420
+#define tramp_address(function)  \
+  (*(unsigned long *) (function +24))
+#define tramp_data(function)  \
+  (*(unsigned long *) (function +16))
+#endif
+#ifdef __powerpc64aix__
+  /* function:
+   *    .quad .tramp_r
+   *    .quad .mytoc
+   *    .quad 0
+   * .mytoc:
+   *    .quad <data>
+   *    .quad <address>
+   */
+  *(long *)  (function + 0) = ((long *) &tramp_r)[0];
+  *(long *)  (function + 8) = (long) (function + 24);
+  *(long *)  (function +16) = 0;
+  *(long *)  (function +24) = (long) data;
+  *(long *)  (function +32) = (long) address;
+#define TRAMP_CODE_LENGTH  0
+#define is_tramp(function)  \
+  ((long *) function)[0] == ((long *) &tramp_r)[0]
+#define tramp_address(function)  \
+  ((long *) function)[4]
+#define tramp_data(function)  \
+  ((long *) function)[3]
+#endif
+#ifdef __ia64__
+  /* function:
+   *    data8   tramp_r
+   *    data8   closure
+   * closure:
+   *    data8   <address>
+   *    data8   <data>
+   */
+  *(long *) (function + 0) = (long) &tramp_r;
+  *(long *) (function + 8) = (long) (function + 16);
+  *(long *) (function +16) = (long) address;
+  *(long *) (function +24) = (long) data;
+#define TRAMP_CODE_LENGTH  0
+#define is_tramp(function)  \
+  ((long *) function)[0] == (long) &tramp_r && \
+  ((long *) function)[1] == (long) (function + 16)
+#define tramp_address(function)  \
+  ((long *) function)[2]
+#define tramp_data(function)  \
+  ((long *) function)[3]
+#endif
+#ifdef __x86_64__
+#ifdef __x86_64_x32__
+  /* function:
+   *    movl $<data>,%r10d             41 BA <data>
+   *    movl $<address>,%rax           B8 <address>
+   *    jmp *%rax                      FF E0
+   */
+  *(int *)   (function + 0) = ((unsigned long) data << 16) | 0xBA41;
+  *(int *)   (function + 4) = ((unsigned long) address << 24) | 0xB80000 | ((unsigned long) data >> 16);
+  *(int *)   (function + 8) = 0xFF000000 | ((unsigned long) address >> 8);
+  *(int *)   (function +12) = 0xE0;
+#define is_tramp(function)  \
+  (*(unsigned long *) (function + 0) & 0x0000FFFF) == 0xBA41 && \
+  (*(unsigned long *) (function + 4) & 0x00FF0000) == 0xB80000 && \
+  (*(unsigned long *) (function + 8) & 0xFF000000) == 0xFF000000 && \
+   *(unsigned char *) (function +12) == 0xE0
+#define tramp_address(function)  \
+  ((*(unsigned long *) (function + 4) >> 24) | \
+   (*(unsigned long *) (function + 8) << 8))
+#define tramp_data(function)  \
+  ((*(unsigned long *) (function + 0) >> 16) | \
+   (*(unsigned long *) (function + 4) << 16))
+#else
+  /* function:
+   *    movabsq $<data>,%r10           49 BA <data>
+   *    movabsq $<address>,%rax                48 B8 <address>
+   *    jmp *%rax                      FF E0
+   */
+  *(short *) (function + 0) = 0xBA49;
+  *(short *) (function + 2) = (unsigned long long) data & 0xffff;
+  *(int *)   (function + 4) = ((unsigned long long) data >> 16) & 0xffffffff;
+  *(short *) (function + 8) = ((unsigned long long) data >> 48) & 0xffff;
+  *(short *) (function +10) = 0xB848;
+  *(int *)   (function +12) = (unsigned long long) address & 0xffffffff;
+  *(int *)   (function +16) = ((unsigned long long) address >> 32) & 0xffffffff;
+  *(short *) (function +20) = 0xE0FF;
+#define is_tramp(function)  \
+  *(unsigned short *) (function + 0) == 0xBA49 && \
+  *(unsigned short *) (function +10) == 0xB848 && \
+  *(unsigned short *) (function +20) == 0xE0FF
+#define hilo(hiword,loword)  \
+  (((unsigned long long) (hiword) << 32) | (unsigned long long) (loword))
+#define himidlo(hishort,midword,loshort)  \
+  (((unsigned long long) (hishort) << 48) | (unsigned long long) (midword) << 16 \
+   | (unsigned long long) (loshort))
+#define tramp_address(function)  \
+  hilo(*(unsigned int *) (function +16), *(unsigned int *) (function +12))
+#define tramp_data(function)  \
+  himidlo(*(unsigned short *) (function + 8), \
+          *(unsigned int *)   (function + 4), \
+          *(unsigned short *) (function + 2))
+#endif
+#endif
+#if defined(__s390__) && !defined(__s390x__)
+  /* function:
+   *    bras %r1,.L1                   A7150002
+   * .L1:
+   *    lm %r0,%r1,data-.L1(%r1)       98011008
+   *    br %r1                         07F1
+   *    nop                            0707
+   * data:    .long <data>
+   * address: .long <address>
+   */
+  *(int *)   (function + 0) = 0xA7150002;
+  *(int *)   (function + 4) = 0x98011008;
+  *(int *)   (function + 8) = 0x07F10707;
+  *(int *)   (function +12) = (unsigned int) data;
+  *(int *)   (function +16) = (unsigned int) address;
+#define TRAMP_CODE_LENGTH  12
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0xA7150002 && \
+  *(unsigned int *) (function + 4) == 0x98011008 && \
+  *(unsigned int *) (function + 8) == 0x07F10707
+#define tramp_address(function)  \
+  *(unsigned int *) (function +16)
+#define tramp_data(function)  \
+  *(unsigned int *) (function +12)
+#endif
+#ifdef __s390x__
+  /* function:
+   *    larl %r1,.L1                   C01000000003
+   * .L1:
+   *    lmg %r0,%r1,data-.L1(%r1)      EB01100A0004
+   *    br %r1                         07F1
+   *    nop                            0707
+   * data:    .quad <data>
+   * address: .quad <address>
+   */
+  *(int *)   (function + 0) = 0xC0100000;
+  *(int *)   (function + 4) = 0x0003EB01;
+  *(int *)   (function + 8) = 0x100A0004;
+  *(int *)   (function +12) = 0x07F10707;
+  *(long *)  (function +16) = (unsigned long) data;
+  *(long *)  (function +24) = (unsigned long) address;
+#define TRAMP_CODE_LENGTH  16
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0xC0100000 && \
+  *(unsigned int *) (function + 4) == 0x0003EB01 && \
+  *(unsigned int *) (function + 8) == 0x100A0004 && \
+  *(unsigned int *) (function +12) == 0x07F10707
+#define tramp_address(function)  \
+  (*(unsigned long *) (function +24))
+#define tramp_data(function)  \
+  (*(unsigned long *) (function +16))
+#endif
+#ifdef __riscv32__
+  /* function:
+   *    auipc t0,0                     00000297
+   *    lw t1,20(t0)                   0142A303
+   *    lw t2,16(t0)                   0102A383
+   *    jr t1                          00030067
+   * data:    .quad <data>
+   * address: .quad <address>
+   */
+  *(int *)   (function + 0) = 0x00000297;
+  *(int *)   (function + 4) = 0x0142A303;
+  *(int *)   (function + 8) = 0x0102A383;
+  *(int *)   (function +12) = 0x00030067;
+  *(int *)   (function +16) = (unsigned int) data;
+  *(int *)   (function +24) = (unsigned int) address;
+#define TRAMP_CODE_LENGTH  16
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0x00000297 && \
+  *(unsigned int *) (function + 4) == 0x0142A303 && \
+  *(unsigned int *) (function + 8) == 0x0102A383 && \
+  *(unsigned int *) (function +12) == 0x00030067
+#define tramp_address(function)  \
+  (*(unsigned int *) (function +20))
+#define tramp_data(function)  \
+  (*(unsigned int *) (function +16))
+#endif
+#ifdef __riscv64__
+  /* function:
+   *    auipc t0,0                     00000297
+   *    ld t1,24(t0)                   0182B303
+   *    ld t2,16(t0)                   0102B383
+   *    jr t1                          00030067
+   * data:    .quad <data>
+   * address: .quad <address>
+   */
+  *(int *)   (function + 0) = 0x00000297;
+  *(int *)   (function + 4) = 0x0182B303;
+  *(int *)   (function + 8) = 0x0102B383;
+  *(int *)   (function +12) = 0x00030067;
+  *(long *)  (function +16) = (unsigned long) data;
+  *(long *)  (function +24) = (unsigned long) address;
+#define TRAMP_CODE_LENGTH  16
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0x00000297 && \
+  *(unsigned int *) (function + 4) == 0x0182B303 && \
+  *(unsigned int *) (function + 8) == 0x0102B383 && \
+  *(unsigned int *) (function +12) == 0x00030067
+#define tramp_address(function)  \
+  (*(unsigned long *) (function +24))
+#define tramp_data(function)  \
+  (*(unsigned long *) (function +16))
+#endif
+  /*
+   * data:
+   *    <data0>                                <data0>
+   *    <data1>                                <data1>
+   */
+  *(void* *) (data + 0*sizeof(void*)) = data0;
+  *(void* *) (data + 1*sizeof(void*)) = data1;
+
+  /* 3. Set memory protection to "executable" */
+
+#if !defined(CODE_EXECUTABLE)
+#if defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) || defined(EXECUTABLE_VIA_MMAP_THEN_MPROTECT)
+  /* Call mprotect on the pages that contain the range. */
+  { uintptr_t start_addr = (uintptr_t) function;
+    uintptr_t end_addr = (uintptr_t) (function + TRAMP_LENGTH);
+    start_addr = start_addr & -pagesize;
+    end_addr = (end_addr + pagesize-1) & -pagesize;
+   {uintptr_t len = end_addr - start_addr;
+#if defined(HAVE_MACH_VM)
+    if (vm_protect(task_self(),start_addr,len,0,VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE) != KERN_SUCCESS)
+#else
+    if (mprotect((void*)start_addr, len, PROT_READ|PROT_WRITE|PROT_EXEC) < 0)
+#endif
+      { fprintf(stderr,"trampoline: cannot make memory executable\n"); abort(); }
+  }}
+#endif
+#endif
+
+  /* 4. Flush instruction cache */
+  /* We need this because some CPUs have separate data cache and instruction
+   * cache. The freshly built trampoline is visible to the data cache, but not
+   * maybe not to the instruction cache. This is hairy.
+   */
+  /* TRAMP_CODE_LENGTH = length of the machine instructions. */
+#ifndef TRAMP_CODE_LENGTH
+#define TRAMP_CODE_LENGTH TRAMP_LENGTH
+#endif
+#if !(defined(__hppanew__) || defined(__hppa64new__) || defined(__powerpcaix__) || defined(__powerpc64aix__) || defined(__ia64__))
+  /* Only needed if we really set up machine instructions. */
+#ifdef __i386__
+#if defined(_WIN32)
+  while (!FlushInstructionCache(GetCurrentProcess(),function_x,TRAMP_CODE_LENGTH))
+    continue;
+#endif
+#endif
+#ifdef __m68k__
+#if defined(__NetBSD__) && defined(__GNUC__)
+  { register uintptr_t _beg __asm__ ("%a1") = (uintptr_t) function_x;
+    register uintptr_t _len __asm__ ("%d1") = TRAMP_CODE_LENGTH;
+    __asm__ __volatile__ (
+      "move%.l %#0x80000004,%/d0\n\t" /* CC_EXTPURGE | C_IPURGE */
+      "trap #12"                      /* kernel call ‘cachectl’ */
+      :
+      : "a" (_beg), "d" (_len)
+      : "%a0", "%a1", "%d0", "%d1"    /* call-used registers */
+      );
+  }
+#endif
+#if defined(__linux__) && defined(__GNUC__)
+  { register uintptr_t _beg __asm__ ("%d1") = (uintptr_t) function_x;
+    register uintptr_t _len __asm__ ("%d4") = TRAMP_CODE_LENGTH + 32;
+    __asm__ __volatile__ (
+      "move%.l %#123,%/d0\n\t"
+      "move%.l %#1,%/d2\n\t"
+      "move%.l %#3,%/d3\n\t"
+      "trap %#0"
+      :
+      : "d" (_beg), "d" (_len)
+      : "%d0", "%d2", "%d3"
+      );
+  }
+#endif
+#if defined(AUX) && defined(__GNUC__)
+  /* sysm68k(105, addr, scope, cache, len) */
+  __asm__ __volatile__ (
+    "move%.l %1,%/sp@-\n\t"
+    "move%.l %#3,%/sp@-\n\t"
+    "move%.l %#1,%/sp@-\n\t"
+    "move%.l %0,%/sp@-\n\t"
+    "move%.l %#105,%/sp@-\n\t"
+    "move%.l %#0,%/sp@-\n\t"
+    "move%.l %#38,%/sp@-\n\t"
+    "trap %#0\n\t"
+    "add%.l %#24,%/sp"
+    :
+    : "r" (function_x), "g" ((int)TRAMP_CODE_LENGTH)
+    : "%d0"
+    );
+#endif
+#endif
+#if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__)
+  cacheflush(function_x,TRAMP_CODE_LENGTH,ICACHE);
+  /* gforth-0.3.0 uses BCACHE instead of ICACHE. Why?? */
+#endif
+#if defined(__sparc__) || defined(__sparc64__)
+  /* This assumes that the trampoline fits in at most two cache lines. */
+  __TR_clear_cache_2(function_x,function_x+TRAMP_CODE_LENGTH-1);
+#endif
+#ifdef __alpha__
+  __TR_clear_cache();
+#endif
+#if defined(__hppa__) || defined(__hppa64__)
+  /* This assumes that the trampoline fits in at most two cache lines. */
+  __TR_clear_cache(function_x,function_x+TRAMP_CODE_LENGTH-1);
+#endif
+#if defined(__arm__) || defined(__armhf__) || defined(__arm64__)
+  /* On ARM, cache flushing can only be done through a system call.
+     GCC implements it for Linux with EABI, through an "swi 0" with code
+     0xf0002. For other systems, it may be an "swi 0x9f0002",
+     an "swi 0xf00000", or similar.  */
+  /* On ARM64, cache flushing is done through special instructions,
+     and the length of the cache lines must be determined at runtime.
+     See gcc/libgcc/config/aarch64/sync-cache.c. */
+#if defined(__GNUC__)
+  /* Use the GCC built-in. */
+  __clear_cache((void*)function_x,(void*)(function_x+TRAMP_CODE_LENGTH));
+#else
+  #error "Don't know how to implement clear_cache on this platform."
+#endif
+#endif
+#if defined(__powerpc__) || defined(__powerpc64__)
+  __TR_clear_cache(function_x);
+#endif
+#if defined(__riscv32__) || defined(__riscv64__)
+#if defined(__linux__)
+  /* Use the libc function. */
+  __riscv_flush_icache((void*)function_x,(void*)(function_x+TRAMP_CODE_LENGTH),0);
+#elif defined(__GNUC__)
+  __asm__ __volatile__ ("fence.i");
+#endif
+#endif
+#endif
+
+  /* 5. Return. */
+  return (__TR_function) (function_x + TRAMP_BIAS);
+}
+
+void free_trampoline_r (__TR_function function)
+{
+#if TRAMP_BIAS
+  function = (__TR_function)((char*)function - TRAMP_BIAS);
+#endif
+#if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT)
+#ifdef EXECUTABLE_VIA_MMAP_FILE_SHARED
+  /* Find the writable address corresponding to the executable address. */
+  { uintptr_t page_x = (uintptr_t) function & -(intptr_t)pagesize;
+    function -= ((intptr_t*)page_x)[0];
+  }
+#endif
+  *(char**)function = freelist; freelist = (char*)function;
+  /* It is probably not worth calling munmap() for entirely freed pages. */
+#else
+  free(((char**)function)[-1]);
+#endif
+}
+
+int is_trampoline_r (void* function)
+{
+#if defined(is_tramp) && defined(tramp_data)
+#ifdef __hppanew__
+  void* tramp_r_address = &tramp_r;
+  if (!(((uintptr_t)function & 3) == (TRAMP_BIAS & 3))) return 0;
+#endif
+  if (is_tramp(((char*)function - TRAMP_BIAS)))
+    {
+      char* function_w;
+#ifdef EXECUTABLE_VIA_MMAP_FILE_SHARED
+      /* Find the writable address corresponding to the executable address. */
+      { uintptr_t page_x = (uintptr_t) function & -(intptr_t)pagesize;
+        function_w = function - ((intptr_t*)page_x)[0];
+      }
+#else
+      function_w = function;
+#endif
+      return (tramp_data(((char*)function - TRAMP_BIAS))) == (uintptr_t)((char*)function_w - TRAMP_BIAS + TRAMP_LENGTH);
+    }
+  return 0;
+#else
+  abort();
+#endif
+}
+
+__TR_function trampoline_r_address (__TR_function function)
+{
+#ifdef tramp_address
+  return (__TR_function)(tramp_address(((char*)function - TRAMP_BIAS)));
+#else
+  abort();
+#endif
+}
+
+void* trampoline_r_data0 (__TR_function function)
+{
+#ifdef tramp_data
+  return ((void**)((char*)function-TRAMP_BIAS+TRAMP_LENGTH))[0];
+#else
+  abort();
+#endif
+}
+
+void* trampoline_r_data1 (__TR_function function)
+{
+#ifdef tramp_data
+  return ((void**)((char*)function-TRAMP_BIAS+TRAMP_LENGTH))[1];
+#else
+  abort();
+#endif
+}
diff --git a/callback/trampoline_r/trampoline_r.3 b/callback/trampoline_r/trampoline_r.3
new file mode 100644 (file)
index 0000000..f58cfe6
--- /dev/null
@@ -0,0 +1,120 @@
+.\" Copyright (C) 1995-2017 Bruno Haible
+.\"
+.\" This manual is free documentation.  It is dually licensed under the
+.\" GNU FDL and the GNU GPL.  This means that you can redistribute this
+.\" manual under either of these two licenses, at your choice.
+.\"
+.\" This manual is covered by the GNU FDL.  Permission is granted to copy,
+.\" distribute and/or modify this document under the terms of the
+.\" GNU Free Documentation License (FDL), either version 1.2 of the
+.\" License, or (at your option) any later version published by the
+.\" Free Software Foundation (FSF); with no Invariant Sections, with no
+.\" Front-Cover Text, and with no Back-Cover Texts.
+.\" A copy of the license is at <https://www.gnu.org/licenses/old-licenses/fdl-1.2>.
+.\"
+.\" This manual is covered by the GNU GPL.  You can redistribute it and/or
+.\" modify it under the terms of the GNU General Public License (GPL), either
+.\" version 2 of the License, or (at your option) any later version published
+.\" by the Free Software Foundation (FSF).
+.\" A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
+.\"
+.TH TRAMPOLINE 3 "1 January 2017"
+.SH NAME
+trampoline \- closures as first-class C functions
+.SH SYNOPSIS
+.B #include <trampoline_r.h>
+.LP
+.B function = alloc_trampoline_r(address, data0, data1);
+.LP
+.B free_trampoline_r(function);
+.LP
+.nf
+.B is_trampoline_r(function)
+.B trampoline_r_address(function)
+.B trampoline_r_data0(function)
+.B trampoline_r_data1(function)
+.fi
+.SH DESCRIPTION
+.LP
+These functions implement
+.I closures
+as first-class C functions.
+A closure consists of a regular C function and a piece of data
+which gets passed to the C function when the closure is called.
+
+Closures as
+.I first-class C functions
+means that they fit into a function
+pointer and can be called exactly like any other C function.
+.IB function " = alloc_trampoline_r(" address ", " data0 ", " data1 ")"
+allocates a closure. When
+.I function
+gets called, it stores in a special "lexical chain register" a pointer to a
+storage area containing
+.I data0
+in its first word and
+.I data1
+in its second word and calls the C function at
+.IR address .
+The function at
+.I address
+is responsible for fetching
+.I data0
+and
+.I data1
+off the pointer. Note that the "lexical chain register" is a call-used
+register, i.e. is clobbered by function calls.
+
+This is much like
+.BR gcc "'s"
+local functions, except that the GNU C local functions have dynamic extent
+(i.e. are deallocated when the creating function returns), while
+.I trampoline
+provides functions with indefinite extent:
+.I function
+is only deallocated when
+.BI free_trampoline_r( function )
+is called.
+
+.BI "is_trampoline_r(" function ")"
+checks whether the C function
+.I function
+was produced by a call to
+.IR alloc_trampoline_r .
+If this returns true, the arguments given to
+.I alloc_trampoline_r
+can be retrieved:
+.RS 4
+.LP
+.BI "trampoline_r_address(" function ")"
+returns
+.IR address ,
+.LP
+.BI "trampoline_r_data0(" function ")"
+returns
+.IR data0 ,
+.LP
+.BI "trampoline_r_data1(" function ")"
+returns
+.IR data1 .
+.RE
+
+.SH SEE ALSO
+.BR trampoline (3),
+.BR gcc (1),
+.BR stdarg (3)
+
+.SH PORTING
+The way
+.B gcc
+builds local functions is described in the gcc source, file
+.RI gcc-2.6.3/config/ cpu / cpu .h.
+
+.SH AUTHOR
+
+Bruno Haible <bruno@clisp.org>
+
+.SH ACKNOWLEDGEMENTS
+
+Many ideas were cribbed from the gcc source.
+
diff --git a/callback/trampoline_r/trampoline_r.h b/callback/trampoline_r/trampoline_r.h
new file mode 100644 (file)
index 0000000..42bb221
--- /dev/null
@@ -0,0 +1,41 @@
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#ifndef _TRAMPOLINE_R_H
+#define _TRAMPOLINE_R_H
+
+/* Use a consistent prefix for all symbols in libcallback. */
+#define alloc_trampoline_r    callback_trampoline_alloc
+#define free_trampoline_r     callback_trampoline_free
+#define is_trampoline_r       callback_trampoline_is
+#define trampoline_r_address  callback_trampoline_address
+#define trampoline_r_data0    callback_trampoline_data0
+#define trampoline_r_data1    callback_trampoline_data1
+
+#ifdef __cplusplus
+typedef int (*__TR_function) (...);
+#else
+typedef int (*__TR_function) ();
+#endif
+extern __TR_function alloc_trampoline_r (__TR_function, void*, void*);
+extern void free_trampoline_r (__TR_function);
+extern int is_trampoline_r (void*);
+extern __TR_function trampoline_r_address (__TR_function);
+extern void* trampoline_r_data0 (__TR_function);
+extern void* trampoline_r_data1 (__TR_function);
+
+#endif /* _TRAMPOLINE_R_H */
diff --git a/callback/trampoline_r/trampoline_r.html b/callback/trampoline_r/trampoline_r.html
new file mode 100644 (file)
index 0000000..e7fb770
--- /dev/null
@@ -0,0 +1,135 @@
+<HTML>
+<HEAD>
+<!--
+Copyright (C) 1995-2017 Bruno Haible
+
+This manual is free documentation.  It is dually licensed under the
+GNU FDL and the GNU GPL.  This means that you can redistribute this
+manual under either of these two licenses, at your choice.
+
+This manual is covered by the GNU FDL.  Permission is granted to copy,
+distribute and/or modify this document under the terms of the
+GNU Free Documentation License (FDL), either version 1.2 of the
+License, or (at your option) any later version published by the
+Free Software Foundation (FSF); with no Invariant Sections, with no
+Front-Cover Text, and with no Back-Cover Texts.
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/fdl-1.2>.
+
+This manual is covered by the GNU GPL.  You can redistribute it and/or
+modify it under the terms of the GNU General Public License (GPL), either
+version 2 of the License, or (at your option) any later version published
+by the Free Software Foundation (FSF).
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
+-->
+<TITLE> TRAMPOLINE_R manual page </TITLE>
+</HEAD>
+<BODY>
+<H1>TRAMPOLINE_R manual page</H1>
+
+<UL>
+<LI> <A HREF="#Name">Name</A>
+<LI> <A HREF="#Synopsis">Synopsis</A>
+<LI> <A HREF="#Description">Description</A>
+<LI> <A HREF="#See also">See also</A>
+<LI> <A HREF="#Porting">Porting</A>
+<LI> <A HREF="#Author">Author</A>
+<LI> <A HREF="#Acknowledgements">Acknowledgements</A>
+</UL>
+<P>
+
+<HR>
+
+<A NAME="Name">
+<H2>Name</H2>
+</A>
+
+trampoline_r -  closures as first-class C functions
+
+<A NAME="Synopsis">
+<H2>Synopsis</H2>
+</A>
+
+<PRE>
+<CODE>#include &lt;trampoline_r.h&gt;</CODE>
+<CODE><VAR>function</VAR> = alloc_trampoline_r(<VAR>address</VAR>, <VAR>data0</VAR>, <VAR>data1</VAR>);</CODE>
+<CODE>free_trampoline_r(<VAR>function</VAR>);</CODE>
+<CODE>is_trampoline_r(<VAR>function</VAR>)</CODE>
+<CODE>trampoline_r_address(<VAR>function</VAR>)</CODE>
+<CODE>trampoline_r_data0(<VAR>function</VAR>)</CODE>
+<CODE>trampoline_r_data1(<VAR>function</VAR>)</CODE>
+</PRE>
+
+<A NAME="Description">
+<H2>Description</H2>
+</A>
+
+These  functions implement <EM>closures</EM>  as first-class
+C functions.  A closure consists of a regular C function  and  a
+piece of data which gets passed to the C function when the
+closure is called.
+<P>
+Closures as <EM>first-class C functions</EM> means  that  they  fit
+into a function pointer and can be called exactly like any
+other C function.  <CODE><VAR>function</VAR> =  alloc_trampoline_r(<VAR>address</VAR>, <VAR>data0</VAR>, <VAR>data1</VAR>)</CODE>
+allocates  a  closure.  When <VAR>function</VAR> gets
+called, it stores in a special &quot;lexical chain register&quot;  a
+pointer  to  a  storage area containing <VAR>data0</VAR> in its first
+word and <VAR>data1</VAR> in its second word and calls the C function
+at  <VAR>address</VAR>.   The  function at <VAR>address</VAR> is responsible for
+fetching <VAR>data0</VAR> and  <VAR>data1</VAR>  off  the  pointer.  Note  that  the
+&quot;lexical  chain register&quot; is a call-used register, i.e. is
+clobbered by function calls.
+<P>
+This is much like gcc's local functions, except  that  the
+GNU  C local functions have dynamic extent (i.e. are
+deallocated when the creating function returns), while <EM>trampoline</EM>
+  provides  functions with indefinite extent: <CODE><VAR>function</VAR></CODE>
+is  only  deallocated  when  <CODE>free_trampoline_r(<VAR>function</VAR>)</CODE>  is
+called.
+<P>
+<CODE>is_trampoline_r(<VAR>function</VAR>)</CODE>
+checks  whether  the  C  function <CODE><VAR>function</VAR></CODE>
+was  produced by a call to <CODE>alloc_trampoline_r</CODE>.
+If this returns true, the arguments given to <CODE>alloc_trampoline_r</CODE>
+can  be  retrieved:
+<UL>
+<LI> <CODE>trampoline_r_address(<VAR>function</VAR>)</CODE> returns <VAR>address</VAR>,
+<LI> <CODE>trampoline_r_data0(<VAR>function</VAR>)</CODE> returns <VAR>data0</VAR>,
+<LI> <CODE>trampoline_r_data1(<VAR>function</VAR>)</CODE> returns <VAR>data1</VAR>.
+</UL>
+
+<A NAME="See also">
+<H2>See also</H2>
+</A>
+<A HREF="trampoline(3)"><CODE><B>trampoline</B></CODE></A>(3), <A HREF="gcc(1)"><CODE><B>gcc</B></CODE></A>(1), <A HREF="stdarg(3)"><CODE><B>stdarg</B></CODE></A>(3)
+
+<A NAME="Porting">
+<H2>Porting</H2>
+</A>
+
+The way gcc builds local functions is described in the gcc
+source, file <SAMP>gcc-2.6.3/config/<VAR>cpu</VAR>/<VAR>cpu</VAR>.h</SAMP>.
+
+<A NAME="Author">
+<H2>Author</H2>
+</A>
+
+Bruno Haible &lt;bruno@clisp.org&gt;
+
+<A NAME="Acknowledgements">
+<H2>Acknowledgements</H2>
+</A>
+
+Many ideas were cribbed from the gcc source.
+<P>
+
+<HR>
+
+<ADDRESS>TRAMPOLINE_R manual page<BR>
+Bruno Haible &lt;bruno@clisp.org&gt;
+</ADDRESS>
+<P>
+Last modified: 1 January 2017.
+
+</BODY>
+</HTML>
diff --git a/callback/trampoline_r/trampoline_r.man b/callback/trampoline_r/trampoline_r.man
new file mode 100644 (file)
index 0000000..4580171
--- /dev/null
@@ -0,0 +1,71 @@
+TRAMPOLINE(3)              Library Functions Manual              TRAMPOLINE(3)
+
+
+
+\e[1mNAME\e[0m
+       trampoline - closures as first-class C functions
+
+\e[1mSYNOPSIS\e[0m
+       \e[1m#include <trampoline_r.h>\e[0m
+
+       \e[1mfunction = alloc_trampoline_r(address, data0, data1);\e[0m
+
+       \e[1mfree_trampoline_r(function);\e[0m
+
+       \e[1mis_trampoline_r(function)\e[0m
+       \e[1mtrampoline_r_address(function)\e[0m
+       \e[1mtrampoline_r_data0(function)\e[0m
+       \e[1mtrampoline_r_data1(function)\e[0m
+
+\e[1mDESCRIPTION\e[0m
+       These  functions implement \e[4mclosures\e[24m as first-class C functions.  A clo‐
+       sure consists of a regular C function and a piece of  data  which  gets
+       passed to the C function when the closure is called.
+
+       Closures as \e[4mfirst-class\e[24m \e[4mC\e[24m \e[4mfunctions\e[24m means that they fit into a function
+       pointer and can be called exactly like any other C function.   \e[4mfunction\e[0m
+       \e[1m=  alloc_trampoline_r(\e[4m\e[22maddress\e[24m\e[1m,  \e[4m\e[22mdata0\e[24m\e[1m, \e[4m\e[22mdata1\e[24m\e[1m) \e[22mallocates a closure. When
+       \e[4mfunction\e[24m gets called, it stores in a special "lexical chain register" a
+       pointer  to a storage area containing \e[4mdata0\e[24m in its first word and \e[4mdata1\e[0m
+       in its second word and calls the C function at \e[4maddress\e[24m.   The  function
+       at \e[4maddress\e[24m is responsible for fetching \e[4mdata0\e[24m and \e[4mdata1\e[24m off the pointer.
+       Note that the "lexical chain register" is a call-used register, i.e. is
+       clobbered by function calls.
+
+       This  is  much  like \e[1mgcc\e[22m's local functions, except that the GNU C local
+       functions have dynamic extent (i.e. are deallocated when  the  creating
+       function  returns), while \e[4mtrampoline\e[24m provides functions with indefinite
+       extent: \e[4mfunction\e[24m is only deallocated  when  \e[1mfree_trampoline_r(\e[4m\e[22mfunction\e[24m\e[1m)\e[0m
+       is called.
+
+       \e[1mis_trampoline_r(\e[4m\e[22mfunction\e[24m\e[1m)  \e[22mchecks  whether  the C function \e[4mfunction\e[24m was
+       produced by a call to \e[4malloc_trampoline_r\e[24m.  If this  returns  true,  the
+       arguments given to \e[4malloc_trampoline_r\e[24m can be retrieved:
+
+           \e[1mtrampoline_r_address(\e[4m\e[22mfunction\e[24m\e[1m) \e[22mreturns \e[4maddress\e[24m,
+
+           \e[1mtrampoline_r_data0(\e[4m\e[22mfunction\e[24m\e[1m) \e[22mreturns \e[4mdata0\e[24m,
+
+           \e[1mtrampoline_r_data1(\e[4m\e[22mfunction\e[24m\e[1m) \e[22mreturns \e[4mdata1\e[24m.
+
+
+\e[1mSEE ALSO\e[0m
+       \e[1mtrampoline\e[22m(3), \e[1mgcc\e[22m(1), \e[1mstdarg\e[22m(3)
+
+
+\e[1mPORTING\e[0m
+       The way \e[1mgcc \e[22mbuilds local functions is described in the gcc source, file
+       gcc-2.6.3/config/\e[4mcpu\e[24m/\e[4mcpu\e[24m.h.
+
+
+\e[1mAUTHOR\e[0m
+       Bruno Haible <bruno@clisp.org>
+
+
+\e[1mACKNOWLEDGEMENTS\e[0m
+       Many ideas were cribbed from the gcc source.
+
+
+
+
+                                1 January 2017                   TRAMPOLINE(3)
diff --git a/callback/vacall_r/COPYING b/callback/vacall_r/COPYING
new file mode 100644 (file)
index 0000000..a3d1815
--- /dev/null
@@ -0,0 +1,340 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+                          51 Franklin Street, Fifth Floor,
+                          Boston, MA 02110-1301, USA.
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The licenses for most software are designed to take away your
+freedom to share and change it.  By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users.  This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it.  (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.)  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+  To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have.  You must make sure that they, too, receive or can get the
+source code.  And you must show them these terms so they know their
+rights.
+
+  We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+  Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software.  If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+  Finally, any free program is threatened constantly by software
+patents.  We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary.  To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+\f
+                    GNU GENERAL PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License.  The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language.  (Hereinafter, translation is included without limitation in
+the term "modification".)  Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope.  The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+  1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+  2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+    a) You must cause the modified files to carry prominent notices
+    stating that you changed the files and the date of any change.
+
+    b) You must cause any work that you distribute or publish, that in
+    whole or in part contains or is derived from the Program or any
+    part thereof, to be licensed as a whole at no charge to all third
+    parties under the terms of this License.
+
+    c) If the modified program normally reads commands interactively
+    when run, you must cause it, when started running for such
+    interactive use in the most ordinary way, to print or display an
+    announcement including an appropriate copyright notice and a
+    notice that there is no warranty (or else, saying that you provide
+    a warranty) and that users may redistribute the program under
+    these conditions, and telling the user how to view a copy of this
+    License.  (Exception: if the Program itself is interactive but
+    does not normally print such an announcement, your work based on
+    the Program is not required to print an announcement.)
+\f
+These requirements apply to the modified work as a whole.  If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works.  But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+  3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+    a) Accompany it with the complete corresponding machine-readable
+    source code, which must be distributed under the terms of Sections
+    1 and 2 above on a medium customarily used for software interchange; or,
+
+    b) Accompany it with a written offer, valid for at least three
+    years, to give any third party, for a charge no more than your
+    cost of physically performing source distribution, a complete
+    machine-readable copy of the corresponding source code, to be
+    distributed under the terms of Sections 1 and 2 above on a medium
+    customarily used for software interchange; or,
+
+    c) Accompany it with the information you received as to the offer
+    to distribute corresponding source code.  (This alternative is
+    allowed only for noncommercial distribution and only if you
+    received the program in object code or executable form with such
+    an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it.  For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable.  However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+\f
+  4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License.  Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+  5. You are not required to accept this License, since you have not
+signed it.  However, nothing else grants you permission to modify or
+distribute the Program or its derivative works.  These actions are
+prohibited by law if you do not accept this License.  Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+  6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions.  You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+  7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all.  For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices.  Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+\f
+  8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded.  In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+  9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number.  If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation.  If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+  10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission.  For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this.  Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+                            NO WARRANTY
+
+  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+                     END OF TERMS AND CONDITIONS
+\f
+        Appendix: How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software Foundation,
+    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+    Gnomovision version 69, Copyright (C) year  name of author
+    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  Here is a sample; alter the names:
+
+  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+  `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+  <signature of Ty Coon>, 1 April 1989
+  Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs.  If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library.  If this is what you want to do, use the GNU Library General
+Public License instead of this License.
diff --git a/callback/vacall_r/Makefile.devel b/callback/vacall_r/Makefile.devel
new file mode 100644 (file)
index 0000000..6f3653d
--- /dev/null
@@ -0,0 +1,229 @@
+# This is the developer's -*-Makefile-*-, not the user's makefile.
+# Do not use it unless you know exactly what you do!
+
+THISFILE = Makefile.devel
+LN = ln -s
+RM = rm -f
+
+# ============ Rules that require cross-compilation tools ============
+
+GCC = gcc
+GCCFLAGS = -I../.. -I../../dummy -O2 -fno-omit-frame-pointer -fPIC -DREENTRANT
+SED = sed
+CROSS_TOOL = cross
+
+precompiled : \
+  vacall-i386-macro.S \
+  vacall-m68k.mit.S vacall-m68k.motorola.S \
+  vacall-mipseb-macro.S vacall-mipsel-macro.S vacall-mipsn32eb-macro.S vacall-mipsn32el-macro.S vacall-mips64eb-macro.S vacall-mips64el-macro.S \
+  vacall-sparc-macro.S vacall-sparc64-macro.S \
+  vacall-alpha-macro.S \
+  vacall-hppa-macro.S vacall-hppa64-macro.S \
+  vacall-arm-macro.S vacall-armhf-macro.S \
+  vacall-arm64-macro.S \
+  vacall-powerpc-aix.s vacall-powerpc-linux-macro.S vacall-powerpc-sysv4-macro.S vacall-powerpc-macos.s vacall-powerpc64-aix.s vacall-powerpc64-linux.S vacall-powerpc64-elfv2-linux.S \
+  vacall-ia64-macro.S \
+  vacall-x86_64-macro.S vacall-x86_64-x32-linux.s vacall-x86_64-windows-macro.S \
+  vacall-s390-macro.S vacall-s390x-macro.S \
+  vacall-riscv32-ilp32d-macro.S vacall-riscv64-lp64d-macro.S
+
+
+vacall-i386-linux.s : ../../vacall/vacall-i386.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) i386-linux gcc -V 3.1 $(GCCFLAGS) -D__i386__ -S ../../vacall/vacall-i386.c -I../../vacall -I. -o vacall-i386-linux.s
+
+vacall-i386-macro.S : vacall-i386-linux.s ../../common/asm-i386.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-i386.h"' ; sed -e '/\.align.*,0x90$$/d' < vacall-i386-linux.s | ../../common/asm-i386.sh ; cat ../../common/noexecstack.h) > vacall-i386-macro.S
+
+
+vacall-m68k-linux.s : ../../vacall/vacall-m68k.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) m68k-linux gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S ../../vacall/vacall-m68k.c -I../../vacall -I. -o vacall-m68k-linux.s
+
+vacall-m68k-sun.s : ../../vacall/vacall-m68k.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) m68k-sun gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S ../../vacall/vacall-m68k.c -I../../vacall -I. -o vacall-m68k-sun.s
+
+vacall-m68k.mit.S : vacall-m68k-sun.s ../../common/asm-m68k.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-m68k.h"' ; ../../common/asm-m68k.sh mit < vacall-m68k-sun.s ; cat ../../common/noexecstack.h) > vacall-m68k.mit.S
+
+vacall-m68k.motorola.S : vacall-m68k-linux.s ../../common/asm-m68k.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-m68k.h"' ; ../../common/asm-m68k.sh motorola < vacall-m68k-linux.s ; cat ../../common/noexecstack.h) > vacall-m68k.motorola.S
+
+
+vacall-mipseb-linux.s : ../../vacall/vacall-mips.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+# For references to symbols: -mno-explicit-relocs ensures a syntax that the IRIX assembler understands.
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -meb -mno-explicit-relocs $(GCCFLAGS) -D__mips__ -S ../../vacall/vacall-mips.c -I../../vacall -I. -o vacall-mipseb-linux.s
+
+vacall-mipseb-macro.S : vacall-mipseb-linux.s ../../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mipseb-linux.s) > vacall-mipseb-macro.S
+
+vacall-mipsel-linux.s : ../../vacall/vacall-mips.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -mel -mno-explicit-relocs $(GCCFLAGS) -D__mips__ -S ../../vacall/vacall-mips.c -I../../vacall -I. -o vacall-mipsel-linux.s
+
+vacall-mipsel-macro.S : vacall-mipsel-linux.s ../../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mipsel-linux.s) > vacall-mipsel-macro.S
+
+vacall-mipsn32eb-linux.s : ../../vacall/vacall-mipsn32.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -meb $(GCCFLAGS) -D__mipsn32__ -S ../../vacall/vacall-mipsn32.c -I../../vacall -I. -o vacall-mipsn32eb-linux.s
+
+vacall-mipsn32eb-macro.S : vacall-mipsn32eb-linux.s ../../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mipsn32eb-linux.s) > vacall-mipsn32eb-macro.S
+
+vacall-mipsn32el-linux.s : ../../vacall/vacall-mipsn32.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -mel $(GCCFLAGS) -D__mipsn32__ -S ../../vacall/vacall-mipsn32.c -I../../vacall -I. -o vacall-mipsn32el-linux.s
+
+vacall-mipsn32el-macro.S : vacall-mipsn32el-linux.s ../../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mipsn32el-linux.s) > vacall-mipsn32el-macro.S
+
+vacall-mips64eb-linux.s : ../../vacall/vacall-mips64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -meb $(GCCFLAGS) -D__mips64__ -S ../../vacall/vacall-mips64.c -I../../vacall -I. -o vacall-mips64eb-linux.s
+
+vacall-mips64eb-macro.S : vacall-mips64eb-linux.s ../../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mips64eb-linux.s) > vacall-mips64eb-macro.S
+
+vacall-mips64el-linux.s : ../../vacall/vacall-mips64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -mel $(GCCFLAGS) -D__mips64__ -S ../../vacall/vacall-mips64.c -I../../vacall -I. -o vacall-mips64el-linux.s
+
+vacall-mips64el-macro.S : vacall-mips64el-linux.s ../../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mips64el-linux.s) > vacall-mips64el-macro.S
+
+
+vacall-sparc-linux.s : ../../vacall/vacall-sparc.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -D__sparc__ -S ../../vacall/vacall-sparc.c -I../../vacall -I. -o vacall-sparc-linux.s
+
+vacall-sparc-macro.S : vacall-sparc-linux.s ../../common/asm-sparc.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-sparc.h"' ; ../../common/asm-sparc.sh < vacall-sparc-linux.s ; cat ../../common/noexecstack.h) > vacall-sparc-macro.S
+
+vacall-sparc64-linux.s : ../../vacall/vacall-sparc64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 $(GCCFLAGS) -D__sparc64__ -S ../../vacall/vacall-sparc64.c -I../../vacall -I. -o vacall-sparc64-linux.s
+
+vacall-sparc64-macro.S : vacall-sparc64-linux.s ../../common/asm-sparc.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-sparc.h"' ; ../../common/asm-sparc.sh < vacall-sparc64-linux.s ; cat ../../common/noexecstack.h) > vacall-sparc64-macro.S
+
+
+vacall-alpha-linux.s : ../../vacall/vacall-alpha.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) alpha-linux gcc -V 4.0.2 $(GCCFLAGS) -D__alpha__ -S ../../vacall/vacall-alpha.c -I../../vacall -I. -o vacall-alpha-linux.s
+
+vacall-alpha-macro.S : vacall-alpha-linux.s ../../common/asm-alpha.sh ../../common/noexecstack.h $(THISFILE)
+       (../../common/asm-alpha.sh < vacall-alpha-linux.s ; cat ../../common/noexecstack.h) > vacall-alpha-macro.S
+
+
+vacall-hppa-linux.s : ../../vacall/vacall-hppa.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) hppa-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa__ -S ../../vacall/vacall-hppa.c -I../../vacall -I. -o vacall-hppa-linux.s
+
+vacall-hppa-macro.S : vacall-hppa-linux.s ../../common/asm-hppa.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-hppa.h"' ; ../../common/asm-hppa.sh < vacall-hppa-linux.s ; cat ../../common/noexecstack.h) > vacall-hppa-macro.S
+
+vacall-hppa64-linux.s : ../../vacall/vacall-hppa64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa64__ -S ../../vacall/vacall-hppa64.c -I../../vacall -I. -o vacall-hppa64-linux.s
+
+vacall-hppa64-macro.S : vacall-hppa64-linux.s ../../common/asm-hppa64.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-hppa64.h"' ; ../../common/asm-hppa64.sh < vacall-hppa64-linux.s ; cat ../../common/noexecstack.h) > vacall-hppa64-macro.S
+
+
+vacall-arm-macro.S : ../../vacall/vacall-arm.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-arm.sh ../../common/noexecstack-arm.h $(THISFILE)
+       $(CROSS_TOOL) arm-linux gcc -V 3.1 -mlittle-endian $(GCCFLAGS) -D__arm__ -S ../../vacall/vacall-arm.c -I../../vacall -I. -o vacall-armel.s
+       $(CROSS_TOOL) arm-linux gcc -V 3.1 -mbig-endian $(GCCFLAGS) -D__arm__ -S ../../vacall/vacall-arm.c -I../../vacall -I. -o vacall-armeb.s
+       cmp vacall-armel.s vacall-armeb.s > /dev/null
+       (echo '#include "asm-arm.h"' ; ../../common/asm-arm.sh < vacall-armel.s ; cat ../../common/noexecstack-arm.h) > vacall-arm-macro.S
+       $(RM) vacall-armel.s vacall-armeb.s
+
+vacall-armhf-macro.S : ../../vacall/vacall-armhf.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-arm.sh ../../common/noexecstack-arm.h $(THISFILE)
+# The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer.
+       $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.3.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -mlittle-endian $(GCCFLAGS) -D__armhf__ -S ../../vacall/vacall-armhf.c -I../../vacall -I. -o vacall-armhfel.s
+       $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.3.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -mbig-endian $(GCCFLAGS) -D__armhf__ -S ../../vacall/vacall-armhf.c -I../../vacall -I. -o vacall-armhfeb.s
+       cmp vacall-armhfel.s vacall-armhfeb.s > /dev/null
+       (echo '#include "asm-arm.h"' ; ../../common/asm-arm.sh < vacall-armhfel.s ; cat ../../common/noexecstack-arm.h) > vacall-armhf-macro.S
+       $(RM) vacall-armhfel.s vacall-armhfeb.s
+
+
+vacall-arm64-macro.S : ../../vacall/vacall-arm64.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-arm.sh ../../common/noexecstack-arm.h $(THISFILE)
+       $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mlittle-endian $(GCCFLAGS) -D__arm64__ -S ../../vacall/vacall-arm64.c -I../../vacall -I. -o vacall-arm64el.s
+       $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mbig-endian $(GCCFLAGS) -D__arm64__ -S ../../vacall/vacall-arm64.c -I../../vacall -I. -o vacall-arm64eb.s
+       cmp vacall-arm64el.s vacall-arm64eb.s > /dev/null
+       (echo '#include "asm-arm.h"' ; ../../common/asm-arm.sh < vacall-arm64el.s ; cat ../../common/noexecstack-arm.h) > vacall-arm64-macro.S
+       $(RM) vacall-arm64el.s vacall-arm64eb.s
+
+
+vacall-powerpc-aix.s : ../../vacall/vacall-powerpc.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) rs6000-aix gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc -mnew-mnemonics $(GCCFLAGS) -D__powerpc__ -S ../../vacall/vacall-powerpc.c -I../../vacall -I. -o vacall-powerpc-aix.s
+
+vacall-powerpc-linux.s : ../../vacall/vacall-powerpc.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S ../../vacall/vacall-powerpc.c -I../../vacall -I. -o vacall-powerpc-linux.s
+
+vacall-powerpc-linux-macro.S : vacall-powerpc-linux.s ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE)
+       (../../common/asm-powerpc.sh < vacall-powerpc-linux.s ; cat ../../common/noexecstack.h) > vacall-powerpc-linux-macro.S
+
+vacall-powerpc-sysv4-macro.S : ../../vacall/vacall-powerpc.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE)
+       $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S ../../vacall/vacall-powerpc.c -I../../vacall -I. -o vacall-powerpc-sysv4.s
+       (../../common/asm-powerpc.sh < vacall-powerpc-sysv4.s ; cat ../../common/noexecstack.h) > vacall-powerpc-sysv4-macro.S
+       $(RM) vacall-powerpc-sysv4.s
+
+vacall-powerpc-macos.s : ../../vacall/vacall-powerpc.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) powerpc-darwin gcc -V 3.3.6 $(GCCFLAGS) -D__powerpc__ -S ../../vacall/vacall-powerpc.c -I../../vacall -I. -o vacall-powerpc-macos.s
+
+vacall-powerpc64-aix.s : ../../vacall/vacall-powerpc64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) rs6000-aix6.1 gcc-5.4.0 -maix64 $(GCCFLAGS) -D__powerpc64__ -S ../../vacall/vacall-powerpc64.c -I../../vacall -I. -o vacall-powerpc64-aix.s
+
+vacall-powerpc64-linux.S : ../../vacall/vacall-powerpc64.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE)
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -S ../../vacall/vacall-powerpc64.c -I../../vacall -I. -o vacall-powerpc64-linux-le.s
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -S ../../vacall/vacall-powerpc64.c -I../../vacall -I. -o vacall-powerpc64-linux-be.s
+       cmp vacall-powerpc64-linux-le.s vacall-powerpc64-linux-be.s > /dev/null
+       (../../common/asm-powerpc.sh < vacall-powerpc64-linux-be.s ; cat ../../common/noexecstack.h) > vacall-powerpc64-linux.S
+       $(RM) vacall-powerpc64-linux-le.s vacall-powerpc64-linux-be.s
+
+vacall-powerpc64-elfv2-linux.S : ../../vacall/vacall-powerpc64.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE)
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S ../../vacall/vacall-powerpc64.c -I../../vacall -I. -o vacall-powerpc64-elfv2-linux-le.s
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S ../../vacall/vacall-powerpc64.c -I../../vacall -I. -o vacall-powerpc64-elfv2-linux-be.s
+# vacall-powerpc64-linux-be.s contains endianness specific optimizations.
+       (../../common/asm-powerpc.sh < vacall-powerpc64-elfv2-linux-le.s ; cat ../../common/noexecstack.h) > vacall-powerpc64-elfv2-linux.S
+       $(RM) vacall-powerpc64-elfv2-linux-le.s vacall-powerpc64-elfv2-linux-be.s
+
+
+vacall-ia64-linux.s : ../../vacall/vacall-ia64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) ia64-linux gcc -V 4.0.1 $(GCCFLAGS) -D__ia64__ -S ../../vacall/vacall-ia64.c -I../../vacall -I. -o vacall-ia64-linux.s
+
+vacall-ia64-macro.S : vacall-ia64-linux.s ../../common/noexecstack.h $(THISFILE)
+       cat vacall-ia64-linux.s ../../common/noexecstack.h > vacall-ia64-macro.S
+
+
+vacall-x86_64-linux.s : ../../vacall/vacall-x86_64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) x86_64-linux gcc-4.0.2 $(GCCFLAGS) -D__x86_64__ -S ../../vacall/vacall-x86_64.c -I../../vacall -I. -o vacall-x86_64-linux.s
+
+vacall-x86_64-macro.S : vacall-x86_64-linux.s ../../common/asm-x86_64.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-x86_64.h"' ; ../../common/asm-x86_64.sh < vacall-x86_64-linux.s ; cat ../../common/noexecstack.h) > vacall-x86_64-macro.S
+
+vacall-x86_64-x32-linux.s : ../../vacall/vacall-x86_64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mx32 $(GCCFLAGS) -D__x86_64__ -D__x86_64_x32__ -S ../../vacall/vacall-x86_64.c -I../../vacall -I. -o vacall-x86_64-x32-linux.s
+
+vacall-x86_64-windows.s : ../../vacall/vacall-x86_64-windows.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mabi=ms $(GCCFLAGS) -fno-reorder-blocks-and-partition -D__x86_64__ -D_WIN32 -S ../../vacall/vacall-x86_64-windows.c -I../../vacall -I. -o vacall-x86_64-windows.s
+
+vacall-x86_64-windows-macro.S : vacall-x86_64-windows.s ../../common/asm-x86_64.sh ../../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-x86_64.h"' ; ../../common/asm-x86_64.sh < vacall-x86_64-windows.s ; cat ../../common/noexecstack.h) > vacall-x86_64-windows-macro.S
+
+
+vacall-s390-linux.s : ../../vacall/vacall-s390.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) s390-linux gcc -V 3.1 $(GCCFLAGS) -D__s390__ -S ../../vacall/vacall-s390.c -I../../vacall -I. -o vacall-s390-linux.s
+
+vacall-s390-macro.S : vacall-s390-linux.s ../../common/asm-s390.sh ../../common/noexecstack.h $(THISFILE)
+       (../../common/asm-s390.sh < vacall-s390-linux.s ; cat ../../common/noexecstack.h) > vacall-s390-macro.S
+
+
+vacall-s390x-linux.s : ../../vacall/vacall-s390x.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) s390x-linux gcc-5.4.0 $(GCCFLAGS) -D__s390x__ -S ../../vacall/vacall-s390x.c -I../../vacall -I. -o vacall-s390x-linux.s
+
+vacall-s390x-macro.S : vacall-s390x-linux.s ../../common/asm-s390.sh ../../common/noexecstack.h $(THISFILE)
+       (../../common/asm-s390.sh < vacall-s390x-linux.s ; cat ../../common/noexecstack.h) > vacall-s390x-macro.S
+
+
+vacall-riscv32-ilp32d-linux.s : ../../vacall/vacall-riscv32.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) riscv32-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv32__ -S ../../vacall/vacall-riscv32.c -I../../vacall -I. -o vacall-riscv32-ilp32d-linux.s
+
+vacall-riscv32-ilp32d-macro.S : vacall-riscv32-ilp32d-linux.s ../../common/asm-riscv.sh ../../common/noexecstack.h $(THISFILE)
+       (../../common/asm-riscv.sh < vacall-riscv32-ilp32d-linux.s ; cat ../../common/noexecstack.h) > vacall-riscv32-ilp32d-macro.S
+
+
+vacall-riscv64-lp64d-linux.s : ../../vacall/vacall-riscv64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE)
+       $(CROSS_TOOL) riscv64-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv64__ -S ../../vacall/vacall-riscv64.c -I../../vacall -I. -o vacall-riscv64-lp64d-linux.s
+
+vacall-riscv64-lp64d-macro.S : vacall-riscv64-lp64d-linux.s ../../common/asm-riscv.sh ../../common/noexecstack.h $(THISFILE)
+       (../../common/asm-riscv.sh < vacall-riscv64-lp64d-linux.s ; cat ../../common/noexecstack.h) > vacall-riscv64-lp64d-macro.S
diff --git a/callback/vacall_r/Makefile.in b/callback/vacall_r/Makefile.in
new file mode 100644 (file)
index 0000000..9d52db5
--- /dev/null
@@ -0,0 +1,351 @@
+# Makefile for vacall
+
+#### Start of system configuration section. ####
+
+HOST = @host@
+CPU = @HOST_CPU_C_ABI@
+OS = @host_os@
+
+# Directories used by "make":
+srcdir = @srcdir@
+
+# Directories used by "make install":
+prefix = @prefix@
+local_prefix = /usr/local
+exec_prefix = @exec_prefix@
+libdir = @libdir@
+includedir = @includedir@
+mandir = @mandir@
+datadir = @datadir@
+datarootdir = @datarootdir@
+htmldir = $(datadir)/html
+
+# Programs used by "make":
+CC = @CC@
+CFLAGS = @CFLAGS@
+CPPFLAGS = @CPPFLAGS@
+CPP = @CPP@
+INCLUDES = -I. -I$(srcdir) -I$(srcdir)/../../vacall -I../.. -I$(srcdir)/../..
+INCLUDES_WITH_GNULIB = $(INCLUDES) -I../../gnulib-lib -I$(srcdir)/../../gnulib-lib
+ASPFLAGS = `if test @AS_UNDERSCORE@ = true; then echo '-DASM_UNDERSCORE'; fi`
+LDFLAGS = @LDFLAGS@
+LIBTOOL = @LIBTOOL@
+LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile
+LIBTOOL_LINK = $(LIBTOOL) --mode=link
+LIBTOOL_INSTALL = $(LIBTOOL) --mode=install
+LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall
+AR = @AR@
+AR_FLAGS = rc
+RANLIB = @RANLIB@
+MV = mv
+LN = @LN@
+RM = rm -f
+@SET_MAKE@
+
+# Programs used by "make install":
+INSTALL = @INSTALL@
+INSTALL_PROGRAM = @INSTALL_PROGRAM@
+INSTALL_DATA = @INSTALL_DATA@
+
+#### End of system configuration section. ####
+
+SHELL = /bin/sh
+
+# Needed by $(LIBTOOL).
+top_builddir = ../..
+
+OBJECTS = vacall.lo vacall-libapi.lo vacall-structcpy.lo
+
+all : $(OBJECTS) libvacall.la
+
+vacall.lo : vacall-$(CPU).lo
+       $(RM) vacall.lo vacall.@OBJEXT@
+       $(LN) vacall-$(CPU).lo vacall.lo
+       if test -f vacall-$(CPU).@OBJEXT@; then $(LN) vacall-$(CPU).@OBJEXT@ vacall.@OBJEXT@; fi
+
+@IFNOT_MSVC@vacall-i386.lo : vacall-i386.s
+@IFNOT_MSVC@   $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-i386.s
+
+@IFNOT_MSVC@vacall-i386.s : $(srcdir)/vacall-i386-macro.S
+@IFNOT_MSVC@   $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common - < $(srcdir)/vacall-i386-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > vacall-i386.s
+
+@IF_MSVC@vacall-i386.lo : $(srcdir)/vacall-i386-msvc.c
+@IF_MSVC@      $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) -I$(srcdir)/../../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/vacall-i386-msvc.c -o vacall-i386.lo
+
+vacall-sparc.lo : vacall-sparc.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-sparc.s
+
+vacall-sparc.s : $(srcdir)/vacall-sparc-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common - < $(srcdir)/vacall-sparc-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > vacall-sparc.s
+
+vacall-sparc64.lo : vacall-sparc64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-sparc64.s
+
+vacall-sparc64.s : $(srcdir)/vacall-sparc64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common - < $(srcdir)/vacall-sparc64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > vacall-sparc64.s
+
+vacall-m68k.lo : vacall-m68k.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-m68k.s
+
+vacall-m68k.s : $(srcdir)/vacall-m68k.mit.S $(srcdir)/vacall-m68k.motorola.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-m68k.motorola.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' | if test @AS_UNDERSCORE@ = true; then sed -e 's/\$$//g'; else sed -e 's/\$$/%/g'; fi > vacall-m68k.s
+
+vacall-mips.lo : vacall-mips.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-mips.s
+
+vacall-mips.s : $(srcdir)/vacall-mips@ENDIANNESS@-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-mips@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mips.s
+
+vacall-mipsn32.lo : vacall-mipsn32.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-mipsn32.s
+
+vacall-mipsn32.s : $(srcdir)/vacall-mipsn32@ENDIANNESS@-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-mipsn32@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mipsn32.s
+
+vacall-mips64.lo : vacall-mips64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-mips64.s
+
+vacall-mips64.s : $(srcdir)/vacall-mips64@ENDIANNESS@-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-mips64@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mips64.s
+
+vacall-alpha.lo : vacall-alpha.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-alpha.s
+
+vacall-alpha.s : $(srcdir)/vacall-alpha-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-alpha-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-alpha.s
+
+vacall-hppa.lo : vacall-hppa.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-hppa.s
+
+vacall-hppa.s : $(srcdir)/vacall-hppa-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/vacall-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > vacall-hppa.s
+
+vacall-hppa64.lo : vacall-hppa64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-hppa64.s
+
+vacall-hppa64.s : $(srcdir)/vacall-hppa64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/vacall-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > vacall-hppa64.s
+
+vacall-arm.lo : vacall-arm.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-arm.s
+
+vacall-arm.s : $(srcdir)/vacall-arm-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-arm-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-arm.s
+
+vacall-armhf.lo : vacall-armhf.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-armhf.s
+
+vacall-armhf.s : $(srcdir)/vacall-armhf-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-armhf-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-armhf.s
+
+vacall-arm64.lo : vacall-arm64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-arm64.s
+
+vacall-arm64.s : $(srcdir)/vacall-arm64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-arm64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-arm64.s
+
+vacall-powerpc.lo : vacall-powerpc.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-powerpc.s
+
+vacall-powerpc.s : $(srcdir)/vacall-powerpc-aix.s $(srcdir)/vacall-powerpc-linux-macro.S $(srcdir)/vacall-powerpc-macos.s $(srcdir)/vacall-powerpc-sysv4-macro.S
+       case "$(OS)" in \
+         aix*) syntax=aix;; \
+         linux* | netbsd* | openbsd*) syntax=linux;; \
+         macos* | darwin*) syntax=macos;; \
+         *) syntax=sysv4;; \
+       esac; \
+       case $${syntax} in \
+         linux | netbsd | sysv4) \
+           $(CPP) $(ASPFLAGS) -I$(srcdir) $(srcdir)/vacall-powerpc-$${syntax}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-powerpc.s || exit 1 ;; \
+         macos) \
+           grep -v '\.machine' $(srcdir)/vacall-powerpc-$${syntax}.s > vacall-powerpc.s || exit 1 ;; \
+         *) \
+           cp $(srcdir)/vacall-powerpc-$${syntax}.s vacall-powerpc.s || exit 1 ;; \
+       esac
+
+vacall-powerpc64.lo : vacall-powerpc64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-powerpc64.s
+
+vacall-powerpc64.s : $(srcdir)/vacall-powerpc64-aix.s $(srcdir)/vacall-powerpc64-linux.S
+       case "$(OS)" in \
+         aix*) syntax=aix;; \
+         *) syntax=linux;; \
+       esac; \
+       case $${syntax} in \
+         linux) \
+           $(CPP) $(ASPFLAGS) $(srcdir)/vacall-powerpc64-$${syntax}.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-powerpc64.s || exit 1 ;; \
+         *) \
+           cp $(srcdir)/vacall-powerpc64-$${syntax}.s vacall-powerpc64.s || exit 1 ;; \
+       esac
+
+vacall-powerpc64-elfv2.lo : vacall-powerpc64-elfv2.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-powerpc64-elfv2.s
+
+vacall-powerpc64-elfv2.s : $(srcdir)/vacall-powerpc64-elfv2-linux.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/vacall-powerpc64-elfv2-linux.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-powerpc64-elfv2.s
+
+vacall-ia64.lo : vacall-ia64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-ia64.s
+
+vacall-ia64.s : $(srcdir)/vacall-ia64-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/vacall-ia64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-ia64.s
+
+@IFNOT_MSVC@vacall-x86_64.lo : vacall-x86_64.s
+@IFNOT_MSVC@   $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-x86_64.s
+
+@IFNOT_MSVC@vacall-x86_64.s : $(srcdir)/vacall-x86_64-macro.S $(srcdir)/vacall-x86_64-windows-macro.S
+@IFNOT_MSVC@   case "$(OS)" in \
+@IFNOT_MSVC@     cygwin* | mingw*) variant='-windows';; \
+@IFNOT_MSVC@     *) variant='';; \
+@IFNOT_MSVC@   esac; \
+@IFNOT_MSVC@   $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common - < $(srcdir)/vacall-x86_64$${variant}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > vacall-x86_64.s
+
+@IF_MSVC@vacall-x86_64.lo : vacall-x86_64.asm
+@IF_MSVC@      $(LIBTOOL_COMPILE) ml64 -c -nologo vacall-x86_64.asm
+@IF_MSVC@      mkdir -p .libs; cp vacall-x86_64.@OBJEXT@ .libs/vacall-x86_64.@OBJEXT@
+
+@IF_MSVC@vacall-x86_64.asm : $(srcdir)/vacall-x86_64-windows-macro.S
+@IF_MSVC@      { $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/vacall-x86_64-windows-macro.S | grep -v '^#'; echo 'END'; } > vacall-x86_64.asm
+
+vacall-x86_64-x32.lo : vacall-x86_64-x32.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-x86_64-x32.s
+
+vacall-x86_64-x32.s : $(srcdir)/vacall-x86_64-x32-linux.s
+       cp $(srcdir)/vacall-x86_64-x32-linux.s vacall-x86_64-x32.s
+
+vacall-s390.lo : vacall-s390.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-s390.s
+
+vacall-s390.s : $(srcdir)/vacall-s390-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) $(srcdir)/vacall-s390-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-s390.s
+
+vacall-s390x.lo : vacall-s390x.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-s390x.s
+
+vacall-s390x.s : $(srcdir)/vacall-s390x-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) $(srcdir)/vacall-s390x-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-s390x.s
+
+vacall-riscv32-ilp32d.lo : vacall-riscv32-ilp32d.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-riscv32-ilp32d.s
+
+vacall-riscv32-ilp32d.s : $(srcdir)/vacall-riscv32-ilp32d-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) $(srcdir)/vacall-riscv32-ilp32d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-riscv32-ilp32d.s
+
+vacall-riscv64-lp64d.lo : vacall-riscv64-lp64d.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-riscv64-lp64d.s
+
+vacall-riscv64-lp64d.s : $(srcdir)/vacall-riscv64-lp64d-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir) $(srcdir)/vacall-riscv64-lp64d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-riscv64-lp64d.s
+
+vacall-libapi.lo : $(srcdir)/vacall-libapi.c $(srcdir)/../../vacall/vacall-internal.h $(srcdir)/vacall_r.h ../../config.h
+       $(LIBTOOL_COMPILE) $(CC) $(INCLUDES_WITH_GNULIB) $(CPPFLAGS) $(CFLAGS) @DISABLE_TYPE_BASED_ALIASING@ -DREENTRANT -c $(srcdir)/vacall-libapi.c
+
+vacall-structcpy.lo : $(srcdir)/vacall-structcpy.c $(srcdir)/../../common/structcpy.c
+       $(LIBTOOL_COMPILE) $(CC) -I$(srcdir)/../../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/vacall-structcpy.c
+
+libvacall.la : $(OBJECTS)
+       $(LIBTOOL_LINK) $(CC) -o libvacall.la -rpath $(libdir) -no-undefined $(OBJECTS) $(LDFLAGS)
+
+# Installs the library and include files only. Typically called with only
+# $(libdir) and $(includedir) - don't use $(prefix) and $(exec_prefix) here.
+install-lib : all force
+       mkdir -p $(includedir)
+       $(INSTALL_DATA) $(srcdir)/vacall_r.h $(includedir)/vacall_r.h
+
+install : all force
+       mkdir -p $(DESTDIR)$(prefix)
+#      mkdir -p $(DESTDIR)$(exec_prefix)
+#      mkdir -p $(DESTDIR)$(libdir)
+#      $(LIBTOOL_INSTALL) $(INSTALL_DATA) libvacall.la $(DESTDIR)$(libdir)/libvacall.la
+       mkdir -p $(DESTDIR)$(includedir)
+       $(INSTALL_DATA) $(srcdir)/vacall_r.h $(DESTDIR)$(includedir)/vacall_r.h
+#      mkdir -p $(DESTDIR)$(mandir)
+#      mkdir -p $(DESTDIR)$(mandir)/man3
+#      $(INSTALL_DATA) $(srcdir)/vacall_r.3 $(DESTDIR)$(mandir)/man3/vacall_r.3
+#      mkdir -p $(DESTDIR)$(datadir)
+#      mkdir -p $(DESTDIR)$(htmldir)
+#      $(INSTALL_DATA) $(srcdir)/vacall_r.html $(DESTDIR)$(htmldir)/vacall_r.html
+
+installdirs : force
+       mkdir -p $(DESTDIR)$(prefix)
+#      mkdir -p $(DESTDIR)$(exec_prefix)
+#      mkdir -p $(DESTDIR)$(libdir)
+       mkdir -p $(DESTDIR)$(includedir)
+#      mkdir -p $(DESTDIR)$(mandir)
+#      mkdir -p $(DESTDIR)$(mandir)/man3
+#      mkdir -p $(DESTDIR)$(datadir)
+#      mkdir -p $(DESTDIR)$(htmldir)
+
+uninstall : force
+#      $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libvacall.la
+       $(RM) $(DESTDIR)$(includedir)/vacall_r.h
+#      $(RM) $(DESTDIR)$(mandir)/man3/vacall_r.3
+#      $(RM) $(DESTDIR)$(htmldir)/vacall_r.html
+
+check : all
+
+extracheck : all
+
+mostlyclean : clean
+
+clean : force
+       $(RM) *.@OBJEXT@ *.lo *.a libvacall.* core
+       $(RM) vacall-i386.s vacall-sparc.s vacall-sparc64.s vacall-m68k.s vacall-mips.s vacall-mipsn32.s vacall-mips64.s vacall-alpha.s vacall-hppa.s vacall-hppa64.s vacall-arm.s vacall-armhf.s vacall-arm64.s vacall-powerpc.s vacall-powerpc64.s vacall-powerpc64-elfv2.s vacall-ia64.s vacall-x86_64.s vacall-x86_64.asm vacall-x86_64-x32.s vacall-s390.s vacall-s390x.s vacall-riscv32-ilp32d.s vacall-riscv64-lp64d.s
+       $(RM) -r .libs _libs
+
+distclean : clean
+       $(RM) Makefile
+
+maintainer-clean : distclean
+
+
+# List of source files (committed in version control or generated by Makefile.devel).
+SOURCE_FILES = \
+  COPYING \
+  README \
+  Makefile.devel \
+  Makefile.maint \
+  Makefile.in \
+  vacall_r.h \
+  get_receiver.c \
+  vacall-alpha-linux.s vacall-alpha-macro.S \
+  vacall-arm-macro.S \
+  vacall-armhf-macro.S \
+  vacall-arm64-macro.S \
+  vacall-hppa-linux.s vacall-hppa-macro.S \
+  vacall-hppa64-linux.s vacall-hppa64-macro.S \
+  vacall-i386-linux.s vacall-i386-macro.S \
+  vacall-ia64-linux.s vacall-ia64-macro.S \
+  vacall-m68k-linux.s vacall-m68k-sun.s vacall-m68k.mit.S vacall-m68k.motorola.S \
+  vacall-mipseb-linux.s vacall-mipsel-linux.s vacall-mipseb-macro.S vacall-mipsel-macro.S \
+  vacall-mipsn32eb-linux.s vacall-mipsn32el-linux.s vacall-mipsn32eb-macro.S vacall-mipsn32el-macro.S \
+  vacall-mips64eb-linux.s vacall-mips64el-linux.s vacall-mips64eb-macro.S vacall-mips64el-macro.S \
+  vacall-powerpc-aix.s \
+  vacall-powerpc-linux.s vacall-powerpc-linux-macro.S \
+  vacall-powerpc-macos.s \
+  vacall-powerpc-sysv4-macro.S \
+  vacall-powerpc64-aix.s vacall-powerpc64-linux.S vacall-powerpc64-elfv2-linux.S \
+  vacall-riscv32-ilp32d-linux.s vacall-riscv32-ilp32d-macro.S \
+  vacall-riscv64-lp64d-linux.s vacall-riscv64-lp64d-macro.S \
+  vacall-s390-linux.s vacall-s390-macro.S \
+  vacall-s390x-linux.s vacall-s390x-macro.S \
+  vacall-sparc-linux.s vacall-sparc-macro.S \
+  vacall-sparc64-linux.s vacall-sparc64-macro.S \
+  vacall-x86_64-linux.s vacall-x86_64-macro.S vacall-x86_64-x32-linux.s \
+  vacall-x86_64-windows.s vacall-x86_64-windows-macro.S \
+  vacall-libapi.c \
+  vacall-structcpy.c
+# List of distributed files generated by Makefile.maint.
+GENERATED_FILES = \
+  vacall-i386-msvc.c
+# List of distributed files.
+DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES)
+
+distdir : $(DISTFILES)
+       for file in $(DISTFILES); do \
+         if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \
+         cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \
+       done
+
+
+force :
diff --git a/callback/vacall_r/Makefile.maint b/callback/vacall_r/Makefile.maint
new file mode 100644 (file)
index 0000000..c9074f4
--- /dev/null
@@ -0,0 +1,17 @@
+# maintainer -*-Makefile-*-
+
+LN = ln -s
+RM = rm -f
+
+# ==================== Easily regeneratable files ====================
+
+all : vacall-i386-msvc.c
+
+vacall-i386-msvc.c : vacall-i386-macro.S
+       (echo '#ifdef _MSC_VER' ; echo '#include "vacall_r.h"' ; echo '#endif' ; sed -e '/FUNEND(callback_receiver,/q' < vacall-i386-macro.S ; cat get_receiver.c) > vacall-i386-msvc.c
+
+totally-clean : force
+       $(RM) vacall-i386-msvc.c
+
+
+force :
diff --git a/callback/vacall_r/README b/callback/vacall_r/README
new file mode 100644 (file)
index 0000000..801a9b9
--- /dev/null
@@ -0,0 +1,9 @@
+This directory contains a reentrant version of the vacall package.
+
+Instead of using a global variable for the function to be called,
+a pointer is passed in a special CPU register, pointing to:
+  - a function code pointer in the first word,
+  - a data word in the second word, to be passed before the va_alist.
+
+The include file <vacall.h> is renamed to <vacall_r.h>.
+
diff --git a/callback/vacall_r/get_receiver.c b/callback/vacall_r/get_receiver.c
new file mode 100644 (file)
index 0000000..5394019
--- /dev/null
@@ -0,0 +1,24 @@
+/* Implementation of callback_get_receiver */
+
+/*
+ * Copyright 2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
diff --git a/callback/vacall_r/vacall-alpha-linux.s b/callback/vacall_r/vacall-alpha-linux.s
new file mode 100644 (file)
index 0000000..75fbe8f
--- /dev/null
@@ -0,0 +1,196 @@
+       .set noreorder
+       .set volatile
+       .set noat
+       .set nomacro
+       .text
+       .align 2
+       .align 4
+       .ent callback_receiver
+callback_receiver:
+       .frame $15,192,$26,48
+       .mask 0x4008000,-192
+       ldah $29,0($27)         !gpdisp!1
+       lda $29,0($29)          !gpdisp!1
+$callback_receiver..ng:
+       lda $30,-192($30)
+       ldq $27,0($1)
+       stq $15,8($30)
+       mov $30,$15
+       lda $3,144($15)
+       stq $26,0($30)
+       .prologue 1
+       stq $31,48($15)
+       lda $2,88($15)
+       stq $16,144($15)
+       subq $2,$3,$2
+       ldq $16,8($1)
+       stq $17,152($15)
+       lda $3,192($15)
+       stq $2,80($15)
+       lda $17,16($15)
+       lda $2,144($15)
+       stq $3,72($15)
+       stq $18,160($15)
+       stq $19,168($15)
+       stq $20,176($15)
+       stq $21,184($15)
+       stt $f16,88($15)
+       stt $f17,96($15)
+       stt $f18,104($15)
+       stt $f19,112($15)
+       stt $f20,120($15)
+       stt $f21,128($15)
+       stl $31,16($15)
+       stq $2,40($15)
+       stl $31,56($15)
+       jsr $26,($27),0
+       ldah $29,0($26)         !gpdisp!2
+       lda $29,0($29)          !gpdisp!2
+       ldl $2,56($15)
+       beq $2,$L43
+       zapnot $2,15,$3
+       cmpeq $3,1,$2
+       bne $2,$L44
+       cmpeq $3,2,$2
+       bne $2,$L44
+       cmpeq $3,3,$2
+       bne $2,$L50
+       cmpeq $3,4,$2
+       bne $2,$L51
+       cmpeq $3,5,$2
+       bne $2,$L52
+       cmpeq $3,6,$2
+       bne $2,$L53
+       cmpeq $3,7,$2
+       bne $2,$L54
+       cmpeq $3,8,$2
+       bne $2,$L48
+       cmpeq $3,9,$2
+       bne $2,$L48
+       cmpeq $3,10,$2
+       bne $2,$L48
+       cmpeq $3,11,$2
+       bne $2,$L48
+       cmpeq $3,12,$2
+       bne $2,$L55
+       cmpeq $3,13,$2
+       bne $2,$L56
+       cmpeq $3,14,$2
+       bne $2,$L48
+       cmpeq $3,15,$2
+       beq $2,$L43
+       lda $2,1024($31)
+       ldl $3,16($15)
+       and $2,$3,$2
+       beq $2,$L43
+       ldq $3,64($15)
+       cmpeq $3,1,$2
+       bne $2,$L57
+       cmpeq $3,2,$2
+       bne $2,$L58
+       cmpeq $3,4,$2
+       bne $2,$L59
+       cmpeq $3,8,$2
+       bne $2,$L60
+       cmpeq $3,16,$2
+       beq $2,$L43
+       ldq $2,48($15)
+       ldq $1,8($2)
+       ldq $0,0($2)
+       .align 4
+$L43:
+       mov $15,$30
+       ldq $26,0($30)
+       ldq $15,8($30)
+       lda $30,192($30)
+       ret $31,($26),1
+       .align 4
+$L44:
+       mov $15,$30
+       ldl $2,24($15)
+       ldq $26,0($30)
+       sll $2,56,$2
+       sra $2,56,$0
+       ldq $15,8($30)
+       lda $30,192($30)
+       ret $31,($26),1
+$L51:
+       ldl $2,24($15)
+       sll $2,48,$2
+       sra $2,48,$0
+       br $31,$L43
+$L50:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       and $2,0xff,$0
+       br $31,$L43
+$L48:
+       ldq $0,24($15)
+       br $31,$L43
+$L52:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       zapnot $2,3,$0
+       br $31,$L43
+$L53:
+       ldl $3,24($15)
+       bis $31,$31,$31
+       mov $3,$0
+       br $31,$L43
+$L54:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       zapnot $2,15,$0
+       br $31,$L43
+$L55:
+       lds $f0,24($15)
+       br $31,$L43
+$L56:
+       ldt $f0,24($15)
+       br $31,$L43
+$L57:
+       ldq $3,48($15)
+       ldq_u $2,0($3)
+       extbl $2,$3,$0
+       br $31,$L43
+$L58:
+       ldq $3,48($15)
+       ldq_u $2,0($3)
+       extwl $2,$3,$0
+       br $31,$L43
+$L60:
+       ldq $2,48($15)
+       bis $31,$31,$31
+       ldq $0,0($2)
+       br $31,$L43
+$L59:
+       ldq $2,48($15)
+       ldl $3,0($2)
+       zapnot $3,15,$0
+       br $31,$L43
+       .end callback_receiver
+       .align 2
+       .align 4
+       .globl callback_get_receiver
+       .ent callback_get_receiver
+callback_get_receiver:
+       .frame $15,16,$26,0
+       .mask 0x4008000,-16
+       ldah $29,0($27)         !gpdisp!3
+       lda $29,0($29)          !gpdisp!3
+$callback_get_receiver..ng:
+       lda $30,-16($30)
+       ldah $2,callback_receiver($29)          !gprelhigh
+       stq $15,8($30)
+       mov $30,$15
+       stq $26,0($30)
+       .prologue 1
+       mov $15,$30
+       lda $0,callback_receiver($2)            !gprellow
+       ldq $26,0($30)
+       ldq $15,8($30)
+       lda $30,16($30)
+       ret $31,($26),1
+       .end callback_get_receiver
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/callback/vacall_r/vacall-alpha-macro.S b/callback/vacall_r/vacall-alpha-macro.S
new file mode 100644 (file)
index 0000000..a5ba6c6
--- /dev/null
@@ -0,0 +1,197 @@
+       .set noreorder
+       .set volatile
+       .set noat
+       .set nomacro
+       .text
+       .align 2
+       .align 4
+       .ent callback_receiver
+callback_receiver:
+       .frame $15,192,$26,48
+       .mask 0x4008000,-192
+       ldah $29,0($27)         !gpdisp!1
+       lda $29,0($29)          !gpdisp!1
+$callback_receiver..ng:
+       lda $30,-192($30)
+       ldq $27,0($1)
+       stq $15,8($30)
+       mov $30,$15
+       lda $3,144($15)
+       stq $26,0($30)
+       .prologue 1
+       stq $31,48($15)
+       lda $2,88($15)
+       stq $16,144($15)
+       subq $2,$3,$2
+       ldq $16,8($1)
+       stq $17,152($15)
+       lda $3,192($15)
+       stq $2,80($15)
+       lda $17,16($15)
+       lda $2,144($15)
+       stq $3,72($15)
+       stq $18,160($15)
+       stq $19,168($15)
+       stq $20,176($15)
+       stq $21,184($15)
+       stt $f16,88($15)
+       stt $f17,96($15)
+       stt $f18,104($15)
+       stt $f19,112($15)
+       stt $f20,120($15)
+       stt $f21,128($15)
+       stl $31,16($15)
+       stq $2,40($15)
+       stl $31,56($15)
+       jsr $26,($27),0
+       ldah $29,0($26)         !gpdisp!2
+       lda $29,0($29)          !gpdisp!2
+       ldl $2,56($15)
+       beq $2,$L43
+       zapnot $2,15,$3
+       cmpeq $3,1,$2
+       bne $2,$L44
+       cmpeq $3,2,$2
+       bne $2,$L44
+       cmpeq $3,3,$2
+       bne $2,$L50
+       cmpeq $3,4,$2
+       bne $2,$L51
+       cmpeq $3,5,$2
+       bne $2,$L52
+       cmpeq $3,6,$2
+       bne $2,$L53
+       cmpeq $3,7,$2
+       bne $2,$L54
+       cmpeq $3,8,$2
+       bne $2,$L48
+       cmpeq $3,9,$2
+       bne $2,$L48
+       cmpeq $3,10,$2
+       bne $2,$L48
+       cmpeq $3,11,$2
+       bne $2,$L48
+       cmpeq $3,12,$2
+       bne $2,$L55
+       cmpeq $3,13,$2
+       bne $2,$L56
+       cmpeq $3,14,$2
+       bne $2,$L48
+       cmpeq $3,15,$2
+       beq $2,$L43
+       lda $2,1024($31)
+       ldl $3,16($15)
+       and $2,$3,$2
+       beq $2,$L43
+       ldq $3,64($15)
+       cmpeq $3,1,$2
+       bne $2,$L57
+       cmpeq $3,2,$2
+       bne $2,$L58
+       cmpeq $3,4,$2
+       bne $2,$L59
+       cmpeq $3,8,$2
+       bne $2,$L60
+       cmpeq $3,16,$2
+       beq $2,$L43
+       ldq $2,48($15)
+       ldq $1,8($2)
+       ldq $0,0($2)
+       .align 4
+$L43:
+       mov $15,$30
+       ldq $26,0($30)
+       ldq $15,8($30)
+       lda $30,192($30)
+       ret $31,($26),1
+       .align 4
+$L44:
+       mov $15,$30
+       ldl $2,24($15)
+       ldq $26,0($30)
+       sll $2,56,$2
+       sra $2,56,$0
+       ldq $15,8($30)
+       lda $30,192($30)
+       ret $31,($26),1
+$L51:
+       ldl $2,24($15)
+       sll $2,48,$2
+       sra $2,48,$0
+       br $31,$L43
+$L50:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       and $2,0xff,$0
+       br $31,$L43
+$L48:
+       ldq $0,24($15)
+       br $31,$L43
+$L52:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       zapnot $2,3,$0
+       br $31,$L43
+$L53:
+       ldl $3,24($15)
+       bis $31,$31,$31
+       mov $3,$0
+       br $31,$L43
+$L54:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       zapnot $2,15,$0
+       br $31,$L43
+$L55:
+       lds $f0,24($15)
+       br $31,$L43
+$L56:
+       ldt $f0,24($15)
+       br $31,$L43
+$L57:
+       ldq $3,48($15)
+       ldq_u $2,0($3)
+       extbl $2,$3,$0
+       br $31,$L43
+$L58:
+       ldq $3,48($15)
+       ldq_u $2,0($3)
+       extwl $2,$3,$0
+       br $31,$L43
+$L60:
+       ldq $2,48($15)
+       bis $31,$31,$31
+       ldq $0,0($2)
+       br $31,$L43
+$L59:
+       ldq $2,48($15)
+       ldl $3,0($2)
+       zapnot $3,15,$0
+       br $31,$L43
+       .end callback_receiver
+       .align 2
+       .align 4
+       .globl callback_get_receiver
+       .ent callback_get_receiver
+callback_get_receiver:
+       .frame $15,16,$26,0
+       .mask 0x4008000,-16
+       ldah $29,0($27)         !gpdisp!3
+       lda $29,0($29)          !gpdisp!3
+$callback_get_receiver..ng:
+       lda $30,-16($30)
+       ldah $2,callback_receiver($29)          !gprelhigh
+       stq $15,8($30)
+       mov $30,$15
+       stq $26,0($30)
+       .prologue 1
+       mov $15,$30
+       lda $0,callback_receiver($2)            !gprellow
+       ldq $26,0($30)
+       ldq $15,8($30)
+       lda $30,16($30)
+       ret $31,($26),1
+       .end callback_get_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-arm-macro.S b/callback/vacall_r/vacall-arm-macro.S
new file mode 100644 (file)
index 0000000..ec08a56
--- /dev/null
@@ -0,0 +1,110 @@
+#include "asm-arm.h"
+       .text
+       .align  2
+       DECLARE_FUNCTION(callback_receiver)
+FUNBEGIN(callback_receiver)
+       // args = 28, pretend = 0, frame = 32
+       // frame_needed = 1, uses_anonymous_args = 0
+       mov     ip, sp
+       stmfd   sp!, {r4, fp, ip, lr, pc}
+       mov     r2, $0
+       sub     fp, ip, $4
+       sub     sp, sp, $32
+       ldr     r4, [fp, $4]
+       str     r2, [fp, $-28]
+       add     r3, fp, $28
+       str     r2, [fp, $-24]
+       str     r2, [fp, $-48]
+       str     r3, [fp, $-32]
+       bic     sp, sp, $7
+       ldr     r0, [r4, $4]
+       sub     r1, fp, $48
+       mov     lr, pc
+       ldr     pc, [r4, $0]
+       ldr     r2, [fp, $-24]
+       cmp     r2, $0
+       ldmeqea fp, {r4, fp, sp, pc}
+       cmp     r2, $1
+       beq     L(36)
+       cmp     r2, $2
+       ldreqsb r0, [fp, $-40]
+       ldmeqea fp, {r4, fp, sp, pc}
+       cmp     r2, $3
+       beq     L(36)
+       cmp     r2, $4
+       ldreqsh r0, [fp, $-40]
+       ldmeqea fp, {r4, fp, sp, pc}
+       cmp     r2, $5
+       ldreqh  r0, [fp, $-40]
+       ldmeqea fp, {r4, fp, sp, pc}
+       cmp     r2, $6
+       beq     L(40)
+       cmp     r2, $7
+       beq     L(40)
+       cmp     r2, $8
+       beq     L(40)
+       cmp     r2, $9
+       beq     L(40)
+       sub     r3, r2, $10
+       cmp     r3, $1
+       bls     L(41)
+       cmp     r2, $12
+       ldreq   r0, [fp, $-40]  // float
+       ldmeqea fp, {r4, fp, sp, pc}
+       cmp     r2, $13
+       beq     L(41)
+       cmp     r2, $14
+       beq     L(40)
+       cmp     r2, $15
+       ldmneea fp, {r4, fp, sp, pc}
+       ldr     r3, [fp, $-48]
+       tst     r3, $1024
+       ldmeqea fp, {r4, fp, sp, pc}
+       ldr     r3, [fp, $-20]
+       cmp     r3, $1
+       ldreq   r3, [fp, $-28]
+       ldreqb  r0, [r3, $0]    // zero_extendqisi2
+       ldmeqea fp, {r4, fp, sp, pc}
+       cmp     r3, $2
+       ldreq   r3, [fp, $-28]
+       ldrne   r3, [fp, $-28]
+       ldreqh  r0, [r3, $0]
+       ldrne   r0, [r3, $0]
+       ldmea   fp, {r4, fp, sp, pc}
+L(40):
+       ldr     r0, [fp, $-40]
+       ldmea   fp, {r4, fp, sp, pc}
+L(41):
+       sub     r0, fp, $40
+       ldmia   r0, {r0, r1}    // phole ldm
+       ldmea   fp, {r4, fp, sp, pc}
+L(36):
+       ldrb    r0, [fp, $-40]  // zero_extendqisi2
+       ldmea   fp, {r4, fp, sp, pc}
+L(fe1):
+       FUNEND(callback_receiver)
+       .align  2
+       .global C(callback_get_receiver)
+       DECLARE_FUNCTION(callback_get_receiver)
+FUNBEGIN(callback_get_receiver)
+       // args = 0, pretend = 0, frame = 0
+       // frame_needed = 1, uses_anonymous_args = 0
+       mov     ip, sp
+       stmfd   sp!, {sl, fp, ip, lr, pc}
+       ldr     sl, L(44)
+       ldr     r3, L(44)+4
+L(43):
+       add     sl, pc, sl
+       sub     fp, ip, $4
+       add     r0, sl, r3
+       ldmea   fp, {sl, fp, sp, pc}
+L(45):
+       .align  2
+L(44):
+       .word   _GLOBAL_OFFSET_TABLE_-(L(43)+8)
+       .word   callback_receiver(GOTOFF)
+L(fe2):
+       FUNEND(callback_get_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",%progbits
+#endif
diff --git a/callback/vacall_r/vacall-arm64-macro.S b/callback/vacall_r/vacall-arm64-macro.S
new file mode 100644 (file)
index 0000000..9f275fd
--- /dev/null
@@ -0,0 +1,190 @@
+#include "asm-arm.h"
+       .cpu generic+fp+simd
+       .text
+       .align  2
+       .p2align 3,,7
+       .type   callback_receiver, %function
+FUNBEGIN(callback_receiver)
+       stp     x29, x30, [sp, -256]!
+       add     x29, sp, 0
+       ldr     x10, [x18]
+       add     x11, x29, 256
+       stp     s0, s1, [x29, 156]
+       stp     s2, s3, [x29, 164]
+       stp     x0, x1, [x29, 88]
+       stp     s4, s5, [x29, 172]
+       stp     x11, xzr, [x29, 40]
+       stp     s6, s7, [x29, 180]
+       str     x8, [x29, 72]
+       stp     d0, d1, [x29, 192]
+       stp     x2, x3, [x29, 104]
+       stp     d2, d3, [x29, 208]
+       stp     x4, x5, [x29, 120]
+       stp     d4, d5, [x29, 224]
+       stp     x6, x7, [x29, 136]
+       stp     d6, d7, [x29, 240]
+       str     wzr, [x29, 16]
+       add     x1, x29, 16
+       str     wzr, [x29, 56]
+       ldr     x0, [x18, 8]
+       str     wzr, [x29, 80]
+       str     wzr, [x29, 152]
+       blr     x10
+       ldr     w9, [x29, 56]
+       cbz     w9, L(1)
+       cmp     w9, 1
+       beq     L(25)
+       cmp     w9, 2
+       beq     L(29)
+       cmp     w9, 3
+       beq     L(25)
+       cmp     w9, 4
+       beq     L(30)
+       cmp     w9, 5
+       beq     L(31)
+       cmp     w9, 6
+       beq     L(32)
+       cmp     w9, 7
+       beq     L(33)
+       and     w10, w9, -3
+       cmp     w10, 8
+       beq     L(27)
+       cmp     w10, 9
+       beq     L(27)
+       cmp     w9, 12
+       beq     L(34)
+       cmp     w9, 13
+       beq     L(35)
+       cmp     w9, 14
+       beq     L(27)
+       cmp     w9, 15
+       bne     L(1)
+       ldr     w9, [x29, 16]
+       tbz     x9, 10, L(1)
+       ldr     x9, [x29, 64]
+       sub     x10, x9, $1
+       cmp     x10, 15
+       bhi     L(1)
+       ldr     x11, [x29, 48]
+       cmp     x9, 8
+       and     x10, x11, 7
+       and     x11, x11, -8
+       add     x9, x9, x10
+       bhi     L(15)
+       cmp     x9, 8
+       lsl     w9, w9, 3
+       bhi     L(16)
+       mov     x12, 2
+       sub     w9, w9, $1
+       lsl     x9, x12, x9
+       ldr     x11, [x11]
+       sub     x9, x9, $1
+       lsl     w10, w10, 3
+       and     x9, x9, x11
+       asr     x0, x9, x10
+L(1):
+       ldp     x29, x30, [sp], 256
+       ret
+       .p2align 3
+L(25):
+       ldrb    w0, [x29, 24]
+       ldp     x29, x30, [sp], 256
+       ret
+       .p2align 3
+L(27):
+       ldr     x0, [x29, 24]
+       b       L(1)
+       .p2align 3
+L(29):
+       ldrsb   x0, [x29, 24]
+       b       L(1)
+       .p2align 3
+L(30):
+       ldrsh   x0, [x29, 24]
+       b       L(1)
+       .p2align 3
+L(31):
+       ldrh    w0, [x29, 24]
+       b       L(1)
+       .p2align 3
+L(32):
+       ldrsw   x0, [x29, 24]
+       b       L(1)
+       .p2align 3
+L(33):
+       ldr     w0, [x29, 24]
+       b       L(1)
+L(34):
+       ldr     s0, [x29, 24]
+       b       L(1)
+L(35):
+       ldr     d0, [x29, 24]
+       b       L(1)
+L(15):
+       cmp     x9, 16
+       lsl     w9, w9, 3
+       bls     L(36)
+       mov     x13, 2
+       sub     w9, w9, $129
+       ldp     x14, x12, [x11, 8]
+       lsl     x9, x13, x9
+       lsl     w15, w10, 3
+       sub     x9, x9, $1
+       neg     w10, w10, lsl 3
+       ldr     x11, [x11]
+       add     w10, w10, 64
+       and     x9, x9, x12
+       lsl     x16, x14, x10
+       asr     x11, x11, x15
+       asr     x14, x14, x15
+       lsl     x10, x9, x10
+       orr     x0, x11, x16
+       orr     x1, x10, x14
+       b       L(1)
+L(16):
+       mov     w13, -8
+       mov     x14, 2
+       sub     w9, w9, $65
+       lsl     w15, w10, 3
+       ldr     x12, [x11, 8]
+       lsl     x9, x14, x9
+       mul     w10, w13, w10
+       sub     x9, x9, $1
+       ldr     x11, [x11]
+       add     w10, w10, 64
+       and     x9, x9, x12
+       asr     x11, x11, x15
+       lsl     x9, x9, x10
+       orr     x0, x9, x11
+       b       L(1)
+L(36):
+       mov     w13, -4
+       mov     x14, 2
+       sub     w9, w9, $65
+       lsl     w15, w10, 3
+       ldr     x12, [x11, 8]
+       lsl     x9, x14, x9
+       mul     w10, w13, w10
+       sub     x9, x9, $1
+       ldr     x11, [x11]
+       add     w10, w10, 32
+       and     x9, x9, x12
+       asr     x1, x9, x15
+       lsl     x9, x9, x10
+       asr     x11, x11, x15
+       lsl     x9, x9, x10
+       orr     x0, x11, x9
+       b       L(1)
+       FUNEND(callback_receiver)
+       .align  2
+       .p2align 3,,7
+       .global C(callback_get_receiver)
+       .type   callback_get_receiver, %function
+FUNBEGIN(callback_get_receiver)
+       adrp    x9, callback_receiver
+       add     x0, x9, :lo12:callback_receiver
+       ret
+       FUNEND(callback_get_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",%progbits
+#endif
diff --git a/callback/vacall_r/vacall-armhf-macro.S b/callback/vacall_r/vacall-armhf-macro.S
new file mode 100644 (file)
index 0000000..f9e743a
--- /dev/null
@@ -0,0 +1,167 @@
+#include "asm-arm.h"
+       .arch armv6
+       .eabi_attribute 28, 1
+       .eabi_attribute 20, 1
+       .eabi_attribute 21, 1
+       .eabi_attribute 23, 3
+       .eabi_attribute 24, 1
+       .eabi_attribute 25, 1
+       .eabi_attribute 26, 1
+       .eabi_attribute 30, 2
+       .eabi_attribute 34, 1
+       .eabi_attribute 18, 4
+       .text
+       .align  2
+       .global C(callback_receiver)
+       .syntax unified
+       .arm
+       .fpu vfpv3-d16
+       .type   callback_receiver, %function
+FUNBEGIN(callback_receiver)
+       // args = 28, pretend = 0, frame = 176
+       // frame_needed = 1, uses_anonymous_args = 0
+       push    {fp, lr}
+       add     fp, sp, $4
+       sub     sp, sp, $176
+       ldr     r2, [fp, $4]
+       mov     r3, $0
+       add     lr, fp, $28
+       add     ip, fp, $44
+       vstr.32 s0, [fp, $-136]
+       vstr.32 s1, [fp, $-132]
+       vstr.32 s2, [fp, $-128]
+       vstr.32 s3, [fp, $-124]
+       vstr.32 s4, [fp, $-120]
+       vstr.32 s5, [fp, $-116]
+       vstr.32 s6, [fp, $-112]
+       vstr.32 s7, [fp, $-108]
+       vstr.32 s8, [fp, $-104]
+       vstr.32 s9, [fp, $-100]
+       vstr.32 s10, [fp, $-96]
+       vstr.32 s11, [fp, $-92]
+       vstr.32 s12, [fp, $-88]
+       vstr.32 s13, [fp, $-84]
+       vstr.32 s14, [fp, $-80]
+       vstr.32 s15, [fp, $-76]
+       vstr.64 d0, [fp, $-68]
+       vstr.64 d1, [fp, $-60]
+       vstr.64 d2, [fp, $-52]
+       vstr.64 d3, [fp, $-44]
+       vstr.64 d4, [fp, $-36]
+       vstr.64 d5, [fp, $-28]
+       vstr.64 d6, [fp, $-20]
+       vstr.64 d7, [fp, $-12]
+       str     r3, [fp, $-180]
+       str     r3, [fp, $-144]
+       str     r3, [fp, $-140]
+       str     r3, [fp, $-160]
+       strb    r3, [fp, $-156]
+       sub     r1, fp, $180
+       str     lr, [fp, $-148]
+       ldr     r3, [r2]
+       str     ip, [fp, $-164]
+       ldr     r0, [r2, $4]
+       blx     r3
+       ldrb    r3, [fp, $-156] // zero_extendqisi2
+       cmp     r3, $0
+       beq     L(1)
+       cmp     r3, $1
+       beq     L(25)
+       cmp     r3, $2
+       ldrsbeq r0, [fp, $-172]
+       beq     L(1)
+       cmp     r3, $3
+       beq     L(25)
+       cmp     r3, $4
+       ldrsheq r0, [fp, $-172]
+       beq     L(1)
+       cmp     r3, $5
+       ldrheq  r0, [fp, $-172]
+       beq     L(1)
+       cmp     r3, $6
+       beq     L(27)
+       cmp     r3, $7
+       beq     L(27)
+       cmp     r3, $8
+       beq     L(27)
+       cmp     r3, $9
+       beq     L(27)
+       sub     r2, r3, $10
+       cmp     r2, $1
+       bls     L(29)
+       cmp     r3, $12
+       vldreq.32       s0, [fp, $-172]
+       beq     L(1)
+       cmp     r3, $13
+       beq     L(30)
+       cmp     r3, $14
+       beq     L(27)
+       cmp     r3, $15
+       bne     L(1)
+       ldr     r3, [fp, $-180]
+       tst     r3, $1024
+       beq     L(1)
+       ldr     r3, [fp, $-152]
+       cmp     r3, $1
+       beq     L(31)
+       cmp     r3, $2
+       ldr     r3, [fp, $-160]
+       ldrheq  r0, [r3]
+       ldrne   r0, [r3]
+L(1):
+       sub     sp, fp, $4
+       // sp needed
+       pop     {fp, pc}
+L(25):
+       ldrb    r0, [fp, $-172] // zero_extendqisi2
+       sub     sp, fp, $4
+       // sp needed
+       pop     {fp, pc}
+L(27):
+       ldr     r0, [fp, $-172]
+       sub     sp, fp, $4
+       // sp needed
+       pop     {fp, pc}
+L(30):
+       vldr.64 d0, [fp, $-172]
+       b       L(1)
+L(29):
+       ldr     r0, [fp, $-172]
+       ldr     r1, [fp, $-168]
+       b       L(1)
+L(31):
+       ldr     r3, [fp, $-160]
+       ldrb    r0, [r3]        // zero_extendqisi2
+       b       L(1)
+       FUNEND(callback_receiver)
+       .align  2
+       .global C(callback_get_receiver)
+       .syntax unified
+       .arm
+       .fpu vfpv3-d16
+       .type   callback_get_receiver, %function
+FUNBEGIN(callback_get_receiver)
+       // args = 0, pretend = 0, frame = 0
+       // frame_needed = 1, uses_anonymous_args = 0
+       // link register save eliminated.
+       ldr     r3, L(34)
+       ldr     r2, L(34)+4
+L(PIC0):
+       add     r3, pc, r3
+       str     fp, [sp, $-4]!
+       add     fp, sp, $0
+       ldr     r3, [r3, r2]
+       mov     r0, r3
+       add     sp, fp, $0
+       // sp needed
+       ldr     fp, [sp], $4
+       bx      lr
+L(35):
+       .align  2
+L(34):
+       .word   _GLOBAL_OFFSET_TABLE_-(L(PIC0)+8)
+       .word   callback_receiver(GOT)
+       FUNEND(callback_get_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",%progbits
+#endif
diff --git a/callback/vacall_r/vacall-hppa-linux.s b/callback/vacall_r/vacall-hppa-linux.s
new file mode 100644 (file)
index 0000000..bc5c935
--- /dev/null
@@ -0,0 +1,218 @@
+       .LEVEL 1.1
+       .text
+       .align 4
+               .type            callback_receiver,@function
+callback_receiver:
+       .PROC
+       .CALLINFO FRAME=192,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=5
+       .ENTRY
+       copy %r3,%r1
+       stw %r2,-20(%r30)
+       copy %r30,%r3
+       stwm %r1,192(%r30)
+       ldo -32(%r3),%r2
+       ldo 16(%r3),%r21
+       ldo 88(%r3),%r20
+       stw %r5,96(%r3)
+       sub %r21,%r2,%r31
+       copy %r19,%r5
+       stw %r4,100(%r3)
+       ldo 80(%r31),%r4
+       ldo 64(%r31),%r31
+       stw %r19,-32(%r30)
+       stw %r25,-40(%r3)
+       copy %r21,%r25
+       ldo 80(%r3),%r21
+       fstds %fr5,0(%r20)
+       ldo 76(%r3),%r20
+       fstws %fr4L,0(%r20)
+       ldo 68(%r3),%r20
+       stw %r0,36(%r3)
+       stw %r28,48(%r3)
+       fstds %fr7,0(%r21)
+       ldo 72(%r3),%r21
+       fstws %fr5L,0(%r21)
+       ldo 64(%r3),%r21
+       fstws %fr6L,0(%r20)
+       ldo -48(%r3),%r20
+       stw %r26,-36(%r3)
+       fstws %fr7L,0(%r21)
+       ldw 0(%r29),%r22
+       stw %r20,52(%r3)
+       stw %r31,56(%r3)
+       stw %r4,60(%r3)
+       stw %r24,-44(%r3)
+       stw %r23,-48(%r3)
+       stw %r0,16(%r3)
+       stw %r2,32(%r3)
+       stw %r0,40(%r3)
+       ldw 4(%r29),%r26
+       .CALL   ARGW0=GR
+       bl $$dyncall,%r31
+       copy %r31,%r2
+       ldw 40(%r3),%r21
+       comib,= 0,%r21,.L1
+       copy %r5,%r19
+       comib,= 1,%r21,.L48
+       ldb 24(%r3),%r20
+       comib,=,n 2,%r21,.L48
+       comib,=,n 3,%r21,.L43
+       comib,=,n 4,%r21,.L44
+       comib,=,n 5,%r21,.L45
+       comib,=,n 6,%r21,.L41
+       comib,=,n 7,%r21,.L41
+       comib,=,n 8,%r21,.L41
+       comib,= 9,%r21,.L41
+       ldo -10(%r21),%r20
+       comib,<<,n 1,%r20,.L22
+       ldw 24(%r3),%r28
+.L40:
+       ldw 28(%r3),%r29
+.L1:
+       ldw -20(%r3),%r2
+.L49:
+.L50:
+       ldw 96(%r3),%r5
+       ldw 100(%r3),%r4
+       ldo 64(%r3),%r30
+       bv %r0(%r2)
+       ldwm -64(%r30),%r3
+.L22:
+       comib,= 12,%r21,.L46
+       ldo 24(%r3),%r20
+       comib,=,n 13,%r21,.L47
+       comib,=,n 14,%r21,.L1
+       ldw 24(%r3),%r28
+       comib,<> 15,%r21,.L49
+       ldw -20(%r3),%r2
+       ldw 16(%r3),%r20
+       bb,>= %r20,30,.L49
+       ldw 44(%r3),%r4
+       ldo -1(%r4),%r20
+       comib,<< 7,%r20,.L50
+       ldw 36(%r3),%r20
+       extru %r20,31,2,%r31
+       copy %r20,%r2
+       depi 0,31,2,%r2
+       comib,<< 4,%r4,.L33
+       addl %r31,%r4,%r5
+       zdep %r31,28,29,%r31
+       mtsar %r31
+       zvdepi 2,32,%r20
+       comib,<< 4,%r5,.L34
+       ldo -1(%r20),%r31
+       ldw 0(%r2),%r20
+       zdep %r5,28,29,%r21
+       ldo -1(%r21),%r21
+       and %r20,%r31,%r20
+       mtsar %r21
+       vextrs %r20,32,%r20
+       movb,tr %r20,%r28,.L49
+       ldw -20(%r3),%r2
+.L34:
+       ldw 0(%r2),%r20
+       zdep %r5,28,29,%r22
+       ldw 4(%r2),%r21
+       and %r20,%r31,%r20
+       ldo -33(%r22),%r2
+       subi 63,%r22,%r22
+       mtsar %r22
+       zvdep %r20,32,%r20
+       mtsar %r2
+       vextrs %r21,32,%r21
+.L39:
+       b .L1
+       or %r21,%r20,%r28
+.L33:
+       zdep %r31,28,29,%r31
+       mtsar %r31
+       zvdepi 2,32,%r20
+       comib,<< 8,%r5,.L37
+       ldo -1(%r20),%r4
+       ldw 0(%r2),%r22
+       zdep %r5,29,30,%r20
+       and %r22,%r4,%r22
+       ldw 4(%r2),%r31
+       subi 47,%r20,%r4
+       zdep %r5,28,29,%r20
+       mtsar %r4
+       ldo -33(%r20),%r20
+       zvdep %r22,32,%r21
+       zvdep %r21,32,%r21
+       mtsar %r20
+       vextrs %r31,32,%r31
+       vextrs %r22,32,%r22
+       movb,tr %r22,%r28,.L1
+       or %r21,%r31,%r29
+.L37:
+       ldw 0(%r2),%r21
+       zdep %r5,28,29,%r31
+       ldw 8(%r2),%r22
+       and %r21,%r4,%r21
+       ldo -65(%r31),%r4
+       ldw 4(%r2),%r20
+       mtsar %r4
+       subi 95,%r31,%r2
+       vextrs %r22,32,%r22
+       mtsar %r2
+       zvdep %r20,32,%r31
+       zvdep %r21,32,%r21
+       or %r31,%r22,%r29
+       mtsar %r4
+       b .L39
+       vextrs %r20,32,%r20
+.L41:
+       b .L1
+       ldw 24(%r3),%r28
+.L47:
+       ldw 24(%r3),%r28
+       b .L40
+       fldds 0(%r20),%fr4
+.L46:
+       ldw 24(%r3),%r28
+       b .L1
+       fldws 0(%r20),%fr4L
+.L45:
+       b .L1
+       ldh 24(%r3),%r28
+.L44:
+       ldh 24(%r3),%r20
+       b .L1
+       extrs %r20,31,16,%r28
+.L43:
+       b .L1
+       ldb 24(%r3),%r28
+.L48:
+       b .L1
+       extrs %r20,31,8,%r28
+       .EXIT
+       .PROCEND
+.Lfe1:
+       .size   callback_receiver,.Lfe1-callback_receiver
+       .data
+       .align 4
+.LC0:
+       .word   P%callback_receiver
+       .text
+       .align 4
+.globl callback_get_receiver
+               .type            callback_get_receiver,@function
+callback_get_receiver:
+       .PROC
+       .CALLINFO FRAME=64,NO_CALLS,SAVE_SP,ENTRY_GR=3
+       .ENTRY
+       copy %r3,%r1
+       copy %r30,%r3
+       stwm %r1,64(%r30)
+       addil LT'.LC0,%r19
+       stw %r19,-32(%r30)
+       ldw RT'.LC0(%r1),%r1
+       ldw 0(%r1),%r28
+       ldo 64(%r3),%r30
+       bv %r0(%r2)
+       ldwm -64(%r30),%r3
+       .EXIT
+       .PROCEND
+.Lfe2:
+       .size   callback_get_receiver,.Lfe2-callback_get_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/callback/vacall_r/vacall-hppa-macro.S b/callback/vacall_r/vacall-hppa-macro.S
new file mode 100644 (file)
index 0000000..d5613be
--- /dev/null
@@ -0,0 +1,224 @@
+#include "asm-hppa.h"
+       .LEVEL 1.1
+       IMPORT_MILLICODE($$dyncall)
+       TEXT1()
+       TEXT2()
+       .align 4
+               DECLARE_FUNCTION(callback_receiver)
+DEF(callback_receiver)
+       .PROC
+       .CALLINFO FRAME=192,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=5
+       .ENTRY
+       copy %r3,%r1
+       stw %r2,-20(%r30)
+       copy %r30,%r3
+       stwm %r1,192(%r30)
+       ldo -32(%r3),%r2
+       ldo 16(%r3),%r21
+       ldo 88(%r3),%r20
+       stw %r5,96(%r3)
+       sub %r21,%r2,%r31
+       copy %r19,%r5
+       stw %r4,100(%r3)
+       ldo 80(%r31),%r4
+       ldo 64(%r31),%r31
+       stw %r19,-32(%r30)
+       stw %r25,-40(%r3)
+       copy %r21,%r25
+       ldo 80(%r3),%r21
+       fstds %fr5,0(%r20)
+       ldo 76(%r3),%r20
+       fstws %fr4L,0(%r20)
+       ldo 68(%r3),%r20
+       stw %r0,36(%r3)
+       stw %r28,48(%r3)
+       fstds %fr7,0(%r21)
+       ldo 72(%r3),%r21
+       fstws %fr5L,0(%r21)
+       ldo 64(%r3),%r21
+       fstws %fr6L,0(%r20)
+       ldo -48(%r3),%r20
+       stw %r26,-36(%r3)
+       fstws %fr7L,0(%r21)
+       ldw 0(%r29),%r22
+       stw %r20,52(%r3)
+       stw %r31,56(%r3)
+       stw %r4,60(%r3)
+       stw %r24,-44(%r3)
+       stw %r23,-48(%r3)
+       stw %r0,16(%r3)
+       stw %r2,32(%r3)
+       stw %r0,40(%r3)
+       ldw 4(%r29),%r26
+       .CALL   ARGW0=GR
+       bl $$dyncall,%r31
+       copy %r31,%r2
+       ldw 40(%r3),%r21
+       comib,= 0,%r21,L(1)
+       copy %r5,%r19
+       comib,= 1,%r21,L(48)
+       ldb 24(%r3),%r20
+       comib,=,n 2,%r21,L(48)
+       comib,=,n 3,%r21,L(43)
+       comib,=,n 4,%r21,L(44)
+       comib,=,n 5,%r21,L(45)
+       comib,=,n 6,%r21,L(41)
+       comib,=,n 7,%r21,L(41)
+       comib,=,n 8,%r21,L(41)
+       comib,= 9,%r21,L(41)
+       ldo -10(%r21),%r20
+       comib,<<,n 1,%r20,L(22)
+       ldw 24(%r3),%r28
+DEF(L(40))
+       ldw 28(%r3),%r29
+DEF(L(1))
+       ldw -20(%r3),%r2
+DEF(L(49))
+DEF(L(50))
+       ldw 96(%r3),%r5
+       ldw 100(%r3),%r4
+       ldo 64(%r3),%r30
+       bv %r0(%r2)
+       ldwm -64(%r30),%r3
+DEF(L(22))
+       comib,= 12,%r21,L(46)
+       ldo 24(%r3),%r20
+       comib,=,n 13,%r21,L(47)
+       comib,=,n 14,%r21,L(1)
+       ldw 24(%r3),%r28
+       comib,<> 15,%r21,L(49)
+       ldw -20(%r3),%r2
+       ldw 16(%r3),%r20
+       bb,>= %r20,30,L(49)
+       ldw 44(%r3),%r4
+       ldo -1(%r4),%r20
+       comib,<< 7,%r20,L(50)
+       ldw 36(%r3),%r20
+       extru %r20,31,2,%r31
+       copy %r20,%r2
+       depi 0,31,2,%r2
+       comib,<< 4,%r4,L(33)
+       addl %r31,%r4,%r5
+       zdep %r31,28,29,%r31
+       mtsar %r31
+       zvdepi 2,32,%r20
+       comib,<< 4,%r5,L(34)
+       ldo -1(%r20),%r31
+       ldw 0(%r2),%r20
+       zdep %r5,28,29,%r21
+       ldo -1(%r21),%r21
+       and %r20,%r31,%r20
+       mtsar %r21
+       vextrs %r20,32,%r20
+       movb,tr %r20,%r28,L(49)
+       ldw -20(%r3),%r2
+DEF(L(34))
+       ldw 0(%r2),%r20
+       zdep %r5,28,29,%r22
+       ldw 4(%r2),%r21
+       and %r20,%r31,%r20
+       ldo -33(%r22),%r2
+       subi 63,%r22,%r22
+       mtsar %r22
+       zvdep %r20,32,%r20
+       mtsar %r2
+       vextrs %r21,32,%r21
+DEF(L(39))
+       b L(1)
+       or %r21,%r20,%r28
+DEF(L(33))
+       zdep %r31,28,29,%r31
+       mtsar %r31
+       zvdepi 2,32,%r20
+       comib,<< 8,%r5,L(37)
+       ldo -1(%r20),%r4
+       ldw 0(%r2),%r22
+       zdep %r5,29,30,%r20
+       and %r22,%r4,%r22
+       ldw 4(%r2),%r31
+       subi 47,%r20,%r4
+       zdep %r5,28,29,%r20
+       mtsar %r4
+       ldo -33(%r20),%r20
+       zvdep %r22,32,%r21
+       zvdep %r21,32,%r21
+       mtsar %r20
+       vextrs %r31,32,%r31
+       vextrs %r22,32,%r22
+       movb,tr %r22,%r28,L(1)
+       or %r21,%r31,%r29
+DEF(L(37))
+       ldw 0(%r2),%r21
+       zdep %r5,28,29,%r31
+       ldw 8(%r2),%r22
+       and %r21,%r4,%r21
+       ldo -65(%r31),%r4
+       ldw 4(%r2),%r20
+       mtsar %r4
+       subi 95,%r31,%r2
+       vextrs %r22,32,%r22
+       mtsar %r2
+       zvdep %r20,32,%r31
+       zvdep %r21,32,%r21
+       or %r31,%r22,%r29
+       mtsar %r4
+       b L(39)
+       vextrs %r20,32,%r20
+DEF(L(41))
+       b L(1)
+       ldw 24(%r3),%r28
+DEF(L(47))
+       ldw 24(%r3),%r28
+       b L(40)
+       fldds 0(%r20),%fr4
+DEF(L(46))
+       ldw 24(%r3),%r28
+       b L(1)
+       fldws 0(%r20),%fr4L
+DEF(L(45))
+       b L(1)
+       ldh 24(%r3),%r28
+DEF(L(44))
+       ldh 24(%r3),%r20
+       b L(1)
+       extrs %r20,31,16,%r28
+DEF(L(43))
+       b L(1)
+       ldb 24(%r3),%r28
+DEF(L(48))
+       b L(1)
+       extrs %r20,31,8,%r28
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(callback_receiver)
+       .data
+       .align 4
+DEF(L(C0))
+       .word   P%callback_receiver
+       TEXT1()
+       TEXT2()
+       .align 4
+GLOBL(callback_get_receiver)
+               DECLARE_FUNCTION(callback_get_receiver)
+DEF(callback_get_receiver)
+       .PROC
+       .CALLINFO FRAME=64,NO_CALLS,SAVE_SP,ENTRY_GR=3
+       .ENTRY
+       copy %r3,%r1
+       copy %r30,%r3
+       stwm %r1,64(%r30)
+       addil LT!L(C0),%r19
+       stw %r19,-32(%r30)
+       ldw RT!L(C0)(%r1),%r1
+       ldw 0(%r1),%r28
+       ldo 64(%r3),%r30
+       bv %r0(%r2)
+       ldwm -64(%r30),%r3
+       .EXIT
+       .PROCEND
+DEF(L(fe2))
+       FUNEND(callback_get_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-hppa64-linux.s b/callback/vacall_r/vacall-hppa64-linux.s
new file mode 100644 (file)
index 0000000..6426765
--- /dev/null
@@ -0,0 +1,251 @@
+       .LEVEL 2.0w
+       .text
+       .align 8
+.globl callback_receiver
+               .type            callback_receiver,@function
+callback_receiver:
+       .PROC
+       .CALLINFO FRAME=384,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=9
+       .ENTRY
+       copy %r3,%r1
+       std %r2,-16(%r30)
+       copy %r30,%r3
+       std,ma %r1,384(%r30)
+       std %r5,224(%r3)
+       copy %r27,%r5
+       std %r9,192(%r3)
+       std %r8,200(%r3)
+       std %r7,208(%r3)
+       std %r6,216(%r3)
+       std %r4,232(%r3)
+       std %r26,-64(%r29)
+       std %r25,-56(%r29)
+       std %r19,-8(%r29)
+       std %r24,-48(%r29)
+       std %r23,-40(%r29)
+       std %r22,-32(%r29)
+       std %r21,-24(%r29)
+       std %r20,-16(%r29)
+#APP
+       fstw %fr4R,88(%r3)
+       fstw %fr5R,92(%r3)
+       fstw %fr6R,96(%r3)
+       fstw %fr7R,100(%r3)
+       fstw %fr8R,104(%r3)
+       fstw %fr9R,108(%r3)
+       fstw %fr10R,112(%r3)
+       fstw %fr11R,116(%r3)
+#NO_APP
+       fstd %fr10,168(%r3)
+       ldo -64(%r29),%r2
+       ldo 16(%r3),%r25
+       std %r0,48(%r3)
+       std %r2,40(%r3)
+       std %r29,80(%r3)
+       ldo -16(%r30),%r29
+       fstd %fr11,176(%r3)
+       fstd %fr4,120(%r3)
+       fstd %fr5,128(%r3)
+       fstd %fr6,136(%r3)
+       fstd %fr7,144(%r3)
+       fstd %fr8,152(%r3)
+       fstd %fr9,160(%r3)
+       stw %r0,16(%r3)
+       stw %r0,56(%r3)
+       ldd 0(%r31),%r4
+       ldd 8(%r31),%r26
+       ldd 16(%r4),%r2
+       ldd 24(%r4),%r27
+       bve,l (%r2),%r2
+       nop
+       ldw 56(%r3),%r2
+       cmpib,= 0,%r2,.L1
+       copy %r5,%r27
+       cmpib,=,n 1,%r2,.L43
+       cmpib,=,n 2,%r2,.L43
+       cmpib,=,n 3,%r2,.L44
+       cmpib,=,n 4,%r2,.L45
+       cmpib,=,n 5,%r2,.L46
+       cmpib,=,n 6,%r2,.L47
+       cmpib,=,n 7,%r2,.L41
+       cmpib,=,n 8,%r2,.L40
+       cmpib,=,n 10,%r2,.L40
+       cmpib,=,n 9,%r2,.L40
+       cmpib,=,n 11,%r2,.L40
+       cmpib,=,n 12,%r2,.L48
+       cmpib,=,n 13,%r2,.L49
+       cmpib,=,n 14,%r2,.L40
+       cmpib,= 15,%r2,.L50
+       ldw 16(%r3),%r2
+.L1:
+       ldd -16(%r3),%r2
+       ldd 192(%r3),%r9
+       ldd 200(%r3),%r8
+       ldd 208(%r3),%r7
+       ldd 216(%r3),%r6
+       ldd 224(%r3),%r5
+       ldd 232(%r3),%r4
+       ldo 64(%r3),%r30
+       bve (%r2)
+       ldd,mb -64(%r30),%r3
+.L50:
+       extrd,u %r2,53+1-1,1,%r2
+       cmpib,= 0,%r2,.L1
+       ldd 48(%r3),%r28
+       ldd 48(%r3),%r2
+       ldd 64(%r3),%r4
+       extrd,u %r2,63,3,%r7
+       copy %r2,%r1
+       depdi 0,63,3,%r1
+       cmpib,*<< 8,%r4,.L32
+       add,l %r7,%r4,%r5
+       cmpib,*<< 8,%r5,.L33
+       depd,z %r5,60,61,%r2
+       subi 64,%r2,%r2
+       ldd 0(%r1),%r4
+       extrd,s %r2,63,32,%r2
+       mtsarcm %r2
+       depd,z %r7,60,61,%r5
+       depdi,z 1,%sar,64,%r2
+       mtsarcm %r5
+       sub %r0,%r2,%r2
+       and %r4,%r2,%r4
+       depd,z %r4,%sar,64,%r4
+       b .L1
+       copy %r4,%r28
+.L33:
+       subi 128,%r2,%r2
+       depd,z %r7,60,61,%r4
+       extrd,s %r2,63,32,%r2
+       subi 64,%r4,%r6
+       mtsarcm %r2
+       subi 63,%r4,%r8
+       depdi,z 1,%sar,64,%r2
+       mtsar %r8
+       ldd 8(%r1),%r5
+       sub %r0,%r2,%r2
+       extrd,s %r6,63,32,%r6
+       ldd 0(%r1),%r4
+       subi 63,%r6,%r6
+       and %r5,%r2,%r5
+       depd,z %r4,%sar,64,%r4
+       mtsar %r6
+       extrd,s %r5,%sar,64,%r5
+.L39:
+       b .L1
+       or %r5,%r4,%r28
+.L32:
+       ldi 16,%r2
+       cmpb,*<< %r2,%r5,.L36
+       depd,z %r5,60,61,%r2
+       subi 128,%r2,%r2
+       depd,z %r7,61,62,%r4
+       extrd,s %r2,63,32,%r2
+       subi 32,%r4,%r4
+       mtsarcm %r2
+       extrd,s %r4,63,32,%r4
+       depdi,z 1,%sar,64,%r2
+       subi 63,%r4,%r8
+       ldd 8(%r1),%r5
+       sub %r0,%r2,%r2
+       mtsar %r8
+       ldd 0(%r1),%r6
+       and %r5,%r2,%r5
+       depd,z %r7,60,61,%r2
+       extrd,s %r5,%sar,64,%r4
+       subi 63,%r2,%r2
+       extrd,s %r4,%sar,64,%r4
+       mtsar %r2
+       depd,z %r5,%sar,64,%r5
+       depd,z %r6,%sar,64,%r6
+       copy %r5,%r29
+       b .L1
+       or %r6,%r4,%r28
+.L36:
+       subi 192,%r2,%r2
+       depd,z %r7,60,61,%r4
+       extrd,s %r2,63,32,%r2
+       subi 64,%r4,%r7
+       mtsarcm %r2
+       subi 63,%r4,%r9
+       depdi,z 1,%sar,64,%r2
+       mtsar %r9
+       ldd 8(%r1),%r4
+       sub %r0,%r2,%r2
+       ldd 16(%r1),%r6
+       extrd,s %r7,63,32,%r7
+       subi 63,%r7,%r7
+       and %r6,%r2,%r6
+       ldd 0(%r1),%r5
+       depd,z %r4,%sar,64,%r2
+       mtsar %r7
+       extrd,s %r6,%sar,64,%r6
+       mtsar %r9
+       depd,z %r5,%sar,64,%r5
+       or %r2,%r6,%r29
+       mtsar %r7
+       b .L39
+       extrd,s %r4,%sar,64,%r4
+.L40:
+       b .L1
+       ldd 24(%r3),%r28
+.L49:
+       b .L40
+       fldd 24(%r3),%fr4
+.L48:
+#APP
+       fldw 24(%r3),%fr4R
+#NO_APP
+.L41:
+       ldw 24(%r3),%r2
+.L42:
+       b .L1
+       copy %r2,%r28
+.L47:
+       ldw 24(%r3),%r2
+       b .L1
+       extrd,s %r2,63,32,%r28
+.L46:
+       b .L42
+       ldh 24(%r3),%r2
+.L45:
+       ldh 24(%r3),%r2
+       b .L1
+       extrd,s %r2,63,16,%r28
+.L44:
+       b .L42
+       ldb 24(%r3),%r2
+.L43:
+       ldb 24(%r3),%r2
+       b .L1
+       extrd,s %r2,63,8,%r28
+       .EXIT
+       .PROCEND
+.Lfe1:
+       .size   callback_receiver,.Lfe1-callback_receiver
+       .data
+       .align 8
+.LC0:
+       .dword  P%callback_receiver
+       .text
+       .align 8
+.globl callback_get_receiver
+               .type            callback_get_receiver,@function
+callback_get_receiver:
+       .PROC
+       .CALLINFO FRAME=128,NO_CALLS,SAVE_SP,ENTRY_GR=3
+       .ENTRY
+       copy %r3,%r1
+       copy %r30,%r3
+       std,ma %r1,128(%r30)
+       addil LT'.LC0,%r27
+       ldd RT'.LC0(%r1),%r1
+       ldd 0(%r1),%r28
+       ldo 64(%r3),%r30
+       bve (%r2)
+       ldd,mb -64(%r30),%r3
+       .EXIT
+       .PROCEND
+.Lfe2:
+       .size   callback_get_receiver,.Lfe2-callback_get_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/callback/vacall_r/vacall-hppa64-macro.S b/callback/vacall_r/vacall-hppa64-macro.S
new file mode 100644 (file)
index 0000000..628dccf
--- /dev/null
@@ -0,0 +1,252 @@
+#include "asm-hppa64.h"
+       .LEVEL 2.0w
+       TEXT1()
+       TEXT2()
+       .align 8
+GLOBL(callback_receiver)
+               DECLARE_FUNCTION(callback_receiver)
+DEF(callback_receiver)
+       .PROC
+       .CALLINFO FRAME=384,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=9
+       .ENTRY
+       copy %r3,%r1
+       std %r2,-16(%r30)
+       copy %r30,%r3
+       std,ma %r1,384(%r30)
+       std %r5,224(%r3)
+       copy %r27,%r5
+       std %r9,192(%r3)
+       std %r8,200(%r3)
+       std %r7,208(%r3)
+       std %r6,216(%r3)
+       std %r4,232(%r3)
+       std %r26,-64(%r29)
+       std %r25,-56(%r29)
+       std %r19,-8(%r29)
+       std %r24,-48(%r29)
+       std %r23,-40(%r29)
+       std %r22,-32(%r29)
+       std %r21,-24(%r29)
+       std %r20,-16(%r29)
+       fstw %fr4R,88(%r3)
+       fstw %fr5R,92(%r3)
+       fstw %fr6R,96(%r3)
+       fstw %fr7R,100(%r3)
+       fstw %fr8R,104(%r3)
+       fstw %fr9R,108(%r3)
+       fstw %fr10R,112(%r3)
+       fstw %fr11R,116(%r3)
+       fstd %fr10,168(%r3)
+       ldo -64(%r29),%r2
+       ldo 16(%r3),%r25
+       std %r0,48(%r3)
+       std %r2,40(%r3)
+       std %r29,80(%r3)
+       ldo -16(%r30),%r29
+       fstd %fr11,176(%r3)
+       fstd %fr4,120(%r3)
+       fstd %fr5,128(%r3)
+       fstd %fr6,136(%r3)
+       fstd %fr7,144(%r3)
+       fstd %fr8,152(%r3)
+       fstd %fr9,160(%r3)
+       stw %r0,16(%r3)
+       stw %r0,56(%r3)
+       ldd 0(%r31),%r4
+       ldd 8(%r31),%r26
+       ldd 16(%r4),%r2
+       ldd 24(%r4),%r27
+       bve,l (%r2),%r2
+       nop
+       ldw 56(%r3),%r2
+       cmpib,= 0,%r2,L(1)
+       copy %r5,%r27
+       cmpib,=,n 1,%r2,L(43)
+       cmpib,=,n 2,%r2,L(43)
+       cmpib,=,n 3,%r2,L(44)
+       cmpib,=,n 4,%r2,L(45)
+       cmpib,=,n 5,%r2,L(46)
+       cmpib,=,n 6,%r2,L(47)
+       cmpib,=,n 7,%r2,L(41)
+       cmpib,=,n 8,%r2,L(40)
+       cmpib,=,n 10,%r2,L(40)
+       cmpib,=,n 9,%r2,L(40)
+       cmpib,=,n 11,%r2,L(40)
+       cmpib,=,n 12,%r2,L(48)
+       cmpib,=,n 13,%r2,L(49)
+       cmpib,=,n 14,%r2,L(40)
+       cmpib,= 15,%r2,L(50)
+       ldw 16(%r3),%r2
+DEF(L(1))
+       ldd -16(%r3),%r2
+       ldd 192(%r3),%r9
+       ldd 200(%r3),%r8
+       ldd 208(%r3),%r7
+       ldd 216(%r3),%r6
+       ldd 224(%r3),%r5
+       ldd 232(%r3),%r4
+       ldo 64(%r3),%r30
+       bve (%r2)
+       ldd,mb -64(%r30),%r3
+DEF(L(50))
+       extrd,u %r2,53+1-1,1,%r2
+       cmpib,= 0,%r2,L(1)
+       ldd 48(%r3),%r28
+       ldd 48(%r3),%r2
+       ldd 64(%r3),%r4
+       extrd,u %r2,63,3,%r7
+       copy %r2,%r1
+       depdi 0,63,3,%r1
+       cmpib,*<< 8,%r4,L(32)
+       add,l %r7,%r4,%r5
+       cmpib,*<< 8,%r5,L(33)
+       depd,z %r5,60,61,%r2
+       subi 64,%r2,%r2
+       ldd 0(%r1),%r4
+       extrd,s %r2,63,32,%r2
+       mtsarcm %r2
+       depd,z %r7,60,61,%r5
+       depdi,z 1,%sar,64,%r2
+       mtsarcm %r5
+       sub %r0,%r2,%r2
+       and %r4,%r2,%r4
+       depd,z %r4,%sar,64,%r4
+       b L(1)
+       copy %r4,%r28
+DEF(L(33))
+       subi 128,%r2,%r2
+       depd,z %r7,60,61,%r4
+       extrd,s %r2,63,32,%r2
+       subi 64,%r4,%r6
+       mtsarcm %r2
+       subi 63,%r4,%r8
+       depdi,z 1,%sar,64,%r2
+       mtsar %r8
+       ldd 8(%r1),%r5
+       sub %r0,%r2,%r2
+       extrd,s %r6,63,32,%r6
+       ldd 0(%r1),%r4
+       subi 63,%r6,%r6
+       and %r5,%r2,%r5
+       depd,z %r4,%sar,64,%r4
+       mtsar %r6
+       extrd,s %r5,%sar,64,%r5
+DEF(L(39))
+       b L(1)
+       or %r5,%r4,%r28
+DEF(L(32))
+       ldi 16,%r2
+       cmpb,*<< %r2,%r5,L(36)
+       depd,z %r5,60,61,%r2
+       subi 128,%r2,%r2
+       depd,z %r7,61,62,%r4
+       extrd,s %r2,63,32,%r2
+       subi 32,%r4,%r4
+       mtsarcm %r2
+       extrd,s %r4,63,32,%r4
+       depdi,z 1,%sar,64,%r2
+       subi 63,%r4,%r8
+       ldd 8(%r1),%r5
+       sub %r0,%r2,%r2
+       mtsar %r8
+       ldd 0(%r1),%r6
+       and %r5,%r2,%r5
+       depd,z %r7,60,61,%r2
+       extrd,s %r5,%sar,64,%r4
+       subi 63,%r2,%r2
+       extrd,s %r4,%sar,64,%r4
+       mtsar %r2
+       depd,z %r5,%sar,64,%r5
+       depd,z %r6,%sar,64,%r6
+       copy %r5,%r29
+       b L(1)
+       or %r6,%r4,%r28
+DEF(L(36))
+       subi 192,%r2,%r2
+       depd,z %r7,60,61,%r4
+       extrd,s %r2,63,32,%r2
+       subi 64,%r4,%r7
+       mtsarcm %r2
+       subi 63,%r4,%r9
+       depdi,z 1,%sar,64,%r2
+       mtsar %r9
+       ldd 8(%r1),%r4
+       sub %r0,%r2,%r2
+       ldd 16(%r1),%r6
+       extrd,s %r7,63,32,%r7
+       subi 63,%r7,%r7
+       and %r6,%r2,%r6
+       ldd 0(%r1),%r5
+       depd,z %r4,%sar,64,%r2
+       mtsar %r7
+       extrd,s %r6,%sar,64,%r6
+       mtsar %r9
+       depd,z %r5,%sar,64,%r5
+       or %r2,%r6,%r29
+       mtsar %r7
+       b L(39)
+       extrd,s %r4,%sar,64,%r4
+DEF(L(40))
+       b L(1)
+       ldd 24(%r3),%r28
+DEF(L(49))
+       b L(40)
+       fldd 24(%r3),%fr4
+DEF(L(48))
+       fldw 24(%r3),%fr4R
+DEF(L(41))
+       ldw 24(%r3),%r2
+DEF(L(42))
+       b L(1)
+       copy %r2,%r28
+DEF(L(47))
+       ldw 24(%r3),%r2
+       b L(1)
+       extrd,s %r2,63,32,%r28
+DEF(L(46))
+       b L(42)
+       ldh 24(%r3),%r2
+DEF(L(45))
+       ldh 24(%r3),%r2
+       b L(1)
+       extrd,s %r2,63,16,%r28
+DEF(L(44))
+       b L(42)
+       ldb 24(%r3),%r2
+DEF(L(43))
+       ldb 24(%r3),%r2
+       b L(1)
+       extrd,s %r2,63,8,%r28
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(callback_receiver)
+       .data
+       .align 8
+DEF(L(C0))
+       .dword  P%callback_receiver
+       TEXT1()
+       TEXT2()
+       .align 8
+GLOBL(callback_get_receiver)
+               DECLARE_FUNCTION(callback_get_receiver)
+DEF(callback_get_receiver)
+       .PROC
+       .CALLINFO FRAME=128,NO_CALLS,SAVE_SP,ENTRY_GR=3
+       .ENTRY
+       copy %r3,%r1
+       copy %r30,%r3
+       std,ma %r1,128(%r30)
+       addil LT!L(C0),%r27
+       ldd RT!L(C0)(%r1),%r1
+       ldd 0(%r1),%r28
+       ldo 64(%r3),%r30
+       bve (%r2)
+       ldd,mb -64(%r30),%r3
+       .EXIT
+       .PROCEND
+DEF(L(fe2))
+       FUNEND(callback_get_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-i386-linux.s b/callback/vacall_r/vacall-i386-linux.s
new file mode 100644 (file)
index 0000000..42dac11
--- /dev/null
@@ -0,0 +1,172 @@
+       .file   "vacall-i386.c"
+       .text
+       .align 2
+       .p2align 2,,3
+       .type   callback_receiver,@function
+callback_receiver:
+       pushl   %ebp
+       movl    %esp, %ebp
+       pushl   %edi
+       pushl   %esi
+       leal    8(%ebp), %edx
+       subl    $56, %esp
+       movl    %edx, -40(%ebp)
+       leal    -56(%ebp), %edx
+       movl    $0, -56(%ebp)
+       movl    $0, -36(%ebp)
+       movl    $0, -32(%ebp)
+       movl    %ebx, -24(%ebp)
+       pushl   %edx
+       pushl   4(%ecx)
+       call    *(%ecx)
+       movl    -32(%ebp), %esi
+       addl    $16, %esp
+       testl   %esi, %esi
+       je      .L43
+       cmpl    $1, %esi
+       je      .L44
+       cmpl    $2, %esi
+       je      .L44
+       cmpl    $3, %esi
+       je      .L49
+       cmpl    $4, %esi
+       je      .L50
+       cmpl    $5, %esi
+       je      .L51
+       cmpl    $6, %esi
+       je      .L48
+       cmpl    $7, %esi
+       je      .L48
+       cmpl    $8, %esi
+       je      .L48
+       cmpl    $9, %esi
+       je      .L48
+       leal    -10(%esi), %edx
+       cmpl    $1, %edx
+       ja      .L22
+       movl    -48(%ebp), %eax
+#APP
+       movl -44(%ebp),%edx
+.L33:
+       .p2align 2,,3
+#NO_APP
+.L43:
+       movl    -56(%ebp), %esi
+.L3:
+       andl    $512, %esi
+       je      .L1
+#APP
+       movl 0(%ebp),%ecx
+#NO_APP
+       movl    -40(%ebp), %esp
+#APP
+       jmp *%ecx
+#NO_APP
+.L1:
+       leal    -8(%ebp), %esp
+       popl    %esi
+       popl    %edi
+       leave
+       ret
+.L22:
+       cmpl    $12, %esi
+       je      .L52
+       cmpl    $13, %esi
+       je      .L53
+       cmpl    $14, %esi
+       je      .L48
+       cmpl    $15, %esi
+       jne     .L43
+       movl    -56(%ebp), %esi
+       testl   $1024, %esi
+       movl    %esi, %edi
+       je      .L31
+       movl    -28(%ebp), %edx
+       cmpl    $1, %edx
+       je      .L54
+       cmpl    $2, %edx
+       je      .L55
+       cmpl    $4, %edx
+       je      .L56
+       cmpl    $8, %edx
+       je      .L57
+.L31:
+       andl    $16, %edi
+       movl    -36(%ebp), %eax
+       jne     .L3
+#APP
+       leal -8(%ebp), %esp
+       popl %esi
+       popl %edi
+       leave
+       ret $4
+#NO_APP
+       jmp     .L3
+.L57:
+       movl    -36(%ebp), %edx
+       movl    (%edx), %eax
+#APP
+       movl 4(%edx),%edx
+#NO_APP
+       jmp     .L3
+.L56:
+       movl    -36(%ebp), %edx
+       movl    (%edx), %eax
+       jmp     .L3
+.L55:
+       movl    -36(%ebp), %edx
+       movzwl  (%edx), %eax
+       jmp     .L3
+.L54:
+       movl    -36(%ebp), %edx
+       movzbl  (%edx), %eax
+       jmp     .L3
+       .p2align 2,,3
+.L48:
+       movl    -48(%ebp), %eax
+       jmp     .L43
+.L53:
+#APP
+       fldl -48(%ebp)
+#NO_APP
+       jmp     .L43
+.L52:
+#APP
+       flds -48(%ebp)
+#NO_APP
+       jmp     .L43
+       .p2align 2,,3
+.L51:
+       movzwl  -48(%ebp), %eax
+       jmp     .L43
+.L50:
+       movswl  -48(%ebp),%eax
+       jmp     .L43
+.L49:
+       movzbl  -48(%ebp), %eax
+       jmp     .L43
+       .p2align 2,,3
+.L44:
+       movsbl  -48(%ebp),%eax
+       jmp     .L43
+.Lfe1:
+       .size   callback_receiver,.Lfe1-callback_receiver
+       .align 2
+       .p2align 2,,3
+.globl callback_get_receiver
+       .type   callback_get_receiver,@function
+callback_get_receiver:
+       pushl   %ebp
+       movl    %esp, %ebp
+       pushl   %ebx
+       call    .L59
+.L59:
+       popl    %ebx
+       addl    $_GLOBAL_OFFSET_TABLE_+[.-.L59], %ebx
+       leal    callback_receiver@GOTOFF(%ebx), %eax
+       movl    (%esp), %ebx
+       leave
+       ret
+.Lfe2:
+       .size   callback_get_receiver,.Lfe2-callback_get_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/callback/vacall_r/vacall-i386-macro.S b/callback/vacall_r/vacall-i386-macro.S
new file mode 100644 (file)
index 0000000..ecc611b
--- /dev/null
@@ -0,0 +1,167 @@
+#include "asm-i386.h"
+       TEXT()
+       ALIGN(2)
+       P2ALIGN(2,3)
+       DECLARE_FUNCTION(callback_receiver)
+FUNBEGIN(callback_receiver)
+       INSN1(push,l    ,R(ebp))
+       INSN2(mov,l     ,R(esp), R(ebp))
+       INSN1(push,l    ,R(edi))
+       INSN1(push,l    ,R(esi))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(sub,l     ,NUM(56), R(esp))
+       INSN2(mov,l     ,R(edx),X4 MEM_DISP(ebp,-40))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-56), R(edx))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-56))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-36))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-32))
+       INSN2(mov,l     ,R(ebx),X4 MEM_DISP(ebp,-24))
+       INSN1(push,l    ,R(edx))
+       INSN1(push,l    ,X4 MEM_DISP(ecx,4))
+       INSN1(call,_    ,INDIR(X4 MEM(ecx)))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-32), R(esi))
+       INSN2(add,l     ,NUM(16), R(esp))
+       INSN2(test,l    ,R(esi), R(esi))
+       INSN1(je,_      ,L(43))
+       INSN2(cmp,l     ,NUM(1), R(esi))
+       INSN1(je,_      ,L(44))
+       INSN2(cmp,l     ,NUM(2), R(esi))
+       INSN1(je,_      ,L(44))
+       INSN2(cmp,l     ,NUM(3), R(esi))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(4), R(esi))
+       INSN1(je,_      ,L(50))
+       INSN2(cmp,l     ,NUM(5), R(esi))
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(6), R(esi))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(7), R(esi))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(8), R(esi))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(9), R(esi))
+       INSN1(je,_      ,L(48))
+       INSN2(lea,l     ,X4 MEM_DISP(esi,-10), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(ja,_      ,L(22))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-44),R(edx))
+L(33):
+       P2ALIGN(2,3)
+L(43):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(esi))
+L(3):
+       INSN2(and,l     ,NUM(512), R(esi))
+       INSN1(je,_      ,L(1))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,0),R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-40), R(esp))
+       INSN1(jmp,_     ,INDIR(R(ecx)))
+L(1):
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-8), R(esp))
+       INSN1(pop,l     ,R(esi))
+       INSN1(pop,l     ,R(edi))
+       leave
+       ret
+L(22):
+       INSN2(cmp,l     ,NUM(12), R(esi))
+       INSN1(je,_      ,L(52))
+       INSN2(cmp,l     ,NUM(13), R(esi))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(14), R(esi))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(15), R(esi))
+       INSN1(jne,_     ,L(43))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(esi))
+       INSN2(test,l    ,NUM(1024), R(esi))
+       INSN2(mov,l     ,R(esi), R(edi))
+       INSN1(je,_      ,L(31))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-28), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(je,_      ,L(54))
+       INSN2(cmp,l     ,NUM(2), R(edx))
+       INSN1(je,_      ,L(55))
+       INSN2(cmp,l     ,NUM(4), R(edx))
+       INSN1(je,_      ,L(56))
+       INSN2(cmp,l     ,NUM(8), R(edx))
+       INSN1(je,_      ,L(57))
+L(31):
+       INSN2(and,l     ,NUM(16), R(edi))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(eax))
+       INSN1(jne,_     ,L(3))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-8), R(esp))
+       INSN1(pop,l     ,R(esi))
+       INSN1(pop,l     ,R(edi))
+       leave
+       ret NUM(4)
+       INSN1(jmp,_     ,L(3))
+L(57):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,4),R(edx))
+       INSN1(jmp,_     ,L(3))
+L(56):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(55):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,w,X2 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(54):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,b,X1 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+       P2ALIGN(2,3)
+L(48):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(53):
+       INSN1(fld,l     ,X8 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+L(52):
+       INSN1(fld,s     ,X4 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(51):
+       INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(50):
+       INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(49):
+       INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(44):
+       INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(fe1):
+       FUNEND(callback_receiver,L(fe1)-callback_receiver)
+       ALIGN(2)
+       P2ALIGN(2,3)
+GLOBL(C(callback_get_receiver))
+       DECLARE_FUNCTION(callback_get_receiver)
+FUNBEGIN(callback_get_receiver)
+       INSN1(push,l    ,R(ebp))
+       INSN2(mov,l     ,R(esp), R(ebp))
+       INSN1(push,l    ,R(ebx))
+       INSN1(call,_    ,L(59))
+L(59):
+       INSN1(pop,l     ,R(ebx))
+#ifdef __ELF__
+       INSN2(add,l     ,NUM()_GLOBAL_OFFSET_TABLE_+[.-L(59)],R(ebx))
+#endif
+#ifdef __ELF__
+       INSN2(lea,l     ,callback_receiver@MEM_DISP(ebx,GOTOFF), R(eax))
+#else
+       INSN2(lea,l     ,C(callback_receiver)-L(59)MEM(ebx), R(eax))
+#endif
+       INSN2(mov,l     ,X4 MEM(esp), R(ebx))
+       leave
+       ret
+L(fe2):
+       FUNEND(callback_get_receiver,L(fe2)-callback_get_receiver)
+
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-i386-msvc.c b/callback/vacall_r/vacall-i386-msvc.c
new file mode 100644 (file)
index 0000000..339a063
--- /dev/null
@@ -0,0 +1,166 @@
+#ifdef _MSC_VER
+#include "vacall_r.h"
+#endif
+#include "asm-i386.h"
+       TEXT()
+       ALIGN(2)
+       P2ALIGN(2,3)
+       DECLARE_FUNCTION(callback_receiver)
+FUNBEGIN(callback_receiver)
+       INSN1(push,l    ,R(ebp))
+       INSN2(mov,l     ,R(esp), R(ebp))
+       INSN1(push,l    ,R(edi))
+       INSN1(push,l    ,R(esi))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(sub,l     ,NUM(56), R(esp))
+       INSN2(mov,l     ,R(edx),X4 MEM_DISP(ebp,-40))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-56), R(edx))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-56))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-36))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-32))
+       INSN2(mov,l     ,R(ebx),X4 MEM_DISP(ebp,-24))
+       INSN1(push,l    ,R(edx))
+       INSN1(push,l    ,X4 MEM_DISP(ecx,4))
+       INSN1(call,_    ,INDIR(X4 MEM(ecx)))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-32), R(esi))
+       INSN2(add,l     ,NUM(16), R(esp))
+       INSN2(test,l    ,R(esi), R(esi))
+       INSN1(je,_      ,L(43))
+       INSN2(cmp,l     ,NUM(1), R(esi))
+       INSN1(je,_      ,L(44))
+       INSN2(cmp,l     ,NUM(2), R(esi))
+       INSN1(je,_      ,L(44))
+       INSN2(cmp,l     ,NUM(3), R(esi))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(4), R(esi))
+       INSN1(je,_      ,L(50))
+       INSN2(cmp,l     ,NUM(5), R(esi))
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(6), R(esi))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(7), R(esi))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(8), R(esi))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(9), R(esi))
+       INSN1(je,_      ,L(48))
+       INSN2(lea,l     ,X4 MEM_DISP(esi,-10), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(ja,_      ,L(22))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-44),R(edx))
+L(33):
+       P2ALIGN(2,3)
+L(43):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(esi))
+L(3):
+       INSN2(and,l     ,NUM(512), R(esi))
+       INSN1(je,_      ,L(1))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,0),R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-40), R(esp))
+       INSN1(jmp,_     ,INDIR(R(ecx)))
+L(1):
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-8), R(esp))
+       INSN1(pop,l     ,R(esi))
+       INSN1(pop,l     ,R(edi))
+       leave
+       ret
+L(22):
+       INSN2(cmp,l     ,NUM(12), R(esi))
+       INSN1(je,_      ,L(52))
+       INSN2(cmp,l     ,NUM(13), R(esi))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(14), R(esi))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(15), R(esi))
+       INSN1(jne,_     ,L(43))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(esi))
+       INSN2(test,l    ,NUM(1024), R(esi))
+       INSN2(mov,l     ,R(esi), R(edi))
+       INSN1(je,_      ,L(31))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-28), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(je,_      ,L(54))
+       INSN2(cmp,l     ,NUM(2), R(edx))
+       INSN1(je,_      ,L(55))
+       INSN2(cmp,l     ,NUM(4), R(edx))
+       INSN1(je,_      ,L(56))
+       INSN2(cmp,l     ,NUM(8), R(edx))
+       INSN1(je,_      ,L(57))
+L(31):
+       INSN2(and,l     ,NUM(16), R(edi))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(eax))
+       INSN1(jne,_     ,L(3))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-8), R(esp))
+       INSN1(pop,l     ,R(esi))
+       INSN1(pop,l     ,R(edi))
+       leave
+       ret NUM(4)
+       INSN1(jmp,_     ,L(3))
+L(57):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,4),R(edx))
+       INSN1(jmp,_     ,L(3))
+L(56):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(55):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,w,X2 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(54):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,b,X1 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+       P2ALIGN(2,3)
+L(48):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(53):
+       INSN1(fld,l     ,X8 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+L(52):
+       INSN1(fld,s     ,X4 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(51):
+       INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(50):
+       INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(49):
+       INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(44):
+       INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(fe1):
+       FUNEND(callback_receiver,L(fe1)-callback_receiver)
+/* Implementation of callback_get_receiver */
+
+/*
+ * Copyright 2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
diff --git a/callback/vacall_r/vacall-ia64-linux.s b/callback/vacall_r/vacall-ia64-linux.s
new file mode 100644 (file)
index 0000000..30457bf
--- /dev/null
@@ -0,0 +1,851 @@
+       .file   "vacall-ia64.c"
+       .pred.safe_across_calls p1-p5,p16-p63
+       .text
+       .align 16
+       .proc callback_receiver#
+callback_receiver:
+       .prologue 14, 42
+       .spill 48
+       .mmb
+       .save ar.pfs, r43
+       alloc r43 = ar.pfs, 8, 6, 2, 0
+       .vframe r44
+       mov r44 = r12
+       nop 0
+       .mmi
+       adds r12 = -208, r12
+       adds r18 = 8, r15
+       mov r45 = r1
+       ;;
+       .mmi
+       adds r16 = -48, r44
+       adds r14 = -136, r44
+       adds r17 = -48, r44
+       .mmi
+       adds r40 = -152, r44
+       adds r47 = -192, r44
+       adds r41 = -160, r44
+       ;;
+       .mmb
+       st8 [r14] = r8
+       adds r14 = -32, r44
+       nop 0
+       .mfi
+       st8 [r16] = r32, 8
+       nop 0
+       .save rp, r42
+       mov r42 = b0
+       .body
+       ;;
+       .mfi
+       st8 [r14] = r34
+       nop 0
+       adds r14 = -24, r44
+       .mmb
+       st8 [r16] = r33
+       ld8 r16 = [r15]
+       nop 0
+       ;;
+       .mmi
+       nop 0
+       st8 [r14] = r35
+       adds r14 = -16, r44
+       .mmi
+       st8 [r41] = r0
+       ;;
+       st8 [r14] = r36
+       adds r14 = -8, r44
+       .mmb
+       st4 [r40] = r0
+       ld8 r46 = [r18]
+       nop 0
+       ;;
+       .mmi
+       nop 0
+       st8 [r14] = r37
+       adds r14 = 8, r44
+       .mmi
+       st8 [r44] = r38
+       ;;
+       st8 [r14] = r39
+       adds r14 = -112, r44
+       .mmi
+       st4 [r47] = r0
+       ;;
+       stfd [r14] = f8
+       nop 0
+       .mmi
+       adds r14 = -104, r44
+       ;;
+       stfd [r14] = f9
+       adds r14 = -96, r44
+       ;;
+       .mfi
+       stfd [r14] = f10
+       nop 0
+       adds r14 = -88, r44
+       .mmi
+       nop 0
+       ;;
+       stfd [r14] = f11
+       nop 0
+       .mmi
+       adds r14 = -80, r44
+       ;;
+       stfd [r14] = f12
+       adds r14 = -72, r44
+       ;;
+       .mfi
+       stfd [r14] = f13
+       nop 0
+       adds r14 = -64, r44
+       .mmi
+       nop 0
+       ;;
+       stfd [r14] = f14
+       nop 0
+       .mmi
+       adds r14 = -56, r44
+       ;;
+       stfd [r14] = f15
+       adds r14 = -168, r44
+       ;;
+       .mii
+       st8 [r14] = r17
+       adds r14 = -128, r44
+       ;;
+       nop 0
+       .mii
+       st8 [r14] = r17
+       adds r14 = -120, r44
+       ;;
+       nop 0
+       .mmb
+       st4 [r14] = r0
+       ld8 r14 = [r16], 8
+       nop 0
+       ;;
+       .mib
+       nop 0
+       mov b6 = r14
+       nop 0
+       .mbb
+       ld8 r1 = [r16]
+       nop 0
+       br.call.sptk.many b0 = b6
+       ;;
+       .mmb
+       mov r1 = r45
+       ld4 r40 = [r40]
+       nop 0
+       ;;
+       .mfb
+       cmp4.eq p6, p7 = 0, r40
+       nop 0
+       (p6) br.cond.dpnt .L49
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 1, r40
+       nop 0
+       (p7) br.cond.dpnt .L50
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 2, r40
+       nop 0
+       (p7) br.cond.dpnt .L50
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 3, r40
+       ;;
+       (p7) adds r14 = -184, r44
+       ;;
+       .mfb
+       (p7) ld1 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 4, r40
+       ;;
+       nop 0
+       .mmi
+       (p7) adds r14 = -184, r44
+       ;;
+       (p7) ld2 r14 = [r14]
+       nop 0
+       ;;
+       .mib
+       nop 0
+       (p7) sxt2 r8 = r14
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 5, r40
+       ;;
+       (p7) adds r14 = -184, r44
+       ;;
+       .mfb
+       (p7) ld2 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 6, r40
+       ;;
+       nop 0
+       .mmi
+       (p7) adds r14 = -184, r44
+       ;;
+       (p7) ld4 r14 = [r14]
+       nop 0
+       ;;
+       .mib
+       nop 0
+       (p7) sxt4 r8 = r14
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 7, r40
+       ;;
+       (p7) adds r14 = -184, r44
+       ;;
+       .mfb
+       (p7) ld4 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mfb
+       cmp4.ne p6, p7 = 8, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 9, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 10, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 11, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 12, r40
+       ;;
+       (p7) adds r14 = -184, r44
+       ;;
+       .mfb
+       (p7) ldfs f8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 13, r40
+       ;;
+       (p7) adds r14 = -184, r44
+       ;;
+       .mfb
+       (p7) ldfd f8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mfb
+       cmp4.ne p6, p7 = 14, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mib
+       nop 0
+       cmp4.ne p6, p7 = 15, r40
+       (p6) br.cond.dptk .L49
+       .mii
+       nop 0
+       adds r16 = -192, r44
+       ;;
+       nop 0
+       .mmi
+       ld4 r14 = [r16]
+       ;;
+       nop 0
+       tbit.z p6, p7 = r14, 10
+       .mfb
+       adds r14 = -144, r44
+       nop 0
+       (p6) br.cond.dpnt .L49
+       ;;
+       .mmi
+       ld8 r22 = [r14]
+       ;;
+       adds r14 = -1, r22
+       nop 0
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 31, r14
+       (p6) br.cond.dpnt .L49
+       .mmi
+       ld8 r14 = [r41]
+       ;;
+       and r21 = 7, r14
+       and r24 = -8, r14
+       .mii
+       nop 0
+       cmp.ltu p6, p7 = 8, r22
+       ;;
+       nop 0
+       .mfb
+       add r14 = r22, r21
+       nop 0
+       (p6) br.cond.dptk .L35
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 8, r14
+       (p6) br.cond.dptk .L37
+       .mfi
+       shladd r16 = r14, 3, r0
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       ld8 r17 = [r24]
+       shladd r18 = r21, 3, r0
+       ;;
+       adds r16 = -1, r16
+       ;;
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       ;;
+       shl r14 = r14, r16
+       ;;
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r17, r14
+       nop 0
+       .mmi
+       nop 0
+       ;;
+       nop 0
+       shr r8 = r14, r18
+.L49:
+       .mii
+       nop 0
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 1
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L50:
+       .body
+       .copy_state 1
+       .mii
+       nop 0
+       adds r14 = -184, r44
+       ;;
+       nop 0
+       .mii
+       ld1 r14 = [r14]
+       nop 0
+       ;;
+       sxt1 r8 = r14
+       .mii
+       nop 0
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 2
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L54:
+       .body
+       .copy_state 2
+       .mmb
+       nop 0
+       adds r14 = -184, r44
+       nop 0
+       ;;
+       .mii
+       ld8 r8 = [r14]
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 3
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L35:
+       .body
+       .copy_state 3
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 16, r22
+       (p6) br.cond.dptk .L39
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 16, r14
+       (p6) br.cond.dptk .L41
+       .mmi
+       shladd r16 = r14, 3, r0
+       adds r14 = 8, r24
+       shladd r17 = r21, 2, r0
+       .mmb
+       shladd r19 = r21, 3, r0
+       ld8 r18 = [r24]
+       nop 0
+       ;;
+       .mfi
+       ld8 r20 = [r14]
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       adds r16 = -65, r16
+       sub r17 = 32, r17
+       ;;
+       sxt4 r16 = r16
+       .mii
+       nop 0
+       sxt4 r17 = r17
+       shr r18 = r18, r19
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r16
+       ;;
+       adds r14 = -1, r14
+       ;;
+       .mii
+       nop 0
+       and r14 = r20, r14
+       ;;
+       shl r16 = r14, r17
+       .mii
+       nop 0
+       shr r9 = r14, r19
+       ;;
+       shl r16 = r16, r17
+       ;;
+       .mii
+       or r8 = r16, r18
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 4
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L37:
+       .body
+       .copy_state 4
+       .mfi
+       shladd r16 = r14, 3, r0
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       ld8 r18 = [r24], 8
+       shladd r19 = r21, 3, r0
+       ;;
+       adds r16 = -65, r16
+       .mii
+       ld8 r20 = [r24]
+       sub r17 = 64, r19
+       ;;
+       sxt4 r16 = r16
+       .mii
+       nop 0
+       sxt4 r17 = r17
+       ;;
+       shl r14 = r14, r16
+       .mii
+       nop 0
+       shr r18 = r18, r19
+       ;;
+       adds r14 = -1, r14
+       ;;
+       .mii
+       nop 0
+       and r14 = r20, r14
+       ;;
+       shl r14 = r14, r17
+       ;;
+       .mii
+       or r8 = r14, r18
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 5
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L39:
+       .body
+       .copy_state 5
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 24, r22
+       (p6) br.cond.dptk .L43
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 24, r14
+       (p6) br.cond.dptk .L45
+       .mmi
+       shladd r16 = r14, 3, r0
+       adds r14 = 8, r24
+       shladd r17 = r21, 2, r0
+       .mmb
+       shladd r20 = r21, 3, r0
+       ld8 r19 = [r24], 16
+       nop 0
+       ;;
+       .mmi
+       ld8 r18 = [r14]
+       addl r14 = 2, r0
+       adds r16 = -65, r16
+       .mmb
+       sub r17 = 32, r17
+       ld8 r21 = [r24]
+       nop 0
+       ;;
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       sxt4 r17 = r17
+       .mii
+       nop 0
+       shr r19 = r19, r20
+       ;;
+       shl r14 = r14, r16
+       .mii
+       nop 0
+       shl r16 = r18, r17
+       shr r18 = r18, r20
+       ;;
+       .mii
+       nop 0
+       shl r16 = r16, r17
+       adds r14 = -1, r14
+       ;;
+       .mii
+       and r14 = r21, r14
+       or r8 = r16, r19
+       ;;
+       shl r16 = r14, r17
+       .mii
+       nop 0
+       shr r10 = r14, r20
+       ;;
+       shl r16 = r16, r17
+       ;;
+       .mii
+       or r9 = r16, r18
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 6
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L41:
+       .body
+       .copy_state 6
+       .mfi
+       shladd r17 = r14, 3, r0
+       nop 0
+       adds r14 = 8, r24
+       .mfi
+       ld8 r19 = [r24], 16
+       nop 0
+       shladd r16 = r21, 3, r0
+       ;;
+       .mmi
+       ld8 r18 = [r14]
+       addl r14 = 2, r0
+       adds r17 = -129, r17
+       .mmi
+       ld8 r21 = [r24]
+       mov r20 = r16
+       sub r16 = 64, r16
+       ;;
+       .mii
+       nop 0
+       sxt4 r17 = r17
+       sxt4 r16 = r16
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r17
+       shr r19 = r19, r20
+       .mii
+       nop 0
+       shl r17 = r18, r16
+       shr r18 = r18, r20
+       ;;
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r21, r14
+       or r8 = r17, r19
+       ;;
+       .mib
+       nop 0
+       shl r14 = r14, r16
+       nop 0
+       ;;
+       .mii
+       or r9 = r14, r18
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 7
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L45:
+       .body
+       .copy_state 7
+       .mmi
+       shladd r17 = r14, 3, r0
+       adds r14 = 24, r24
+       shladd r16 = r21, 3, r0
+       .mmi
+       adds r19 = 8, r24
+       ld8 r21 = [r24]
+       adds r20 = 16, r24
+       ;;
+       .mmi
+       ld8 r23 = [r14]
+       addl r14 = 2, r0
+       adds r17 = -129, r17
+       .mmi
+       mov r18 = r16
+       ld8 r19 = [r19]
+       sub r16 = 64, r16
+       ;;
+       .mib
+       nop 0
+       sxt4 r17 = r17
+       nop 0
+       .mii
+       ld8 r20 = [r20]
+       sxt4 r16 = r16
+       ;;
+       shl r14 = r14, r17
+       .mii
+       nop 0
+       shr r22 = r20, r18
+       shl r17 = r19, r16
+       .mii
+       nop 0
+       shr r21 = r21, r18
+       shr r19 = r19, r18
+       .mii
+       nop 0
+       shl r20 = r20, r16
+       ;;
+       nop 0
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r23, r14
+       or r8 = r17, r21
+       .mii
+       nop 0
+       or r9 = r20, r19
+       ;;
+       shl r14 = r14, r16
+       ;;
+       .mii
+       or r10 = r14, r22
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 8
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L43:
+       .body
+       .copy_state 8
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 32, r14
+       (p6) br.cond.dptk .L47
+       .mmi
+       adds r16 = 24, r24
+       shladd r14 = r14, 3, r0
+       adds r18 = 8, r24
+       .mmi
+       shladd r17 = r21, 2, r0
+       adds r19 = 16, r24
+       shladd r21 = r21, 3, r0
+       ;;
+       .mmi
+       nop 0
+       ld8 r23 = [r16]
+       addl r16 = 2, r0
+       .mmi
+       adds r14 = -65, r14
+       ld8 r20 = [r18]
+       sub r17 = 32, r17
+       ;;
+       .mii
+       nop 0
+       sxt4 r14 = r14
+       sxt4 r17 = r17
+       .mmb
+       ld8 r22 = [r19]
+       ld8 r19 = [r24]
+       nop 0
+       ;;
+       .mii
+       nop 0
+       shl r16 = r16, r14
+       shl r14 = r20, r17
+       .mii
+       nop 0
+       shr r19 = r19, r21
+       shl r18 = r22, r17
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r17
+       shr r20 = r20, r21
+       .mii
+       adds r16 = -1, r16
+       shl r18 = r18, r17
+       shr r22 = r22, r21
+       ;;
+       .mmi
+       nop 0
+       and r16 = r23, r16
+       or r8 = r14, r19
+       .mmi
+       or r9 = r18, r20
+       ;;
+       nop 0
+       shl r14 = r16, r17
+       .mii
+       nop 0
+       shr r11 = r16, r21
+       ;;
+       shl r14 = r14, r17
+       ;;
+       .mii
+       or r10 = r14, r22
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 9
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L47:
+       .body
+       .copy_state 9
+       .mmb
+       shladd r17 = r14, 3, r0
+       adds r14 = 32, r24
+       nop 0
+       .mmi
+       adds r19 = 8, r24
+       adds r20 = 16, r24
+       shladd r16 = r21, 3, r0
+       ;;
+       .mfi
+       ld8 r23 = [r14]
+       nop 0
+       adds r14 = 24, r24
+       .mmi
+       ld8 r21 = [r19]
+       adds r17 = -129, r17
+       mov r18 = r16
+       .mfi
+       ld8 r19 = [r20]
+       nop 0
+       sub r16 = 64, r16
+       ;;
+       .mmi
+       ld8 r20 = [r14]
+       addl r14 = 2, r0
+       sxt4 r17 = r17
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       ;;
+       shl r22 = r21, r16
+       .mii
+       nop 0
+       shr r21 = r21, r18
+       shl r14 = r14, r17
+       .mii
+       ld8 r17 = [r24]
+       shr r24 = r20, r18
+       shl r20 = r20, r16
+       ;;
+       .mii
+       nop 0
+       shr r17 = r17, r18
+       shr r18 = r19, r18
+       .mii
+       adds r14 = -1, r14
+       shl r19 = r19, r16
+       ;;
+       and r14 = r23, r14
+       .mmi
+       nop 0
+       or r8 = r22, r17
+       or r10 = r20, r18
+       .mii
+       nop 0
+       or r9 = r19, r21
+       ;;
+       shl r14 = r14, r16
+       ;;
+       .mii
+       or r11 = r14, r24
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+       .endp callback_receiver#
+       .align 16
+       .global callback_get_receiver#
+       .proc callback_get_receiver#
+callback_get_receiver:
+       .prologue 2, 2
+       .mfi
+       .vframe r2
+       mov r2 = r12
+       .body
+       nop 0
+       addl r8 = @ltoff(@fptr(callback_receiver#)), gp
+       ;;
+       .mib
+       ld8 r8 = [r8]
+       .restore sp
+       mov r12 = r2
+       br.ret.sptk.many b0
+       .endp callback_get_receiver#
+       .ident  "GCC: (GNU) 4.0.1"
diff --git a/callback/vacall_r/vacall-ia64-macro.S b/callback/vacall_r/vacall-ia64-macro.S
new file mode 100644 (file)
index 0000000..1d24177
--- /dev/null
@@ -0,0 +1,854 @@
+       .file   "vacall-ia64.c"
+       .pred.safe_across_calls p1-p5,p16-p63
+       .text
+       .align 16
+       .proc callback_receiver#
+callback_receiver:
+       .prologue 14, 42
+       .spill 48
+       .mmb
+       .save ar.pfs, r43
+       alloc r43 = ar.pfs, 8, 6, 2, 0
+       .vframe r44
+       mov r44 = r12
+       nop 0
+       .mmi
+       adds r12 = -208, r12
+       adds r18 = 8, r15
+       mov r45 = r1
+       ;;
+       .mmi
+       adds r16 = -48, r44
+       adds r14 = -136, r44
+       adds r17 = -48, r44
+       .mmi
+       adds r40 = -152, r44
+       adds r47 = -192, r44
+       adds r41 = -160, r44
+       ;;
+       .mmb
+       st8 [r14] = r8
+       adds r14 = -32, r44
+       nop 0
+       .mfi
+       st8 [r16] = r32, 8
+       nop 0
+       .save rp, r42
+       mov r42 = b0
+       .body
+       ;;
+       .mfi
+       st8 [r14] = r34
+       nop 0
+       adds r14 = -24, r44
+       .mmb
+       st8 [r16] = r33
+       ld8 r16 = [r15]
+       nop 0
+       ;;
+       .mmi
+       nop 0
+       st8 [r14] = r35
+       adds r14 = -16, r44
+       .mmi
+       st8 [r41] = r0
+       ;;
+       st8 [r14] = r36
+       adds r14 = -8, r44
+       .mmb
+       st4 [r40] = r0
+       ld8 r46 = [r18]
+       nop 0
+       ;;
+       .mmi
+       nop 0
+       st8 [r14] = r37
+       adds r14 = 8, r44
+       .mmi
+       st8 [r44] = r38
+       ;;
+       st8 [r14] = r39
+       adds r14 = -112, r44
+       .mmi
+       st4 [r47] = r0
+       ;;
+       stfd [r14] = f8
+       nop 0
+       .mmi
+       adds r14 = -104, r44
+       ;;
+       stfd [r14] = f9
+       adds r14 = -96, r44
+       ;;
+       .mfi
+       stfd [r14] = f10
+       nop 0
+       adds r14 = -88, r44
+       .mmi
+       nop 0
+       ;;
+       stfd [r14] = f11
+       nop 0
+       .mmi
+       adds r14 = -80, r44
+       ;;
+       stfd [r14] = f12
+       adds r14 = -72, r44
+       ;;
+       .mfi
+       stfd [r14] = f13
+       nop 0
+       adds r14 = -64, r44
+       .mmi
+       nop 0
+       ;;
+       stfd [r14] = f14
+       nop 0
+       .mmi
+       adds r14 = -56, r44
+       ;;
+       stfd [r14] = f15
+       adds r14 = -168, r44
+       ;;
+       .mii
+       st8 [r14] = r17
+       adds r14 = -128, r44
+       ;;
+       nop 0
+       .mii
+       st8 [r14] = r17
+       adds r14 = -120, r44
+       ;;
+       nop 0
+       .mmb
+       st4 [r14] = r0
+       ld8 r14 = [r16], 8
+       nop 0
+       ;;
+       .mib
+       nop 0
+       mov b6 = r14
+       nop 0
+       .mbb
+       ld8 r1 = [r16]
+       nop 0
+       br.call.sptk.many b0 = b6
+       ;;
+       .mmb
+       mov r1 = r45
+       ld4 r40 = [r40]
+       nop 0
+       ;;
+       .mfb
+       cmp4.eq p6, p7 = 0, r40
+       nop 0
+       (p6) br.cond.dpnt .L49
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 1, r40
+       nop 0
+       (p7) br.cond.dpnt .L50
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 2, r40
+       nop 0
+       (p7) br.cond.dpnt .L50
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 3, r40
+       ;;
+       (p7) adds r14 = -184, r44
+       ;;
+       .mfb
+       (p7) ld1 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 4, r40
+       ;;
+       nop 0
+       .mmi
+       (p7) adds r14 = -184, r44
+       ;;
+       (p7) ld2 r14 = [r14]
+       nop 0
+       ;;
+       .mib
+       nop 0
+       (p7) sxt2 r8 = r14
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 5, r40
+       ;;
+       (p7) adds r14 = -184, r44
+       ;;
+       .mfb
+       (p7) ld2 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 6, r40
+       ;;
+       nop 0
+       .mmi
+       (p7) adds r14 = -184, r44
+       ;;
+       (p7) ld4 r14 = [r14]
+       nop 0
+       ;;
+       .mib
+       nop 0
+       (p7) sxt4 r8 = r14
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 7, r40
+       ;;
+       (p7) adds r14 = -184, r44
+       ;;
+       .mfb
+       (p7) ld4 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mfb
+       cmp4.ne p6, p7 = 8, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 9, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 10, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 11, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 12, r40
+       ;;
+       (p7) adds r14 = -184, r44
+       ;;
+       .mfb
+       (p7) ldfs f8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 13, r40
+       ;;
+       (p7) adds r14 = -184, r44
+       ;;
+       .mfb
+       (p7) ldfd f8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mfb
+       cmp4.ne p6, p7 = 14, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mib
+       nop 0
+       cmp4.ne p6, p7 = 15, r40
+       (p6) br.cond.dptk .L49
+       .mii
+       nop 0
+       adds r16 = -192, r44
+       ;;
+       nop 0
+       .mmi
+       ld4 r14 = [r16]
+       ;;
+       nop 0
+       tbit.z p6, p7 = r14, 10
+       .mfb
+       adds r14 = -144, r44
+       nop 0
+       (p6) br.cond.dpnt .L49
+       ;;
+       .mmi
+       ld8 r22 = [r14]
+       ;;
+       adds r14 = -1, r22
+       nop 0
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 31, r14
+       (p6) br.cond.dpnt .L49
+       .mmi
+       ld8 r14 = [r41]
+       ;;
+       and r21 = 7, r14
+       and r24 = -8, r14
+       .mii
+       nop 0
+       cmp.ltu p6, p7 = 8, r22
+       ;;
+       nop 0
+       .mfb
+       add r14 = r22, r21
+       nop 0
+       (p6) br.cond.dptk .L35
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 8, r14
+       (p6) br.cond.dptk .L37
+       .mfi
+       shladd r16 = r14, 3, r0
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       ld8 r17 = [r24]
+       shladd r18 = r21, 3, r0
+       ;;
+       adds r16 = -1, r16
+       ;;
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       ;;
+       shl r14 = r14, r16
+       ;;
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r17, r14
+       nop 0
+       .mmi
+       nop 0
+       ;;
+       nop 0
+       shr r8 = r14, r18
+.L49:
+       .mii
+       nop 0
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 1
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L50:
+       .body
+       .copy_state 1
+       .mii
+       nop 0
+       adds r14 = -184, r44
+       ;;
+       nop 0
+       .mii
+       ld1 r14 = [r14]
+       nop 0
+       ;;
+       sxt1 r8 = r14
+       .mii
+       nop 0
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 2
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L54:
+       .body
+       .copy_state 2
+       .mmb
+       nop 0
+       adds r14 = -184, r44
+       nop 0
+       ;;
+       .mii
+       ld8 r8 = [r14]
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 3
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L35:
+       .body
+       .copy_state 3
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 16, r22
+       (p6) br.cond.dptk .L39
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 16, r14
+       (p6) br.cond.dptk .L41
+       .mmi
+       shladd r16 = r14, 3, r0
+       adds r14 = 8, r24
+       shladd r17 = r21, 2, r0
+       .mmb
+       shladd r19 = r21, 3, r0
+       ld8 r18 = [r24]
+       nop 0
+       ;;
+       .mfi
+       ld8 r20 = [r14]
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       adds r16 = -65, r16
+       sub r17 = 32, r17
+       ;;
+       sxt4 r16 = r16
+       .mii
+       nop 0
+       sxt4 r17 = r17
+       shr r18 = r18, r19
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r16
+       ;;
+       adds r14 = -1, r14
+       ;;
+       .mii
+       nop 0
+       and r14 = r20, r14
+       ;;
+       shl r16 = r14, r17
+       .mii
+       nop 0
+       shr r9 = r14, r19
+       ;;
+       shl r16 = r16, r17
+       ;;
+       .mii
+       or r8 = r16, r18
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 4
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L37:
+       .body
+       .copy_state 4
+       .mfi
+       shladd r16 = r14, 3, r0
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       ld8 r18 = [r24], 8
+       shladd r19 = r21, 3, r0
+       ;;
+       adds r16 = -65, r16
+       .mii
+       ld8 r20 = [r24]
+       sub r17 = 64, r19
+       ;;
+       sxt4 r16 = r16
+       .mii
+       nop 0
+       sxt4 r17 = r17
+       ;;
+       shl r14 = r14, r16
+       .mii
+       nop 0
+       shr r18 = r18, r19
+       ;;
+       adds r14 = -1, r14
+       ;;
+       .mii
+       nop 0
+       and r14 = r20, r14
+       ;;
+       shl r14 = r14, r17
+       ;;
+       .mii
+       or r8 = r14, r18
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 5
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L39:
+       .body
+       .copy_state 5
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 24, r22
+       (p6) br.cond.dptk .L43
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 24, r14
+       (p6) br.cond.dptk .L45
+       .mmi
+       shladd r16 = r14, 3, r0
+       adds r14 = 8, r24
+       shladd r17 = r21, 2, r0
+       .mmb
+       shladd r20 = r21, 3, r0
+       ld8 r19 = [r24], 16
+       nop 0
+       ;;
+       .mmi
+       ld8 r18 = [r14]
+       addl r14 = 2, r0
+       adds r16 = -65, r16
+       .mmb
+       sub r17 = 32, r17
+       ld8 r21 = [r24]
+       nop 0
+       ;;
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       sxt4 r17 = r17
+       .mii
+       nop 0
+       shr r19 = r19, r20
+       ;;
+       shl r14 = r14, r16
+       .mii
+       nop 0
+       shl r16 = r18, r17
+       shr r18 = r18, r20
+       ;;
+       .mii
+       nop 0
+       shl r16 = r16, r17
+       adds r14 = -1, r14
+       ;;
+       .mii
+       and r14 = r21, r14
+       or r8 = r16, r19
+       ;;
+       shl r16 = r14, r17
+       .mii
+       nop 0
+       shr r10 = r14, r20
+       ;;
+       shl r16 = r16, r17
+       ;;
+       .mii
+       or r9 = r16, r18
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 6
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L41:
+       .body
+       .copy_state 6
+       .mfi
+       shladd r17 = r14, 3, r0
+       nop 0
+       adds r14 = 8, r24
+       .mfi
+       ld8 r19 = [r24], 16
+       nop 0
+       shladd r16 = r21, 3, r0
+       ;;
+       .mmi
+       ld8 r18 = [r14]
+       addl r14 = 2, r0
+       adds r17 = -129, r17
+       .mmi
+       ld8 r21 = [r24]
+       mov r20 = r16
+       sub r16 = 64, r16
+       ;;
+       .mii
+       nop 0
+       sxt4 r17 = r17
+       sxt4 r16 = r16
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r17
+       shr r19 = r19, r20
+       .mii
+       nop 0
+       shl r17 = r18, r16
+       shr r18 = r18, r20
+       ;;
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r21, r14
+       or r8 = r17, r19
+       ;;
+       .mib
+       nop 0
+       shl r14 = r14, r16
+       nop 0
+       ;;
+       .mii
+       or r9 = r14, r18
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 7
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L45:
+       .body
+       .copy_state 7
+       .mmi
+       shladd r17 = r14, 3, r0
+       adds r14 = 24, r24
+       shladd r16 = r21, 3, r0
+       .mmi
+       adds r19 = 8, r24
+       ld8 r21 = [r24]
+       adds r20 = 16, r24
+       ;;
+       .mmi
+       ld8 r23 = [r14]
+       addl r14 = 2, r0
+       adds r17 = -129, r17
+       .mmi
+       mov r18 = r16
+       ld8 r19 = [r19]
+       sub r16 = 64, r16
+       ;;
+       .mib
+       nop 0
+       sxt4 r17 = r17
+       nop 0
+       .mii
+       ld8 r20 = [r20]
+       sxt4 r16 = r16
+       ;;
+       shl r14 = r14, r17
+       .mii
+       nop 0
+       shr r22 = r20, r18
+       shl r17 = r19, r16
+       .mii
+       nop 0
+       shr r21 = r21, r18
+       shr r19 = r19, r18
+       .mii
+       nop 0
+       shl r20 = r20, r16
+       ;;
+       nop 0
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r23, r14
+       or r8 = r17, r21
+       .mii
+       nop 0
+       or r9 = r20, r19
+       ;;
+       shl r14 = r14, r16
+       ;;
+       .mii
+       or r10 = r14, r22
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 8
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L43:
+       .body
+       .copy_state 8
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 32, r14
+       (p6) br.cond.dptk .L47
+       .mmi
+       adds r16 = 24, r24
+       shladd r14 = r14, 3, r0
+       adds r18 = 8, r24
+       .mmi
+       shladd r17 = r21, 2, r0
+       adds r19 = 16, r24
+       shladd r21 = r21, 3, r0
+       ;;
+       .mmi
+       nop 0
+       ld8 r23 = [r16]
+       addl r16 = 2, r0
+       .mmi
+       adds r14 = -65, r14
+       ld8 r20 = [r18]
+       sub r17 = 32, r17
+       ;;
+       .mii
+       nop 0
+       sxt4 r14 = r14
+       sxt4 r17 = r17
+       .mmb
+       ld8 r22 = [r19]
+       ld8 r19 = [r24]
+       nop 0
+       ;;
+       .mii
+       nop 0
+       shl r16 = r16, r14
+       shl r14 = r20, r17
+       .mii
+       nop 0
+       shr r19 = r19, r21
+       shl r18 = r22, r17
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r17
+       shr r20 = r20, r21
+       .mii
+       adds r16 = -1, r16
+       shl r18 = r18, r17
+       shr r22 = r22, r21
+       ;;
+       .mmi
+       nop 0
+       and r16 = r23, r16
+       or r8 = r14, r19
+       .mmi
+       or r9 = r18, r20
+       ;;
+       nop 0
+       shl r14 = r16, r17
+       .mii
+       nop 0
+       shr r11 = r16, r21
+       ;;
+       shl r14 = r14, r17
+       ;;
+       .mii
+       or r10 = r14, r22
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .label_state 9
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+.L47:
+       .body
+       .copy_state 9
+       .mmb
+       shladd r17 = r14, 3, r0
+       adds r14 = 32, r24
+       nop 0
+       .mmi
+       adds r19 = 8, r24
+       adds r20 = 16, r24
+       shladd r16 = r21, 3, r0
+       ;;
+       .mfi
+       ld8 r23 = [r14]
+       nop 0
+       adds r14 = 24, r24
+       .mmi
+       ld8 r21 = [r19]
+       adds r17 = -129, r17
+       mov r18 = r16
+       .mfi
+       ld8 r19 = [r20]
+       nop 0
+       sub r16 = 64, r16
+       ;;
+       .mmi
+       ld8 r20 = [r14]
+       addl r14 = 2, r0
+       sxt4 r17 = r17
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       ;;
+       shl r22 = r21, r16
+       .mii
+       nop 0
+       shr r21 = r21, r18
+       shl r14 = r14, r17
+       .mii
+       ld8 r17 = [r24]
+       shr r24 = r20, r18
+       shl r20 = r20, r16
+       ;;
+       .mii
+       nop 0
+       shr r17 = r17, r18
+       shr r18 = r19, r18
+       .mii
+       adds r14 = -1, r14
+       shl r19 = r19, r16
+       ;;
+       and r14 = r23, r14
+       .mmi
+       nop 0
+       or r8 = r22, r17
+       or r10 = r20, r18
+       .mii
+       nop 0
+       or r9 = r19, r21
+       ;;
+       shl r14 = r14, r16
+       ;;
+       .mii
+       or r11 = r14, r24
+       mov ar.pfs = r43
+       mov b0 = r42
+       .mib
+       nop 0
+       .restore sp
+       mov r12 = r44
+       br.ret.sptk.many b0
+       .endp callback_receiver#
+       .align 16
+       .global callback_get_receiver#
+       .proc callback_get_receiver#
+callback_get_receiver:
+       .prologue 2, 2
+       .mfi
+       .vframe r2
+       mov r2 = r12
+       .body
+       nop 0
+       addl r8 = @ltoff(@fptr(callback_receiver#)), gp
+       ;;
+       .mib
+       ld8 r8 = [r8]
+       .restore sp
+       mov r12 = r2
+       br.ret.sptk.many b0
+       .endp callback_get_receiver#
+       .ident  "GCC: (GNU) 4.0.1"
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-libapi.c b/callback/vacall_r/vacall-libapi.c
new file mode 100644 (file)
index 0000000..60ccee5
--- /dev/null
@@ -0,0 +1,210 @@
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "config.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <stdnoreturn.h>
+
+#include "vacall-internal.h"
+
+/* Room for returning structs according to the Sun C non-reentrant struct return convention. */
+typedef union { __vaword room[__VA_ALIST_WORDS]; double align; } __va_struct_buffer_t;
+static __va_struct_buffer_t vacall_struct_buffer;
+
+static _Noreturn void
+vacall_error_type_mismatch (enum __VAtype start_type, enum __VAtype return_type)
+{
+  /* If you see this, fix your code. */
+  fprintf (stderr, "vacall: va_start type %d and va_return type %d disagree.\n",
+                   (int)start_type, (int)return_type);
+  abort();
+}
+
+static _Noreturn void
+vacall_error_struct_too_large (unsigned int size)
+{
+  /* If you see this, increase __VA_ALIST_WORDS: */
+  fprintf (stderr, "vacall: struct of size %u too large for Sun C struct return.\n",
+                   size);
+  abort();
+}
+
+void vacall_start (va_alist list, int rettype, int flags)
+{
+  __va_start(list,rettype,flags);
+}
+
+void vacall_start_struct (va_alist list, size_t type_size, size_t type_align, int type_splittable, int flags)
+{
+  __va_start_struct(list,type_size,type_align,type_splittable,flags);
+}
+
+char vacall_arg_char (va_alist list)
+{
+  return _va_arg_char(list);
+}
+
+signed char vacall_arg_schar (va_alist list)
+{
+  return _va_arg_schar(list);
+}
+
+unsigned char vacall_arg_uchar (va_alist list)
+{
+  return _va_arg_uchar(list);
+}
+
+short vacall_arg_short (va_alist list)
+{
+  return _va_arg_short(list);
+}
+
+unsigned short vacall_arg_ushort (va_alist list)
+{
+  return _va_arg_ushort(list);
+}
+
+int vacall_arg_int (va_alist list)
+{
+  return _va_arg_int(list);
+}
+
+unsigned int vacall_arg_uint (va_alist list)
+{
+  return _va_arg_uint(list);
+}
+
+long vacall_arg_long (va_alist list)
+{
+  return _va_arg_long(list);
+}
+
+unsigned long vacall_arg_ulong (va_alist list)
+{
+  return _va_arg_ulong(list);
+}
+
+long long vacall_arg_longlong (va_alist list)
+{
+  return _va_arg_longlong(list);
+}
+
+unsigned long long vacall_arg_ulonglong (va_alist list)
+{
+  return _va_arg_ulonglong(list);
+}
+
+float vacall_arg_float (va_alist list)
+{
+  return _va_arg_float(list);
+}
+
+double vacall_arg_double (va_alist list)
+{
+  return _va_arg_double(list);
+}
+
+void* vacall_arg_ptr (va_alist list)
+{
+  return _va_arg_ptr(list);
+}
+
+void* vacall_arg_struct (va_alist list, size_t type_size, size_t type_align)
+{
+  return __va_arg_struct(list,type_size,type_align);
+}
+
+void vacall_return_void (va_alist list)
+{
+  _va_return_void(list);
+}
+
+void vacall_return_char (va_alist list, char val)
+{
+  _va_return_char(list,val);
+}
+
+void vacall_return_schar (va_alist list, signed char val)
+{
+  _va_return_schar(list,val);
+}
+
+void vacall_return_uchar (va_alist list, unsigned char val)
+{
+  _va_return_uchar(list,val);
+}
+
+void vacall_return_short (va_alist list, short val)
+{
+  _va_return_short(list,val);
+}
+
+void vacall_return_ushort (va_alist list, unsigned short val)
+{
+  _va_return_ushort(list,val);
+}
+
+void vacall_return_int (va_alist list, int val)
+{
+  _va_return_int(list,val);
+}
+
+void vacall_return_uint (va_alist list, unsigned int val)
+{
+  _va_return_uint(list,val);
+}
+
+void vacall_return_long (va_alist list, long val)
+{
+  _va_return_long(list,val);
+}
+
+void vacall_return_ulong (va_alist list, unsigned long val)
+{
+  _va_return_ulong(list,val);
+}
+
+void vacall_return_longlong (va_alist list, long long val)
+{
+  _va_return_longlong(list,val);
+}
+
+void vacall_return_ulonglong (va_alist list, unsigned long long val)
+{
+  _va_return_ulonglong(list,val);
+}
+
+void vacall_return_float (va_alist list, float val)
+{
+  _va_return_float(list,val);
+}
+
+void vacall_return_double (va_alist list, double val)
+{
+  _va_return_double(list,val);
+}
+
+void vacall_return_ptr (va_alist list, void* val)
+{
+  _va_return_ptr(list,val);
+}
+
+void vacall_return_struct (va_alist list, size_t type_size, size_t type_align, const void* val_addr)
+{
+  __va_return_struct(list,type_size,type_align,val_addr);
+}
diff --git a/callback/vacall_r/vacall-m68k-linux.s b/callback/vacall_r/vacall-m68k-linux.s
new file mode 100644 (file)
index 0000000..a687a7e
--- /dev/null
@@ -0,0 +1,185 @@
+       .file   "vacall-m68k.c"
+       .text
+       .align  2
+       .type   callback_receiver,@function
+callback_receiver:
+       link.w %a6,#-32
+       movm.l #0x3030,-(%sp)
+       clr.l -32(%a6)
+       lea (8,%a6),%a2
+       move.l %a2,-20(%a6)
+       clr.l -16(%a6)
+       clr.l -12(%a6)
+       move.l %a1,-4(%a6)
+       pea -32(%a6)
+       move.l 4(%a0),-(%sp)
+       move.l (%a0),%a2
+       jsr (%a2)
+       addq.l #8,%sp
+       move.l -12(%a6),%a3
+       tst.l %a3
+       jbeq .L1
+       moveq.l #1,%d2
+       cmp.l %a3,%d2
+       jbeq .L46
+       moveq.l #2,%d3
+       cmp.l %a3,%d3
+       jbeq .L46
+       moveq.l #3,%d2
+       cmp.l %a3,%d2
+       jbeq .L47
+       moveq.l #4,%d3
+       cmp.l %a3,%d3
+       jbeq .L48
+       moveq.l #5,%d2
+       cmp.l %a3,%d2
+       jbeq .L49
+       moveq.l #6,%d3
+       cmp.l %a3,%d3
+       jbeq .L45
+       moveq.l #7,%d2
+       cmp.l %a3,%d2
+       jbeq .L45
+       moveq.l #8,%d3
+       cmp.l %a3,%d3
+       jbeq .L45
+       moveq.l #9,%d2
+       cmp.l %a3,%d2
+       jbeq .L45
+       lea (-10,%a3),%a2
+       moveq.l #1,%d3
+       cmp.l %a2,%d3
+       jbcs .L22
+       move.l -28(%a6),%d0
+       move.l -24(%a6),%d1
+       jbra .L1
+       .align  2
+.L22:
+       moveq.l #12,%d2
+       cmp.l %a3,%d2
+       jbeq .L50
+       moveq.l #13,%d2
+       cmp.l %a3,%d2
+       jbeq .L51
+       moveq.l #14,%d3
+       cmp.l %a3,%d3
+       jbeq .L52
+       moveq.l #15,%d2
+       cmp.l %a3,%d2
+       jbne .L1
+       btst #2,-30(%a6)
+       jbeq .L1
+       move.l -8(%a6),%d2
+       moveq.l #1,%d3
+       cmp.l %d2,%d3
+       jbeq .L53
+       moveq.l #2,%d3
+       cmp.l %d2,%d3
+       jbeq .L54
+       moveq.l #4,%d3
+       cmp.l %d2,%d3
+       jbeq .L55
+       moveq.l #8,%d3
+       cmp.l %d2,%d3
+       jbne .L1
+       move.l -16(%a6),%a2
+       move.l (%a2),%d0
+       move.l 4(%a2),%d1
+       jbra .L1
+       .align  2
+.L55:
+       move.l -16(%a6),%a2
+       move.l (%a2),%d0
+       jbra .L1
+       .align  2
+.L54:
+       move.l -16(%a6),%a2
+       clr.l %d0
+       move.w (%a2),%d0
+       jbra .L1
+       .align  2
+.L53:
+       move.l -16(%a6),%a2
+       clr.l %d0
+       move.b (%a2),%d0
+       jbra .L1
+       .align  2
+.L52:
+       move.l -28(%a6),%d0
+       move.l %d0,%a0
+       jbra .L1
+       .align  2
+.L51:
+       btst #6,-29(%a6)
+       jbeq .L31
+       fmove.d -28(%a6),%fp0
+       jbra .L1
+       .align  2
+.L31:
+       move.l -28(%a6),%d0
+       move.l -24(%a6),%d1
+       jbra .L1
+       .align  2
+.L50:
+       move.l -32(%a6),%d2
+       btst #6,%d2
+       jbeq .L25
+       fmove.s -28(%a6),%fp0
+       jbra .L1
+       .align  2
+.L25:
+       btst #5,%d2
+       jbeq .L27
+       fmove.s -28(%a6),%fp1
+       fmove.d %fp1,-(%sp)
+       move.l (%sp)+,%d0
+       move.l (%sp)+,%d1
+       jbra .L1
+       .align  2
+.L27:
+       move.l -28(%a6),%d0
+       jbra .L1
+       .align  2
+.L45:
+       move.l -28(%a6),%d0
+       jbra .L1
+       .align  2
+.L49:
+       clr.l %d0
+       move.w -28(%a6),%d0
+       jbra .L1
+       .align  2
+.L48:
+       move.w -28(%a6),%d0
+       ext.l %d0
+       jbra .L1
+       .align  2
+.L47:
+       clr.l %d0
+       move.b -28(%a6),%d0
+       jbra .L1
+       .align  2
+.L46:
+       move.b -28(%a6),%d0
+       extb.l %d0
+.L1:
+       movm.l -48(%a6),#0xc0c
+       unlk %a6
+       rts
+.Lfe1:
+       .size   callback_receiver,.Lfe1-callback_receiver
+       .align  2
+       .globl  callback_get_receiver
+       .type   callback_get_receiver,@function
+callback_get_receiver:
+       link.w %a6,#0
+       move.l %a5,-(%sp)
+       lea (%pc, _GLOBAL_OFFSET_TABLE_@GOTPC), %a5
+       move.l callback_receiver@GOT(%a5),%a0
+       move.l %a0,%d0
+       move.l (%sp)+,%a5
+       unlk %a6
+       rts
+.Lfe2:
+       .size   callback_get_receiver,.Lfe2-callback_get_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/callback/vacall_r/vacall-m68k-sun.s b/callback/vacall_r/vacall-m68k-sun.s
new file mode 100644 (file)
index 0000000..86f3f16
--- /dev/null
@@ -0,0 +1,178 @@
+#NO_APP
+       .text
+       .even
+_callback_receiver:
+       link a6,#-32
+       moveml #0x3030,sp@-
+       clrl a6@(-32)
+       lea a6@(8),a2
+       movel a2,a6@(-20)
+       clrl a6@(-16)
+       clrl a6@(-12)
+       movel a1,a6@(-4)
+       pea a6@(-32)
+       movel a0@(4),sp@-
+       movel a0@,a2
+       jsr a2@
+       addql #8,sp
+       movel a6@(-12),a3
+       tstl a3
+       jeq L1
+       moveq #1,d2
+       cmpl a3,d2
+       jeq L46
+       moveq #2,d3
+       cmpl a3,d3
+       jeq L46
+       moveq #3,d2
+       cmpl a3,d2
+       jeq L47
+       moveq #4,d3
+       cmpl a3,d3
+       jeq L48
+       moveq #5,d2
+       cmpl a3,d2
+       jeq L49
+       moveq #6,d3
+       cmpl a3,d3
+       jeq L45
+       moveq #7,d2
+       cmpl a3,d2
+       jeq L45
+       moveq #8,d3
+       cmpl a3,d3
+       jeq L45
+       moveq #9,d2
+       cmpl a3,d2
+       jeq L45
+       lea a3@(-10),a2
+       moveq #1,d3
+       cmpl a2,d3
+       jcs L22
+       movel a6@(-28),d0
+       movel a6@(-24),d1
+       jra L1
+       .even
+L22:
+       moveq #12,d2
+       cmpl a3,d2
+       jeq L50
+       moveq #13,d2
+       cmpl a3,d2
+       jeq L51
+       moveq #14,d3
+       cmpl a3,d3
+       jeq L52
+       moveq #15,d2
+       cmpl a3,d2
+       jne L1
+       btst #2,a6@(-30)
+       jeq L1
+       movel a6@(-8),d2
+       moveq #1,d3
+       cmpl d2,d3
+       jeq L53
+       moveq #2,d3
+       cmpl d2,d3
+       jeq L54
+       moveq #4,d3
+       cmpl d2,d3
+       jeq L55
+       moveq #8,d3
+       cmpl d2,d3
+       jne L1
+       movel a6@(-16),a2
+       movel a2@,d0
+       movel a2@(4),d1
+       jra L1
+       .even
+L55:
+       movel a6@(-16),a2
+       movel a2@,d0
+       jra L1
+       .even
+L54:
+       movel a6@(-16),a2
+       clrl d0
+       movew a2@,d0
+       jra L1
+       .even
+L53:
+       movel a6@(-16),a2
+       clrl d0
+       moveb a2@,d0
+       jra L1
+       .even
+L52:
+       movel a6@(-28),d0
+       movel d0,a0
+       jra L1
+       .even
+L51:
+       btst #6,a6@(-29)
+       jeq L31
+       fmoved a6@(-28),fp0
+       jra L1
+       .even
+L31:
+       movel a6@(-28),d0
+       movel a6@(-24),d1
+       jra L1
+       .even
+L50:
+       movel a6@(-32),d2
+       btst #6,d2
+       jeq L25
+       fmoves a6@(-28),fp0
+       jra L1
+       .even
+L25:
+       btst #5,d2
+       jeq L27
+       fmoves a6@(-28),fp1
+       fmoved fp1,sp@-
+       movel sp@+,d0
+       movel sp@+,d1
+       jra L1
+       .even
+L27:
+       movel a6@(-28),d0
+       jra L1
+       .even
+L45:
+       movel a6@(-28),d0
+       jra L1
+       .even
+L49:
+       clrl d0
+       movew a6@(-28),d0
+       jra L1
+       .even
+L48:
+       movew a6@(-28),d0
+       extl d0
+       jra L1
+       .even
+L47:
+       clrl d0
+       moveb a6@(-28),d0
+       jra L1
+       .even
+L46:
+       moveb a6@(-28),d0
+       extbl d0
+L1:
+       moveml a6@(-48),#0xc0c
+       unlk a6
+       rts
+       .even
+       .globl  _callback_get_receiver
+_callback_get_receiver:
+       link a6,#0
+       movel a5,sp@-
+       movel #__GLOBAL_OFFSET_TABLE_, a5
+       lea pc@(0,a5:l),a5
+       movel a5@(_callback_receiver:l),d0
+       movel sp@+,a5
+       unlk a6
+       rts
diff --git a/callback/vacall_r/vacall-m68k.mit.S b/callback/vacall_r/vacall-m68k.mit.S
new file mode 100644 (file)
index 0000000..5acb6a8
--- /dev/null
@@ -0,0 +1,183 @@
+#include "asm-m68k.h"
+       .text
+       .even
+FUNBEGIN(callback_receiver)
+       link $a6,#-32
+       moveml #0x3030,$sp@-
+       clrl $a6@(-32)
+       lea $a6@(8),$a2
+       movel $a2,$a6@(-20)
+       clrl $a6@(-16)
+       clrl $a6@(-12)
+       movel $a1,$a6@(-4)
+       pea $a6@(-32)
+       movel $a0@(4),$sp@-
+       movel $a0@,$a2
+       jsr $a2@
+       addql #8,$sp
+       movel $a6@(-12),$a3
+       tstl $a3
+       jeq L(1)
+       moveq #1,$d2
+       cmpl $a3,$d2
+       jeq L(46)
+       moveq #2,$d3
+       cmpl $a3,$d3
+       jeq L(46)
+       moveq #3,$d2
+       cmpl $a3,$d2
+       jeq L(47)
+       moveq #4,$d3
+       cmpl $a3,$d3
+       jeq L(48)
+       moveq #5,$d2
+       cmpl $a3,$d2
+       jeq L(49)
+       moveq #6,$d3
+       cmpl $a3,$d3
+       jeq L(45)
+       moveq #7,$d2
+       cmpl $a3,$d2
+       jeq L(45)
+       moveq #8,$d3
+       cmpl $a3,$d3
+       jeq L(45)
+       moveq #9,$d2
+       cmpl $a3,$d2
+       jeq L(45)
+       lea $a3@(-10),$a2
+       moveq #1,$d3
+       cmpl $a2,$d3
+       jcs L(22)
+       movel $a6@(-28),$d0
+       movel $a6@(-24),$d1
+       jra L(1)
+       .even
+L(22):
+       moveq #12,$d2
+       cmpl $a3,$d2
+       jeq L(50)
+       moveq #13,$d2
+       cmpl $a3,$d2
+       jeq L(51)
+       moveq #14,$d3
+       cmpl $a3,$d3
+       jeq L(52)
+       moveq #15,$d2
+       cmpl $a3,$d2
+       jne L(1)
+       btst #2,$a6@(-30)
+       jeq L(1)
+       movel $a6@(-8),$d2
+       moveq #1,$d3
+       cmpl $d2,$d3
+       jeq L(53)
+       moveq #2,$d3
+       cmpl $d2,$d3
+       jeq L(54)
+       moveq #4,$d3
+       cmpl $d2,$d3
+       jeq L(55)
+       moveq #8,$d3
+       cmpl $d2,$d3
+       jne L(1)
+       movel $a6@(-16),$a2
+       movel $a2@,$d0
+       movel $a2@(4),$d1
+       jra L(1)
+       .even
+L(55):
+       movel $a6@(-16),$a2
+       movel $a2@,$d0
+       jra L(1)
+       .even
+L(54):
+       movel $a6@(-16),$a2
+       clrl $d0
+       movew $a2@,$d0
+       jra L(1)
+       .even
+L(53):
+       movel $a6@(-16),$a2
+       clrl $d0
+       moveb $a2@,$d0
+       jra L(1)
+       .even
+L(52):
+       movel $a6@(-28),$d0
+       movel $d0,$a0
+       jra L(1)
+       .even
+L(51):
+       btst #6,$a6@(-29)
+       jeq L(31)
+       fmoved $a6@(-28),$fp0
+       jra L(1)
+       .even
+L(31):
+       movel $a6@(-28),$d0
+       movel $a6@(-24),$d1
+       jra L(1)
+       .even
+L(50):
+       movel $a6@(-32),$d2
+       btst #6,$d2
+       jeq L(25)
+       fmoves $a6@(-28),$fp0
+       jra L(1)
+       .even
+L(25):
+       btst #5,$d2
+       jeq L(27)
+       fmoves $a6@(-28),$fp1
+       fmoved $fp1,$sp@-
+       movel $sp@+,$d0
+       movel $sp@+,$d1
+       jra L(1)
+       .even
+L(27):
+       movel $a6@(-28),$d0
+       jra L(1)
+       .even
+L(45):
+       movel $a6@(-28),$d0
+       jra L(1)
+       .even
+L(49):
+       clrl $d0
+       movew $a6@(-28),$d0
+       jra L(1)
+       .even
+L(48):
+       movew $a6@(-28),$d0
+       extl $d0
+       jra L(1)
+       .even
+L(47):
+       clrl $d0
+       moveb $a6@(-28),$d0
+       jra L(1)
+       .even
+L(46):
+       moveb $a6@(-28),$d0
+       extbl $d0
+L(1):
+       moveml $a6@(-48),#0xc0c
+       unlk $a6
+       rts
+       .even
+       .globl C(callback_get_receiver)
+       DECLARE_FUNCTION(callback_get_receiver)
+FUNBEGIN(callback_get_receiver)
+       link $a6,#0
+       movel $a5,$sp@-
+       movel #C(_GLOBAL_OFFSET_TABLE_), $a5
+       lea $pc@(0,$a5:l),$a5
+       movel $a5@(C(callback_receiver):l),$d0
+       movel $sp@+,$a5
+       unlk $a6
+       rts
+FUNEND(callback_get_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-m68k.motorola.S b/callback/vacall_r/vacall-m68k.motorola.S
new file mode 100644 (file)
index 0000000..7910d88
--- /dev/null
@@ -0,0 +1,187 @@
+#include "asm-m68k.h"
+       .text
+       .align  2
+       DECLARE_FUNCTION(callback_receiver)
+FUNBEGIN(callback_receiver)
+       link.w %a6,#-32
+       movm.l #0x3030,-(%sp)
+       clr.l -32(%a6)
+       lea (8,%a6),%a2
+       move.l %a2,-20(%a6)
+       clr.l -16(%a6)
+       clr.l -12(%a6)
+       move.l %a1,-4(%a6)
+       pea -32(%a6)
+       move.l 4(%a0),-(%sp)
+       move.l (%a0),%a2
+       jsr (%a2)
+       addq.l #8,%sp
+       move.l -12(%a6),%a3
+       tst.l %a3
+       jbeq L(1)
+       moveq.l #1,%d2
+       cmp.l %a3,%d2
+       jbeq L(46)
+       moveq.l #2,%d3
+       cmp.l %a3,%d3
+       jbeq L(46)
+       moveq.l #3,%d2
+       cmp.l %a3,%d2
+       jbeq L(47)
+       moveq.l #4,%d3
+       cmp.l %a3,%d3
+       jbeq L(48)
+       moveq.l #5,%d2
+       cmp.l %a3,%d2
+       jbeq L(49)
+       moveq.l #6,%d3
+       cmp.l %a3,%d3
+       jbeq L(45)
+       moveq.l #7,%d2
+       cmp.l %a3,%d2
+       jbeq L(45)
+       moveq.l #8,%d3
+       cmp.l %a3,%d3
+       jbeq L(45)
+       moveq.l #9,%d2
+       cmp.l %a3,%d2
+       jbeq L(45)
+       lea (-10,%a3),%a2
+       moveq.l #1,%d3
+       cmp.l %a2,%d3
+       jbcs L(22)
+       move.l -28(%a6),%d0
+       move.l -24(%a6),%d1
+       jbra L(1)
+       .align  2
+L(22):
+       moveq.l #12,%d2
+       cmp.l %a3,%d2
+       jbeq L(50)
+       moveq.l #13,%d2
+       cmp.l %a3,%d2
+       jbeq L(51)
+       moveq.l #14,%d3
+       cmp.l %a3,%d3
+       jbeq L(52)
+       moveq.l #15,%d2
+       cmp.l %a3,%d2
+       jbne L(1)
+       btst #2,-30(%a6)
+       jbeq L(1)
+       move.l -8(%a6),%d2
+       moveq.l #1,%d3
+       cmp.l %d2,%d3
+       jbeq L(53)
+       moveq.l #2,%d3
+       cmp.l %d2,%d3
+       jbeq L(54)
+       moveq.l #4,%d3
+       cmp.l %d2,%d3
+       jbeq L(55)
+       moveq.l #8,%d3
+       cmp.l %d2,%d3
+       jbne L(1)
+       move.l -16(%a6),%a2
+       move.l (%a2),%d0
+       move.l 4(%a2),%d1
+       jbra L(1)
+       .align  2
+L(55):
+       move.l -16(%a6),%a2
+       move.l (%a2),%d0
+       jbra L(1)
+       .align  2
+L(54):
+       move.l -16(%a6),%a2
+       clr.l %d0
+       move.w (%a2),%d0
+       jbra L(1)
+       .align  2
+L(53):
+       move.l -16(%a6),%a2
+       clr.l %d0
+       move.b (%a2),%d0
+       jbra L(1)
+       .align  2
+L(52):
+       move.l -28(%a6),%d0
+       move.l %d0,%a0
+       jbra L(1)
+       .align  2
+L(51):
+       btst #6,-29(%a6)
+       jbeq L(31)
+       fmove.d -28(%a6),%fp0
+       jbra L(1)
+       .align  2
+L(31):
+       move.l -28(%a6),%d0
+       move.l -24(%a6),%d1
+       jbra L(1)
+       .align  2
+L(50):
+       move.l -32(%a6),%d2
+       btst #6,%d2
+       jbeq L(25)
+       fmove.s -28(%a6),%fp0
+       jbra L(1)
+       .align  2
+L(25):
+       btst #5,%d2
+       jbeq L(27)
+       fmove.s -28(%a6),%fp1
+       fmove.d %fp1,-(%sp)
+       move.l (%sp)+,%d0
+       move.l (%sp)+,%d1
+       jbra L(1)
+       .align  2
+L(27):
+       move.l -28(%a6),%d0
+       jbra L(1)
+       .align  2
+L(45):
+       move.l -28(%a6),%d0
+       jbra L(1)
+       .align  2
+L(49):
+       clr.l %d0
+       move.w -28(%a6),%d0
+       jbra L(1)
+       .align  2
+L(48):
+       move.w -28(%a6),%d0
+       ext.l %d0
+       jbra L(1)
+       .align  2
+L(47):
+       clr.l %d0
+       move.b -28(%a6),%d0
+       jbra L(1)
+       .align  2
+L(46):
+       move.b -28(%a6),%d0
+       extb.l %d0
+L(1):
+       movm.l -48(%a6),#0xc0c
+       unlk %a6
+       rts
+L(fe1):
+       FUNEND(callback_receiver)
+       .align  2
+       .globl C(callback_get_receiver)
+       DECLARE_FUNCTION(callback_get_receiver)
+FUNBEGIN(callback_get_receiver)
+       link.w %a6,#0
+       move.l %a5,-(%sp)
+       lea (%pc, _GLOBAL_OFFSET_TABLE_@GOTPC), %a5
+       move.l callback_receiver@GOT(%a5),%a0
+       move.l %a0,%d0
+       move.l (%sp)+,%a5
+       unlk %a6
+       rts
+L(fe2):
+       FUNEND(callback_get_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-mips64eb-linux.s b/callback/vacall_r/vacall-mips64eb-linux.s
new file mode 100644 (file)
index 0000000..26582be
--- /dev/null
@@ -0,0 +1,385 @@
+       .file   1 "vacall-mips64.c"
+       .section .mdebug.abi64
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       .type   callback_receiver, @function
+callback_receiver:
+       .frame  $fp,272,$31             # vars= 160, regs= 6/0, args= 0, gp= 0
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       daddiu  $sp,$sp,-272
+       sd      $fp,192($sp)
+       move    $fp,$sp
+       sd      $4,208($fp)
+       ld      $4,8($2)
+       ld      $25,0($2)
+       daddiu  $12,$fp,208
+       sd      $31,200($sp)
+       sd      $18,176($sp)
+       sd      $17,168($sp)
+       sd      $16,160($sp)
+       sd      $5,216($fp)
+       sd      $6,224($fp)
+       sd      $7,232($fp)
+       sd      $8,240($fp)
+       sd      $9,248($fp)
+       sd      $10,256($fp)
+       sd      $11,264($fp)
+       sdc1    $f12,96($fp)
+       sdc1    $f13,104($fp)
+       sdc1    $f14,112($fp)
+       sdc1    $f15,120($fp)
+       sdc1    $f16,128($fp)
+       sdc1    $f17,136($fp)
+       sdc1    $f18,144($fp)
+       sdc1    $f19,152($fp)
+       swc1    $f12,60($fp)
+       swc1    $f13,64($fp)
+       swc1    $f14,68($fp)
+       swc1    $f15,72($fp)
+       swc1    $f16,76($fp)
+       swc1    $f17,80($fp)
+       swc1    $f18,84($fp)
+       move    $5,$fp
+       swc1    $f19,88($fp)
+       sd      $12,24($fp)
+       sw      $0,0($fp)
+       sd      $0,32($fp)
+       sw      $0,40($fp)
+       jalr    $25
+       sw      $0,56($fp)
+
+       lw      $12,40($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   # 0x1
+
+       beq     $12,$13,.L43
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L43
+       li      $13,3                   # 0x3
+
+       beq     $12,$13,.L46
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L47
+       li      $13,5                   # 0x5
+
+       beq     $12,$13,.L48
+       li      $13,6                   # 0x6
+
+       beq     $12,$13,.L49
+       li      $13,7                   # 0x7
+
+       beq     $12,$13,.L50
+       li      $13,8                   # 0x8
+
+       beq     $12,$13,.L44
+       li      $13,9                   # 0x9
+
+       beq     $12,$13,.L44
+       li      $13,10                  # 0xa
+
+       beq     $12,$13,.L44
+       li      $13,11                  # 0xb
+
+       beq     $12,$13,.L44
+       li      $13,12                  # 0xc
+
+       beq     $12,$13,.L51
+       li      $13,13                  # 0xd
+
+       beq     $12,$13,.L52
+       li      $13,14                  # 0xe
+
+       beq     $12,$13,.L44
+       li      $13,15                  # 0xf
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       ld      $14,48($fp)
+
+       ld      $12,48($fp)
+       li      $13,1                   # 0x1
+       beq     $12,$13,.L53
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L54
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L55
+       li      $13,8                   # 0x8
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L58:
+       ld      $31,200($sp)
+       ld      $fp,192($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,200($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       lb      $2,8($fp)
+       ld      $fp,192($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L44:
+       b       .L1
+       ld      $2,8($fp)
+
+       .align  3
+.L46:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L48:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lwu     $2,8($fp)
+
+.L52:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       daddiu  $13,$14,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L59
+       andi    $13,$12,0x800
+
+       ld      $13,32($fp)
+       li      $24,-8                  # 0xfffffffffffffff8
+       sltu    $25,$14,9
+       andi    $15,$13,0x7
+       and     $24,$13,$24
+       beq     $25,$0,.L24
+       daddu   $13,$14,$15
+
+       sltu    $25,$13,9
+       sll     $13,$13,0
+       beq     $25,$0,.L25
+       subu    $13,$0,$13
+
+       ld      $25,0($24)
+       sll     $13,$13,3
+       li      $24,-1                  # 0xffffffffffffffff
+       dsll    $13,$24,$13
+       and     $13,$13,$25
+       sll     $15,$15,3
+       dsll    $2,$13,$15
+.L23:
+       andi    $13,$12,0x800
+.L59:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   # 0x4
+       beq     $14,$13,.L56
+       li      $13,8                   # 0x8
+
+       beql    $14,$13,.L57
+       ld      $13,32($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L58
+       move    $sp,$fp
+
+       li      $12,16                  # 0x10
+.L60:
+       bnel    $14,$12,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   # 0x8
+
+       bne     $14,$12,.L60
+       li      $12,16                  # 0x10
+
+       ld      $13,32($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       sll     $13,$13,0
+
+       ld      $18,8($24)
+       subu    $13,$0,$13
+       move    $16,$15
+       li      $25,-1                  # 0xffffffffffffffff
+       subu    $15,$0,$15
+       sll     $13,$13,3
+       dsll    $13,$25,$13
+       ld      $17,0($24)
+       sll     $25,$15,2
+       addiu   $24,$25,32
+       and     $13,$13,$18
+       sll     $15,$16,3
+       dsra    $25,$13,$24
+       dsll    $16,$17,$15
+       dsra    $24,$25,$24
+       or      $2,$16,$24
+       b       .L23
+       dsll    $3,$13,$15
+
+.L53:
+       ld      $12,32($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L54:
+       ld      $12,32($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $18,16($24)
+       subu    $13,$0,$13
+       ld      $16,8($24)
+       ld      $17,0($24)
+       subu    $25,$0,$15
+       sll     $13,$13,3
+       li      $24,-1                  # 0xffffffffffffffff
+       dsll    $24,$24,$13
+       sll     $25,$25,3
+       sll     $15,$15,3
+       addiu   $25,$25,64
+       and     $13,$24,$18
+       dsra    $13,$13,$25
+       dsll    $24,$17,$15
+       dsra    $17,$16,$25
+       dsll    $15,$16,$15
+       or      $2,$24,$17
+       b       .L23
+       or      $3,$13,$15
+
+.L56:
+       ld      $12,32($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L55:
+       ld      $12,32($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       ld      $16,8($24)
+       ld      $25,0($24)
+       sll     $13,$13,3
+       li      $24,-1                  # 0xffffffffffffffff
+       dsll    $13,$24,$13
+       subu    $24,$0,$15
+       and     $13,$13,$16
+       sll     $24,$24,3
+       sll     $15,$15,3
+       dsra    $13,$13,$24
+       dsll    $15,$25,$15
+       b       .L23
+       or      $2,$13,$15
+
+.L57:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .align  3
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       .frame  $fp,16,$31              # vars= 0, regs= 1/0, args= 0, gp= 0
+       .mask   0x40000000,-8
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       lui     $13,%hi(%neg(%gp_rel(callback_get_receiver)))
+       daddu   $13,$13,$25
+       daddiu  $13,$13,%lo(%neg(%gp_rel(callback_get_receiver)))
+       daddiu  $sp,$sp,-16
+       ld      $12,%got_page(callback_receiver)($13)
+       sd      $fp,8($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       ld      $fp,8($sp)
+       daddiu  $2,$12,%got_ofst(callback_receiver)
+       j       $31
+       daddiu  $sp,$sp,16
+
+       .set    macro
+       .set    reorder
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/callback/vacall_r/vacall-mips64eb-macro.S b/callback/vacall_r/vacall-mips64eb-macro.S
new file mode 100644 (file)
index 0000000..a0cd04c
--- /dev/null
@@ -0,0 +1,379 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mips64.c"
+       .text
+       .align  2
+       .align  3
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       DECLARE_FUNCTION(callback_receiver)
+callback_receiver:
+       .frame  $fp,272,$31             
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       daddiu  $sp,$sp,-272
+       sd      $fp,192($sp)
+       move    $fp,$sp
+       sd      $4,208($fp)
+       ld      $4,8($2)
+       ld      $25,0($2)
+       daddiu  $12,$fp,208
+       sd      $31,200($sp)
+       sd      $18,176($sp)
+       sd      $17,168($sp)
+       sd      $16,160($sp)
+       sd      $5,216($fp)
+       sd      $6,224($fp)
+       sd      $7,232($fp)
+       sd      $8,240($fp)
+       sd      $9,248($fp)
+       sd      $10,256($fp)
+       sd      $11,264($fp)
+       sdc1    $f12,96($fp)
+       sdc1    $f13,104($fp)
+       sdc1    $f14,112($fp)
+       sdc1    $f15,120($fp)
+       sdc1    $f16,128($fp)
+       sdc1    $f17,136($fp)
+       sdc1    $f18,144($fp)
+       sdc1    $f19,152($fp)
+       swc1    $f12,60($fp)
+       swc1    $f13,64($fp)
+       swc1    $f14,68($fp)
+       swc1    $f15,72($fp)
+       swc1    $f16,76($fp)
+       swc1    $f17,80($fp)
+       swc1    $f18,84($fp)
+       move    $5,$fp
+       swc1    $f19,88($fp)
+       sd      $12,24($fp)
+       sw      $0,0($fp)
+       sd      $0,32($fp)
+       sw      $0,40($fp)
+       jalr    $25
+       sw      $0,56($fp)
+
+       lw      $12,40($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   
+
+       beq     $12,$13,.L43
+       li      $13,2                   
+
+       beq     $12,$13,.L43
+       li      $13,3                   
+
+       beq     $12,$13,.L46
+       li      $13,4                   
+
+       beq     $12,$13,.L47
+       li      $13,5                   
+
+       beq     $12,$13,.L48
+       li      $13,6                   
+
+       beq     $12,$13,.L49
+       li      $13,7                   
+
+       beq     $12,$13,.L50
+       li      $13,8                   
+
+       beq     $12,$13,.L44
+       li      $13,9                   
+
+       beq     $12,$13,.L44
+       li      $13,10                  
+
+       beq     $12,$13,.L44
+       li      $13,11                  
+
+       beq     $12,$13,.L44
+       li      $13,12                  
+
+       beq     $12,$13,.L51
+       li      $13,13                  
+
+       beq     $12,$13,.L52
+       li      $13,14                  
+
+       beq     $12,$13,.L44
+       li      $13,15                  
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       ld      $14,48($fp)
+
+       ld      $12,48($fp)
+       li      $13,1                   
+       beq     $12,$13,.L53
+       li      $13,2                   
+
+       beq     $12,$13,.L54
+       li      $13,4                   
+
+       beq     $12,$13,.L55
+       li      $13,8                   
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L58:
+       ld      $31,200($sp)
+       ld      $fp,192($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,200($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       lb      $2,8($fp)
+       ld      $fp,192($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L44:
+       b       .L1
+       ld      $2,8($fp)
+
+       .align  3
+.L46:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L48:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lwu     $2,8($fp)
+
+.L52:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       daddiu  $13,$14,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L59
+       andi    $13,$12,0x800
+
+       ld      $13,32($fp)
+       li      $24,-8                  
+       sltu    $25,$14,9
+       andi    $15,$13,0x7
+       and     $24,$13,$24
+       beq     $25,$0,.L24
+       daddu   $13,$14,$15
+
+       sltu    $25,$13,9
+       sll     $13,$13,0
+       beq     $25,$0,.L25
+       subu    $13,$0,$13
+
+       ld      $25,0($24)
+       sll     $13,$13,3
+       li      $24,-1                  
+       dsll    $13,$24,$13
+       and     $13,$13,$25
+       sll     $15,$15,3
+       dsll    $2,$13,$15
+.L23:
+       andi    $13,$12,0x800
+.L59:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   
+       beq     $14,$13,.L56
+       li      $13,8                   
+
+       beql    $14,$13,.L57
+       ld      $13,32($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L58
+       move    $sp,$fp
+
+       li      $12,16                  
+.L60:
+       bnel    $14,$12,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   
+
+       bne     $14,$12,.L60
+       li      $12,16                  
+
+       ld      $13,32($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       sll     $13,$13,0
+
+       ld      $18,8($24)
+       subu    $13,$0,$13
+       move    $16,$15
+       li      $25,-1                  
+       subu    $15,$0,$15
+       sll     $13,$13,3
+       dsll    $13,$25,$13
+       ld      $17,0($24)
+       sll     $25,$15,2
+       addiu   $24,$25,32
+       and     $13,$13,$18
+       sll     $15,$16,3
+       dsra    $25,$13,$24
+       dsll    $16,$17,$15
+       dsra    $24,$25,$24
+       or      $2,$16,$24
+       b       .L23
+       dsll    $3,$13,$15
+
+.L53:
+       ld      $12,32($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L54:
+       ld      $12,32($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $18,16($24)
+       subu    $13,$0,$13
+       ld      $16,8($24)
+       ld      $17,0($24)
+       subu    $25,$0,$15
+       sll     $13,$13,3
+       li      $24,-1                  
+       dsll    $24,$24,$13
+       sll     $25,$25,3
+       sll     $15,$15,3
+       addiu   $25,$25,64
+       and     $13,$24,$18
+       dsra    $13,$13,$25
+       dsll    $24,$17,$15
+       dsra    $17,$16,$25
+       dsll    $15,$16,$15
+       or      $2,$24,$17
+       b       .L23
+       or      $3,$13,$15
+
+.L56:
+       ld      $12,32($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L55:
+       ld      $12,32($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       ld      $16,8($24)
+       ld      $25,0($24)
+       sll     $13,$13,3
+       li      $24,-1                  
+       dsll    $13,$24,$13
+       subu    $24,$0,$15
+       and     $13,$13,$16
+       sll     $24,$24,3
+       sll     $15,$15,3
+       dsra    $13,$13,$24
+       dsll    $15,$25,$15
+       b       .L23
+       or      $2,$13,$15
+
+.L57:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .align  3
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       DECLARE_FUNCTION(callback_get_receiver)
+callback_get_receiver:
+       .frame  $fp,16,$31              
+       .mask   0x40000000,-8
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       lui     $13,%hi(%neg(%gp_rel(callback_get_receiver)))
+       daddu   $13,$13,$25
+       daddiu  $13,$13,%lo(%neg(%gp_rel(callback_get_receiver)))
+       daddiu  $sp,$sp,-16
+       ld      $12,%got_page(callback_receiver)($13)
+       sd      $fp,8($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       ld      $fp,8($sp)
+       daddiu  $2,$12,%got_ofst(callback_receiver)
+       j       $31
+       daddiu  $sp,$sp,16
+
+       .set    macro
+       .set    reorder
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
diff --git a/callback/vacall_r/vacall-mips64el-linux.s b/callback/vacall_r/vacall-mips64el-linux.s
new file mode 100644 (file)
index 0000000..152978d
--- /dev/null
@@ -0,0 +1,389 @@
+       .file   1 "vacall-mips64.c"
+       .section .mdebug.abi64
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       .type   callback_receiver, @function
+callback_receiver:
+       .frame  $fp,272,$31             # vars= 160, regs= 6/0, args= 0, gp= 0
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       daddiu  $sp,$sp,-272
+       sd      $fp,192($sp)
+       move    $fp,$sp
+       sd      $4,208($fp)
+       ld      $4,8($2)
+       ld      $25,0($2)
+       daddiu  $12,$fp,208
+       sd      $31,200($sp)
+       sd      $18,176($sp)
+       sd      $17,168($sp)
+       sd      $16,160($sp)
+       sd      $5,216($fp)
+       sd      $6,224($fp)
+       sd      $7,232($fp)
+       sd      $8,240($fp)
+       sd      $9,248($fp)
+       sd      $10,256($fp)
+       sd      $11,264($fp)
+       sdc1    $f12,96($fp)
+       sdc1    $f13,104($fp)
+       sdc1    $f14,112($fp)
+       sdc1    $f15,120($fp)
+       sdc1    $f16,128($fp)
+       sdc1    $f17,136($fp)
+       sdc1    $f18,144($fp)
+       sdc1    $f19,152($fp)
+       swc1    $f12,60($fp)
+       swc1    $f13,64($fp)
+       swc1    $f14,68($fp)
+       swc1    $f15,72($fp)
+       swc1    $f16,76($fp)
+       swc1    $f17,80($fp)
+       swc1    $f18,84($fp)
+       move    $5,$fp
+       swc1    $f19,88($fp)
+       sd      $12,24($fp)
+       sw      $0,0($fp)
+       sd      $0,32($fp)
+       sw      $0,40($fp)
+       jalr    $25
+       sw      $0,56($fp)
+
+       lw      $12,40($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   # 0x1
+
+       beq     $12,$13,.L43
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L43
+       li      $13,3                   # 0x3
+
+       beq     $12,$13,.L46
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L47
+       li      $13,5                   # 0x5
+
+       beq     $12,$13,.L48
+       li      $13,6                   # 0x6
+
+       beq     $12,$13,.L49
+       li      $13,7                   # 0x7
+
+       beq     $12,$13,.L50
+       li      $13,8                   # 0x8
+
+       beq     $12,$13,.L44
+       li      $13,9                   # 0x9
+
+       beq     $12,$13,.L44
+       li      $13,10                  # 0xa
+
+       beq     $12,$13,.L44
+       li      $13,11                  # 0xb
+
+       beq     $12,$13,.L44
+       li      $13,12                  # 0xc
+
+       beq     $12,$13,.L51
+       li      $13,13                  # 0xd
+
+       beq     $12,$13,.L52
+       li      $13,14                  # 0xe
+
+       beq     $12,$13,.L44
+       li      $13,15                  # 0xf
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       ld      $14,48($fp)
+
+       ld      $12,48($fp)
+       li      $13,1                   # 0x1
+       beq     $12,$13,.L53
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L54
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L55
+       li      $13,8                   # 0x8
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L58:
+       ld      $31,200($sp)
+       ld      $fp,192($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,200($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       lb      $2,8($fp)
+       ld      $fp,192($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L44:
+       b       .L1
+       ld      $2,8($fp)
+
+       .align  3
+.L46:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L48:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lwu     $2,8($fp)
+
+.L52:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       daddiu  $13,$14,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L59
+       andi    $13,$12,0x800
+
+       ld      $13,32($fp)
+       li      $15,-8                  # 0xfffffffffffffff8
+       sltu    $25,$14,9
+       andi    $24,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       daddu   $13,$14,$24
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       dsll    $13,$13,3
+
+       daddiu  $13,$13,-1
+       ld      $25,0($15)
+       sll     $13,$13,0
+       li      $15,2                   # 0x2
+       dsll    $13,$15,$13
+       daddiu  $13,$13,-1
+       and     $13,$13,$25
+       sll     $24,$24,3
+       dsra    $2,$13,$24
+.L23:
+       andi    $13,$12,0x800
+.L59:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   # 0x4
+       beq     $14,$13,.L56
+       li      $13,8                   # 0x8
+
+       beql    $14,$13,.L57
+       ld      $13,32($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L58
+       move    $sp,$fp
+
+       li      $12,16                  # 0x10
+.L60:
+       bnel    $14,$12,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   # 0x8
+
+       bne     $14,$12,.L60
+       li      $12,16                  # 0x10
+
+       ld      $13,32($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       dsll    $13,$13,3
+
+       daddiu  $13,$13,-65
+       ld      $17,8($15)
+       li      $25,2                   # 0x2
+       sll     $13,$13,0
+       dsll    $13,$25,$13
+       subu    $25,$0,$24
+       sll     $25,$25,2
+       ld      $16,0($15)
+       daddiu  $13,$13,-1
+       addiu   $15,$25,32
+       and     $13,$13,$17
+       sll     $24,$24,3
+       dsll    $25,$13,$15
+       dsra    $16,$16,$24
+       dsll    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsra    $3,$13,$24
+
+.L53:
+       ld      $12,32($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L54:
+       ld      $12,32($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       daddiu  $13,$13,-129
+       ld      $16,8($15)
+       ld      $17,0($15)
+       sll     $13,$13,0
+       ld      $18,16($15)
+       li      $15,2                   # 0x2
+       subu    $25,$0,$24
+       dsll    $15,$15,$13
+       daddiu  $15,$15,-1
+       sll     $25,$25,3
+       sll     $24,$24,3
+       addiu   $25,$25,64
+       and     $13,$15,$18
+       dsll    $13,$13,$25
+       dsra    $15,$17,$24
+       dsll    $17,$16,$25
+       dsra    $24,$16,$24
+       or      $2,$15,$17
+       b       .L23
+       or      $3,$13,$24
+
+.L56:
+       ld      $12,32($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L55:
+       ld      $12,32($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       daddiu  $13,$13,-65
+       li      $25,2                   # 0x2
+       sll     $13,$13,0
+       ld      $17,8($15)
+       dsll    $13,$25,$13
+       ld      $25,0($15)
+       daddiu  $13,$13,-1
+       subu    $16,$0,$24
+       and     $15,$13,$17
+       sll     $24,$24,3
+       sll     $13,$16,3
+       dsll    $13,$15,$13
+       dsra    $24,$25,$24
+       b       .L23
+       or      $2,$13,$24
+
+.L57:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .align  3
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       .frame  $fp,16,$31              # vars= 0, regs= 1/0, args= 0, gp= 0
+       .mask   0x40000000,-8
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       lui     $13,%hi(%neg(%gp_rel(callback_get_receiver)))
+       daddu   $13,$13,$25
+       daddiu  $13,$13,%lo(%neg(%gp_rel(callback_get_receiver)))
+       daddiu  $sp,$sp,-16
+       ld      $12,%got_page(callback_receiver)($13)
+       sd      $fp,8($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       ld      $fp,8($sp)
+       daddiu  $2,$12,%got_ofst(callback_receiver)
+       j       $31
+       daddiu  $sp,$sp,16
+
+       .set    macro
+       .set    reorder
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/callback/vacall_r/vacall-mips64el-macro.S b/callback/vacall_r/vacall-mips64el-macro.S
new file mode 100644 (file)
index 0000000..d2d7d89
--- /dev/null
@@ -0,0 +1,383 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mips64.c"
+       .text
+       .align  2
+       .align  3
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       DECLARE_FUNCTION(callback_receiver)
+callback_receiver:
+       .frame  $fp,272,$31             
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       daddiu  $sp,$sp,-272
+       sd      $fp,192($sp)
+       move    $fp,$sp
+       sd      $4,208($fp)
+       ld      $4,8($2)
+       ld      $25,0($2)
+       daddiu  $12,$fp,208
+       sd      $31,200($sp)
+       sd      $18,176($sp)
+       sd      $17,168($sp)
+       sd      $16,160($sp)
+       sd      $5,216($fp)
+       sd      $6,224($fp)
+       sd      $7,232($fp)
+       sd      $8,240($fp)
+       sd      $9,248($fp)
+       sd      $10,256($fp)
+       sd      $11,264($fp)
+       sdc1    $f12,96($fp)
+       sdc1    $f13,104($fp)
+       sdc1    $f14,112($fp)
+       sdc1    $f15,120($fp)
+       sdc1    $f16,128($fp)
+       sdc1    $f17,136($fp)
+       sdc1    $f18,144($fp)
+       sdc1    $f19,152($fp)
+       swc1    $f12,60($fp)
+       swc1    $f13,64($fp)
+       swc1    $f14,68($fp)
+       swc1    $f15,72($fp)
+       swc1    $f16,76($fp)
+       swc1    $f17,80($fp)
+       swc1    $f18,84($fp)
+       move    $5,$fp
+       swc1    $f19,88($fp)
+       sd      $12,24($fp)
+       sw      $0,0($fp)
+       sd      $0,32($fp)
+       sw      $0,40($fp)
+       jalr    $25
+       sw      $0,56($fp)
+
+       lw      $12,40($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   
+
+       beq     $12,$13,.L43
+       li      $13,2                   
+
+       beq     $12,$13,.L43
+       li      $13,3                   
+
+       beq     $12,$13,.L46
+       li      $13,4                   
+
+       beq     $12,$13,.L47
+       li      $13,5                   
+
+       beq     $12,$13,.L48
+       li      $13,6                   
+
+       beq     $12,$13,.L49
+       li      $13,7                   
+
+       beq     $12,$13,.L50
+       li      $13,8                   
+
+       beq     $12,$13,.L44
+       li      $13,9                   
+
+       beq     $12,$13,.L44
+       li      $13,10                  
+
+       beq     $12,$13,.L44
+       li      $13,11                  
+
+       beq     $12,$13,.L44
+       li      $13,12                  
+
+       beq     $12,$13,.L51
+       li      $13,13                  
+
+       beq     $12,$13,.L52
+       li      $13,14                  
+
+       beq     $12,$13,.L44
+       li      $13,15                  
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       ld      $14,48($fp)
+
+       ld      $12,48($fp)
+       li      $13,1                   
+       beq     $12,$13,.L53
+       li      $13,2                   
+
+       beq     $12,$13,.L54
+       li      $13,4                   
+
+       beq     $12,$13,.L55
+       li      $13,8                   
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L58:
+       ld      $31,200($sp)
+       ld      $fp,192($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,200($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       lb      $2,8($fp)
+       ld      $fp,192($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L44:
+       b       .L1
+       ld      $2,8($fp)
+
+       .align  3
+.L46:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L48:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lwu     $2,8($fp)
+
+.L52:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       daddiu  $13,$14,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L59
+       andi    $13,$12,0x800
+
+       ld      $13,32($fp)
+       li      $15,-8                  
+       sltu    $25,$14,9
+       andi    $24,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       daddu   $13,$14,$24
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       dsll    $13,$13,3
+
+       daddiu  $13,$13,-1
+       ld      $25,0($15)
+       sll     $13,$13,0
+       li      $15,2                   
+       dsll    $13,$15,$13
+       daddiu  $13,$13,-1
+       and     $13,$13,$25
+       sll     $24,$24,3
+       dsra    $2,$13,$24
+.L23:
+       andi    $13,$12,0x800
+.L59:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   
+       beq     $14,$13,.L56
+       li      $13,8                   
+
+       beql    $14,$13,.L57
+       ld      $13,32($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L58
+       move    $sp,$fp
+
+       li      $12,16                  
+.L60:
+       bnel    $14,$12,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   
+
+       bne     $14,$12,.L60
+       li      $12,16                  
+
+       ld      $13,32($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       dsll    $13,$13,3
+
+       daddiu  $13,$13,-65
+       ld      $17,8($15)
+       li      $25,2                   
+       sll     $13,$13,0
+       dsll    $13,$25,$13
+       subu    $25,$0,$24
+       sll     $25,$25,2
+       ld      $16,0($15)
+       daddiu  $13,$13,-1
+       addiu   $15,$25,32
+       and     $13,$13,$17
+       sll     $24,$24,3
+       dsll    $25,$13,$15
+       dsra    $16,$16,$24
+       dsll    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsra    $3,$13,$24
+
+.L53:
+       ld      $12,32($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L54:
+       ld      $12,32($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       daddiu  $13,$13,-129
+       ld      $16,8($15)
+       ld      $17,0($15)
+       sll     $13,$13,0
+       ld      $18,16($15)
+       li      $15,2                   
+       subu    $25,$0,$24
+       dsll    $15,$15,$13
+       daddiu  $15,$15,-1
+       sll     $25,$25,3
+       sll     $24,$24,3
+       addiu   $25,$25,64
+       and     $13,$15,$18
+       dsll    $13,$13,$25
+       dsra    $15,$17,$24
+       dsll    $17,$16,$25
+       dsra    $24,$16,$24
+       or      $2,$15,$17
+       b       .L23
+       or      $3,$13,$24
+
+.L56:
+       ld      $12,32($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L55:
+       ld      $12,32($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       daddiu  $13,$13,-65
+       li      $25,2                   
+       sll     $13,$13,0
+       ld      $17,8($15)
+       dsll    $13,$25,$13
+       ld      $25,0($15)
+       daddiu  $13,$13,-1
+       subu    $16,$0,$24
+       and     $15,$13,$17
+       sll     $24,$24,3
+       sll     $13,$16,3
+       dsll    $13,$15,$13
+       dsra    $24,$25,$24
+       b       .L23
+       or      $2,$13,$24
+
+.L57:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .align  3
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       DECLARE_FUNCTION(callback_get_receiver)
+callback_get_receiver:
+       .frame  $fp,16,$31              
+       .mask   0x40000000,-8
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       lui     $13,%hi(%neg(%gp_rel(callback_get_receiver)))
+       daddu   $13,$13,$25
+       daddiu  $13,$13,%lo(%neg(%gp_rel(callback_get_receiver)))
+       daddiu  $sp,$sp,-16
+       ld      $12,%got_page(callback_receiver)($13)
+       sd      $fp,8($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       ld      $fp,8($sp)
+       daddiu  $2,$12,%got_ofst(callback_receiver)
+       j       $31
+       daddiu  $sp,$sp,16
+
+       .set    macro
+       .set    reorder
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
diff --git a/callback/vacall_r/vacall-mipseb-linux.s b/callback/vacall_r/vacall-mipseb-linux.s
new file mode 100644 (file)
index 0000000..7d3634c
--- /dev/null
@@ -0,0 +1,322 @@
+       .file   1 "vacall-mips.c"
+       .section .mdebug.abi32
+       .previous
+       .nan    legacy
+       .module fp=xx
+       .module nooddspreg
+       .abicalls
+       .text
+       .align  2
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       .type   callback_receiver, @function
+callback_receiver:
+       .frame  $fp,104,$31             # vars= 72, regs= 2/0, args= 16, gp= 8
+       .mask   0xc0000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-104
+       sw      $fp,96($sp)
+       move    $fp,$sp
+       sw      $31,100($sp)
+       lw      $25,0($2)
+       sw      $4,104($fp)
+       lw      $4,4($2)
+       sw      $5,108($fp)
+       addiu   $5,$fp,104
+       sw      $5,40($fp)
+       addiu   $5,$fp,120
+       sw      $5,56($fp)
+       .cprestore      16
+       sw      $6,112($fp)
+       sw      $7,116($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f14,88($fp)
+       swc1    $f12,68($fp)
+       swc1    $f14,72($fp)
+       sw      $0,24($fp)
+       sw      $0,44($fp)
+       sw      $0,48($fp)
+       sw      $0,60($fp)
+       sw      $0,64($fp)
+       addiu   $5,$fp,24
+       jal     $25
+       lw      $4,48($fp)
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L1
+       li      $5,1                    # 0x1
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,3                    # 0x3
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L29
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L30
+       li      $5,5                    # 0x5
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L31
+       li      $5,6                    # 0x6
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,7                    # 0x7
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,9                    # 0x9
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       addiu   $5,$4,-10
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$0,$L32
+       li      $5,12                   # 0xc
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L33
+       li      $5,13                   # 0xd
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L34
+       li      $5,14                   # 0xe
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,15                   # 0xf
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,24($fp)
+       andi    $4,$4,0x2
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,$L38
+       lw      $2,44($fp)
+       .set    macro
+       .set    reorder
+
+       lw      $4,52($fp)
+       li      $5,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L35
+       lw      $4,44($fp)
+       .set    macro
+       .set    reorder
+
+       li      $5,2                    # 0x2
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L36
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,44($fp)
+       lw      $2,0($4)
+$L1:
+$L38:
+       move    $sp,$fp
+$L37:
+       lw      $31,100($sp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L23:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lb      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L27:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lw      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L29:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L30:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lh      $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L31:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L34:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       ldc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L32:
+       lw      $2,32($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lw      $3,36($fp)
+       .set    macro
+       .set    reorder
+
+$L33:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lwc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L35:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+$L36:
+       lw      $4,44($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       .frame  $fp,8,$31               # vars= 0, regs= 1/0, args= 0, gp= 0
+       .mask   0x40000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-8
+       sw      $fp,4($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       lw      $fp,4($sp)
+       la      $2,callback_receiver
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,8
+       .set    macro
+       .set    reorder
+
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/callback/vacall_r/vacall-mipseb-macro.S b/callback/vacall_r/vacall-mipseb-macro.S
new file mode 100644 (file)
index 0000000..f97bbb4
--- /dev/null
@@ -0,0 +1,316 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mips.c"
+       .text
+       .align  2
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       DECLARE_FUNCTION(callback_receiver)
+callback_receiver:
+       .frame  $fp,104,$31             
+       .mask   0xc0000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-104
+       sw      $fp,96($sp)
+       move    $fp,$sp
+       sw      $31,100($sp)
+       lw      $25,0($2)
+       sw      $4,104($fp)
+       lw      $4,4($2)
+       sw      $5,108($fp)
+       addiu   $5,$fp,104
+       sw      $5,40($fp)
+       addiu   $5,$fp,120
+       sw      $5,56($fp)
+       .cprestore      16
+       sw      $6,112($fp)
+       sw      $7,116($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f14,88($fp)
+       swc1    $f12,68($fp)
+       swc1    $f14,72($fp)
+       sw      $0,24($fp)
+       sw      $0,44($fp)
+       sw      $0,48($fp)
+       sw      $0,60($fp)
+       sw      $0,64($fp)
+       addiu   $5,$fp,24
+       jal     $25
+       lw      $4,48($fp)
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L1
+       li      $5,1                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,3                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L29
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L30
+       li      $5,5                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L31
+       li      $5,6                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,7                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,9                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       addiu   $5,$4,-10
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$0,$L32
+       li      $5,12                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L33
+       li      $5,13                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L34
+       li      $5,14                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,15                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,24($fp)
+       andi    $4,$4,0x2
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,$L38
+       lw      $2,44($fp)
+       .set    macro
+       .set    reorder
+
+       lw      $4,52($fp)
+       li      $5,1                    
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L35
+       lw      $4,44($fp)
+       .set    macro
+       .set    reorder
+
+       li      $5,2                    
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L36
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,44($fp)
+       lw      $2,0($4)
+$L1:
+$L38:
+       move    $sp,$fp
+$L37:
+       lw      $31,100($sp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L23:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lb      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L27:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lw      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L29:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L30:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lh      $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L31:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L34:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       ldc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L32:
+       lw      $2,32($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lw      $3,36($fp)
+       .set    macro
+       .set    reorder
+
+$L33:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lwc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L35:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+$L36:
+       lw      $4,44($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       DECLARE_FUNCTION(callback_get_receiver)
+callback_get_receiver:
+       .frame  $fp,8,$31               
+       .mask   0x40000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-8
+       sw      $fp,4($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       lw      $fp,4($sp)
+       la      $2,callback_receiver
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,8
+       .set    macro
+       .set    reorder
+
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
diff --git a/callback/vacall_r/vacall-mipsel-linux.s b/callback/vacall_r/vacall-mipsel-linux.s
new file mode 100644 (file)
index 0000000..7d3634c
--- /dev/null
@@ -0,0 +1,322 @@
+       .file   1 "vacall-mips.c"
+       .section .mdebug.abi32
+       .previous
+       .nan    legacy
+       .module fp=xx
+       .module nooddspreg
+       .abicalls
+       .text
+       .align  2
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       .type   callback_receiver, @function
+callback_receiver:
+       .frame  $fp,104,$31             # vars= 72, regs= 2/0, args= 16, gp= 8
+       .mask   0xc0000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-104
+       sw      $fp,96($sp)
+       move    $fp,$sp
+       sw      $31,100($sp)
+       lw      $25,0($2)
+       sw      $4,104($fp)
+       lw      $4,4($2)
+       sw      $5,108($fp)
+       addiu   $5,$fp,104
+       sw      $5,40($fp)
+       addiu   $5,$fp,120
+       sw      $5,56($fp)
+       .cprestore      16
+       sw      $6,112($fp)
+       sw      $7,116($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f14,88($fp)
+       swc1    $f12,68($fp)
+       swc1    $f14,72($fp)
+       sw      $0,24($fp)
+       sw      $0,44($fp)
+       sw      $0,48($fp)
+       sw      $0,60($fp)
+       sw      $0,64($fp)
+       addiu   $5,$fp,24
+       jal     $25
+       lw      $4,48($fp)
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L1
+       li      $5,1                    # 0x1
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,3                    # 0x3
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L29
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L30
+       li      $5,5                    # 0x5
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L31
+       li      $5,6                    # 0x6
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,7                    # 0x7
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,9                    # 0x9
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       addiu   $5,$4,-10
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$0,$L32
+       li      $5,12                   # 0xc
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L33
+       li      $5,13                   # 0xd
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L34
+       li      $5,14                   # 0xe
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,15                   # 0xf
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,24($fp)
+       andi    $4,$4,0x2
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,$L38
+       lw      $2,44($fp)
+       .set    macro
+       .set    reorder
+
+       lw      $4,52($fp)
+       li      $5,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L35
+       lw      $4,44($fp)
+       .set    macro
+       .set    reorder
+
+       li      $5,2                    # 0x2
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L36
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,44($fp)
+       lw      $2,0($4)
+$L1:
+$L38:
+       move    $sp,$fp
+$L37:
+       lw      $31,100($sp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L23:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lb      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L27:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lw      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L29:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L30:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lh      $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L31:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L34:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       ldc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L32:
+       lw      $2,32($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lw      $3,36($fp)
+       .set    macro
+       .set    reorder
+
+$L33:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lwc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L35:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+$L36:
+       lw      $4,44($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       .frame  $fp,8,$31               # vars= 0, regs= 1/0, args= 0, gp= 0
+       .mask   0x40000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-8
+       sw      $fp,4($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       lw      $fp,4($sp)
+       la      $2,callback_receiver
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,8
+       .set    macro
+       .set    reorder
+
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/callback/vacall_r/vacall-mipsel-macro.S b/callback/vacall_r/vacall-mipsel-macro.S
new file mode 100644 (file)
index 0000000..f97bbb4
--- /dev/null
@@ -0,0 +1,316 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mips.c"
+       .text
+       .align  2
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       DECLARE_FUNCTION(callback_receiver)
+callback_receiver:
+       .frame  $fp,104,$31             
+       .mask   0xc0000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-104
+       sw      $fp,96($sp)
+       move    $fp,$sp
+       sw      $31,100($sp)
+       lw      $25,0($2)
+       sw      $4,104($fp)
+       lw      $4,4($2)
+       sw      $5,108($fp)
+       addiu   $5,$fp,104
+       sw      $5,40($fp)
+       addiu   $5,$fp,120
+       sw      $5,56($fp)
+       .cprestore      16
+       sw      $6,112($fp)
+       sw      $7,116($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f14,88($fp)
+       swc1    $f12,68($fp)
+       swc1    $f14,72($fp)
+       sw      $0,24($fp)
+       sw      $0,44($fp)
+       sw      $0,48($fp)
+       sw      $0,60($fp)
+       sw      $0,64($fp)
+       addiu   $5,$fp,24
+       jal     $25
+       lw      $4,48($fp)
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L1
+       li      $5,1                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,3                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L29
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L30
+       li      $5,5                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L31
+       li      $5,6                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,7                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,9                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       addiu   $5,$4,-10
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$0,$L32
+       li      $5,12                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L33
+       li      $5,13                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L34
+       li      $5,14                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,15                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,24($fp)
+       andi    $4,$4,0x2
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,$L38
+       lw      $2,44($fp)
+       .set    macro
+       .set    reorder
+
+       lw      $4,52($fp)
+       li      $5,1                    
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L35
+       lw      $4,44($fp)
+       .set    macro
+       .set    reorder
+
+       li      $5,2                    
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L36
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,44($fp)
+       lw      $2,0($4)
+$L1:
+$L38:
+       move    $sp,$fp
+$L37:
+       lw      $31,100($sp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L23:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lb      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L27:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lw      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L29:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L30:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lh      $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L31:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L34:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       ldc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L32:
+       lw      $2,32($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lw      $3,36($fp)
+       .set    macro
+       .set    reorder
+
+$L33:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lwc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L35:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+$L36:
+       lw      $4,44($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       DECLARE_FUNCTION(callback_get_receiver)
+callback_get_receiver:
+       .frame  $fp,8,$31               
+       .mask   0x40000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-8
+       sw      $fp,4($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       lw      $fp,4($sp)
+       la      $2,callback_receiver
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,8
+       .set    macro
+       .set    reorder
+
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
diff --git a/callback/vacall_r/vacall-mipsn32eb-linux.s b/callback/vacall_r/vacall-mipsn32eb-linux.s
new file mode 100644 (file)
index 0000000..96318a1
--- /dev/null
@@ -0,0 +1,381 @@
+       .file   1 "vacall-mipsn32.c"
+       .section .mdebug.abiN32
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       .type   callback_receiver, @function
+callback_receiver:
+       .frame  $fp,256,$31             # vars= 144, regs= 6/0, args= 0, gp= 0
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       addiu   $sp,$sp,-256
+       sd      $fp,176($sp)
+       move    $fp,$sp
+       sd      $4,192($fp)
+       lw      $4,4($2)
+       lw      $25,0($2)
+       addiu   $12,$fp,192
+       sd      $31,184($sp)
+       sd      $18,160($sp)
+       sd      $17,152($sp)
+       sd      $16,144($sp)
+       sd      $5,200($fp)
+       sd      $6,208($fp)
+       sd      $7,216($fp)
+       sd      $8,224($fp)
+       sd      $9,232($fp)
+       sd      $10,240($fp)
+       sd      $11,248($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f13,88($fp)
+       sdc1    $f14,96($fp)
+       sdc1    $f15,104($fp)
+       sdc1    $f16,112($fp)
+       sdc1    $f17,120($fp)
+       sdc1    $f18,128($fp)
+       sdc1    $f19,136($fp)
+       swc1    $f12,44($fp)
+       swc1    $f13,48($fp)
+       swc1    $f14,52($fp)
+       swc1    $f15,56($fp)
+       swc1    $f16,60($fp)
+       swc1    $f17,64($fp)
+       swc1    $f18,68($fp)
+       move    $5,$fp
+       swc1    $f19,72($fp)
+       sw      $12,24($fp)
+       sw      $0,0($fp)
+       sw      $0,28($fp)
+       sw      $0,32($fp)
+       jalr    $25
+       sw      $0,40($fp)
+
+       lw      $12,32($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   # 0x1
+
+       beq     $12,$13,.L43
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L43
+       li      $13,3                   # 0x3
+
+       beq     $12,$13,.L49
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L50
+       li      $13,5                   # 0x5
+
+       beq     $12,$13,.L51
+       li      $13,6                   # 0x6
+
+       beq     $12,$13,.L46
+       li      $13,7                   # 0x7
+
+       beq     $12,$13,.L45
+       li      $13,8                   # 0x8
+
+       beq     $12,$13,.L46
+       li      $13,9                   # 0x9
+
+       beq     $12,$13,.L45
+       li      $13,10                  # 0xa
+
+       beq     $12,$13,.L47
+       li      $13,11                  # 0xb
+
+       beq     $12,$13,.L47
+       li      $13,12                  # 0xc
+
+       beq     $12,$13,.L52
+       li      $13,13                  # 0xd
+
+       beq     $12,$13,.L53
+       li      $13,14                  # 0xe
+
+       beq     $12,$13,.L46
+       li      $13,15                  # 0xf
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       lw      $24,36($fp)
+
+       lw      $12,36($fp)
+       li      $13,1                   # 0x1
+       beq     $12,$13,.L54
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L55
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L56
+       li      $13,8                   # 0x8
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L59:
+       ld      $31,184($sp)
+       ld      $fp,176($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,184($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       lb      $2,8($fp)
+       ld      $fp,176($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L46:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L45:
+       b       .L1
+       lwu     $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L52:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       ld      $2,8($fp)
+
+.L53:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       addiu   $13,$24,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L60
+       andi    $13,$12,0x800
+
+       lw      $13,28($fp)
+       li      $15,-8                  # 0xfffffffffffffff8
+       sltu    $25,$24,9
+       andi    $14,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       addu    $13,$24,$14
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       subu    $13,$0,$13
+
+       ld      $25,0($15)
+       sll     $13,$13,3
+       li      $15,-1                  # 0xffffffffffffffff
+       dsll    $13,$15,$13
+       and     $13,$13,$25
+       sll     $14,$14,3
+       dsll    $2,$13,$14
+.L23:
+       andi    $13,$12,0x800
+.L60:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   # 0x4
+       beq     $24,$13,.L57
+       li      $13,8                   # 0x8
+
+       beql    $24,$13,.L58
+       lw      $13,28($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L59
+       move    $sp,$fp
+
+       li      $12,16                  # 0x10
+.L61:
+       bnel    $24,$12,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   # 0x8
+
+       bne     $24,$12,.L61
+       li      $12,16                  # 0x10
+
+       lw      $13,28($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       subu    $13,$0,$13
+
+       ld      $17,8($15)
+       subu    $16,$0,$14
+       li      $25,-1                  # 0xffffffffffffffff
+       sll     $13,$13,3
+       dsll    $13,$25,$13
+       sll     $25,$16,2
+       ld      $16,0($15)
+       and     $13,$13,$17
+       addiu   $15,$25,32
+       sll     $14,$14,3
+       dsra    $25,$13,$15
+       dsll    $16,$16,$14
+       dsra    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsll    $3,$13,$14
+
+.L54:
+       lw      $12,28($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L55:
+       lw      $12,28($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $18,16($15)
+       ld      $16,8($15)
+       ld      $17,0($15)
+       subu    $25,$0,$14
+       li      $15,-1                  # 0xffffffffffffffff
+       sll     $13,$13,3
+       sll     $25,$25,3
+       dsll    $13,$15,$13
+       sll     $14,$14,3
+       addiu   $15,$25,64
+       and     $13,$13,$18
+       dsll    $25,$17,$14
+       dsra    $13,$13,$15
+       dsra    $17,$16,$15
+       dsll    $14,$16,$14
+       or      $2,$25,$17
+       b       .L23
+       or      $3,$13,$14
+
+.L57:
+       lw      $12,28($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L56:
+       lw      $12,28($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       ld      $16,8($15)
+       ld      $25,0($15)
+       sll     $13,$13,3
+       li      $15,-1                  # 0xffffffffffffffff
+       dsll    $13,$15,$13
+       subu    $15,$0,$14
+       and     $13,$13,$16
+       sll     $15,$15,3
+       sll     $14,$14,3
+       dsra    $13,$13,$15
+       dsll    $14,$25,$14
+       b       .L23
+       or      $2,$13,$14
+
+.L58:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .align  3
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       .frame  $fp,16,$31              # vars= 0, regs= 1/0, args= 0, gp= 0
+       .mask   0x40000000,-8
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       lui     $13,%hi(%neg(%gp_rel(callback_get_receiver)))
+       addu    $13,$13,$25
+       addiu   $13,$13,%lo(%neg(%gp_rel(callback_get_receiver)))
+       addiu   $sp,$sp,-16
+       lw      $12,%got_page(callback_receiver)($13)
+       sd      $fp,8($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       ld      $fp,8($sp)
+       addiu   $2,$12,%got_ofst(callback_receiver)
+       j       $31
+       addiu   $sp,$sp,16
+
+       .set    macro
+       .set    reorder
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/callback/vacall_r/vacall-mipsn32eb-macro.S b/callback/vacall_r/vacall-mipsn32eb-macro.S
new file mode 100644 (file)
index 0000000..6f1e482
--- /dev/null
@@ -0,0 +1,375 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mipsn32.c"
+       .text
+       .align  2
+       .align  3
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       DECLARE_FUNCTION(callback_receiver)
+callback_receiver:
+       .frame  $fp,256,$31             
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       addiu   $sp,$sp,-256
+       sd      $fp,176($sp)
+       move    $fp,$sp
+       sd      $4,192($fp)
+       lw      $4,4($2)
+       lw      $25,0($2)
+       addiu   $12,$fp,192
+       sd      $31,184($sp)
+       sd      $18,160($sp)
+       sd      $17,152($sp)
+       sd      $16,144($sp)
+       sd      $5,200($fp)
+       sd      $6,208($fp)
+       sd      $7,216($fp)
+       sd      $8,224($fp)
+       sd      $9,232($fp)
+       sd      $10,240($fp)
+       sd      $11,248($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f13,88($fp)
+       sdc1    $f14,96($fp)
+       sdc1    $f15,104($fp)
+       sdc1    $f16,112($fp)
+       sdc1    $f17,120($fp)
+       sdc1    $f18,128($fp)
+       sdc1    $f19,136($fp)
+       swc1    $f12,44($fp)
+       swc1    $f13,48($fp)
+       swc1    $f14,52($fp)
+       swc1    $f15,56($fp)
+       swc1    $f16,60($fp)
+       swc1    $f17,64($fp)
+       swc1    $f18,68($fp)
+       move    $5,$fp
+       swc1    $f19,72($fp)
+       sw      $12,24($fp)
+       sw      $0,0($fp)
+       sw      $0,28($fp)
+       sw      $0,32($fp)
+       jalr    $25
+       sw      $0,40($fp)
+
+       lw      $12,32($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   
+
+       beq     $12,$13,.L43
+       li      $13,2                   
+
+       beq     $12,$13,.L43
+       li      $13,3                   
+
+       beq     $12,$13,.L49
+       li      $13,4                   
+
+       beq     $12,$13,.L50
+       li      $13,5                   
+
+       beq     $12,$13,.L51
+       li      $13,6                   
+
+       beq     $12,$13,.L46
+       li      $13,7                   
+
+       beq     $12,$13,.L45
+       li      $13,8                   
+
+       beq     $12,$13,.L46
+       li      $13,9                   
+
+       beq     $12,$13,.L45
+       li      $13,10                  
+
+       beq     $12,$13,.L47
+       li      $13,11                  
+
+       beq     $12,$13,.L47
+       li      $13,12                  
+
+       beq     $12,$13,.L52
+       li      $13,13                  
+
+       beq     $12,$13,.L53
+       li      $13,14                  
+
+       beq     $12,$13,.L46
+       li      $13,15                  
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       lw      $24,36($fp)
+
+       lw      $12,36($fp)
+       li      $13,1                   
+       beq     $12,$13,.L54
+       li      $13,2                   
+
+       beq     $12,$13,.L55
+       li      $13,4                   
+
+       beq     $12,$13,.L56
+       li      $13,8                   
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L59:
+       ld      $31,184($sp)
+       ld      $fp,176($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,184($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       lb      $2,8($fp)
+       ld      $fp,176($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L46:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L45:
+       b       .L1
+       lwu     $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L52:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       ld      $2,8($fp)
+
+.L53:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       addiu   $13,$24,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L60
+       andi    $13,$12,0x800
+
+       lw      $13,28($fp)
+       li      $15,-8                  
+       sltu    $25,$24,9
+       andi    $14,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       addu    $13,$24,$14
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       subu    $13,$0,$13
+
+       ld      $25,0($15)
+       sll     $13,$13,3
+       li      $15,-1                  
+       dsll    $13,$15,$13
+       and     $13,$13,$25
+       sll     $14,$14,3
+       dsll    $2,$13,$14
+.L23:
+       andi    $13,$12,0x800
+.L60:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   
+       beq     $24,$13,.L57
+       li      $13,8                   
+
+       beql    $24,$13,.L58
+       lw      $13,28($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L59
+       move    $sp,$fp
+
+       li      $12,16                  
+.L61:
+       bnel    $24,$12,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   
+
+       bne     $24,$12,.L61
+       li      $12,16                  
+
+       lw      $13,28($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       subu    $13,$0,$13
+
+       ld      $17,8($15)
+       subu    $16,$0,$14
+       li      $25,-1                  
+       sll     $13,$13,3
+       dsll    $13,$25,$13
+       sll     $25,$16,2
+       ld      $16,0($15)
+       and     $13,$13,$17
+       addiu   $15,$25,32
+       sll     $14,$14,3
+       dsra    $25,$13,$15
+       dsll    $16,$16,$14
+       dsra    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsll    $3,$13,$14
+
+.L54:
+       lw      $12,28($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L55:
+       lw      $12,28($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $18,16($15)
+       ld      $16,8($15)
+       ld      $17,0($15)
+       subu    $25,$0,$14
+       li      $15,-1                  
+       sll     $13,$13,3
+       sll     $25,$25,3
+       dsll    $13,$15,$13
+       sll     $14,$14,3
+       addiu   $15,$25,64
+       and     $13,$13,$18
+       dsll    $25,$17,$14
+       dsra    $13,$13,$15
+       dsra    $17,$16,$15
+       dsll    $14,$16,$14
+       or      $2,$25,$17
+       b       .L23
+       or      $3,$13,$14
+
+.L57:
+       lw      $12,28($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L56:
+       lw      $12,28($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       ld      $16,8($15)
+       ld      $25,0($15)
+       sll     $13,$13,3
+       li      $15,-1                  
+       dsll    $13,$15,$13
+       subu    $15,$0,$14
+       and     $13,$13,$16
+       sll     $15,$15,3
+       sll     $14,$14,3
+       dsra    $13,$13,$15
+       dsll    $14,$25,$14
+       b       .L23
+       or      $2,$13,$14
+
+.L58:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .align  3
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       DECLARE_FUNCTION(callback_get_receiver)
+callback_get_receiver:
+       .frame  $fp,16,$31              
+       .mask   0x40000000,-8
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       lui     $13,%hi(%neg(%gp_rel(callback_get_receiver)))
+       addu    $13,$13,$25
+       addiu   $13,$13,%lo(%neg(%gp_rel(callback_get_receiver)))
+       addiu   $sp,$sp,-16
+       lw      $12,%got_page(callback_receiver)($13)
+       sd      $fp,8($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       ld      $fp,8($sp)
+       addiu   $2,$12,%got_ofst(callback_receiver)
+       j       $31
+       addiu   $sp,$sp,16
+
+       .set    macro
+       .set    reorder
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
diff --git a/callback/vacall_r/vacall-mipsn32el-linux.s b/callback/vacall_r/vacall-mipsn32el-linux.s
new file mode 100644 (file)
index 0000000..9f568ea
--- /dev/null
@@ -0,0 +1,385 @@
+       .file   1 "vacall-mipsn32.c"
+       .section .mdebug.abiN32
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       .type   callback_receiver, @function
+callback_receiver:
+       .frame  $fp,256,$31             # vars= 144, regs= 6/0, args= 0, gp= 0
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       addiu   $sp,$sp,-256
+       sd      $fp,176($sp)
+       move    $fp,$sp
+       sd      $4,192($fp)
+       lw      $4,4($2)
+       lw      $25,0($2)
+       addiu   $12,$fp,192
+       sd      $31,184($sp)
+       sd      $18,160($sp)
+       sd      $17,152($sp)
+       sd      $16,144($sp)
+       sd      $5,200($fp)
+       sd      $6,208($fp)
+       sd      $7,216($fp)
+       sd      $8,224($fp)
+       sd      $9,232($fp)
+       sd      $10,240($fp)
+       sd      $11,248($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f13,88($fp)
+       sdc1    $f14,96($fp)
+       sdc1    $f15,104($fp)
+       sdc1    $f16,112($fp)
+       sdc1    $f17,120($fp)
+       sdc1    $f18,128($fp)
+       sdc1    $f19,136($fp)
+       swc1    $f12,44($fp)
+       swc1    $f13,48($fp)
+       swc1    $f14,52($fp)
+       swc1    $f15,56($fp)
+       swc1    $f16,60($fp)
+       swc1    $f17,64($fp)
+       swc1    $f18,68($fp)
+       move    $5,$fp
+       swc1    $f19,72($fp)
+       sw      $12,24($fp)
+       sw      $0,0($fp)
+       sw      $0,28($fp)
+       sw      $0,32($fp)
+       jalr    $25
+       sw      $0,40($fp)
+
+       lw      $12,32($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   # 0x1
+
+       beq     $12,$13,.L43
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L43
+       li      $13,3                   # 0x3
+
+       beq     $12,$13,.L49
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L50
+       li      $13,5                   # 0x5
+
+       beq     $12,$13,.L51
+       li      $13,6                   # 0x6
+
+       beq     $12,$13,.L46
+       li      $13,7                   # 0x7
+
+       beq     $12,$13,.L45
+       li      $13,8                   # 0x8
+
+       beq     $12,$13,.L46
+       li      $13,9                   # 0x9
+
+       beq     $12,$13,.L45
+       li      $13,10                  # 0xa
+
+       beq     $12,$13,.L47
+       li      $13,11                  # 0xb
+
+       beq     $12,$13,.L47
+       li      $13,12                  # 0xc
+
+       beq     $12,$13,.L52
+       li      $13,13                  # 0xd
+
+       beq     $12,$13,.L53
+       li      $13,14                  # 0xe
+
+       beq     $12,$13,.L46
+       li      $13,15                  # 0xf
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       lw      $24,36($fp)
+
+       lw      $12,36($fp)
+       li      $13,1                   # 0x1
+       beq     $12,$13,.L54
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L55
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L56
+       li      $13,8                   # 0x8
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L59:
+       ld      $31,184($sp)
+       ld      $fp,176($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,184($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       lb      $2,8($fp)
+       ld      $fp,176($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L46:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L45:
+       b       .L1
+       lwu     $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L52:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       ld      $2,8($fp)
+
+.L53:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       addiu   $13,$24,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L60
+       andi    $13,$12,0x800
+
+       lw      $13,28($fp)
+       li      $15,-8                  # 0xfffffffffffffff8
+       sltu    $25,$24,9
+       andi    $14,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       addu    $13,$24,$14
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       sll     $13,$13,3
+
+       ld      $25,0($15)
+       addiu   $13,$13,-1
+       li      $15,2                   # 0x2
+       dsll    $13,$15,$13
+       daddiu  $13,$13,-1
+       and     $13,$13,$25
+       sll     $14,$14,3
+       dsra    $2,$13,$14
+.L23:
+       andi    $13,$12,0x800
+.L60:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   # 0x4
+       beq     $24,$13,.L57
+       li      $13,8                   # 0x8
+
+       beql    $24,$13,.L58
+       lw      $13,28($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L59
+       move    $sp,$fp
+
+       li      $12,16                  # 0x10
+.L61:
+       bnel    $24,$12,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   # 0x8
+
+       bne     $24,$12,.L61
+       li      $12,16                  # 0x10
+
+       lw      $13,28($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       sll     $13,$13,3
+
+       ld      $17,8($15)
+       li      $25,2                   # 0x2
+       addiu   $13,$13,-65
+       dsll    $13,$25,$13
+       subu    $25,$0,$14
+       sll     $25,$25,2
+       ld      $16,0($15)
+       daddiu  $13,$13,-1
+       addiu   $15,$25,32
+       and     $13,$13,$17
+       sll     $14,$14,3
+       dsll    $25,$13,$15
+       dsra    $16,$16,$14
+       dsll    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsra    $3,$13,$14
+
+.L54:
+       lw      $12,28($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L55:
+       lw      $12,28($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $16,8($15)
+       ld      $17,0($15)
+       addiu   $13,$13,-129
+       ld      $18,16($15)
+       li      $15,2                   # 0x2
+       subu    $25,$0,$14
+       dsll    $15,$15,$13
+       daddiu  $15,$15,-1
+       sll     $25,$25,3
+       sll     $14,$14,3
+       addiu   $25,$25,64
+       and     $13,$15,$18
+       dsll    $13,$13,$25
+       dsra    $15,$17,$14
+       dsll    $17,$16,$25
+       dsra    $14,$16,$14
+       or      $2,$15,$17
+       b       .L23
+       or      $3,$13,$14
+
+.L57:
+       lw      $12,28($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L56:
+       lw      $12,28($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       li      $25,2                   # 0x2
+       addiu   $13,$13,-65
+       ld      $17,8($15)
+       dsll    $13,$25,$13
+       ld      $25,0($15)
+       daddiu  $13,$13,-1
+       subu    $16,$0,$14
+       and     $15,$13,$17
+       sll     $14,$14,3
+       sll     $13,$16,3
+       dsll    $13,$15,$13
+       dsra    $14,$25,$14
+       b       .L23
+       or      $2,$13,$14
+
+.L58:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .align  3
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       .frame  $fp,16,$31              # vars= 0, regs= 1/0, args= 0, gp= 0
+       .mask   0x40000000,-8
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       lui     $13,%hi(%neg(%gp_rel(callback_get_receiver)))
+       addu    $13,$13,$25
+       addiu   $13,$13,%lo(%neg(%gp_rel(callback_get_receiver)))
+       addiu   $sp,$sp,-16
+       lw      $12,%got_page(callback_receiver)($13)
+       sd      $fp,8($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       ld      $fp,8($sp)
+       addiu   $2,$12,%got_ofst(callback_receiver)
+       j       $31
+       addiu   $sp,$sp,16
+
+       .set    macro
+       .set    reorder
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/callback/vacall_r/vacall-mipsn32el-macro.S b/callback/vacall_r/vacall-mipsn32el-macro.S
new file mode 100644 (file)
index 0000000..d1391d7
--- /dev/null
@@ -0,0 +1,379 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mipsn32.c"
+       .text
+       .align  2
+       .align  3
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_receiver
+       DECLARE_FUNCTION(callback_receiver)
+callback_receiver:
+       .frame  $fp,256,$31             
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       addiu   $sp,$sp,-256
+       sd      $fp,176($sp)
+       move    $fp,$sp
+       sd      $4,192($fp)
+       lw      $4,4($2)
+       lw      $25,0($2)
+       addiu   $12,$fp,192
+       sd      $31,184($sp)
+       sd      $18,160($sp)
+       sd      $17,152($sp)
+       sd      $16,144($sp)
+       sd      $5,200($fp)
+       sd      $6,208($fp)
+       sd      $7,216($fp)
+       sd      $8,224($fp)
+       sd      $9,232($fp)
+       sd      $10,240($fp)
+       sd      $11,248($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f13,88($fp)
+       sdc1    $f14,96($fp)
+       sdc1    $f15,104($fp)
+       sdc1    $f16,112($fp)
+       sdc1    $f17,120($fp)
+       sdc1    $f18,128($fp)
+       sdc1    $f19,136($fp)
+       swc1    $f12,44($fp)
+       swc1    $f13,48($fp)
+       swc1    $f14,52($fp)
+       swc1    $f15,56($fp)
+       swc1    $f16,60($fp)
+       swc1    $f17,64($fp)
+       swc1    $f18,68($fp)
+       move    $5,$fp
+       swc1    $f19,72($fp)
+       sw      $12,24($fp)
+       sw      $0,0($fp)
+       sw      $0,28($fp)
+       sw      $0,32($fp)
+       jalr    $25
+       sw      $0,40($fp)
+
+       lw      $12,32($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   
+
+       beq     $12,$13,.L43
+       li      $13,2                   
+
+       beq     $12,$13,.L43
+       li      $13,3                   
+
+       beq     $12,$13,.L49
+       li      $13,4                   
+
+       beq     $12,$13,.L50
+       li      $13,5                   
+
+       beq     $12,$13,.L51
+       li      $13,6                   
+
+       beq     $12,$13,.L46
+       li      $13,7                   
+
+       beq     $12,$13,.L45
+       li      $13,8                   
+
+       beq     $12,$13,.L46
+       li      $13,9                   
+
+       beq     $12,$13,.L45
+       li      $13,10                  
+
+       beq     $12,$13,.L47
+       li      $13,11                  
+
+       beq     $12,$13,.L47
+       li      $13,12                  
+
+       beq     $12,$13,.L52
+       li      $13,13                  
+
+       beq     $12,$13,.L53
+       li      $13,14                  
+
+       beq     $12,$13,.L46
+       li      $13,15                  
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       lw      $24,36($fp)
+
+       lw      $12,36($fp)
+       li      $13,1                   
+       beq     $12,$13,.L54
+       li      $13,2                   
+
+       beq     $12,$13,.L55
+       li      $13,4                   
+
+       beq     $12,$13,.L56
+       li      $13,8                   
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L59:
+       ld      $31,184($sp)
+       ld      $fp,176($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,184($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       lb      $2,8($fp)
+       ld      $fp,176($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L46:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L45:
+       b       .L1
+       lwu     $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L52:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       ld      $2,8($fp)
+
+.L53:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       addiu   $13,$24,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L60
+       andi    $13,$12,0x800
+
+       lw      $13,28($fp)
+       li      $15,-8                  
+       sltu    $25,$24,9
+       andi    $14,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       addu    $13,$24,$14
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       sll     $13,$13,3
+
+       ld      $25,0($15)
+       addiu   $13,$13,-1
+       li      $15,2                   
+       dsll    $13,$15,$13
+       daddiu  $13,$13,-1
+       and     $13,$13,$25
+       sll     $14,$14,3
+       dsra    $2,$13,$14
+.L23:
+       andi    $13,$12,0x800
+.L60:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   
+       beq     $24,$13,.L57
+       li      $13,8                   
+
+       beql    $24,$13,.L58
+       lw      $13,28($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L59
+       move    $sp,$fp
+
+       li      $12,16                  
+.L61:
+       bnel    $24,$12,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   
+
+       bne     $24,$12,.L61
+       li      $12,16                  
+
+       lw      $13,28($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       sll     $13,$13,3
+
+       ld      $17,8($15)
+       li      $25,2                   
+       addiu   $13,$13,-65
+       dsll    $13,$25,$13
+       subu    $25,$0,$14
+       sll     $25,$25,2
+       ld      $16,0($15)
+       daddiu  $13,$13,-1
+       addiu   $15,$25,32
+       and     $13,$13,$17
+       sll     $14,$14,3
+       dsll    $25,$13,$15
+       dsra    $16,$16,$14
+       dsll    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsra    $3,$13,$14
+
+.L54:
+       lw      $12,28($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L55:
+       lw      $12,28($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $16,8($15)
+       ld      $17,0($15)
+       addiu   $13,$13,-129
+       ld      $18,16($15)
+       li      $15,2                   
+       subu    $25,$0,$14
+       dsll    $15,$15,$13
+       daddiu  $15,$15,-1
+       sll     $25,$25,3
+       sll     $14,$14,3
+       addiu   $25,$25,64
+       and     $13,$15,$18
+       dsll    $13,$13,$25
+       dsra    $15,$17,$14
+       dsll    $17,$16,$25
+       dsra    $14,$16,$14
+       or      $2,$15,$17
+       b       .L23
+       or      $3,$13,$14
+
+.L57:
+       lw      $12,28($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L56:
+       lw      $12,28($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       li      $25,2                   
+       addiu   $13,$13,-65
+       ld      $17,8($15)
+       dsll    $13,$25,$13
+       ld      $25,0($15)
+       daddiu  $13,$13,-1
+       subu    $16,$0,$14
+       and     $15,$13,$17
+       sll     $14,$14,3
+       sll     $13,$16,3
+       dsll    $13,$15,$13
+       dsra    $14,$25,$14
+       b       .L23
+       or      $2,$13,$14
+
+.L58:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    callback_receiver
+       .size   callback_receiver, .-callback_receiver
+       .align  2
+       .align  3
+       .globl  callback_get_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    callback_get_receiver
+       DECLARE_FUNCTION(callback_get_receiver)
+callback_get_receiver:
+       .frame  $fp,16,$31              
+       .mask   0x40000000,-8
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       lui     $13,%hi(%neg(%gp_rel(callback_get_receiver)))
+       addu    $13,$13,$25
+       addiu   $13,$13,%lo(%neg(%gp_rel(callback_get_receiver)))
+       addiu   $sp,$sp,-16
+       lw      $12,%got_page(callback_receiver)($13)
+       sd      $fp,8($sp)
+       move    $fp,$sp
+       move    $sp,$fp
+       ld      $fp,8($sp)
+       addiu   $2,$12,%got_ofst(callback_receiver)
+       j       $31
+       addiu   $sp,$sp,16
+
+       .set    macro
+       .set    reorder
+       .end    callback_get_receiver
+       .size   callback_get_receiver, .-callback_get_receiver
diff --git a/callback/vacall_r/vacall-powerpc-aix.s b/callback/vacall_r/vacall-powerpc-aix.s
new file mode 100644 (file)
index 0000000..6f4f595
--- /dev/null
@@ -0,0 +1,194 @@
+       .file   "../../vacall/vacall-powerpc.c"
+       .toc
+       .csect .text[PR]
+       .align 2
+       .lglobl .callback_receiver
+       .csect callback_receiver[DS]
+callback_receiver:
+       .long .callback_receiver, TOC[tc0], 0
+       .csect .text[PR]
+.callback_receiver:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       mflr 0
+       stw 0,8(1)
+       stw 28,-16(1)
+       stw 29,-12(1)
+       stw 31,-4(1)
+       stwu 1,-216(1)
+       mr 31,1
+       lwz 28,0(11)
+       li 29,0
+       addi 0,31,240
+       stw 9,264(31)
+       stw 3,240(31)
+       stw 4,244(31)
+       stw 5,248(31)
+       stw 6,252(31)
+       stw 7,256(31)
+       stw 8,260(31)
+       stw 10,268(31)
+       stw 29,76(31)
+       stfd 1,92(31)
+       stfd 2,100(31)
+       stfd 3,108(31)
+       stfd 4,116(31)
+       stfd 5,124(31)
+       stfd 6,132(31)
+       stfd 7,140(31)
+       stfd 8,148(31)
+       stfd 9,156(31)
+       stfd 10,164(31)
+       stfd 11,172(31)
+       stfd 12,180(31)
+       stfd 13,188(31)
+       stw 0,72(31)
+       stw 29,88(31)
+       stw 29,56(31)
+       stw 29,80(31)
+       lwz 0,0(28)
+       lwz 3,4(11)
+       mtctr 0
+       addi 4,31,56
+       stw 2,20(1)
+       lwz 11,8(28)
+       lwz 2,4(28)
+       bctrl
+       lwz 2,20(1)
+       lwz 9,80(31)
+       cmpwi 0,9,0
+       beq- 0,L..1
+       cmpwi 0,9,1
+       beq- 0,L..41
+       cmpwi 0,9,2
+       beq- 0,L..42
+       cmpwi 0,9,3
+       beq- 0,L..41
+       cmpwi 0,9,4
+       beq- 0,L..43
+       cmpwi 0,9,5
+       beq- 0,L..44
+       cmpwi 0,9,6
+       beq- 0,L..40
+       cmpwi 0,9,7
+       beq- 0,L..40
+       cmpwi 0,9,8
+       beq- 0,L..40
+       cmpwi 0,9,9
+       beq- 0,L..40
+       addi 0,9,-10
+       cmplwi 0,0,1
+       bgt- 0,L..22
+       lwz 3,64(31)
+       lwz 4,68(31)
+L..1:
+       lwz 1,0(1)
+       lwz 0,8(1)
+       lwz 28,-16(1)
+       mtlr 0
+       lwz 29,-12(1)
+       lwz 31,-4(1)
+       blr
+L..22:
+       cmpwi 0,9,12
+       beq- 0,L..45
+       cmpwi 0,9,13
+       beq- 0,L..46
+       cmpwi 0,9,14
+       beq- 0,L..40
+       cmpwi 0,9,15
+       bne+ 0,L..1
+       lwz 0,56(31)
+       andi. 9,0,1024
+       beq- 0,L..1
+       lwz 0,84(31)
+       cmpwi 0,0,1
+       beq- 0,L..47
+       cmpwi 0,0,2
+       beq- 0,L..48
+       cmpwi 0,0,4
+       beq- 0,L..49
+       cmpwi 0,0,8
+       bne+ 0,L..1
+       lwz 9,76(31)
+       lwz 4,4(9)
+L..39:
+       lwz 3,0(9)
+       b L..1
+L..49:
+       lwz 9,76(31)
+       b L..39
+L..48:
+       lwz 9,76(31)
+       lhz 3,0(9)
+       b L..1
+L..47:
+       lwz 9,76(31)
+       lbz 3,0(9)
+       b L..1
+L..40:
+       lwz 3,64(31)
+       b L..1
+L..46:
+       lfd 1,64(31)
+       b L..1
+L..45:
+       lfs 1,64(31)
+       b L..1
+L..44:
+       lhz 3,64(31)
+       b L..1
+L..43:
+       lha 3,64(31)
+       b L..1
+L..41:
+       lbz 3,64(31)
+       b L..1
+L..42:
+       lbz 0,64(31)
+       slwi 0,0,24
+       srawi 3,0,24
+       b L..1
+LT..callback_receiver:
+       .long 0
+       .byte 0,0,32,97,128,4,8,0
+       .long 0
+       .long LT..callback_receiver-.callback_receiver
+       .short 17
+       .byte "callback_receiver"
+       .byte 31
+       .align 2
+       .toc
+LC..0:
+       .tc callback_receiver[TC],callback_receiver
+       .csect .text[PR]
+       .align 2
+       .globl callback_get_receiver
+       .globl .callback_get_receiver
+       .csect callback_get_receiver[DS]
+callback_get_receiver:
+       .long .callback_get_receiver, TOC[tc0], 0
+       .csect .text[PR]
+.callback_get_receiver:
+       stw 31,-4(1)
+       stwu 1,-40(1)
+       mr 31,1
+       lwz 1,0(1)
+       lwz 3,LC..0(2)
+       lwz 31,-4(1)
+       blr
+LT..callback_get_receiver:
+       .long 0
+       .byte 0,0,32,96,128,1,0,0
+       .long LT..callback_get_receiver-.callback_get_receiver
+       .short 21
+       .byte "callback_get_receiver"
+       .byte 31
+       .align 2
+_section_.text:
+       .csect .data[RW],3
+       .long _section_.text
diff --git a/callback/vacall_r/vacall-powerpc-linux-macro.S b/callback/vacall_r/vacall-powerpc-linux-macro.S
new file mode 100644 (file)
index 0000000..d0d502f
--- /dev/null
@@ -0,0 +1,179 @@
+       .file   "vacall-powerpc.c"
+       .section        ".text"
+       .align 2
+       .type   callback_receiver, @function
+callback_receiver:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-176(1)
+       mflr 0
+       stw 0,180(1)
+       stw 31,172(1)
+       mr 31,1
+       stw 29,164(1)
+       addi 0,31,184
+       li 29,0
+       stw 0,32(31)
+       stw 29,36(31)
+       lwz 0,0(11)
+       stw 3,52(31)
+       stw 4,56(31)
+       mtctr 0
+       stw 9,76(31)
+       addi 4,31,16
+       stw 30,168(1)
+       stw 5,60(31)
+       stw 6,64(31)
+       stw 7,68(31)
+       stw 8,72(31)
+       stw 10,80(31)
+       stw 29,84(31)
+       stfd 1,88(31)
+       stfd 2,96(31)
+       stfd 3,104(31)
+       stfd 4,112(31)
+       stfd 5,120(31)
+       stfd 6,128(31)
+       stfd 7,136(31)
+       stfd 8,144(31)
+       stw 29,16(31)
+       stw 29,48(31)
+       stw 29,40(31)
+       lwz 3,4(11)
+       bctrl
+       lwz 9,40(31)
+       cmpwi 0,9,0
+       beq- 0,.L1
+       cmpwi 0,9,1
+       beq- 0,.L41
+       cmpwi 0,9,2
+       beq- 0,.L42
+       cmpwi 0,9,3
+       beq- 0,.L41
+       cmpwi 0,9,4
+       beq- 0,.L43
+       cmpwi 0,9,5
+       beq- 0,.L44
+       cmpwi 0,9,6
+       beq- 0,.L40
+       cmpwi 0,9,7
+       beq- 0,.L40
+       cmpwi 0,9,8
+       beq- 0,.L40
+       cmpwi 0,9,9
+       beq- 0,.L40
+       addi 0,9,-10
+       cmplwi 0,0,1
+       bgt- 0,.L22
+       lwz 3,24(31)
+       lwz 4,28(31)
+.L1:
+       lwz 11,0(1)
+       lwz 0,4(11)
+       lwz 29,-12(11)
+       lwz 30,-8(11)
+       mtlr 0
+       lwz 31,-4(11)
+       mr 1,11
+       blr
+.L22:
+       cmpwi 0,9,12
+       beq- 0,.L45
+       cmpwi 0,9,13
+       beq- 0,.L46
+       cmpwi 0,9,14
+       beq- 0,.L40
+       cmpwi 0,9,15
+       bne+ 0,.L1
+       lwz 0,16(31)
+       andi. 9,0,1024
+       beq- 0,.L1
+       lwz 0,44(31)
+       cmpwi 0,0,1
+       beq- 0,.L47
+       cmpwi 0,0,2
+       beq- 0,.L48
+       cmpwi 0,0,4
+       beq- 0,.L49
+       cmpwi 0,0,8
+       bne+ 0,.L1
+       lwz 9,36(31)
+       lwz 4,4(9)
+.L39:
+       lwz 3,0(9)
+       b .L1
+.L49:
+       lwz 9,36(31)
+       b .L39
+.L48:
+       lwz 9,36(31)
+       lhz 3,0(9)
+       b .L1
+.L47:
+       lwz 9,36(31)
+       lbz 3,0(9)
+       b .L1
+.L40:
+       lwz 3,24(31)
+       b .L1
+.L46:
+       lfd 1,24(31)
+       b .L1
+.L45:
+       lfs 1,24(31)
+       b .L1
+.L44:
+       lhz 3,24(31)
+       b .L1
+.L43:
+       lha 3,24(31)
+       b .L1
+.L41:
+       lbz 3,24(31)
+       b .L1
+.L42:
+       lbz 0,24(31)
+       slwi 0,0,24
+       srawi 3,0,24
+       b .L1
+       .size   callback_receiver, .-callback_receiver
+       .section        ".got2","aw"
+.LCTOC1 = .+32768
+       .section        ".text"
+       .section        ".got2","aw"
+.LC0:
+       .long callback_receiver
+       .section        ".text"
+       .align 2
+       .globl callback_get_receiver
+.LCL1:
+       .long .LCTOC1-.LCF1
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       stwu 1,-32(1)
+       mflr 0
+       bcl 20,31,.LCF1
+.LCF1:
+       stw 30,24(1)
+       mflr 30
+       stw 31,28(1)
+       mr 31,1
+       stw 0,36(1)
+       lwz 11,0(1)
+       lwz 0,.LCL1-.LCF1(30)
+       lwz 31,-4(11)
+       add 30,0,30
+       lwz 0,4(11)
+       lwz 3,.LC0-.LCTOC1(30)
+       lwz 30,-8(11)
+       mtlr 0
+       mr 1,11
+       blr
+       .size   callback_get_receiver, .-callback_get_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-powerpc-linux.s b/callback/vacall_r/vacall-powerpc-linux.s
new file mode 100644 (file)
index 0000000..1456743
--- /dev/null
@@ -0,0 +1,178 @@
+       .file   "vacall-powerpc.c"
+       .section        ".text"
+       .align 2
+       .type   callback_receiver, @function
+callback_receiver:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-176(1)
+       mflr 0
+       stw 0,180(1)
+       stw 31,172(1)
+       mr 31,1
+       stw 29,164(1)
+       addi 0,31,184
+       li 29,0
+       stw 0,32(31)
+       stw 29,36(31)
+       lwz 0,0(11)
+       stw 3,52(31)
+       stw 4,56(31)
+       mtctr 0
+       stw 9,76(31)
+       addi 4,31,16
+       stw 30,168(1)
+       stw 5,60(31)
+       stw 6,64(31)
+       stw 7,68(31)
+       stw 8,72(31)
+       stw 10,80(31)
+       stw 29,84(31)
+       stfd 1,88(31)
+       stfd 2,96(31)
+       stfd 3,104(31)
+       stfd 4,112(31)
+       stfd 5,120(31)
+       stfd 6,128(31)
+       stfd 7,136(31)
+       stfd 8,144(31)
+       stw 29,16(31)
+       stw 29,48(31)
+       stw 29,40(31)
+       lwz 3,4(11)
+       bctrl
+       lwz 9,40(31)
+       cmpwi 0,9,0
+       beq- 0,.L1
+       cmpwi 0,9,1
+       beq- 0,.L41
+       cmpwi 0,9,2
+       beq- 0,.L42
+       cmpwi 0,9,3
+       beq- 0,.L41
+       cmpwi 0,9,4
+       beq- 0,.L43
+       cmpwi 0,9,5
+       beq- 0,.L44
+       cmpwi 0,9,6
+       beq- 0,.L40
+       cmpwi 0,9,7
+       beq- 0,.L40
+       cmpwi 0,9,8
+       beq- 0,.L40
+       cmpwi 0,9,9
+       beq- 0,.L40
+       addi 0,9,-10
+       cmplwi 0,0,1
+       bgt- 0,.L22
+       lwz 3,24(31)
+       lwz 4,28(31)
+.L1:
+       lwz 11,0(1)
+       lwz 0,4(11)
+       lwz 29,-12(11)
+       lwz 30,-8(11)
+       mtlr 0
+       lwz 31,-4(11)
+       mr 1,11
+       blr
+.L22:
+       cmpwi 0,9,12
+       beq- 0,.L45
+       cmpwi 0,9,13
+       beq- 0,.L46
+       cmpwi 0,9,14
+       beq- 0,.L40
+       cmpwi 0,9,15
+       bne+ 0,.L1
+       lwz 0,16(31)
+       andi. 9,0,1024
+       beq- 0,.L1
+       lwz 0,44(31)
+       cmpwi 0,0,1
+       beq- 0,.L47
+       cmpwi 0,0,2
+       beq- 0,.L48
+       cmpwi 0,0,4
+       beq- 0,.L49
+       cmpwi 0,0,8
+       bne+ 0,.L1
+       lwz 9,36(31)
+       lwz 4,4(9)
+.L39:
+       lwz 3,0(9)
+       b .L1
+.L49:
+       lwz 9,36(31)
+       b .L39
+.L48:
+       lwz 9,36(31)
+       lhz 3,0(9)
+       b .L1
+.L47:
+       lwz 9,36(31)
+       lbz 3,0(9)
+       b .L1
+.L40:
+       lwz 3,24(31)
+       b .L1
+.L46:
+       lfd 1,24(31)
+       b .L1
+.L45:
+       lfs 1,24(31)
+       b .L1
+.L44:
+       lhz 3,24(31)
+       b .L1
+.L43:
+       lha 3,24(31)
+       b .L1
+.L41:
+       lbz 3,24(31)
+       b .L1
+.L42:
+       lbz 0,24(31)
+       slwi 0,0,24
+       srawi 3,0,24
+       b .L1
+       .size   callback_receiver, .-callback_receiver
+       .section        ".got2","aw"
+.LCTOC1 = .+32768
+       .section        ".text"
+       .section        ".got2","aw"
+.LC0:
+       .long callback_receiver
+       .section        ".text"
+       .align 2
+       .globl callback_get_receiver
+.LCL1:
+       .long .LCTOC1-.LCF1
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       stwu 1,-32(1)
+       mflr 0
+       bcl 20,31,.LCF1
+.LCF1:
+       stw 30,24(1)
+       mflr 30
+       stw 31,28(1)
+       mr 31,1
+       stw 0,36(1)
+       lwz 11,0(1)
+       lwz 0,.LCL1-.LCF1(30)
+       lwz 31,-4(11)
+       add 30,0,30
+       lwz 0,4(11)
+       lwz 3,.LC0-.LCTOC1(30)
+       lwz 30,-8(11)
+       mtlr 0
+       mr 1,11
+       blr
+       .size   callback_get_receiver, .-callback_get_receiver
+       .section        .note.GNU-stack,"",@progbits
+       .ident  "GCC: (GNU) 3.3.6"
diff --git a/callback/vacall_r/vacall-powerpc-macos.s b/callback/vacall_r/vacall-powerpc-macos.s
new file mode 100644 (file)
index 0000000..0c9ce3b
--- /dev/null
@@ -0,0 +1,154 @@
+.text
+       .align 2
+_callback_receiver:
+       mflr r0
+       stmw r29,-12(r1)
+       stw r0,8(r1)
+       li r29,0
+       stwu r1,-224(r1)
+       mr r30,r1
+       addi r0,r30,248
+       stw r29,84(r30)
+       stw r0,80(r30)
+       lwz r0,0(r11)
+       stw r3,248(r30)
+       stw r4,252(r30)
+       mtctr r0
+       stw r9,272(r30)
+       addi r4,r30,64
+       stw r5,256(r30)
+       stw r6,260(r30)
+       stw r7,264(r30)
+       stw r8,268(r30)
+       stw r10,276(r30)
+       stw r29,96(r30)
+       stfd f1,100(r30)
+       stfd f2,108(r30)
+       stfd f3,116(r30)
+       stfd f4,124(r30)
+       stfd f5,132(r30)
+       stfd f6,140(r30)
+       stfd f7,148(r30)
+       stfd f8,156(r30)
+       stfd f9,164(r30)
+       stfd f10,172(r30)
+       stfd f11,180(r30)
+       stfd f12,188(r30)
+       stfd f13,196(r30)
+       stw r29,64(r30)
+       stw r29,88(r30)
+       lwz r3,4(r11)
+       bctrl
+       lwz r9,88(r30)
+       cmpwi cr0,r9,0
+       beq- cr0,L1
+       cmpwi cr0,r9,1
+       beq- cr0,L41
+       cmpwi cr0,r9,2
+       beq- cr0,L41
+       cmpwi cr0,r9,3
+       beq- cr0,L42
+       cmpwi cr0,r9,4
+       beq- cr0,L43
+       cmpwi cr0,r9,5
+       beq- cr0,L44
+       cmpwi cr0,r9,6
+       beq- cr0,L40
+       cmpwi cr0,r9,7
+       beq- cr0,L40
+       cmpwi cr0,r9,8
+       beq- cr0,L40
+       cmpwi cr0,r9,9
+       beq- cr0,L40
+       addi r0,r9,-10
+       cmplwi cr0,r0,1
+       bgt- cr0,L22
+       lwz r3,72(r30)
+       lwz r4,76(r30)
+L1:
+       lwz r1,0(r1)
+       lwz r0,8(r1)
+       lmw r29,-12(r1)
+       mtlr r0
+       blr
+L22:
+       cmpwi cr0,r9,12
+       beq- cr0,L45
+       cmpwi cr0,r9,13
+       beq- cr0,L46
+       cmpwi cr0,r9,14
+       beq- cr0,L40
+       cmpwi cr0,r9,15
+       bne+ cr0,L1
+       lwz r0,64(r30)
+       andi. r9,r0,1024
+       beq- cr0,L1
+       lwz r0,92(r30)
+       cmpwi cr0,r0,1
+       beq- cr0,L47
+       cmpwi cr0,r0,2
+       beq- cr0,L48
+       cmpwi cr0,r0,4
+       beq- cr0,L49
+       cmpwi cr0,r0,8
+       bne+ cr0,L1
+       lwz r9,84(r30)
+       lwz r4,4(r9)
+L39:
+       lwz r3,0(r9)
+       b L1
+L49:
+       lwz r9,84(r30)
+       b L39
+L48:
+       lwz r9,84(r30)
+       lhz r3,0(r9)
+       b L1
+L47:
+       lwz r9,84(r30)
+       lbz r3,0(r9)
+       b L1
+L40:
+       lwz r3,72(r30)
+       b L1
+L46:
+       lfd f1,72(r30)
+       b L1
+L45:
+       lfs f1,72(r30)
+       b L1
+L44:
+       lhz r3,72(r30)
+       b L1
+L43:
+       lha r3,72(r30)
+       b L1
+L42:
+       lbz r3,72(r30)
+       b L1
+L41:
+       lbz r0,72(r30)
+       extsb r3,r0
+       b L1
+       .align 2
+       .globl _callback_get_receiver
+_callback_get_receiver:
+       mflr r0
+       stmw r30,-8(r1)
+       stw r0,8(r1)
+       bcl 20,31,L1$pb
+L1$pb:
+       stwu r1,-48(r1)
+       mflr r31
+       addis r9,r31,ha16(L_callback_receiver$non_lazy_ptr-L1$pb)
+       mr r30,r1
+       lwz r3,lo16(L_callback_receiver$non_lazy_ptr-L1$pb)(r9)
+       lwz r1,0(r1)
+       lwz r0,8(r1)
+       lmw r30,-8(r1)
+       mtlr r0
+       blr
+.data
+       .align 2
+L_callback_receiver$non_lazy_ptr:
+       .long   _callback_receiver
diff --git a/callback/vacall_r/vacall-powerpc-sysv4-macro.S b/callback/vacall_r/vacall-powerpc-sysv4-macro.S
new file mode 100644 (file)
index 0000000..d0d502f
--- /dev/null
@@ -0,0 +1,179 @@
+       .file   "vacall-powerpc.c"
+       .section        ".text"
+       .align 2
+       .type   callback_receiver, @function
+callback_receiver:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-176(1)
+       mflr 0
+       stw 0,180(1)
+       stw 31,172(1)
+       mr 31,1
+       stw 29,164(1)
+       addi 0,31,184
+       li 29,0
+       stw 0,32(31)
+       stw 29,36(31)
+       lwz 0,0(11)
+       stw 3,52(31)
+       stw 4,56(31)
+       mtctr 0
+       stw 9,76(31)
+       addi 4,31,16
+       stw 30,168(1)
+       stw 5,60(31)
+       stw 6,64(31)
+       stw 7,68(31)
+       stw 8,72(31)
+       stw 10,80(31)
+       stw 29,84(31)
+       stfd 1,88(31)
+       stfd 2,96(31)
+       stfd 3,104(31)
+       stfd 4,112(31)
+       stfd 5,120(31)
+       stfd 6,128(31)
+       stfd 7,136(31)
+       stfd 8,144(31)
+       stw 29,16(31)
+       stw 29,48(31)
+       stw 29,40(31)
+       lwz 3,4(11)
+       bctrl
+       lwz 9,40(31)
+       cmpwi 0,9,0
+       beq- 0,.L1
+       cmpwi 0,9,1
+       beq- 0,.L41
+       cmpwi 0,9,2
+       beq- 0,.L42
+       cmpwi 0,9,3
+       beq- 0,.L41
+       cmpwi 0,9,4
+       beq- 0,.L43
+       cmpwi 0,9,5
+       beq- 0,.L44
+       cmpwi 0,9,6
+       beq- 0,.L40
+       cmpwi 0,9,7
+       beq- 0,.L40
+       cmpwi 0,9,8
+       beq- 0,.L40
+       cmpwi 0,9,9
+       beq- 0,.L40
+       addi 0,9,-10
+       cmplwi 0,0,1
+       bgt- 0,.L22
+       lwz 3,24(31)
+       lwz 4,28(31)
+.L1:
+       lwz 11,0(1)
+       lwz 0,4(11)
+       lwz 29,-12(11)
+       lwz 30,-8(11)
+       mtlr 0
+       lwz 31,-4(11)
+       mr 1,11
+       blr
+.L22:
+       cmpwi 0,9,12
+       beq- 0,.L45
+       cmpwi 0,9,13
+       beq- 0,.L46
+       cmpwi 0,9,14
+       beq- 0,.L40
+       cmpwi 0,9,15
+       bne+ 0,.L1
+       lwz 0,16(31)
+       andi. 9,0,1024
+       beq- 0,.L1
+       lwz 0,44(31)
+       cmpwi 0,0,1
+       beq- 0,.L47
+       cmpwi 0,0,2
+       beq- 0,.L48
+       cmpwi 0,0,4
+       beq- 0,.L49
+       cmpwi 0,0,8
+       bne+ 0,.L1
+       lwz 9,36(31)
+       lwz 4,4(9)
+.L39:
+       lwz 3,0(9)
+       b .L1
+.L49:
+       lwz 9,36(31)
+       b .L39
+.L48:
+       lwz 9,36(31)
+       lhz 3,0(9)
+       b .L1
+.L47:
+       lwz 9,36(31)
+       lbz 3,0(9)
+       b .L1
+.L40:
+       lwz 3,24(31)
+       b .L1
+.L46:
+       lfd 1,24(31)
+       b .L1
+.L45:
+       lfs 1,24(31)
+       b .L1
+.L44:
+       lhz 3,24(31)
+       b .L1
+.L43:
+       lha 3,24(31)
+       b .L1
+.L41:
+       lbz 3,24(31)
+       b .L1
+.L42:
+       lbz 0,24(31)
+       slwi 0,0,24
+       srawi 3,0,24
+       b .L1
+       .size   callback_receiver, .-callback_receiver
+       .section        ".got2","aw"
+.LCTOC1 = .+32768
+       .section        ".text"
+       .section        ".got2","aw"
+.LC0:
+       .long callback_receiver
+       .section        ".text"
+       .align 2
+       .globl callback_get_receiver
+.LCL1:
+       .long .LCTOC1-.LCF1
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       stwu 1,-32(1)
+       mflr 0
+       bcl 20,31,.LCF1
+.LCF1:
+       stw 30,24(1)
+       mflr 30
+       stw 31,28(1)
+       mr 31,1
+       stw 0,36(1)
+       lwz 11,0(1)
+       lwz 0,.LCL1-.LCF1(30)
+       lwz 31,-4(11)
+       add 30,0,30
+       lwz 0,4(11)
+       lwz 3,.LC0-.LCTOC1(30)
+       lwz 30,-8(11)
+       mtlr 0
+       mr 1,11
+       blr
+       .size   callback_get_receiver, .-callback_get_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-powerpc64-aix.s b/callback/vacall_r/vacall-powerpc64-aix.s
new file mode 100644 (file)
index 0000000..39d740a
--- /dev/null
@@ -0,0 +1,176 @@
+       .file   "../../vacall/vacall-powerpc64.c"
+       .csect .text[PR]
+       .toc
+       .csect .text[PR]
+       .align 2
+       .align 4
+       .lglobl .callback_receiver
+       .csect callback_receiver[DS],3
+callback_receiver:
+       .llong .callback_receiver, TOC[tc0], 0
+       .csect .text[PR]
+.callback_receiver:
+       mflr 0
+       std 30,-16(1)
+       std 31,-8(1)
+       li 30,0
+       std 0,16(1)
+       li 0,0
+       stdu 1,-304(1)
+       ld 12,0(11)
+       mr 31,1
+       std 9,400(31)
+       addi 9,31,352
+       stfd 1,172(31)
+       stw 0,152(31)
+       stw 0,168(31)
+       std 3,352(31)
+       std 4,360(31)
+       ld 3,8(11)
+       std 5,368(31)
+       addi 4,31,112
+       std 6,376(31)
+       std 7,384(31)
+       std 8,392(31)
+       std 10,408(31)
+       stfd 2,180(31)
+       stfd 3,188(31)
+       stfd 4,196(31)
+       stfd 5,204(31)
+       stfd 6,212(31)
+       stfd 7,220(31)
+       stfd 8,228(31)
+       stfd 9,236(31)
+       stfd 10,244(31)
+       stfd 11,252(31)
+       stfd 12,260(31)
+       stfd 13,268(31)
+       std 9,136(31)
+       std 0,144(31)
+       stw 30,112(31)
+       std 2,40(1)
+       ld 9,0(12)
+       ld 11,16(12)
+       mtctr 9
+       ld 2,8(12)
+       bctrl
+       ld 2,40(1)
+       lwz 9,152(31)
+       cmpdi 7,9,0
+       beq 7,L..1
+       cmplwi 7,9,1
+       beq 7,L..20
+       cmplwi 7,9,2
+       beq 7,L..23
+       cmplwi 7,9,3
+       beq 7,L..20
+       cmplwi 7,9,4
+       beq 7,L..24
+       cmplwi 7,9,5
+       beq 7,L..25
+       cmplwi 7,9,6
+       beq 7,L..26
+       cmplwi 7,9,7
+       beq 7,L..27
+       cmplwi 7,9,8
+       beq 7,L..21
+       cmplwi 7,9,9
+       beq 7,L..21
+       cmplwi 7,9,10
+       beq 7,L..21
+       cmplwi 7,9,11
+       beq 7,L..21
+       cmplwi 7,9,12
+       beq 7,L..28
+       cmplwi 7,9,13
+       beq 7,L..29
+       cmplwi 7,9,14
+       beq 7,L..21
+L..1:
+       addi 1,31,304
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .align 4
+L..20:
+       lbz 3,120(31)
+       addi 1,31,304
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .align 4
+L..23:
+       lbz 9,120(31)
+       extsb 3,9
+       b L..1
+       .align 4
+L..21:
+       ld 3,120(31)
+       b L..1
+       .align 4
+L..24:
+       lha 3,120(31)
+       b L..1
+       .align 4
+L..25:
+       lhz 3,120(31)
+       b L..1
+       .align 4
+L..26:
+       lwa 3,120(31)
+       b L..1
+       .align 4
+L..28:
+       lfs 1,120(31)
+       b L..1
+       .align 4
+L..27:
+       lwz 3,120(31)
+       b L..1
+L..29:
+       lfd 1,120(31)
+       b L..1
+LT..callback_receiver:
+       .long 0
+       .byte 0,0,32,97,128,2,8,0
+       .long 0
+       .long LT..callback_receiver-.callback_receiver
+       .short 17
+       .byte "callback_receiver"
+       .byte 31
+       .align 2
+       .toc
+LC..0:
+       .tc callback_receiver[TC],callback_receiver
+       .csect .text[PR]
+       .align 2
+       .align 4
+       .globl callback_get_receiver
+       .globl .callback_get_receiver
+       .csect callback_get_receiver[DS],3
+callback_get_receiver:
+       .llong .callback_get_receiver, TOC[tc0], 0
+       .csect .text[PR]
+.callback_get_receiver:
+       std 31,-8(1)
+       ld 3,LC..0(2)
+       stdu 1,-64(1)
+       mr 31,1
+       addi 1,31,64
+       ld 31,-8(1)
+       blr
+LT..callback_get_receiver:
+       .long 0
+       .byte 0,0,32,96,128,1,0,0
+       .long LT..callback_get_receiver-.callback_get_receiver
+       .short 21
+       .byte "callback_get_receiver"
+       .byte 31
+       .align 2
+_section_.text:
+       .csect .data[RW],4
+       .llong _section_.text
diff --git a/callback/vacall_r/vacall-powerpc64-elfv2-linux.S b/callback/vacall_r/vacall-powerpc64-elfv2-linux.S
new file mode 100644 (file)
index 0000000..25af0eb
--- /dev/null
@@ -0,0 +1,241 @@
+       .file   "vacall-powerpc64.c"
+       .machine power4
+       .abiversion 2
+       .section        ".toc","aw"
+       .section        ".text"
+       .align 2
+       .p2align 4,,15
+       .type   callback_receiver, @function
+callback_receiver:
+0:     addis 2,12,.TOC.-0b@ha
+       addi 2,2,.TOC.-0b@l
+       .localentry     callback_receiver,.-callback_receiver
+       mflr 0
+       std 30,-16(1)
+       std 31,-8(1)
+       std 0,16(1)
+       stdu 1,-224(1)
+       li 0,0
+       ld 30,0(11)
+       mr 31,1
+       std 3,256(31)
+       std 4,264(31)
+       addi 4,31,32
+       ld 3,8(11)
+       std 9,304(31)
+       mtctr 30
+       li 9,0
+       std 5,272(31)
+       std 6,280(31)
+       std 7,288(31)
+       std 8,296(31)
+       stw 9,32(31)
+       std 10,312(31)
+       stfd 1,96(31)
+       stfd 2,104(31)
+       mr 12,30
+       addi 9,31,256
+       stfd 3,112(31)
+       stfd 4,120(31)
+       stfd 5,128(31)
+       stfd 6,136(31)
+       std 9,56(31)
+       stfd 7,144(31)
+       stfd 8,152(31)
+       stfd 9,160(31)
+       stfd 10,168(31)
+       stfd 11,176(31)
+       stfd 12,184(31)
+       stfd 13,192(31)
+       std 0,64(31)
+       stw 0,72(31)
+       stw 0,88(31)
+       std 2,24(1)
+       bctrl
+       ld 2,24(1)
+       lwz 9,72(31)
+       cmpdi 7,9,0
+       beq 7,.L1
+       cmplwi 7,9,1
+       beq 7,.L27
+       cmplwi 7,9,2
+       beq 7,.L30
+       cmplwi 7,9,3
+       beq 7,.L27
+       cmplwi 7,9,4
+       beq 7,.L31
+       cmplwi 7,9,5
+       beq 7,.L32
+       cmplwi 7,9,6
+       beq 7,.L33
+       cmplwi 7,9,7
+       beq 7,.L34
+       cmplwi 7,9,8
+       beq 7,.L28
+       cmplwi 7,9,9
+       beq 7,.L28
+       cmplwi 7,9,10
+       beq 7,.L28
+       cmplwi 7,9,11
+       beq 7,.L28
+       cmplwi 7,9,12
+       beq 7,.L35
+       cmplwi 7,9,13
+       beq 7,.L36
+       cmplwi 7,9,14
+       beq 7,.L28
+       cmplwi 7,9,15
+       bne 7,.L1
+       lwz 9,32(31)
+       rldicl. 10,9,54,63
+       beq 0,.L1
+       ld 9,80(31)
+       addi 10,9,-1
+       cmpldi 7,10,15
+       bgt 7,.L1
+       ld 8,64(31)
+       cmpldi 7,9,8
+       rldicl 10,8,0,61
+       rldicr 8,8,0,60
+       add 9,9,10
+       bgt 7,.L17
+       cmpldi 7,9,8
+       slwi 9,9,3
+       bgt 7,.L18
+       ld 7,0(8)
+       addi 9,9,-1
+       li 8,2
+       slwi 10,10,3
+       sld 9,8,9
+       addi 9,9,-1
+       and 9,9,7
+       srad 3,9,10
+.L1:
+       addi 1,31,224
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L27:
+       addi 1,31,224
+       lbz 3,40(31)
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L30:
+       lbz 9,40(31)
+       extsb 3,9
+       b .L1
+       .p2align 4,,15
+.L28:
+       ld 3,40(31)
+       b .L1
+       .p2align 4,,15
+.L31:
+       lha 3,40(31)
+       b .L1
+       .p2align 4,,15
+.L32:
+       lhz 3,40(31)
+       b .L1
+       .p2align 4,,15
+.L33:
+       lwa 3,40(31)
+       b .L1
+       .p2align 4,,15
+.L35:
+       lfs 1,40(31)
+       b .L1
+       .p2align 4,,15
+.L34:
+       lwz 3,40(31)
+       b .L1
+.L36:
+       lfd 1,40(31)
+       b .L1
+.L17:
+       cmpldi 7,9,16
+       rldicl 10,10,0,32
+       slwi 9,9,3
+       ble 7,.L37
+       li 7,2
+       addi 9,9,-129
+       ld 0,16(8)
+       ld 5,0(8)
+       mulli 6,10,-8
+       sld 9,7,9
+       ld 7,8(8)
+       addi 8,9,-1
+       slwi 9,10,3
+       addi 6,6,64
+       and 10,8,0
+       srad 8,5,9
+       sld 5,7,6
+       srad 9,7,9
+       sld 10,10,6
+       or 3,8,5
+       or 4,10,9
+       b .L1
+.L18:
+       rldicl 10,10,0,32
+       li 7,2
+       ld 6,8(8)
+       ld 8,0(8)
+       addi 9,9,-65
+       sld 9,7,9
+       mulli 7,10,-8
+       slwi 10,10,3
+       addi 9,9,-1
+       srad 10,8,10
+       and 9,9,6
+       addi 7,7,64
+       sld 9,9,7
+       or 3,9,10
+       b .L1
+.L37:
+       li 7,2
+       addi 9,9,-65
+       ld 5,8(8)
+       ld 6,0(8)
+       sld 9,7,9
+       mulli 7,10,-4
+       addi 9,9,-1
+       addi 7,7,32
+       and 8,9,5
+       slwi 9,10,3
+       sld 10,8,7
+       srad 6,6,9
+       srad 4,8,9
+       sld 7,10,7
+       or 3,6,7
+       b .L1
+       .long 0
+       .byte 0,0,0,1,128,2,0,0
+       .size   callback_receiver,.-callback_receiver
+       .align 2
+       .p2align 4,,15
+       .globl callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+0:     addis 2,12,.TOC.-0b@ha
+       addi 2,2,.TOC.-0b@l
+       .localentry     callback_get_receiver,.-callback_get_receiver
+       std 31,-8(1)
+       stdu 1,-48(1)
+       addis 3,2,callback_receiver@toc@ha
+       addi 3,3,callback_receiver@toc@l
+       mr 31,1
+       addi 1,31,48
+       ld 31,-8(1)
+       blr
+       .long 0
+       .byte 0,0,0,0,128,1,0,0
+       .size   callback_get_receiver,.-callback_get_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-powerpc64-linux.S b/callback/vacall_r/vacall-powerpc64-linux.S
new file mode 100644 (file)
index 0000000..581289b
--- /dev/null
@@ -0,0 +1,164 @@
+       .file   "vacall-powerpc64.c"
+       .machine power4
+       .section        ".toc","aw"
+       .section        ".text"
+       .align 2
+       .p2align 4,,15
+       .section        ".opd","aw"
+       .align 3
+callback_receiver:
+       .quad   .L.callback_receiver,.TOC.@tocbase,0
+       .previous
+       .type   callback_receiver, @function
+.L.callback_receiver:
+       mflr 0
+       std 30,-16(1)
+       std 31,-8(1)
+       li 30,0
+       std 0,16(1)
+       stdu 1,-304(1)
+       li 0,0
+       mr 31,1
+       ld 12,0(11)
+       std 9,400(31)
+       addi 9,31,352
+       stw 0,152(31)
+       stw 0,168(31)
+       std 3,352(31)
+       std 4,360(31)
+       ld 3,8(11)
+       std 5,368(31)
+       std 6,376(31)
+       addi 4,31,112
+       std 7,384(31)
+       std 8,392(31)
+       std 10,408(31)
+       stfd 1,176(31)
+       stfd 2,184(31)
+       stfd 3,192(31)
+       stfd 4,200(31)
+       stfd 5,208(31)
+       stfd 6,216(31)
+       stfd 7,224(31)
+       stfd 8,232(31)
+       stfd 9,240(31)
+       stfd 10,248(31)
+       stfd 11,256(31)
+       stfd 12,264(31)
+       stfd 13,272(31)
+       std 9,136(31)
+       std 0,144(31)
+       stw 30,112(31)
+       std 2,40(1)
+       ld 9,0(12)
+       ld 11,16(12)
+       mtctr 9
+       ld 2,8(12)
+       bctrl
+       ld 2,40(1)
+       lwz 9,152(31)
+       cmpdi 7,9,0
+       beq 7,.L1
+       cmplwi 7,9,1
+       beq 7,.L20
+       cmplwi 7,9,2
+       beq 7,.L23
+       cmplwi 7,9,3
+       beq 7,.L20
+       cmplwi 7,9,4
+       beq 7,.L24
+       cmplwi 7,9,5
+       beq 7,.L25
+       cmplwi 7,9,6
+       beq 7,.L26
+       cmplwi 7,9,7
+       beq 7,.L27
+       cmplwi 7,9,8
+       beq 7,.L21
+       cmplwi 7,9,9
+       beq 7,.L21
+       cmplwi 7,9,10
+       beq 7,.L21
+       cmplwi 7,9,11
+       beq 7,.L21
+       cmplwi 7,9,12
+       beq 7,.L28
+       cmplwi 7,9,13
+       beq 7,.L29
+       cmplwi 7,9,14
+       beq 7,.L21
+.L1:
+       addi 1,31,304
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L20:
+       lbz 3,120(31)
+       addi 1,31,304
+       ld 0,16(1)
+       ld 30,-16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L23:
+       lbz 9,120(31)
+       extsb 3,9
+       b .L1
+       .p2align 4,,15
+.L21:
+       ld 3,120(31)
+       b .L1
+       .p2align 4,,15
+.L24:
+       lha 3,120(31)
+       b .L1
+       .p2align 4,,15
+.L25:
+       lhz 3,120(31)
+       b .L1
+       .p2align 4,,15
+.L26:
+       lwa 3,120(31)
+       b .L1
+       .p2align 4,,15
+.L28:
+       lfs 1,120(31)
+       b .L1
+       .p2align 4,,15
+.L27:
+       lwz 3,120(31)
+       b .L1
+.L29:
+       lfd 1,120(31)
+       b .L1
+       .long 0
+       .byte 0,0,0,1,128,2,0,0
+       .size   callback_receiver,.-.L.callback_receiver
+       .align 2
+       .p2align 4,,15
+       .globl callback_get_receiver
+       .section        ".opd","aw"
+       .align 3
+callback_get_receiver:
+       .quad   .L.callback_get_receiver,.TOC.@tocbase,0
+       .previous
+       .type   callback_get_receiver, @function
+.L.callback_get_receiver:
+       std 31,-8(1)
+       stdu 1,-64(1)
+       addis 3,2,callback_receiver@toc@ha
+       addi 3,3,callback_receiver@toc@l
+       mr 31,1
+       addi 1,31,64
+       ld 31,-8(1)
+       blr
+       .long 0
+       .byte 0,0,0,0,128,1,0,0
+       .size   callback_get_receiver,.-.L.callback_get_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-riscv32-ilp32d-linux.s b/callback/vacall_r/vacall-riscv32-ilp32d-linux.s
new file mode 100644 (file)
index 0000000..d01ebaa
--- /dev/null
@@ -0,0 +1,174 @@
+       .file   "vacall-riscv32.c"
+       .option pic
+       .text
+       .align  1
+       .type   callback_receiver, @function
+callback_receiver:
+       add     sp,sp,-208
+       sw      ra,188(sp)
+       sw      s0,184(sp)
+       add     s0,sp,192
+       sw      a1,-144(s0)
+       add     a1,s0,16
+       lw      t3,0(t2)
+       sw      a7,12(s0)
+       sw      a2,-140(s0)
+       sw      a3,-136(s0)
+       sw      a4,-132(s0)
+       sw      a5,-128(s0)
+       sw      a6,-124(s0)
+       sw      a7,-120(s0)
+       fsw     fa0,-112(s0)
+       fsw     fa1,-108(s0)
+       fsw     fa2,-104(s0)
+       fsw     fa3,-100(s0)
+       fsw     fa4,-96(s0)
+       fsw     fa5,-92(s0)
+       fsw     fa6,-88(s0)
+       fsw     fa7,-84(s0)
+       fsd     fa0,-80(s0)
+       fsd     fa1,-72(s0)
+       fsd     fa2,-64(s0)
+       fsd     fa3,-56(s0)
+       fsd     fa4,-48(s0)
+       fsd     fa5,-40(s0)
+       fsd     fa6,-32(s0)
+       fsd     fa7,-24(s0)
+       sw      a1,-168(s0)
+       sw      a0,-148(s0)
+       sw      zero,-184(s0)
+       sw      zero,-164(s0)
+       sw      zero,-160(s0)
+       lw      a0,4(t2)
+       sw      zero,-152(s0)
+       sw      zero,-116(s0)
+       add     a1,s0,-184
+       jalr    t3
+       lw      t1,-160(s0)
+       beqz    t1,.L1
+       li      t3,1
+       beq     t1,t3,.L22
+       li      t3,2
+       beq     t1,t3,.L25
+       li      t3,3
+       beq     t1,t3,.L22
+       li      t3,4
+       beq     t1,t3,.L26
+       li      t3,5
+       beq     t1,t3,.L27
+       li      t3,6
+       beq     t1,t3,.L23
+       li      t3,7
+       beq     t1,t3,.L23
+       li      t3,8
+       beq     t1,t3,.L23
+       li      t3,9
+       beq     t1,t3,.L23
+       add     t3,t1,-10
+       li      t4,1
+       bleu    t3,t4,.L28
+       li      t3,12
+       beq     t1,t3,.L29
+       li      t3,13
+       beq     t1,t3,.L30
+       li      t3,14
+       beq     t1,t3,.L23
+       li      t3,15
+       bne     t1,t3,.L1
+       lw      t1,-184(s0)
+       and     t1,t1,2
+       beqz    t1,.L1
+       lw      t3,-156(s0)
+       li      t1,7
+       add     t5,t3,-1
+       bgtu    t5,t1,.L1
+       lw      t1,-164(s0)
+       lbu     t5,0(t1)
+       mv      a0,t5
+       beq     t3,t4,.L1
+       lbu     t4,1(t1)
+       li      t6,2
+       sll     t4,t4,8
+       or      t5,t4,t5
+       mv      a0,t5
+       beq     t3,t6,.L1
+       lbu     t4,2(t1)
+       li      t6,3
+       sll     t4,t4,16
+       or      t4,t4,t5
+       mv      a0,t4
+       beq     t3,t6,.L1
+       lbu     a0,3(t1)
+       li      t5,4
+       sll     a0,a0,24
+       or      a0,a0,t4
+       beq     t3,t5,.L1
+       lbu     t5,4(t1)
+       li      t4,5
+       mv      a1,t5
+       beq     t3,t4,.L1
+       lbu     t4,5(t1)
+       li      t6,6
+       sll     t4,t4,8
+       or      t5,t4,t5
+       mv      a1,t5
+       beq     t3,t6,.L1
+       lbu     t4,6(t1)
+       li      t6,8
+       sll     t4,t4,16
+       or      t4,t4,t5
+       mv      a1,t4
+       bne     t3,t6,.L1
+       lbu     a1,7(t1)
+       sll     a1,a1,24
+       or      a1,a1,t4
+.L1:
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L22:
+       lbu     a0,-176(s0)
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L23:
+       lw      a0,-176(s0)
+       j       .L1
+.L25:
+       lb      a0,-176(s0)
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L26:
+       lh      a0,-176(s0)
+       j       .L1
+.L27:
+       lhu     a0,-176(s0)
+       j       .L1
+.L28:
+       lw      a0,-176(s0)
+       lw      a1,-172(s0)
+       j       .L1
+.L29:
+       flw     fa0,-176(s0)
+       j       .L1
+.L30:
+       fld     fa0,-176(s0)
+       j       .L1
+       .size   callback_receiver, .-callback_receiver
+       .align  1
+       .globl  callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       add     sp,sp,-16
+       sw      s0,12(sp)
+       add     s0,sp,16
+       lw      s0,12(sp)
+       lla     a0,callback_receiver
+       add     sp,sp,16
+       jr      ra
+       .size   callback_get_receiver, .-callback_get_receiver
+       .ident  "GCC: (GNU) 7.3.0"
diff --git a/callback/vacall_r/vacall-riscv32-ilp32d-macro.S b/callback/vacall_r/vacall-riscv32-ilp32d-macro.S
new file mode 100644 (file)
index 0000000..c29c138
--- /dev/null
@@ -0,0 +1,176 @@
+       .file   "vacall-riscv32.c"
+       .option pic
+       .text
+       .align  1
+       .type   callback_receiver, @function
+callback_receiver:
+       add     sp,sp,-208
+       sw      ra,188(sp)
+       sw      s0,184(sp)
+       add     s0,sp,192
+       sw      a1,-144(s0)
+       add     a1,s0,16
+       lw      t3,0(t2)
+       sw      a7,12(s0)
+       sw      a2,-140(s0)
+       sw      a3,-136(s0)
+       sw      a4,-132(s0)
+       sw      a5,-128(s0)
+       sw      a6,-124(s0)
+       sw      a7,-120(s0)
+       fsw     fa0,-112(s0)
+       fsw     fa1,-108(s0)
+       fsw     fa2,-104(s0)
+       fsw     fa3,-100(s0)
+       fsw     fa4,-96(s0)
+       fsw     fa5,-92(s0)
+       fsw     fa6,-88(s0)
+       fsw     fa7,-84(s0)
+       fsd     fa0,-80(s0)
+       fsd     fa1,-72(s0)
+       fsd     fa2,-64(s0)
+       fsd     fa3,-56(s0)
+       fsd     fa4,-48(s0)
+       fsd     fa5,-40(s0)
+       fsd     fa6,-32(s0)
+       fsd     fa7,-24(s0)
+       sw      a1,-168(s0)
+       sw      a0,-148(s0)
+       sw      zero,-184(s0)
+       sw      zero,-164(s0)
+       sw      zero,-160(s0)
+       lw      a0,4(t2)
+       sw      zero,-152(s0)
+       sw      zero,-116(s0)
+       add     a1,s0,-184
+       jalr    t3
+       lw      t1,-160(s0)
+       beqz    t1,.L1
+       li      t3,1
+       beq     t1,t3,.L22
+       li      t3,2
+       beq     t1,t3,.L25
+       li      t3,3
+       beq     t1,t3,.L22
+       li      t3,4
+       beq     t1,t3,.L26
+       li      t3,5
+       beq     t1,t3,.L27
+       li      t3,6
+       beq     t1,t3,.L23
+       li      t3,7
+       beq     t1,t3,.L23
+       li      t3,8
+       beq     t1,t3,.L23
+       li      t3,9
+       beq     t1,t3,.L23
+       add     t3,t1,-10
+       li      t4,1
+       bleu    t3,t4,.L28
+       li      t3,12
+       beq     t1,t3,.L29
+       li      t3,13
+       beq     t1,t3,.L30
+       li      t3,14
+       beq     t1,t3,.L23
+       li      t3,15
+       bne     t1,t3,.L1
+       lw      t1,-184(s0)
+       and     t1,t1,2
+       beqz    t1,.L1
+       lw      t3,-156(s0)
+       li      t1,7
+       add     t5,t3,-1
+       bgtu    t5,t1,.L1
+       lw      t1,-164(s0)
+       lbu     t5,0(t1)
+       mv      a0,t5
+       beq     t3,t4,.L1
+       lbu     t4,1(t1)
+       li      t6,2
+       sll     t4,t4,8
+       or      t5,t4,t5
+       mv      a0,t5
+       beq     t3,t6,.L1
+       lbu     t4,2(t1)
+       li      t6,3
+       sll     t4,t4,16
+       or      t4,t4,t5
+       mv      a0,t4
+       beq     t3,t6,.L1
+       lbu     a0,3(t1)
+       li      t5,4
+       sll     a0,a0,24
+       or      a0,a0,t4
+       beq     t3,t5,.L1
+       lbu     t5,4(t1)
+       li      t4,5
+       mv      a1,t5
+       beq     t3,t4,.L1
+       lbu     t4,5(t1)
+       li      t6,6
+       sll     t4,t4,8
+       or      t5,t4,t5
+       mv      a1,t5
+       beq     t3,t6,.L1
+       lbu     t4,6(t1)
+       li      t6,8
+       sll     t4,t4,16
+       or      t4,t4,t5
+       mv      a1,t4
+       bne     t3,t6,.L1
+       lbu     a1,7(t1)
+       sll     a1,a1,24
+       or      a1,a1,t4
+.L1:
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L22:
+       lbu     a0,-176(s0)
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L23:
+       lw      a0,-176(s0)
+       j       .L1
+.L25:
+       lb      a0,-176(s0)
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L26:
+       lh      a0,-176(s0)
+       j       .L1
+.L27:
+       lhu     a0,-176(s0)
+       j       .L1
+.L28:
+       lw      a0,-176(s0)
+       lw      a1,-172(s0)
+       j       .L1
+.L29:
+       flw     fa0,-176(s0)
+       j       .L1
+.L30:
+       fld     fa0,-176(s0)
+       j       .L1
+       .size   callback_receiver, .-callback_receiver
+       .align  1
+       .globl  callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       add     sp,sp,-16
+       sw      s0,12(sp)
+       add     s0,sp,16
+       lw      s0,12(sp)
+       lla     a0,callback_receiver
+       add     sp,sp,16
+       jr      ra
+       .size   callback_get_receiver, .-callback_get_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-riscv64-lp64d-linux.s b/callback/vacall_r/vacall-riscv64-lp64d-linux.s
new file mode 100644 (file)
index 0000000..0eae01a
--- /dev/null
@@ -0,0 +1,205 @@
+       .file   "vacall-riscv64.c"
+       .option pic
+       .text
+       .align  1
+       .type   callback_receiver, @function
+callback_receiver:
+       add     sp,sp,-288
+       sd      ra,264(sp)
+       sd      s0,256(sp)
+       sd      s1,248(sp)
+       add     s0,sp,272
+       sd      s2,240(sp)
+       sd      a1,-192(s0)
+       add     a1,s0,16
+       ld      t3,0(t2)
+       sd      a7,8(s0)
+       sd      a2,-184(s0)
+       sd      a3,-176(s0)
+       sd      a4,-168(s0)
+       sd      a5,-160(s0)
+       sd      a6,-152(s0)
+       sd      a7,-144(s0)
+       fsw     fa0,-132(s0)
+       fsw     fa1,-128(s0)
+       fsw     fa2,-124(s0)
+       fsw     fa3,-120(s0)
+       fsw     fa4,-116(s0)
+       fsw     fa5,-112(s0)
+       fsw     fa6,-108(s0)
+       fsw     fa7,-104(s0)
+       fsd     fa0,-96(s0)
+       fsd     fa1,-88(s0)
+       fsd     fa2,-80(s0)
+       fsd     fa3,-72(s0)
+       fsd     fa4,-64(s0)
+       fsd     fa5,-56(s0)
+       fsd     fa6,-48(s0)
+       fsd     fa7,-40(s0)
+       sd      a1,-240(s0)
+       sd      a0,-200(s0)
+       sw      zero,-264(s0)
+       ld      a0,8(t2)
+       sd      zero,-232(s0)
+       sw      zero,-224(s0)
+       sw      zero,-208(s0)
+       sw      zero,-136(s0)
+       add     a1,s0,-264
+       jalr    t3
+       lw      t1,-224(s0)
+       beqz    t1,.L1
+       li      t3,1
+       beq     t1,t3,.L25
+       li      t3,2
+       beq     t1,t3,.L29
+       li      t3,3
+       beq     t1,t3,.L25
+       li      t3,4
+       beq     t1,t3,.L30
+       li      t3,5
+       beq     t1,t3,.L31
+       li      t3,6
+       beq     t1,t3,.L32
+       li      t3,7
+       beq     t1,t3,.L33
+       and     t3,t1,-3
+       li      t4,8
+       beq     t3,t4,.L27
+       li      t4,9
+       beq     t3,t4,.L27
+       li      t3,12
+       beq     t1,t3,.L34
+       li      t3,13
+       beq     t1,t3,.L35
+       li      t3,14
+       beq     t1,t3,.L27
+       li      t3,15
+       bne     t1,t3,.L1
+       lw      t3,-264(s0)
+       and     t3,t3,1024
+       beqz    t3,.L1
+       ld      t0,-216(s0)
+       add     t3,t0,-1
+       bgtu    t3,t1,.L1
+       ld      t5,-232(s0)
+       li      s2,8
+       and     t6,t5,7
+       add     s1,t0,t6
+       and     t5,t5,-8
+       sext.w  t6,t6
+       sllw    t1,s1,3
+       ld      t4,0(t5)
+       sll     t3,t6,3
+       bgtu    t0,s2,.L15
+       bgtu    s1,s2,.L16
+       addw    t1,t1,-1
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t4
+       sra     a0,a0,t3
+.L1:
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       ld      s2,240(sp)
+       add     sp,sp,288
+       jr      ra
+.L25:
+       lbu     a0,-256(s0)
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       ld      s2,240(sp)
+       add     sp,sp,288
+       jr      ra
+.L29:
+       lb      a0,-256(s0)
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       ld      s2,240(sp)
+       add     sp,sp,288
+       jr      ra
+.L30:
+       lh      a0,-256(s0)
+       j       .L1
+.L33:
+       lwu     a0,-256(s0)
+       j       .L1
+.L31:
+       lhu     a0,-256(s0)
+       j       .L1
+.L27:
+       ld      a0,-256(s0)
+       j       .L1
+.L32:
+       lw      a0,-256(s0)
+       j       .L1
+.L34:
+       flw     fa0,-256(s0)
+       j       .L1
+.L35:
+       fld     fa0,-256(s0)
+       j       .L1
+.L15:
+       li      s2,16
+       sra     t4,t4,t3
+       ld      t0,8(t5)
+       bleu    s1,s2,.L36
+       li      a1,-8
+       mulw    t6,a1,t6
+       addw    t1,t1,-129
+       ld      a0,16(t5)
+       li      a1,2
+       sll     a1,a1,t1
+       add     a1,a1,-1
+       and     a1,a1,a0
+       sra     t3,t0,t3
+       addw    t1,t6,64
+       sll     a0,t0,t1
+       sll     a1,a1,t1
+       or      a0,a0,t4
+       or      a1,a1,t3
+       j       .L1
+.L16:
+       li      a0,-8
+       mulw    t6,a0,t6
+       addw    t1,t1,-65
+       ld      t5,8(t5)
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t5
+       sra     t4,t4,t3
+       sll     a0,a0,t6
+       or      a0,a0,t4
+       j       .L1
+.L36:
+       li      a1,-4
+       mulw    t6,a1,t6
+       addw    t1,t1,-65
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t0
+       sra     a1,a0,t3
+       addw    t1,t6,32
+       sll     a0,a0,t1
+       sll     a0,a0,t1
+       or      a0,a0,t4
+       j       .L1
+       .size   callback_receiver, .-callback_receiver
+       .align  1
+       .globl  callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       add     sp,sp,-16
+       sd      s0,8(sp)
+       add     s0,sp,16
+       ld      s0,8(sp)
+       lla     a0,callback_receiver
+       add     sp,sp,16
+       jr      ra
+       .size   callback_get_receiver, .-callback_get_receiver
+       .ident  "GCC: (GNU) 7.3.0"
diff --git a/callback/vacall_r/vacall-riscv64-lp64d-macro.S b/callback/vacall_r/vacall-riscv64-lp64d-macro.S
new file mode 100644 (file)
index 0000000..c245a59
--- /dev/null
@@ -0,0 +1,207 @@
+       .file   "vacall-riscv64.c"
+       .option pic
+       .text
+       .align  1
+       .type   callback_receiver, @function
+callback_receiver:
+       add     sp,sp,-288
+       sd      ra,264(sp)
+       sd      s0,256(sp)
+       sd      s1,248(sp)
+       add     s0,sp,272
+       sd      s2,240(sp)
+       sd      a1,-192(s0)
+       add     a1,s0,16
+       ld      t3,0(t2)
+       sd      a7,8(s0)
+       sd      a2,-184(s0)
+       sd      a3,-176(s0)
+       sd      a4,-168(s0)
+       sd      a5,-160(s0)
+       sd      a6,-152(s0)
+       sd      a7,-144(s0)
+       fsw     fa0,-132(s0)
+       fsw     fa1,-128(s0)
+       fsw     fa2,-124(s0)
+       fsw     fa3,-120(s0)
+       fsw     fa4,-116(s0)
+       fsw     fa5,-112(s0)
+       fsw     fa6,-108(s0)
+       fsw     fa7,-104(s0)
+       fsd     fa0,-96(s0)
+       fsd     fa1,-88(s0)
+       fsd     fa2,-80(s0)
+       fsd     fa3,-72(s0)
+       fsd     fa4,-64(s0)
+       fsd     fa5,-56(s0)
+       fsd     fa6,-48(s0)
+       fsd     fa7,-40(s0)
+       sd      a1,-240(s0)
+       sd      a0,-200(s0)
+       sw      zero,-264(s0)
+       ld      a0,8(t2)
+       sd      zero,-232(s0)
+       sw      zero,-224(s0)
+       sw      zero,-208(s0)
+       sw      zero,-136(s0)
+       add     a1,s0,-264
+       jalr    t3
+       lw      t1,-224(s0)
+       beqz    t1,.L1
+       li      t3,1
+       beq     t1,t3,.L25
+       li      t3,2
+       beq     t1,t3,.L29
+       li      t3,3
+       beq     t1,t3,.L25
+       li      t3,4
+       beq     t1,t3,.L30
+       li      t3,5
+       beq     t1,t3,.L31
+       li      t3,6
+       beq     t1,t3,.L32
+       li      t3,7
+       beq     t1,t3,.L33
+       and     t3,t1,-3
+       li      t4,8
+       beq     t3,t4,.L27
+       li      t4,9
+       beq     t3,t4,.L27
+       li      t3,12
+       beq     t1,t3,.L34
+       li      t3,13
+       beq     t1,t3,.L35
+       li      t3,14
+       beq     t1,t3,.L27
+       li      t3,15
+       bne     t1,t3,.L1
+       lw      t3,-264(s0)
+       and     t3,t3,1024
+       beqz    t3,.L1
+       ld      t0,-216(s0)
+       add     t3,t0,-1
+       bgtu    t3,t1,.L1
+       ld      t5,-232(s0)
+       li      s2,8
+       and     t6,t5,7
+       add     s1,t0,t6
+       and     t5,t5,-8
+       sext.w  t6,t6
+       sllw    t1,s1,3
+       ld      t4,0(t5)
+       sll     t3,t6,3
+       bgtu    t0,s2,.L15
+       bgtu    s1,s2,.L16
+       addw    t1,t1,-1
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t4
+       sra     a0,a0,t3
+.L1:
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       ld      s2,240(sp)
+       add     sp,sp,288
+       jr      ra
+.L25:
+       lbu     a0,-256(s0)
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       ld      s2,240(sp)
+       add     sp,sp,288
+       jr      ra
+.L29:
+       lb      a0,-256(s0)
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       ld      s2,240(sp)
+       add     sp,sp,288
+       jr      ra
+.L30:
+       lh      a0,-256(s0)
+       j       .L1
+.L33:
+       lwu     a0,-256(s0)
+       j       .L1
+.L31:
+       lhu     a0,-256(s0)
+       j       .L1
+.L27:
+       ld      a0,-256(s0)
+       j       .L1
+.L32:
+       lw      a0,-256(s0)
+       j       .L1
+.L34:
+       flw     fa0,-256(s0)
+       j       .L1
+.L35:
+       fld     fa0,-256(s0)
+       j       .L1
+.L15:
+       li      s2,16
+       sra     t4,t4,t3
+       ld      t0,8(t5)
+       bleu    s1,s2,.L36
+       li      a1,-8
+       mulw    t6,a1,t6
+       addw    t1,t1,-129
+       ld      a0,16(t5)
+       li      a1,2
+       sll     a1,a1,t1
+       add     a1,a1,-1
+       and     a1,a1,a0
+       sra     t3,t0,t3
+       addw    t1,t6,64
+       sll     a0,t0,t1
+       sll     a1,a1,t1
+       or      a0,a0,t4
+       or      a1,a1,t3
+       j       .L1
+.L16:
+       li      a0,-8
+       mulw    t6,a0,t6
+       addw    t1,t1,-65
+       ld      t5,8(t5)
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t5
+       sra     t4,t4,t3
+       sll     a0,a0,t6
+       or      a0,a0,t4
+       j       .L1
+.L36:
+       li      a1,-4
+       mulw    t6,a1,t6
+       addw    t1,t1,-65
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t0
+       sra     a1,a0,t3
+       addw    t1,t6,32
+       sll     a0,a0,t1
+       sll     a0,a0,t1
+       or      a0,a0,t4
+       j       .L1
+       .size   callback_receiver, .-callback_receiver
+       .align  1
+       .globl  callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+       add     sp,sp,-16
+       sd      s0,8(sp)
+       add     s0,sp,16
+       ld      s0,8(sp)
+       lla     a0,callback_receiver
+       add     sp,sp,16
+       jr      ra
+       .size   callback_get_receiver, .-callback_get_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-s390-linux.s b/callback/vacall_r/vacall-s390-linux.s
new file mode 100644 (file)
index 0000000..999229f
--- /dev/null
@@ -0,0 +1,160 @@
+       .file   "vacall-s390.c"
+.text
+       .align  4
+       .type   callback_receiver,@function
+callback_receiver:
+       stm     %r6,%r15,24(%r15)
+       bras    %r13,.LTN0_0
+.LT0_0:
+.LC0:
+       .long   0
+.LC1:
+       .long   255
+.LC2:
+       .long   65535
+.LC3:
+       .long   1
+.LTN0_0:
+       lr      %r1,%r0
+       lr      %r14,%r15
+       ahi     %r15,-184
+       lr      %r11,%r15
+       lr      %r9,%r0
+       l       %r10,0(%r1)
+       st      %r14,0(%r15)
+       la      %r1,280(%r11)
+       mvc     116(4,%r11),.LC0-.LT0_0(%r13)
+       st      %r2,132(%r11)
+       st      %r3,136(%r11)
+       la      %r3,96(%r11)
+       st      %r4,140(%r11)
+       st      %r5,144(%r11)
+       st      %r6,148(%r11)
+       std     %f2,176(%r11)
+       std     %f0,168(%r11)
+       ste     %f2,160(%r11)
+       ste     %f0,156(%r11)
+       mvc     96(4,%r11),.LC0-.LT0_0(%r13)
+       st      %r1,112(%r11)
+       mvc     120(4,%r11),.LC0-.LT0_0(%r13)
+       mvc     128(4,%r11),.LC0-.LT0_0(%r13)
+       mvc     152(4,%r11),.LC0-.LT0_0(%r13)
+       l       %r2,4(%r9)
+       basr    %r14,%r10
+       icm     %r4,15,120(%r11)
+       je      .L1
+       chi     %r4,1
+       je      .L43
+       chi     %r4,2
+       je      .L44
+       chi     %r4,3
+       je      .L43
+       chi     %r4,4
+       je      .L45
+       chi     %r4,5
+       je      .L46
+       chi     %r4,6
+       je      .L40
+       chi     %r4,7
+       je      .L40
+       chi     %r4,8
+       je      .L40
+       chi     %r4,9
+       je      .L40
+       lr      %r1,%r4
+       ahi     %r1,-10
+       cl      %r1,.LC3-.LT0_0(%r13)
+       jh      .L22
+       l       %r2,104(%r11)
+       l       %r3,108(%r11)
+.L1:
+       l       %r4,240(%r11)
+       lm      %r6,%r15,208(%r11)
+       br      %r4
+.L22:
+       chi     %r4,12
+       je      .L47
+       chi     %r4,13
+       je      .L48
+       chi     %r4,14
+       je      .L40
+       chi     %r4,15
+       jne     .L1
+       tm      98(%r11),4
+       je      .L1
+       l       %r1,124(%r11)
+       chi     %r1,1
+       je      .L49
+       chi     %r1,2
+       je      .L50
+       chi     %r1,4
+       je      .L51
+       chi     %r1,8
+       jne     .L1
+       l       %r1,116(%r11)
+       l       %r3,4(%r1)
+.L39:
+       l       %r2,0(%r1)
+       j       .L1
+.L51:
+       l       %r1,116(%r11)
+       j       .L39
+.L50:
+       l       %r1,116(%r11)
+       lh      %r4,0(%r1)
+       lr      %r2,%r4
+.L41:
+       n       %r2,.LC2-.LT0_0(%r13)
+       j       .L1
+.L49:
+       l       %r1,116(%r11)
+       ic      %r4,0(%r1)
+       lr      %r2,%r4
+.L42:
+       n       %r2,.LC1-.LT0_0(%r13)
+       j       .L1
+.L40:
+       l       %r2,104(%r11)
+       j       .L1
+.L48:
+       ld      %f0,104(%r11)
+       j       .L1
+.L47:
+       le      %f0,104(%r11)
+       j       .L1
+.L46:
+       lh      %r1,104(%r11)
+       lr      %r2,%r1
+       j       .L41
+.L45:
+       lh      %r2,104(%r11)
+       j       .L1
+.L43:
+       ic      %r1,104(%r11)
+       lr      %r2,%r1
+       j       .L42
+.L44:
+       icm     %r1,8,104(%r11)
+       lr      %r2,%r1
+       sra     %r2,24
+       j       .L1
+.Lfe1:
+       .size   callback_receiver,.Lfe1-callback_receiver
+       .align  4
+.globl callback_get_receiver
+       .type   callback_get_receiver,@function
+callback_get_receiver:
+       stm     %r11,%r13,44(%r15)
+       bras    %r13,.LTN1_0
+.LT1_0:
+.LC4:
+       .long   callback_receiver-.LT1_0
+.LTN1_0:
+       l       %r1,.LC4-.LT1_0(%r13)
+       lr      %r11,%r15
+       la      %r2,0(%r13,%r1)
+       lm      %r11,%r13,44(%r11)
+       br      %r14
+.Lfe2:
+       .size   callback_get_receiver,.Lfe2-callback_get_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/callback/vacall_r/vacall-s390-macro.S b/callback/vacall_r/vacall-s390-macro.S
new file mode 100644 (file)
index 0000000..1c5314a
--- /dev/null
@@ -0,0 +1,162 @@
+       .file   "vacall-s390.c"
+.text
+       .align  4
+       .type   callback_receiver,@function
+callback_receiver:
+       stm     %r6,%r15,24(%r15)
+       bras    %r13,.LTN0_0
+.LT0_0:
+.LC0:
+       .long   0
+.LC1:
+       .long   255
+.LC2:
+       .long   65535
+.LC3:
+       .long   1
+.LTN0_0:
+       lr      %r1,%r0
+       lr      %r14,%r15
+       ahi     %r15,-184
+       lr      %r11,%r15
+       lr      %r9,%r0
+       l       %r10,0(%r1)
+       st      %r14,0(%r15)
+       la      %r1,280(%r11)
+       mvc     116(4,%r11),.LC0-.LT0_0(%r13)
+       st      %r2,132(%r11)
+       st      %r3,136(%r11)
+       la      %r3,96(%r11)
+       st      %r4,140(%r11)
+       st      %r5,144(%r11)
+       st      %r6,148(%r11)
+       std     %f2,176(%r11)
+       std     %f0,168(%r11)
+       ste     %f2,160(%r11)
+       ste     %f0,156(%r11)
+       mvc     96(4,%r11),.LC0-.LT0_0(%r13)
+       st      %r1,112(%r11)
+       mvc     120(4,%r11),.LC0-.LT0_0(%r13)
+       mvc     128(4,%r11),.LC0-.LT0_0(%r13)
+       mvc     152(4,%r11),.LC0-.LT0_0(%r13)
+       l       %r2,4(%r9)
+       basr    %r14,%r10
+       icm     %r4,15,120(%r11)
+       je      .L1
+       chi     %r4,1
+       je      .L43
+       chi     %r4,2
+       je      .L44
+       chi     %r4,3
+       je      .L43
+       chi     %r4,4
+       je      .L45
+       chi     %r4,5
+       je      .L46
+       chi     %r4,6
+       je      .L40
+       chi     %r4,7
+       je      .L40
+       chi     %r4,8
+       je      .L40
+       chi     %r4,9
+       je      .L40
+       lr      %r1,%r4
+       ahi     %r1,-10
+       cl      %r1,.LC3-.LT0_0(%r13)
+       jh      .L22
+       l       %r2,104(%r11)
+       l       %r3,108(%r11)
+.L1:
+       l       %r4,240(%r11)
+       lm      %r6,%r15,208(%r11)
+       br      %r4
+.L22:
+       chi     %r4,12
+       je      .L47
+       chi     %r4,13
+       je      .L48
+       chi     %r4,14
+       je      .L40
+       chi     %r4,15
+       jne     .L1
+       tm      98(%r11),4
+       je      .L1
+       l       %r1,124(%r11)
+       chi     %r1,1
+       je      .L49
+       chi     %r1,2
+       je      .L50
+       chi     %r1,4
+       je      .L51
+       chi     %r1,8
+       jne     .L1
+       l       %r1,116(%r11)
+       l       %r3,4(%r1)
+.L39:
+       l       %r2,0(%r1)
+       j       .L1
+.L51:
+       l       %r1,116(%r11)
+       j       .L39
+.L50:
+       l       %r1,116(%r11)
+       lh      %r4,0(%r1)
+       lr      %r2,%r4
+.L41:
+       n       %r2,.LC2-.LT0_0(%r13)
+       j       .L1
+.L49:
+       l       %r1,116(%r11)
+       ic      %r4,0(%r1)
+       lr      %r2,%r4
+.L42:
+       n       %r2,.LC1-.LT0_0(%r13)
+       j       .L1
+.L40:
+       l       %r2,104(%r11)
+       j       .L1
+.L48:
+       ld      %f0,104(%r11)
+       j       .L1
+.L47:
+       le      %f0,104(%r11)
+       j       .L1
+.L46:
+       lh      %r1,104(%r11)
+       lr      %r2,%r1
+       j       .L41
+.L45:
+       lh      %r2,104(%r11)
+       j       .L1
+.L43:
+       ic      %r1,104(%r11)
+       lr      %r2,%r1
+       j       .L42
+.L44:
+       icm     %r1,8,104(%r11)
+       lr      %r2,%r1
+       sra     %r2,24
+       j       .L1
+.Lfe1:
+       .size   callback_receiver,.Lfe1-callback_receiver
+       .align  4
+.globl callback_get_receiver
+       .type   callback_get_receiver,@function
+callback_get_receiver:
+       stm     %r11,%r13,44(%r15)
+       bras    %r13,.LTN1_0
+.LT1_0:
+.LC4:
+       .long   callback_receiver-.LT1_0
+.LTN1_0:
+       l       %r1,.LC4-.LT1_0(%r13)
+       lr      %r11,%r15
+       la      %r2,0(%r13,%r1)
+       lm      %r11,%r13,44(%r11)
+       br      %r14
+.Lfe2:
+       .size   callback_get_receiver,.Lfe2-callback_get_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-s390x-linux.s b/callback/vacall_r/vacall-s390x-linux.s
new file mode 100644 (file)
index 0000000..84d0283
--- /dev/null
@@ -0,0 +1,148 @@
+       .file   "vacall-s390x.c"
+.text
+       .align  8
+       .type   callback_receiver, @function
+callback_receiver:
+.LFB0:
+       .cfi_startproc
+       stmg    %r10,%r15,80(%r15)
+       .cfi_offset 10, -80
+       .cfi_offset 11, -72
+       .cfi_offset 12, -64
+       .cfi_offset 13, -56
+       .cfi_offset 14, -48
+       .cfi_offset 15, -40
+       aghi    %r15,-320
+       .cfi_def_cfa_offset 480
+       lgr     %r11,%r15
+       .cfi_def_cfa_register 11
+       lgr     %r1,%r0
+       lhi     %r14,0
+       stg     %r2,224(%r11)
+       lg      %r10,0(%r1)
+       st      %r14,160(%r11)
+       la      %r14,480(%r11)
+       stg     %r14,184(%r11)
+       lghi    %r14,0
+       stg     %r3,232(%r11)
+       lg      %r2,8(%r1)
+       stg     %r4,240(%r11)
+       stg     %r5,248(%r11)
+       stg     %r6,256(%r11)
+       ste     %f0,268(%r11)
+       ste     %f2,272(%r11)
+       ste     %f4,276(%r11)
+       ste     %f6,280(%r11)
+       std     %f0,288(%r11)
+       std     %f2,296(%r11)
+       std     %f4,304(%r11)
+       std     %f6,312(%r11)
+       stg     %r14,192(%r11)
+       st      %r14,200(%r11)
+       st      %r14,216(%r11)
+       st      %r14,264(%r11)
+       la      %r3,160(%r11)
+       basr    %r14,%r10
+       icm     %r1,15,200(%r11)
+       je      .L1
+       chi     %r1,1
+       je      .L18
+       chi     %r1,2
+       je      .L21
+       chi     %r1,3
+       je      .L18
+       chi     %r1,4
+       je      .L22
+       chi     %r1,5
+       je      .L23
+       chi     %r1,6
+       je      .L24
+       chi     %r1,7
+       je      .L25
+       lr      %r10,%r1
+       nill    %r10,65533
+       chi     %r10,8
+       je      .L19
+       chi     %r10,9
+       je      .L19
+       chi     %r1,12
+       je      .L26
+       chi     %r1,13
+       je      .L27
+       chi     %r1,14
+       je      .L19
+.L1:
+       lg      %r4,432(%r11)
+       lmg     %r10,%r15,400(%r11)
+       .cfi_remember_state
+       .cfi_restore 15
+       .cfi_restore 14
+       .cfi_restore 13
+       .cfi_restore 12
+       .cfi_restore 11
+       .cfi_restore 10
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L18:
+       .cfi_restore_state
+       lg      %r4,432(%r11)
+       llgc    %r2,168(%r11)
+       lmg     %r10,%r15,400(%r11)
+       .cfi_remember_state
+       .cfi_restore 10
+       .cfi_restore 11
+       .cfi_restore 12
+       .cfi_restore 13
+       .cfi_restore 14
+       .cfi_restore 15
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L21:
+       .cfi_restore_state
+       icmh    %r2,8,168(%r11)
+       srag    %r2,%r2,56
+       j       .L1
+.L19:
+       lg      %r2,168(%r11)
+       j       .L1
+.L22:
+       lgh     %r2,168(%r11)
+       j       .L1
+.L23:
+       llgh    %r2,168(%r11)
+       j       .L1
+.L24:
+       lgf     %r2,168(%r11)
+       j       .L1
+.L26:
+       le      %f0,168(%r11)
+       j       .L1
+.L25:
+       llgf    %r2,168(%r11)
+       j       .L1
+.L27:
+       ld      %f0,168(%r11)
+       j       .L1
+       .cfi_endproc
+.LFE0:
+       .size   callback_receiver, .-callback_receiver
+       .align  8
+.globl callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+.LFB1:
+       .cfi_startproc
+       stg     %r11,88(%r15)
+       .cfi_offset 11, -72
+       lgr     %r11,%r15
+       .cfi_def_cfa_register 11
+       larl    %r2,callback_receiver
+       lg      %r11,88(%r11)
+       .cfi_restore 11
+       .cfi_def_cfa_register 15
+       br      %r14
+       .cfi_endproc
+.LFE1:
+       .size   callback_get_receiver, .-callback_get_receiver
+       .ident  "GCC: (GNU) 5.4.0"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/callback/vacall_r/vacall-s390x-macro.S b/callback/vacall_r/vacall-s390x-macro.S
new file mode 100644 (file)
index 0000000..1306be6
--- /dev/null
@@ -0,0 +1,149 @@
+       .file   "vacall-s390x.c"
+.text
+       .align  8
+       .type   callback_receiver, @function
+callback_receiver:
+.LFB0:
+       .cfi_startproc
+       stmg    %r10,%r15,80(%r15)
+       .cfi_offset 10, -80
+       .cfi_offset 11, -72
+       .cfi_offset 12, -64
+       .cfi_offset 13, -56
+       .cfi_offset 14, -48
+       .cfi_offset 15, -40
+       aghi    %r15,-320
+       .cfi_def_cfa_offset 480
+       lgr     %r11,%r15
+       .cfi_def_cfa_register 11
+       lgr     %r1,%r0
+       lhi     %r14,0
+       stg     %r2,224(%r11)
+       lg      %r10,0(%r1)
+       st      %r14,160(%r11)
+       la      %r14,480(%r11)
+       stg     %r14,184(%r11)
+       lghi    %r14,0
+       stg     %r3,232(%r11)
+       lg      %r2,8(%r1)
+       stg     %r4,240(%r11)
+       stg     %r5,248(%r11)
+       stg     %r6,256(%r11)
+       ste     %f0,268(%r11)
+       ste     %f2,272(%r11)
+       ste     %f4,276(%r11)
+       ste     %f6,280(%r11)
+       std     %f0,288(%r11)
+       std     %f2,296(%r11)
+       std     %f4,304(%r11)
+       std     %f6,312(%r11)
+       stg     %r14,192(%r11)
+       st      %r14,200(%r11)
+       st      %r14,216(%r11)
+       st      %r14,264(%r11)
+       la      %r3,160(%r11)
+       basr    %r14,%r10
+       icm     %r1,15,200(%r11)
+       je      .L1
+       chi     %r1,1
+       je      .L18
+       chi     %r1,2
+       je      .L21
+       chi     %r1,3
+       je      .L18
+       chi     %r1,4
+       je      .L22
+       chi     %r1,5
+       je      .L23
+       chi     %r1,6
+       je      .L24
+       chi     %r1,7
+       je      .L25
+       lr      %r10,%r1
+       nill    %r10,65533
+       chi     %r10,8
+       je      .L19
+       chi     %r10,9
+       je      .L19
+       chi     %r1,12
+       je      .L26
+       chi     %r1,13
+       je      .L27
+       chi     %r1,14
+       je      .L19
+.L1:
+       lg      %r4,432(%r11)
+       lmg     %r10,%r15,400(%r11)
+       .cfi_remember_state
+       .cfi_restore 15
+       .cfi_restore 14
+       .cfi_restore 13
+       .cfi_restore 12
+       .cfi_restore 11
+       .cfi_restore 10
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L18:
+       .cfi_restore_state
+       lg      %r4,432(%r11)
+       llgc    %r2,168(%r11)
+       lmg     %r10,%r15,400(%r11)
+       .cfi_remember_state
+       .cfi_restore 10
+       .cfi_restore 11
+       .cfi_restore 12
+       .cfi_restore 13
+       .cfi_restore 14
+       .cfi_restore 15
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L21:
+       .cfi_restore_state
+       icmh    %r2,8,168(%r11)
+       srag    %r2,%r2,56
+       j       .L1
+.L19:
+       lg      %r2,168(%r11)
+       j       .L1
+.L22:
+       lgh     %r2,168(%r11)
+       j       .L1
+.L23:
+       llgh    %r2,168(%r11)
+       j       .L1
+.L24:
+       lgf     %r2,168(%r11)
+       j       .L1
+.L26:
+       le      %f0,168(%r11)
+       j       .L1
+.L25:
+       llgf    %r2,168(%r11)
+       j       .L1
+.L27:
+       ld      %f0,168(%r11)
+       j       .L1
+       .cfi_endproc
+.LFE0:
+       .size   callback_receiver, .-callback_receiver
+       .align  8
+.globl callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+.LFB1:
+       .cfi_startproc
+       stg     %r11,88(%r15)
+       .cfi_offset 11, -72
+       lgr     %r11,%r15
+       .cfi_def_cfa_register 11
+       larl    %r2,callback_receiver
+       lg      %r11,88(%r11)
+       .cfi_restore 11
+       .cfi_def_cfa_register 15
+       br      %r14
+       .cfi_endproc
+.LFE1:
+       .size   callback_get_receiver, .-callback_get_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-sparc-linux.s b/callback/vacall_r/vacall-sparc-linux.s
new file mode 100644 (file)
index 0000000..881f004
--- /dev/null
@@ -0,0 +1,129 @@
+       .file   "vacall-sparc.c"
+       .section        ".text"
+       .align 4
+       .global callback_receiver
+       .type   callback_receiver,#function
+       .proc   020
+callback_receiver:
+       !#PROLOGUE# 0
+       save    %sp, -144, %sp
+       ld      [%fp+64], %o0
+       add     %fp, 68, %o1
+       st      %g0, [%fp-28]
+       st      %o0, [%fp-16]
+       st      %o1, [%fp-32]
+       ld      [%g2+4], %o0
+       add     %fp, -48, %o1
+       ld      [%g2], %o2
+       st      %i2, [%fp+76]
+       st      %i3, [%fp+80]
+       st      %i4, [%fp+84]
+       st      %i5, [%fp+88]
+       st      %i0, [%fp+68]
+       st      %i1, [%fp+72]
+       st      %g0, [%fp-48]
+       call    %o2, 0
+       st      %g0, [%fp-24]
+       ld      [%fp-24], %o1
+       cmp     %o1, 0
+       be      .LL1
+       cmp     %o1, 1
+       be      .LL44
+       cmp     %o1, 2
+       be      .LL44
+       cmp     %o1, 3
+       be      .LL45
+       cmp     %o1, 4
+       be      .LL46
+       cmp     %o1, 5
+       be      .LL47
+       cmp     %o1, 6
+       be      .LL43
+       cmp     %o1, 7
+       be      .LL43
+       cmp     %o1, 8
+       be      .LL43
+       cmp     %o1, 9
+       be      .LL43
+       add     %o1, -10, %o0
+       cmp     %o0, 1
+       bgu     .LL22
+       cmp     %o1, 12
+       ld      [%fp-40], %i0
+       b       .LL1
+       ld      [%fp-36], %i1
+.LL22:
+       be      .LL48
+       cmp     %o1, 13
+       be      .LL49
+       cmp     %o1, 14
+       be      .LL43
+       cmp     %o1, 15
+       bne     .LL1
+       ld      [%fp-48], %o0
+       andcc   %o0, 16, %g0
+       be      .LL33
+       andcc   %o0, 2, %g0
+       ld      [%fp-20], %o0
+       ld      [%i7+8], %o1
+       and     %o0, 4095, %o0
+       cmp     %o0, %o1
+       bne     .LL1
+       ld      [%fp-28], %i0
+       b       .LL1
+       add     %i7, 4, %i7
+.LL33:
+       be,a    .LL1
+       add     %i7, 4, %i7
+       ld      [%fp-20], %o0
+       cmp     %o0, 1
+       be      .LL50
+       cmp     %o0, 2
+       be      .LL51
+       cmp     %o0, 4
+       bne,a   .LL1
+       add     %i7, 4, %i7
+       ld      [%fp-28], %o0
+       b       .LL1
+       ld      [%o0], %i0
+.LL51:
+       ld      [%fp-28], %o0
+       b       .LL1
+       lduh    [%o0], %i0
+.LL50:
+       ld      [%fp-28], %o0
+       b       .LL1
+       ldub    [%o0], %i0
+.LL43:
+       b       .LL1
+       ld      [%fp-40], %i0
+.LL49:
+       b       .LL1
+       ldd     [%fp-40], %f0
+.LL48:
+       ld      [%fp-48], %o0
+       andcc   %o0, 32, %g0
+       be,a    .LL1
+       ld      [%fp-40], %f0
+       ld      [%fp-40], %f2
+       b       .LL1
+       fstod   %f2, %f0
+.LL47:
+       b       .LL1
+       lduh    [%fp-40], %i0
+.LL46:
+       b       .LL1
+       ldsh    [%fp-40], %i0
+.LL45:
+       b       .LL1
+       ldub    [%fp-40], %i0
+.LL44:
+       ldsb    [%fp-40], %i0
+.LL38:
+.LL1:
+       nop
+       ret
+       restore
+.LLfe1:
+       .size   callback_receiver,.LLfe1-callback_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/callback/vacall_r/vacall-sparc-macro.S b/callback/vacall_r/vacall-sparc-macro.S
new file mode 100644 (file)
index 0000000..d4acde7
--- /dev/null
@@ -0,0 +1,131 @@
+#include "asm-sparc.h"
+       .section        ".text"
+       .align 4
+       .global C(callback_receiver)
+       DECLARE_FUNCTION(callback_receiver)
+       .proc   020
+FUNBEGIN(callback_receiver)
+       !$PROLOGUE$ 0
+       save    %sp, -144, %sp
+       ld      [%fp+64], %o0
+       add     %fp, 68, %o1
+       st      %g0, [%fp-28]
+       st      %o0, [%fp-16]
+       st      %o1, [%fp-32]
+       ld      [%g2+4], %o0
+       add     %fp, -48, %o1
+       ld      [%g2], %o2
+       st      %i2, [%fp+76]
+       st      %i3, [%fp+80]
+       st      %i4, [%fp+84]
+       st      %i5, [%fp+88]
+       st      %i0, [%fp+68]
+       st      %i1, [%fp+72]
+       st      %g0, [%fp-48]
+       call    %o2, 0
+       st      %g0, [%fp-24]
+       ld      [%fp-24], %o1
+       cmp     %o1, 0
+       be      L(L1)
+       cmp     %o1, 1
+       be      L(L44)
+       cmp     %o1, 2
+       be      L(L44)
+       cmp     %o1, 3
+       be      L(L45)
+       cmp     %o1, 4
+       be      L(L46)
+       cmp     %o1, 5
+       be      L(L47)
+       cmp     %o1, 6
+       be      L(L43)
+       cmp     %o1, 7
+       be      L(L43)
+       cmp     %o1, 8
+       be      L(L43)
+       cmp     %o1, 9
+       be      L(L43)
+       add     %o1, -10, %o0
+       cmp     %o0, 1
+       bgu     L(L22)
+       cmp     %o1, 12
+       ld      [%fp-40], %i0
+       b       L(L1)
+       ld      [%fp-36], %i1
+L(L22):
+       be      L(L48)
+       cmp     %o1, 13
+       be      L(L49)
+       cmp     %o1, 14
+       be      L(L43)
+       cmp     %o1, 15
+       bne     L(L1)
+       ld      [%fp-48], %o0
+       andcc   %o0, 16, %g0
+       be      L(L33)
+       andcc   %o0, 2, %g0
+       ld      [%fp-20], %o0
+       ld      [%i7+8], %o1
+       and     %o0, 4095, %o0
+       cmp     %o0, %o1
+       bne     L(L1)
+       ld      [%fp-28], %i0
+       b       L(L1)
+       add     %i7, 4, %i7
+L(L33):
+       be,a    L(L1)
+       add     %i7, 4, %i7
+       ld      [%fp-20], %o0
+       cmp     %o0, 1
+       be      L(L50)
+       cmp     %o0, 2
+       be      L(L51)
+       cmp     %o0, 4
+       bne,a   L(L1)
+       add     %i7, 4, %i7
+       ld      [%fp-28], %o0
+       b       L(L1)
+       ld      [%o0], %i0
+L(L51):
+       ld      [%fp-28], %o0
+       b       L(L1)
+       lduh    [%o0], %i0
+L(L50):
+       ld      [%fp-28], %o0
+       b       L(L1)
+       ldub    [%o0], %i0
+L(L43):
+       b       L(L1)
+       ld      [%fp-40], %i0
+L(L49):
+       b       L(L1)
+       ldd     [%fp-40], %f0
+L(L48):
+       ld      [%fp-48], %o0
+       andcc   %o0, 32, %g0
+       be,a    L(L1)
+       ld      [%fp-40], %f0
+       ld      [%fp-40], %f2
+       b       L(L1)
+       fstod   %f2, %f0
+L(L47):
+       b       L(L1)
+       lduh    [%fp-40], %i0
+L(L46):
+       b       L(L1)
+       ldsh    [%fp-40], %i0
+L(L45):
+       b       L(L1)
+       ldub    [%fp-40], %i0
+L(L44):
+       ldsb    [%fp-40], %i0
+L(L38):
+L(L1):
+       nop
+       ret
+       restore
+L(Lfe1):
+       FUNEND(callback_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-sparc64-linux.s b/callback/vacall_r/vacall-sparc64-linux.s
new file mode 100644 (file)
index 0000000..c8723aa
--- /dev/null
@@ -0,0 +1,319 @@
+       .file   "vacall-sparc64.c"
+       .section        ".text"
+       .align 4
+       .global callback_receiver
+       .type   callback_receiver, #function
+       .proc   020
+callback_receiver:
+       .register       %g2, #scratch
+       .register       %g3, #scratch
+       save    %sp, -448, %sp
+       stx     %i0, [%fp+2175]
+       stx     %i1, [%fp+2183]
+       stx     %i2, [%fp+2191]
+       stx     %i3, [%fp+2199]
+       stx     %i4, [%fp+2207]
+       stx     %i5, [%fp+2215]
+       std     %f0, [%fp+1903]
+       std     %f2, [%fp+1911]
+       std     %f4, [%fp+1919]
+       std     %f6, [%fp+1927]
+       std     %f8, [%fp+1935]
+       std     %f10, [%fp+1943]
+       std     %f12, [%fp+1951]
+       std     %f14, [%fp+1959]
+       std     %f16, [%fp+1967]
+       std     %f18, [%fp+1975]
+       std     %f20, [%fp+1983]
+       std     %f22, [%fp+1991]
+       std     %f24, [%fp+1999]
+       std     %f26, [%fp+2007]
+       std     %f28, [%fp+2015]
+       std     %f30, [%fp+2023]
+       st      %f1, [%fp+1835]
+       st      %f3, [%fp+1839]
+       st      %f5, [%fp+1843]
+       st      %f7, [%fp+1847]
+       st      %f9, [%fp+1851]
+       st      %f11, [%fp+1855]
+       st      %f13, [%fp+1859]
+       st      %f15, [%fp+1863]
+       st      %f17, [%fp+1867]
+       st      %f19, [%fp+1871]
+       st      %f21, [%fp+1875]
+       st      %f23, [%fp+1879]
+       add     %fp, 2175, %g2
+       stx     %g0, [%fp+1807]
+       st      %f25, [%fp+1883]
+       st      %f27, [%fp+1887]
+       st      %f29, [%fp+1891]
+       st      %f31, [%fp+1895]
+       st      %g0, [%fp+1775]
+       st      %g0, [%fp+1815]
+       st      %g0, [%fp+1831]
+       ldx     [%g5+8], %o0
+       stx     %g2, [%fp+1799]
+       ldx     [%g5], %g3
+       call    %g3, 0
+        add    %fp, 1775, %o1
+       lduw    [%fp+1815], %g1
+       cmp     %g1, 0
+       be,pn   %icc, .LL61
+        cmp    %g1, 1
+       be,pn   %icc, .LL50
+        cmp    %g1, 2
+       be,pn   %icc, .LL50
+        cmp    %g1, 3
+       be,pn   %icc, .LL53
+        cmp    %g1, 4
+       be,pn   %icc, .LL54
+        cmp    %g1, 5
+       be,pn   %icc, .LL55
+        cmp    %g1, 6
+       be,pn   %icc, .LL56
+        cmp    %g1, 7
+       be,pn   %icc, .LL57
+        cmp    %g1, 8
+       be,pn   %icc, .LL51
+        cmp    %g1, 9
+       be,pn   %icc, .LL51
+        cmp    %g1, 10
+       be,pn   %icc, .LL51
+        cmp    %g1, 11
+       be,pn   %icc, .LL51
+        cmp    %g1, 12
+       be,pn   %icc, .LL58
+        cmp    %g1, 13
+       be,pn   %icc, .LL59
+        cmp    %g1, 14
+       be,pn   %icc, .LL51
+        cmp    %g1, 15
+       bne,pt  %icc, .LL61
+        lduw   [%fp+1775], %g1
+       andcc   %g1, 1024, %g0
+       be,pn   %xcc, .LL61
+        ldx    [%fp+1823], %o5
+       add     %o5, -1, %g1
+       cmp     %g1, 31
+       bgu,pn  %xcc, .LL61
+        ldx    [%fp+1807], %g1
+       cmp     %o5, 8
+       and     %g1, 7, %o1
+       and     %g1, -8, %l1
+       bgu,pt  %xcc, .LL35
+        add    %o5, %o1, %g2
+       cmp     %g2, 8
+       bgu,pt  %xcc, .LL37
+        sllx   %o1, 3, %g4
+       sllx    %g2, 3, %g2
+       ldx     [%l1], %g3
+       sub     %g0, %g2, %g2
+       mov     -1, %g1
+       sllx    %g1, %g2, %g1
+       and     %g1, %g3, %g1
+       return  %i7+8
+        sllx   %g1, %g4, %o0
+.LL47:
+       ldx     [%l1], %g1
+       sllx    %g1, %o3, %g1
+       ldx     [%l1+8], %g4
+       ldx     [%l1+16], %o5
+       sllx    %g4, %o3, %o0
+       sllx    %o5, %o3, %o7
+       ldx     [%l1+24], %o4
+       sllx    %g2, 3, %o2
+       sllx    %o4, %o3, %l0
+       ldx     [%l1+32], %o1
+       sub     %g0, %o2, %o2
+       mov     64, %g3
+       sub     %g3, %o3, %g3
+       srax    %g4, %g3, %g4
+       srax    %o5, %g3, %o5
+       or      %g1, %g4, %i0
+       srax    %o4, %g3, %o4
+       mov     -1, %g1
+       or      %o0, %o5, %i1
+       sllx    %g1, %o2, %g1
+       or      %o7, %o4, %i2
+       and     %g1, %o1, %g1
+       srax    %g1, %g3, %g1
+       or      %l0, %g1, %i3
+.LL61:
+       return  %i7+8
+        nop
+.LL50:
+       ldsb    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL54:
+       ldsh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL53:
+       ldub    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL51:
+       ldx     [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL55:
+       lduh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL56:
+       ldsw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL57:
+       lduw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL58:
+       ld      [%fp+1783], %f0
+       return  %i7+8
+        nop
+.LL59:
+       ldd     [%fp+1783], %f0
+       return  %i7+8
+        nop
+.LL35:
+       cmp     %o5, 16
+       bgu,pt  %xcc, .LL39
+        cmp    %o5, 24
+       cmp     %g2, 16
+       bgu,pt  %xcc, .LL41
+        sllx   %o1, 3, %o4
+       sllx    %g2, 3, %g3
+       ldx     [%l1+8], %g2
+       sll     %o1, 3, %o5
+       sllx    %o1, 2, %o4
+       sub     %g0, %g3, %g3
+       ldx     [%l1], %g4
+       mov     -1, %g1
+       sllx    %g4, %o5, %g4
+       sllx    %g1, %g3, %g1
+       and     %g1, %g2, %g1
+       mov     32, %g2
+       sllx    %g1, %o5, %i1
+       sub     %g2, %o4, %g2
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       return  %i7+8
+        or     %g4, %g1, %o0
+.LL37:
+       sllx    %g2, 3, %g3
+       ldx     [%l1+8], %o5
+       sub     %g0, %g3, %g3
+       sub     %g0, %g4, %o4
+       ldx     [%l1], %g2
+       mov     -1, %g1
+       sllx    %g2, %g4, %g2
+       sllx    %g1, %g3, %g1
+       and     %g1, %o5, %g1
+       srax    %g1, %o4, %g1
+       return  %i7+8
+        or     %g2, %g1, %o0
+.LL39:
+       bgu,pt  %xcc, .LL43
+        cmp    %g2, 32
+       cmp     %g2, 24
+       bgu,pt  %xcc, .LL45
+        sllx   %o1, 3, %o3
+       sllx    %o1, 2, %g1
+       sll     %o1, 3, %o5
+       sllx    %g2, 3, %o4
+       ldx     [%l1+8], %g3
+       ldx     [%l1+16], %o3
+       sllx    %g3, %o5, %o2
+       sub     %g0, %o4, %o4
+       mov     32, %g4
+       ldx     [%l1], %g2
+       sub     %g4, %g1, %g4
+       sllx    %g2, %o5, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       srax    %g3, %g4, %g3
+       sllx    %g1, %o4, %g1
+       and     %g1, %o3, %g1
+       sllx    %g1, %o5, %i2
+       srax    %g1, %g4, %g1
+       srax    %g1, %g4, %g1
+       or      %o2, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+.LL41:
+       sllx    %g2, 3, %o5
+       ldx     [%l1+8], %g3
+       ldx     [%l1+16], %o3
+       sllx    %g3, %o4, %o2
+       sub     %g0, %o5, %o5
+       mov     64, %g4
+       ldx     [%l1], %g2
+       sub     %g4, %o4, %g4
+       sllx    %g2, %o4, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       sllx    %g1, %o5, %g1
+       and     %g1, %o3, %g1
+       srax    %g1, %g4, %g1
+       or      %o2, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+.LL45:
+       ldx     [%l1], %g1
+       sllx    %g1, %o3, %g1
+       ldx     [%l1+8], %g3
+       ldx     [%l1+16], %g4
+       sllx    %g3, %o3, %o2
+       sllx    %g4, %o3, %o0
+       sllx    %g2, 3, %o4
+       ldx     [%l1+24], %o1
+       sub     %g0, %o4, %o4
+       mov     64, %o5
+       sub     %o5, %o3, %o5
+       srax    %g3, %o5, %g3
+       srax    %g4, %o5, %g4
+       or      %g1, %g3, %i0
+       or      %o2, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %o4, %g1
+       and     %g1, %o1, %g1
+       srax    %g1, %o5, %g1
+       or      %o0, %g1, %i2
+       return  %i7+8
+        nop
+.LL43:
+       bgu,pt  %xcc, .LL47
+        sllx   %o1, 3, %o3
+       sll     %o1, 3, %o4
+       ldx     [%l1], %g1
+       sllx    %g1, %o4, %g1
+       sllx    %o1, 2, %o3
+       sllx    %g2, 3, %o5
+       ldx     [%l1+8], %g3
+       ldx     [%l1+16], %g4
+       sllx    %g3, %o4, %o1
+       sllx    %g4, %o4, %o0
+       ldx     [%l1+24], %o2
+       sub     %g0, %o5, %o5
+       mov     32, %g2
+       sub     %g2, %o3, %g2
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       or      %g1, %g3, %i0
+       or      %o1, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %o5, %g1
+       and     %g1, %o2, %g1
+       sllx    %g1, %o4, %i3
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       or      %o0, %g1, %i2
+       return  %i7+8
+        nop
+       .size   callback_receiver, .-callback_receiver
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        ".note.GNU-stack"
diff --git a/callback/vacall_r/vacall-sparc64-macro.S b/callback/vacall_r/vacall-sparc64-macro.S
new file mode 100644 (file)
index 0000000..da34bb9
--- /dev/null
@@ -0,0 +1,320 @@
+#include "asm-sparc.h"
+       .section        ".text"
+       .align 4
+       .global C(callback_receiver)
+       DECLARE_FUNCTION(callback_receiver)
+       .proc   020
+FUNBEGIN(callback_receiver)
+       .register       %g2, $scratch
+       .register       %g3, $scratch
+       save    %sp, -448, %sp
+       stx     %i0, [%fp+2175]
+       stx     %i1, [%fp+2183]
+       stx     %i2, [%fp+2191]
+       stx     %i3, [%fp+2199]
+       stx     %i4, [%fp+2207]
+       stx     %i5, [%fp+2215]
+       std     %f0, [%fp+1903]
+       std     %f2, [%fp+1911]
+       std     %f4, [%fp+1919]
+       std     %f6, [%fp+1927]
+       std     %f8, [%fp+1935]
+       std     %f10, [%fp+1943]
+       std     %f12, [%fp+1951]
+       std     %f14, [%fp+1959]
+       std     %f16, [%fp+1967]
+       std     %f18, [%fp+1975]
+       std     %f20, [%fp+1983]
+       std     %f22, [%fp+1991]
+       std     %f24, [%fp+1999]
+       std     %f26, [%fp+2007]
+       std     %f28, [%fp+2015]
+       std     %f30, [%fp+2023]
+       st      %f1, [%fp+1835]
+       st      %f3, [%fp+1839]
+       st      %f5, [%fp+1843]
+       st      %f7, [%fp+1847]
+       st      %f9, [%fp+1851]
+       st      %f11, [%fp+1855]
+       st      %f13, [%fp+1859]
+       st      %f15, [%fp+1863]
+       st      %f17, [%fp+1867]
+       st      %f19, [%fp+1871]
+       st      %f21, [%fp+1875]
+       st      %f23, [%fp+1879]
+       add     %fp, 2175, %g2
+       stx     %g0, [%fp+1807]
+       st      %f25, [%fp+1883]
+       st      %f27, [%fp+1887]
+       st      %f29, [%fp+1891]
+       st      %f31, [%fp+1895]
+       st      %g0, [%fp+1775]
+       st      %g0, [%fp+1815]
+       st      %g0, [%fp+1831]
+       ldx     [%g5+8], %o0
+       stx     %g2, [%fp+1799]
+       ldx     [%g5], %g3
+       call    %g3, 0
+        add    %fp, 1775, %o1
+       lduw    [%fp+1815], %g1
+       cmp     %g1, 0
+       be,pn   %icc, L(L61)
+        cmp    %g1, 1
+       be,pn   %icc, L(L50)
+        cmp    %g1, 2
+       be,pn   %icc, L(L50)
+        cmp    %g1, 3
+       be,pn   %icc, L(L53)
+        cmp    %g1, 4
+       be,pn   %icc, L(L54)
+        cmp    %g1, 5
+       be,pn   %icc, L(L55)
+        cmp    %g1, 6
+       be,pn   %icc, L(L56)
+        cmp    %g1, 7
+       be,pn   %icc, L(L57)
+        cmp    %g1, 8
+       be,pn   %icc, L(L51)
+        cmp    %g1, 9
+       be,pn   %icc, L(L51)
+        cmp    %g1, 10
+       be,pn   %icc, L(L51)
+        cmp    %g1, 11
+       be,pn   %icc, L(L51)
+        cmp    %g1, 12
+       be,pn   %icc, L(L58)
+        cmp    %g1, 13
+       be,pn   %icc, L(L59)
+        cmp    %g1, 14
+       be,pn   %icc, L(L51)
+        cmp    %g1, 15
+       bne,pt  %icc, L(L61)
+        lduw   [%fp+1775], %g1
+       andcc   %g1, 1024, %g0
+       be,pn   %xcc, L(L61)
+        ldx    [%fp+1823], %o5
+       add     %o5, -1, %g1
+       cmp     %g1, 31
+       bgu,pn  %xcc, L(L61)
+        ldx    [%fp+1807], %g1
+       cmp     %o5, 8
+       and     %g1, 7, %o1
+       and     %g1, -8, %l1
+       bgu,pt  %xcc, L(L35)
+        add    %o5, %o1, %g2
+       cmp     %g2, 8
+       bgu,pt  %xcc, L(L37)
+        sllx   %o1, 3, %g4
+       sllx    %g2, 3, %g2
+       ldx     [%l1], %g3
+       sub     %g0, %g2, %g2
+       mov     -1, %g1
+       sllx    %g1, %g2, %g1
+       and     %g1, %g3, %g1
+       return  %i7+8
+        sllx   %g1, %g4, %o0
+L(L47):
+       ldx     [%l1], %g1
+       sllx    %g1, %o3, %g1
+       ldx     [%l1+8], %g4
+       ldx     [%l1+16], %o5
+       sllx    %g4, %o3, %o0
+       sllx    %o5, %o3, %o7
+       ldx     [%l1+24], %o4
+       sllx    %g2, 3, %o2
+       sllx    %o4, %o3, %l0
+       ldx     [%l1+32], %o1
+       sub     %g0, %o2, %o2
+       mov     64, %g3
+       sub     %g3, %o3, %g3
+       srax    %g4, %g3, %g4
+       srax    %o5, %g3, %o5
+       or      %g1, %g4, %i0
+       srax    %o4, %g3, %o4
+       mov     -1, %g1
+       or      %o0, %o5, %i1
+       sllx    %g1, %o2, %g1
+       or      %o7, %o4, %i2
+       and     %g1, %o1, %g1
+       srax    %g1, %g3, %g1
+       or      %l0, %g1, %i3
+L(L61):
+       return  %i7+8
+        nop
+L(L50):
+       ldsb    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L54):
+       ldsh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L53):
+       ldub    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L51):
+       ldx     [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L55):
+       lduh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L56):
+       ldsw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L57):
+       lduw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L58):
+       ld      [%fp+1783], %f0
+       return  %i7+8
+        nop
+L(L59):
+       ldd     [%fp+1783], %f0
+       return  %i7+8
+        nop
+L(L35):
+       cmp     %o5, 16
+       bgu,pt  %xcc, L(L39)
+        cmp    %o5, 24
+       cmp     %g2, 16
+       bgu,pt  %xcc, L(L41)
+        sllx   %o1, 3, %o4
+       sllx    %g2, 3, %g3
+       ldx     [%l1+8], %g2
+       sll     %o1, 3, %o5
+       sllx    %o1, 2, %o4
+       sub     %g0, %g3, %g3
+       ldx     [%l1], %g4
+       mov     -1, %g1
+       sllx    %g4, %o5, %g4
+       sllx    %g1, %g3, %g1
+       and     %g1, %g2, %g1
+       mov     32, %g2
+       sllx    %g1, %o5, %i1
+       sub     %g2, %o4, %g2
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       return  %i7+8
+        or     %g4, %g1, %o0
+L(L37):
+       sllx    %g2, 3, %g3
+       ldx     [%l1+8], %o5
+       sub     %g0, %g3, %g3
+       sub     %g0, %g4, %o4
+       ldx     [%l1], %g2
+       mov     -1, %g1
+       sllx    %g2, %g4, %g2
+       sllx    %g1, %g3, %g1
+       and     %g1, %o5, %g1
+       srax    %g1, %o4, %g1
+       return  %i7+8
+        or     %g2, %g1, %o0
+L(L39):
+       bgu,pt  %xcc, L(L43)
+        cmp    %g2, 32
+       cmp     %g2, 24
+       bgu,pt  %xcc, L(L45)
+        sllx   %o1, 3, %o3
+       sllx    %o1, 2, %g1
+       sll     %o1, 3, %o5
+       sllx    %g2, 3, %o4
+       ldx     [%l1+8], %g3
+       ldx     [%l1+16], %o3
+       sllx    %g3, %o5, %o2
+       sub     %g0, %o4, %o4
+       mov     32, %g4
+       ldx     [%l1], %g2
+       sub     %g4, %g1, %g4
+       sllx    %g2, %o5, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       srax    %g3, %g4, %g3
+       sllx    %g1, %o4, %g1
+       and     %g1, %o3, %g1
+       sllx    %g1, %o5, %i2
+       srax    %g1, %g4, %g1
+       srax    %g1, %g4, %g1
+       or      %o2, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+L(L41):
+       sllx    %g2, 3, %o5
+       ldx     [%l1+8], %g3
+       ldx     [%l1+16], %o3
+       sllx    %g3, %o4, %o2
+       sub     %g0, %o5, %o5
+       mov     64, %g4
+       ldx     [%l1], %g2
+       sub     %g4, %o4, %g4
+       sllx    %g2, %o4, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       sllx    %g1, %o5, %g1
+       and     %g1, %o3, %g1
+       srax    %g1, %g4, %g1
+       or      %o2, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+L(L45):
+       ldx     [%l1], %g1
+       sllx    %g1, %o3, %g1
+       ldx     [%l1+8], %g3
+       ldx     [%l1+16], %g4
+       sllx    %g3, %o3, %o2
+       sllx    %g4, %o3, %o0
+       sllx    %g2, 3, %o4
+       ldx     [%l1+24], %o1
+       sub     %g0, %o4, %o4
+       mov     64, %o5
+       sub     %o5, %o3, %o5
+       srax    %g3, %o5, %g3
+       srax    %g4, %o5, %g4
+       or      %g1, %g3, %i0
+       or      %o2, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %o4, %g1
+       and     %g1, %o1, %g1
+       srax    %g1, %o5, %g1
+       or      %o0, %g1, %i2
+       return  %i7+8
+        nop
+L(L43):
+       bgu,pt  %xcc, L(L47)
+        sllx   %o1, 3, %o3
+       sll     %o1, 3, %o4
+       ldx     [%l1], %g1
+       sllx    %g1, %o4, %g1
+       sllx    %o1, 2, %o3
+       sllx    %g2, 3, %o5
+       ldx     [%l1+8], %g3
+       ldx     [%l1+16], %g4
+       sllx    %g3, %o4, %o1
+       sllx    %g4, %o4, %o0
+       ldx     [%l1+24], %o2
+       sub     %g0, %o5, %o5
+       mov     32, %g2
+       sub     %g2, %o3, %g2
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       or      %g1, %g3, %i0
+       or      %o1, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %o5, %g1
+       and     %g1, %o2, %g1
+       sllx    %g1, %o4, %i3
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       or      %o0, %g1, %i2
+       return  %i7+8
+        nop
+       FUNEND(callback_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-structcpy.c b/callback/vacall_r/vacall-structcpy.c
new file mode 100644 (file)
index 0000000..23d3e77
--- /dev/null
@@ -0,0 +1,22 @@
+/* copy structs */
+
+/*
+ * Copyright 2016 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#define __structcpy callback_structcpy
+
+#include "structcpy.c"
diff --git a/callback/vacall_r/vacall-x86_64-linux.s b/callback/vacall_r/vacall-x86_64-linux.s
new file mode 100644 (file)
index 0000000..d2d1b42
--- /dev/null
@@ -0,0 +1,300 @@
+       .file   "vacall-x86_64.c"
+       .text
+       .p2align 4,,15
+       .type   callback_receiver, @function
+callback_receiver:
+.LFB2:
+       pushq   %rbp
+.LCFI0:
+       movq    %rsp, %rbp
+.LCFI1:
+       pushq   %r13
+.LCFI2:
+       pushq   %r12
+.LCFI3:
+       subq    $192, %rsp
+.LCFI4:
+       movq    %rcx, -48(%rbp)
+       leaq    16(%rbp), %rcx
+       movq    %rdi, -72(%rbp)
+       movq    %rsi, -64(%rbp)
+       movsd   %xmm0, -144(%rbp)
+       movq    %rcx, -184(%rbp)
+       movq    $0, -176(%rbp)
+       movsd   %xmm1, -136(%rbp)
+       movq    %rdx, -56(%rbp)
+       movsd   %xmm2, -128(%rbp)
+       leaq    -208(%rbp), %rsi
+       movq    %r8, -40(%rbp)
+       movsd   %xmm3, -120(%rbp)
+       movq    %r9, -32(%rbp)
+       movsd   %xmm4, -112(%rbp)
+       movsd   %xmm5, -104(%rbp)
+       movl    $0, -208(%rbp)
+       movsd   %xmm6, -96(%rbp)
+       movl    $0, -168(%rbp)
+       movsd   %xmm7, -88(%rbp)
+       movl    $0, -80(%rbp)
+       movl    $0, -152(%rbp)
+       movq    8(%r10), %rdi
+       call    *(%r10)
+       movl    -168(%rbp), %ecx
+       testl   %ecx, %ecx
+       je      .L41
+       cmpl    $1, %ecx
+       je      .L42
+       cmpl    $2, %ecx
+       je      .L42
+       cmpl    $3, %ecx
+       .p2align 4,,5
+       je      .L48
+       cmpl    $4, %ecx
+       .p2align 4,,5
+       je      .L49
+       cmpl    $5, %ecx
+       .p2align 4,,5
+       je      .L50
+       cmpl    $6, %ecx
+       .p2align 4,,5
+       je      .L51
+       cmpl    $7, %ecx
+       .p2align 4,,5
+       je      .L52
+       cmpl    $8, %ecx
+       .p2align 4,,5
+       je      .L46
+       cmpl    $9, %ecx
+       .p2align 4,,5
+       je      .L46
+       cmpl    $10, %ecx
+       .p2align 4,,5
+       je      .L46
+       cmpl    $11, %ecx
+       .p2align 4,,5
+       je      .L46
+       cmpl    $12, %ecx
+       .p2align 4,,5
+       je      .L53
+       cmpl    $13, %ecx
+       .p2align 4,,5
+       je      .L54
+       cmpl    $14, %ecx
+       .p2align 4,,5
+       je      .L46
+       cmpl    $15, %ecx
+       .p2align 4,,5
+       jne     .L41
+       testb   $4, -207(%rbp)
+       .p2align 4,,2
+       je      .L41
+       movq    -160(%rbp), %rsi
+       leaq    -1(%rsi), %rcx
+       cmpq    $15, %rcx
+       ja      .L41
+       movq    -176(%rbp), %rcx
+       movq    %rcx, %r12
+       movq    %rcx, %r8
+       andl    $7, %r8d
+       andq    $-8, %r12
+       cmpq    $8, %rsi
+       leaq    (%rsi,%r8), %r11
+       ja      .L35
+       cmpq    $8, %r11
+       ja      .L37
+       leal    -1(,%r11,8), %ecx
+       movl    $2, %esi
+       salq    %cl, %rsi
+       leal    0(,%r8,8), %ecx
+       decq    %rsi
+       andq    (%r12), %rsi
+       movq    %rsi, %rax
+       sarq    %cl, %rax
+       .p2align 4,,7
+.L41:
+       addq    $192, %rsp
+       popq    %r12
+       popq    %r13
+       leave
+       ret
+       .p2align 4,,7
+.L42:
+       movsbq  -200(%rbp),%rax
+       addq    $192, %rsp
+       popq    %r12
+       popq    %r13
+       leave
+       ret
+.L49:
+       movswq  -200(%rbp),%rax
+       jmp     .L41
+.L48:
+       movzbq  -200(%rbp), %rax
+       jmp     .L41
+.L46:
+       movq    -200(%rbp), %rax
+       jmp     .L41
+.L50:
+       movzwq  -200(%rbp), %rax
+       jmp     .L41
+.L51:
+       movslq  -200(%rbp),%rax
+       jmp     .L41
+.L52:
+       mov     -200(%rbp), %eax
+       jmp     .L41
+.L53:
+       movss   -200(%rbp), %xmm0
+       jmp     .L41
+.L54:
+       movlpd  -200(%rbp), %xmm0
+       jmp     .L41
+.L35:
+       cmpq    $16, %r11
+       ja      .L39
+       leal    -65(,%r11,8), %ecx
+       movl    $2, %esi
+       leal    0(,%r8,8), %r9d
+       movl    $32, %edi
+       salq    %cl, %rsi
+       leaq    0(,%r8,4), %rcx
+       movq    (%r12), %r8
+       decq    %rsi
+       andq    8(%r12), %rsi
+       subl    %ecx, %edi
+       movl    %r9d, %ecx
+       sarq    %cl, %r8
+       movl    %edi, %ecx
+       movq    %r8, %rax
+       movq    %rsi, %r11
+       movq    %rsi, %rdx
+       salq    %cl, %r11
+       salq    %cl, %r11
+       movl    %r9d, %ecx
+       orq     %r11, %rax
+       sarq    %cl, %rdx
+       jmp     .L41
+.L37:
+       movq    (%r12), %rdi
+       leal    -65(,%r11,8), %esi
+       salq    $3, %r8
+       movl    %r8d, %ecx
+       movl    $2, %r11d
+       sarq    %cl, %rdi
+       movl    %esi, %ecx
+       movl    $64, %esi
+       salq    %cl, %r11
+       subl    %r8d, %esi
+       movq    %rdi, %rax
+       decq    %r11
+       andq    8(%r12), %r11
+       movl    %esi, %ecx
+       salq    %cl, %r11
+       orq     %r11, %rax
+       jmp     .L41
+.L39:
+       leaq    0(,%r8,8), %rcx
+       movq    (%r12), %r13
+       movq    8(%r12), %r8
+       movl    $64, %edi
+       subl    %ecx, %edi
+       movl    %ecx, %r9d
+       sarq    %cl, %r13
+       movq    %r8, %rsi
+       movl    %edi, %ecx
+       salq    %cl, %rsi
+       movq    %r13, %rax
+       movl    %r9d, %ecx
+       orq     %rsi, %rax
+       leal    -129(,%r11,8), %esi
+       sarq    %cl, %r8
+       movl    $2, %r9d
+       movq    %r8, %rdx
+       movl    %esi, %ecx
+       salq    %cl, %r9
+       movl    %edi, %ecx
+       leaq    -1(%r9), %rsi
+       andq    16(%r12), %rsi
+       salq    %cl, %rsi
+       orq     %rsi, %rdx
+       jmp     .L41
+.LFE2:
+       .size   callback_receiver, .-callback_receiver
+       .p2align 4,,15
+.globl callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+.LFB3:
+       pushq   %rbp
+.LCFI5:
+       leaq    callback_receiver(%rip), %rax
+       movq    %rsp, %rbp
+.LCFI6:
+       leave
+       ret
+.LFE3:
+       .size   callback_get_receiver, .-callback_get_receiver
+       .section        .eh_frame,"a",@progbits
+.Lframe1:
+       .long   .LECIE1-.LSCIE1
+.LSCIE1:
+       .long   0x0
+       .byte   0x1
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .byte   0x10
+       .uleb128 0x1
+       .byte   0x1b
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+.LECIE1:
+.LSFDE1:
+       .long   .LEFDE1-.LASFDE1
+.LASFDE1:
+       .long   .LASFDE1-.Lframe1
+       .long   .LFB2-.
+       .long   .LFE2-.LFB2
+       .uleb128 0x0
+       .byte   0x4
+       .long   .LCFI0-.LFB2
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI1-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   .LCFI4-.LCFI1
+       .byte   0x8c
+       .uleb128 0x4
+       .byte   0x8d
+       .uleb128 0x3
+       .align 8
+.LEFDE1:
+.LSFDE3:
+       .long   .LEFDE3-.LASFDE3
+.LASFDE3:
+       .long   .LASFDE3-.Lframe1
+       .long   .LFB3-.
+       .long   .LFE3-.LFB3
+       .uleb128 0x0
+       .byte   0x4
+       .long   .LCFI5-.LFB3
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI6-.LCFI5
+       .byte   0xd
+       .uleb128 0x6
+       .align 8
+.LEFDE3:
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/callback/vacall_r/vacall-x86_64-macro.S b/callback/vacall_r/vacall-x86_64-macro.S
new file mode 100644 (file)
index 0000000..d114a77
--- /dev/null
@@ -0,0 +1,303 @@
+#include "asm-x86_64.h"
+       TEXT()
+       P2ALIGN(4,15)
+       DECLARE_FUNCTION(callback_receiver)
+FUNBEGIN(callback_receiver)
+L(FB2):
+       INSN1(push,q    ,R(rbp))
+L(CFI0):
+       INSN2(mov,q     ,R(rsp), R(rbp))
+L(CFI1):
+       INSN1(push,q    ,R(r13))
+L(CFI2):
+       INSN1(push,q    ,R(r12))
+L(CFI3):
+       INSN2(sub,q     ,NUM(192), R(rsp))
+L(CFI4):
+       INSN2(mov,q     ,R(rcx),X8 MEM_DISP(rbp,-48))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,16), R(rcx))
+       INSN2(mov,q     ,R(rdi),X8 MEM_DISP(rbp,-72))
+       INSN2(mov,q     ,R(rsi),X8 MEM_DISP(rbp,-64))
+       INSN2S(movs,d   ,R(xmm0),X8 MEM_DISP(rbp,-144))
+       INSN2(mov,q     ,R(rcx),X8 MEM_DISP(rbp,-184))
+       INSN2(mov,q     ,NUM(0),X8 MEM_DISP(rbp,-176))
+       INSN2S(movs,d   ,R(xmm1),X8 MEM_DISP(rbp,-136))
+       INSN2(mov,q     ,R(rdx),X8 MEM_DISP(rbp,-56))
+       INSN2S(movs,d   ,R(xmm2),X8 MEM_DISP(rbp,-128))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-208), R(rsi))
+       INSN2(mov,q     ,R(r8),X8 MEM_DISP(rbp,-40))
+       INSN2S(movs,d   ,R(xmm3),X8 MEM_DISP(rbp,-120))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2S(movs,d   ,R(xmm4),X8 MEM_DISP(rbp,-112))
+       INSN2S(movs,d   ,R(xmm5),X8 MEM_DISP(rbp,-104))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-208))
+       INSN2S(movs,d   ,R(xmm6),X8 MEM_DISP(rbp,-96))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-168))
+       INSN2S(movs,d   ,R(xmm7),X8 MEM_DISP(rbp,-88))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-80))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-152))
+       INSN2(mov,q     ,X8 MEM_DISP(r10,8), R(rdi))
+       INSN1(call,_    ,INDIR(X8 MEM(r10)))
+       INSN2(mov,l     ,X4 MEM_DISP(rbp,-168), R(ecx))
+       INSN2(test,l    ,R(ecx), R(ecx))
+       INSN1(je,_      ,L(41))
+       INSN2(cmp,l     ,NUM(1), R(ecx))
+       INSN1(je,_      ,L(42))
+       INSN2(cmp,l     ,NUM(2), R(ecx))
+       INSN1(je,_      ,L(42))
+       INSN2(cmp,l     ,NUM(3), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(4), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(5), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(50))
+       INSN2(cmp,l     ,NUM(6), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(7), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(52))
+       INSN2(cmp,l     ,NUM(8), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(46))
+       INSN2(cmp,l     ,NUM(9), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(46))
+       INSN2(cmp,l     ,NUM(10), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(46))
+       INSN2(cmp,l     ,NUM(11), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(46))
+       INSN2(cmp,l     ,NUM(12), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(13), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(54))
+       INSN2(cmp,l     ,NUM(14), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(46))
+       INSN2(cmp,l     ,NUM(15), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(jne,_     ,L(41))
+       INSN2(test,b    ,NUM(4),X1 MEM_DISP(rbp,-207))
+       P2ALIGN(4,2)
+       INSN1(je,_      ,L(41))
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-160), R(rsi))
+       INSN2(lea,q     ,X8 MEM_DISP(rsi,-1), R(rcx))
+       INSN2(cmp,q     ,NUM(15), R(rcx))
+       INSN1(ja,_      ,L(41))
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-176), R(rcx))
+       INSN2(mov,q     ,R(rcx), R(r12))
+       INSN2(mov,q     ,R(rcx), R(r8))
+       INSN2(and,l     ,NUM(7), R(r8d))
+       INSN2(and,q     ,NUM(-8), R(r12))
+       INSN2(cmp,q     ,NUM(8), R(rsi))
+       INSN2(lea,q     ,X8 MEM_INDEX(rsi,r8), R(r11))
+       INSN1(ja,_      ,L(35))
+       INSN2(cmp,q     ,NUM(8), R(r11))
+       INSN1(ja,_      ,L(37))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-1,r11,8), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(esi))
+       INSN2(sal,q     ,R(cl), R(rsi))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx))
+       INSN1(dec,q     ,R(rsi))
+       INSN2(and,q     ,X8 MEM(r12), R(rsi))
+       INSN2(mov,q     ,R(rsi), R(rax))
+       INSN2(sar,q     ,R(cl), R(rax))
+       P2ALIGN(4,7)
+L(41):
+       INSN2(add,q     ,NUM(192), R(rsp))
+       INSN1(pop,q     ,R(r12))
+       INSN1(pop,q     ,R(r13))
+       leave
+       ret
+       P2ALIGN(4,7)
+L(42):
+       INSN2MOVXQ(movs,b,X1 MEM_DISP(rbp,-200),R(rax))
+       INSN2(add,q     ,NUM(192), R(rsp))
+       INSN1(pop,q     ,R(r12))
+       INSN1(pop,q     ,R(r13))
+       leave
+       ret
+L(49):
+       INSN2MOVXQ(movs,w,X2 MEM_DISP(rbp,-200),R(rax))
+       INSN1(jmp,_     ,L(41))
+L(48):
+       INSN2MOVXQ(movz,b,X1 MEM_DISP(rbp,-200), R(rax))
+       INSN1(jmp,_     ,L(41))
+L(46):
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-200), R(rax))
+       INSN1(jmp,_     ,L(41))
+L(50):
+       INSN2MOVXQ(movz,w,X2 MEM_DISP(rbp,-200), R(rax))
+       INSN1(jmp,_     ,L(41))
+L(51):
+       INSN2MOVXLQ(movs,l,X4 MEM_DISP(rbp,-200),R(rax))
+       INSN1(jmp,_     ,L(41))
+L(52):
+       INSN2(mov,l     ,X4 MEM_DISP(rbp,-200), R(eax))
+       INSN1(jmp,_     ,L(41))
+L(53):
+       INSN2S(movs,s   ,X4 MEM_DISP(rbp,-200), R(xmm0))
+       INSN1(jmp,_     ,L(41))
+L(54):
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-200), R(xmm0))
+       INSN1(jmp,_     ,L(41))
+L(35):
+       INSN2(cmp,q     ,NUM(16), R(r11))
+       INSN1(ja,_      ,L(39))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-65,r11,8), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(esi))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(r9d))
+       INSN2(mov,l     ,NUM(32), R(edi))
+       INSN2(sal,q     ,R(cl), R(rsi))
+       INSN2(lea,q     ,X8 MEM_DISP_SHINDEX0(0,r8,4), R(rcx))
+       INSN2(mov,q     ,X8 MEM(r12), R(r8))
+       INSN1(dec,q     ,R(rsi))
+       INSN2(and,q     ,X8 MEM_DISP(r12,8), R(rsi))
+       INSN2(sub,l     ,R(ecx), R(edi))
+       INSN2(mov,l     ,R(r9d), R(ecx))
+       INSN2(sar,q     ,R(cl), R(r8))
+       INSN2(mov,l     ,R(edi), R(ecx))
+       INSN2(mov,q     ,R(r8), R(rax))
+       INSN2(mov,q     ,R(rsi), R(r11))
+       INSN2(mov,q     ,R(rsi), R(rdx))
+       INSN2(sal,q     ,R(cl), R(r11))
+       INSN2(sal,q     ,R(cl), R(r11))
+       INSN2(mov,l     ,R(r9d), R(ecx))
+       INSN2(or,q      ,R(r11), R(rax))
+       INSN2(sar,q     ,R(cl), R(rdx))
+       INSN1(jmp,_     ,L(41))
+L(37):
+       INSN2(mov,q     ,X8 MEM(r12), R(rdi))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-65,r11,8), R(esi))
+       INSN2(sal,q     ,NUM(3), R(r8))
+       INSN2(mov,l     ,R(r8d), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(r11d))
+       INSN2(sar,q     ,R(cl), R(rdi))
+       INSN2(mov,l     ,R(esi), R(ecx))
+       INSN2(mov,l     ,NUM(64), R(esi))
+       INSN2(sal,q     ,R(cl), R(r11))
+       INSN2(sub,l     ,R(r8d), R(esi))
+       INSN2(mov,q     ,R(rdi), R(rax))
+       INSN1(dec,q     ,R(r11))
+       INSN2(and,q     ,X8 MEM_DISP(r12,8), R(r11))
+       INSN2(mov,l     ,R(esi), R(ecx))
+       INSN2(sal,q     ,R(cl), R(r11))
+       INSN2(or,q      ,R(r11), R(rax))
+       INSN1(jmp,_     ,L(41))
+L(39):
+       INSN2(lea,q     ,X8 MEM_DISP_SHINDEX0(0,r8,8), R(rcx))
+       INSN2(mov,q     ,X8 MEM(r12), R(r13))
+       INSN2(mov,q     ,X8 MEM_DISP(r12,8), R(r8))
+       INSN2(mov,l     ,NUM(64), R(edi))
+       INSN2(sub,l     ,R(ecx), R(edi))
+       INSN2(mov,l     ,R(ecx), R(r9d))
+       INSN2(sar,q     ,R(cl), R(r13))
+       INSN2(mov,q     ,R(r8), R(rsi))
+       INSN2(mov,l     ,R(edi), R(ecx))
+       INSN2(sal,q     ,R(cl), R(rsi))
+       INSN2(mov,q     ,R(r13), R(rax))
+       INSN2(mov,l     ,R(r9d), R(ecx))
+       INSN2(or,q      ,R(rsi), R(rax))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-129,r11,8), R(esi))
+       INSN2(sar,q     ,R(cl), R(r8))
+       INSN2(mov,l     ,NUM(2), R(r9d))
+       INSN2(mov,q     ,R(r8), R(rdx))
+       INSN2(mov,l     ,R(esi), R(ecx))
+       INSN2(sal,q     ,R(cl), R(r9))
+       INSN2(mov,l     ,R(edi), R(ecx))
+       INSN2(lea,q     ,X8 MEM_DISP(r9,-1), R(rsi))
+       INSN2(and,q     ,X8 MEM_DISP(r12,16), R(rsi))
+       INSN2(sal,q     ,R(cl), R(rsi))
+       INSN2(or,q      ,R(rsi), R(rdx))
+       INSN1(jmp,_     ,L(41))
+L(FE2):
+       FUNEND(callback_receiver, .-callback_receiver)
+       P2ALIGN(4,15)
+GLOBL(C(callback_get_receiver))
+       DECLARE_FUNCTION(callback_get_receiver)
+FUNBEGIN(callback_get_receiver)
+L(FB3):
+       INSN1(push,q    ,R(rbp))
+L(CFI5):
+       INSN2(lea,q     ,ADDR_PCRELATIVE(C(callback_receiver)), R(rax))
+       INSN2(mov,q     ,R(rsp), R(rbp))
+L(CFI6):
+       leave
+       ret
+L(FE3):
+       FUNEND(callback_get_receiver, .-callback_get_receiver)
+#if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__))
+       .section        EH_FRAME_SECTION
+L(frame1):
+       .long   L(ECIE1)-.LSCIE1
+L(SCIE1):
+       .long   0x0
+       .byte   0x1
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .byte   0x10
+       .uleb128 0x1
+       .byte   0x1b
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+L(ECIE1):
+L(SFDE1):
+       .long   L(EFDE1)-.LASFDE1
+L(ASFDE1):
+       .long   L(ASFDE1)-.Lframe1
+       .long   L(FB2)-.
+       .long   L(FE2)-.LFB2
+       .uleb128 0x0
+       .byte   0x4
+       .long   L(CFI0)-.LFB2
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   L(CFI1)-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   L(CFI4)-.LCFI1
+       .byte   0x8c
+       .uleb128 0x4
+       .byte   0x8d
+       .uleb128 0x3
+       .align 8
+L(EFDE1):
+L(SFDE3):
+       .long   L(EFDE3)-.LASFDE3
+L(ASFDE3):
+       .long   L(ASFDE3)-.Lframe1
+       .long   L(FB3)-.
+       .long   L(FE3)-.LFB3
+       .uleb128 0x0
+       .byte   0x4
+       .long   L(CFI5)-.LFB3
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   L(CFI6)-.LCFI5
+       .byte   0xd
+       .uleb128 0x6
+       .align 8
+L(EFDE3):
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-x86_64-windows-macro.S b/callback/vacall_r/vacall-x86_64-windows-macro.S
new file mode 100644 (file)
index 0000000..5a4ad0b
--- /dev/null
@@ -0,0 +1,390 @@
+#include "asm-x86_64.h"
+       TEXT()
+       P2ALIGN(4,15)
+       DECLARE_FUNCTION(callback_receiver)
+FUNBEGIN(callback_receiver)
+L(FB0):
+       INSN1(push,q    ,R(rbp))
+L(CFI0):
+       INSN2(mov,q     ,R(rsp), R(rbp))
+L(CFI1):
+       INSN2(sub,q     ,NUM(144), R(rsp))
+       INSN2(mov,q     ,R(rcx),X8 MEM_DISP(rbp,16))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,16), R(rcx))
+       INSN2(mov,q     ,R(rdx),X8 MEM_DISP(rbp,24))
+       INSN2(mov,q     ,R(r8),X8 MEM_DISP(rbp,32))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-112), R(rdx))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,40))
+       INSN2(mov,q     ,R(rcx),X8 MEM_DISP(rbp,-88))
+       INSN2S(movs,s   ,R(xmm0),X4 MEM_DISP(rbp,-52))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-112))
+       INSN2S(movs,s   ,R(xmm1),X4 MEM_DISP(rbp,-48))
+       INSN2(mov,q     ,NUM(0),X8 MEM_DISP(rbp,-80))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-72))
+       INSN2S(movs,s   ,R(xmm2),X4 MEM_DISP(rbp,-44))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-56))
+       INSN2S(movs,s   ,R(xmm3),X4 MEM_DISP(rbp,-40))
+       INSN2(mov,q     ,X8 MEM_DISP(r10,8), R(rcx))
+       INSN2S(movs,d   ,R(xmm0),X8 MEM_DISP(rbp,-32))
+       INSN2S(movs,d   ,R(xmm1),X8 MEM_DISP(rbp,-24))
+       INSN2S(movs,d   ,R(xmm2),X8 MEM_DISP(rbp,-16))
+       INSN2S(movs,d   ,R(xmm3),X8 MEM_DISP(rbp,-8))
+       INSN1(call,_    ,INDIR(X8 MEM(r10)))
+       INSN2(mov,l     ,X4 MEM_DISP(rbp,-72), R(edx))
+       INSN2(test,l    ,R(edx), R(edx))
+       INSN1(je,_      ,L(1))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(je,_      ,L(34))
+       INSN2(cmp,l     ,NUM(2), R(edx))
+       INSN1(je,_      ,L(34))
+       INSN2(cmp,l     ,NUM(3), R(edx))
+       INSN1(je,_      ,L(37))
+       INSN2(cmp,l     ,NUM(4), R(edx))
+       INSN1(je,_      ,L(38))
+       INSN2(cmp,l     ,NUM(5), R(edx))
+       INSN1(je,_      ,L(39))
+       INSN2(cmp,l     ,NUM(6), R(edx))
+       INSN1(je,_      ,L(40))
+       INSN2(cmp,l     ,NUM(7), R(edx))
+       INSN1(je,_      ,L(41))
+       INSN2(cmp,l     ,NUM(8), R(edx))
+       INSN1(je,_      ,L(35))
+       INSN2(cmp,l     ,NUM(9), R(edx))
+       INSN1(je,_      ,L(35))
+       INSN2(cmp,l     ,NUM(10), R(edx))
+       INSN1(je,_      ,L(35))
+       INSN2(cmp,l     ,NUM(11), R(edx))
+       INSN1(je,_      ,L(35))
+       INSN2(cmp,l     ,NUM(12), R(edx))
+       INSN1(je,_      ,L(42))
+       INSN2(cmp,l     ,NUM(13), R(edx))
+       INSN1(je,_      ,L(43))
+       INSN2(cmp,l     ,NUM(14), R(edx))
+       INSN1(je,_      ,L(35))
+       INSN2(cmp,l     ,NUM(15), R(edx))
+       INSN1(jne,_     ,L(1))
+       INSN2(test,b    ,NUM(4),X1 MEM_DISP(rbp,-111))
+       INSN1(je,_      ,L(17))
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-64), R(rdx))
+       INSN2(lea,q     ,X8 MEM_DISP(rdx,-4), R(rcx))
+       INSN2(test,q    ,NUM(-5), R(rcx))
+       INSN1(je,_      ,L(20))
+       INSN2(lea,q     ,X8 MEM_DISP(rdx,-1), R(rcx))
+       INSN2(cmp,q     ,NUM(1), R(rcx))
+       INSN1(ja,_      ,L(1))
+L(20):
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-80), R(r8))
+       INSN2(mov,q     ,R(r8), R(r9))
+       INSN2(and,l     ,NUM(7), R(r8d))
+       INSN2(add,q     ,R(r8), R(rdx))
+       INSN2(and,q     ,NUM(-8), R(r9))
+       INSN2(cmp,q     ,NUM(8), R(rdx))
+       INSN1(ja,_      ,L(19))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-1,rdx,8), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(edx))
+       INSN2(sal,q     ,R(cl), R(rdx))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx))
+       INSN2(sub,q     ,NUM(1), R(rdx))
+       INSN2(and,q     ,X8 MEM(r9), R(rdx))
+       INSN2(sar,q     ,R(cl), R(rdx))
+       INSN2(mov,q     ,R(rdx), R(rax))
+L(1):
+       leave
+L(CFI2):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(34):
+L(CFI3):
+       INSN2MOVXQ(movs,b,X1 MEM_DISP(rbp,-104), R(rax))
+       leave
+L(CFI4):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(35):
+L(CFI5):
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-104), R(rax))
+       leave
+L(CFI6):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(37):
+L(CFI7):
+       INSN2MOVXL(movz,b,X1 MEM_DISP(rbp,-104), R(eax))
+       leave
+L(CFI8):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(38):
+L(CFI9):
+       INSN2MOVXQ(movs,w,X2 MEM_DISP(rbp,-104), R(rax))
+       leave
+L(CFI10):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(39):
+L(CFI11):
+       INSN2MOVXL(movz,w,X2 MEM_DISP(rbp,-104), R(eax))
+       leave
+L(CFI12):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(40):
+L(CFI13):
+       INSN2MOVXLQ(movs,l,X4 MEM_DISP(rbp,-104), R(rax))
+       leave
+L(CFI14):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(42):
+L(CFI15):
+       INSN2S(movs,s   ,X4 MEM_DISP(rbp,-104), R(xmm0))
+       leave
+L(CFI16):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(41):
+L(CFI17):
+       INSN2(mov,l     ,X4 MEM_DISP(rbp,-104), R(eax))
+       leave
+L(CFI18):
+       ret
+L(43):
+L(CFI19):
+       INSN2S(movs,d   ,X8 MEM_DISP(rbp,-104), R(xmm0))
+       leave
+L(CFI20):
+       ret
+L(17):
+L(CFI21):
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-80), R(rax))
+       leave
+L(CFI22):
+       ret
+L(19):
+L(CFI23):
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-65,rdx,8), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(edx))
+       INSN2(sal,q     ,R(cl), R(rdx))
+       INSN2(mov,l     ,R(r8d), R(ecx))
+       INSN2(sub,q     ,NUM(1), R(rdx))
+       INSN2(and,q     ,X8 MEM_DISP(r9,8), R(rdx))
+       INSN1(neg,l     ,R(ecx))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(64,rcx,8), R(ecx))
+       INSN2(sal,q     ,R(cl), R(rdx))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx))
+       INSN2(mov,q     ,X8 MEM(r9), R(r8))
+       leave
+L(CFI24):
+       INSN2(sar,q     ,R(cl), R(r8))
+       INSN2(or,q      ,R(r8), R(rdx))
+       INSN2(mov,q     ,R(rdx), R(rax))
+       ret
+L(FE0):
+       FUNEND(callback_receiver, .-callback_receiver)
+       P2ALIGN(4,15)
+       GLOBL(C(callback_get_receiver))
+       DECLARE_FUNCTION(callback_get_receiver)
+FUNBEGIN(callback_get_receiver)
+L(FB1):
+       INSN1(push,q    ,R(rbp))
+L(CFI25):
+       INSN2(lea,q     ,ADDR_PCRELATIVE(C(callback_receiver)), R(rax))
+       INSN2(mov,q     ,R(rsp), R(rbp))
+L(CFI26):
+       INSN1(pop,q     ,R(rbp))
+L(CFI27):
+       ret
+L(FE1):
+       FUNEND(callback_get_receiver, .-callback_get_receiver)
+#if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__))
+       .section        EH_FRAME_SECTION
+L(frame1):
+       .long   L(ECIE1)-.LSCIE1
+L(SCIE1):
+       .long   0
+       .byte   0x3
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .uleb128 0x10
+       .uleb128 0x1
+       .byte   0x1b
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+L(ECIE1):
+L(SFDE1):
+       .long   L(EFDE1)-.LASFDE1
+L(ASFDE1):
+       .long   L(ASFDE1)-.Lframe1
+       .long   L(FB0)-.
+       .long   L(FE0)-.LFB0
+       .uleb128 0
+       .byte   0x4
+       .long   L(CFI0)-.LFB0
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   L(CFI1)-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   L(CFI2)-.LCFI1
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI3)-.LCFI2
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI4)-.LCFI3
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI5)-.LCFI4
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI6)-.LCFI5
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI7)-.LCFI6
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI8)-.LCFI7
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI9)-.LCFI8
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI10)-.LCFI9
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI11)-.LCFI10
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI12)-.LCFI11
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI13)-.LCFI12
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI14)-.LCFI13
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI15)-.LCFI14
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI16)-.LCFI15
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI17)-.LCFI16
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI18)-.LCFI17
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI19)-.LCFI18
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI20)-.LCFI19
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI21)-.LCFI20
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI22)-.LCFI21
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI23)-.LCFI22
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI24)-.LCFI23
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .align 8
+L(EFDE1):
+L(SFDE3):
+       .long   L(EFDE3)-.LASFDE3
+L(ASFDE3):
+       .long   L(ASFDE3)-.Lframe1
+       .long   L(FB1)-.
+       .long   L(FE1)-.LFB1
+       .uleb128 0
+       .byte   0x4
+       .long   L(CFI25)-.LFB1
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   L(CFI26)-.LCFI25
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   L(CFI27)-.LCFI26
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .align 8
+L(EFDE3):
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/callback/vacall_r/vacall-x86_64-windows.s b/callback/vacall_r/vacall-x86_64-windows.s
new file mode 100644 (file)
index 0000000..4665ea9
--- /dev/null
@@ -0,0 +1,387 @@
+       .file   "vacall-x86_64-windows.c"
+       .text
+       .p2align 4,,15
+       .type   callback_receiver, @function
+callback_receiver:
+.LFB0:
+       pushq   %rbp
+.LCFI0:
+       movq    %rsp, %rbp
+.LCFI1:
+       subq    $144, %rsp
+       movq    %rcx, 16(%rbp)
+       leaq    16(%rbp), %rcx
+       movq    %rdx, 24(%rbp)
+       movq    %r8, 32(%rbp)
+       leaq    -112(%rbp), %rdx
+       movq    %r9, 40(%rbp)
+       movq    %rcx, -88(%rbp)
+       movss   %xmm0, -52(%rbp)
+       movl    $0, -112(%rbp)
+       movss   %xmm1, -48(%rbp)
+       movq    $0, -80(%rbp)
+       movl    $0, -72(%rbp)
+       movss   %xmm2, -44(%rbp)
+       movl    $0, -56(%rbp)
+       movss   %xmm3, -40(%rbp)
+       movq    8(%r10), %rcx
+       movsd   %xmm0, -32(%rbp)
+       movsd   %xmm1, -24(%rbp)
+       movsd   %xmm2, -16(%rbp)
+       movsd   %xmm3, -8(%rbp)
+       call    *(%r10)
+       movl    -72(%rbp), %edx
+       testl   %edx, %edx
+       je      .L1
+       cmpl    $1, %edx
+       je      .L34
+       cmpl    $2, %edx
+       je      .L34
+       cmpl    $3, %edx
+       je      .L37
+       cmpl    $4, %edx
+       je      .L38
+       cmpl    $5, %edx
+       je      .L39
+       cmpl    $6, %edx
+       je      .L40
+       cmpl    $7, %edx
+       je      .L41
+       cmpl    $8, %edx
+       je      .L35
+       cmpl    $9, %edx
+       je      .L35
+       cmpl    $10, %edx
+       je      .L35
+       cmpl    $11, %edx
+       je      .L35
+       cmpl    $12, %edx
+       je      .L42
+       cmpl    $13, %edx
+       je      .L43
+       cmpl    $14, %edx
+       je      .L35
+       cmpl    $15, %edx
+       jne     .L1
+       testb   $4, -111(%rbp)
+       je      .L17
+       movq    -64(%rbp), %rdx
+       leaq    -4(%rdx), %rcx
+       testq   $-5, %rcx
+       je      .L20
+       leaq    -1(%rdx), %rcx
+       cmpq    $1, %rcx
+       ja      .L1
+.L20:
+       movq    -80(%rbp), %r8
+       movq    %r8, %r9
+       andl    $7, %r8d
+       addq    %r8, %rdx
+       andq    $-8, %r9
+       cmpq    $8, %rdx
+       ja      .L19
+       leal    -1(,%rdx,8), %ecx
+       movl    $2, %edx
+       salq    %cl, %rdx
+       leal    0(,%r8,8), %ecx
+       subq    $1, %rdx
+       andq    (%r9), %rdx
+       sarq    %cl, %rdx
+       movq    %rdx, %rax
+.L1:
+       leave
+.LCFI2:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L34:
+.LCFI3:
+       movsbq  -104(%rbp), %rax
+       leave
+.LCFI4:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L35:
+.LCFI5:
+       movq    -104(%rbp), %rax
+       leave
+.LCFI6:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L37:
+.LCFI7:
+       movzbl  -104(%rbp), %eax
+       leave
+.LCFI8:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L38:
+.LCFI9:
+       movswq  -104(%rbp), %rax
+       leave
+.LCFI10:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L39:
+.LCFI11:
+       movzwl  -104(%rbp), %eax
+       leave
+.LCFI12:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L40:
+.LCFI13:
+       movslq  -104(%rbp), %rax
+       leave
+.LCFI14:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L42:
+.LCFI15:
+       movss   -104(%rbp), %xmm0
+       leave
+.LCFI16:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L41:
+.LCFI17:
+       movl    -104(%rbp), %eax
+       leave
+.LCFI18:
+       ret
+.L43:
+.LCFI19:
+       movsd   -104(%rbp), %xmm0
+       leave
+.LCFI20:
+       ret
+.L17:
+.LCFI21:
+       movq    -80(%rbp), %rax
+       leave
+.LCFI22:
+       ret
+.L19:
+.LCFI23:
+       leal    -65(,%rdx,8), %ecx
+       movl    $2, %edx
+       salq    %cl, %rdx
+       movl    %r8d, %ecx
+       subq    $1, %rdx
+       andq    8(%r9), %rdx
+       negl    %ecx
+       leal    64(,%rcx,8), %ecx
+       salq    %cl, %rdx
+       leal    0(,%r8,8), %ecx
+       movq    (%r9), %r8
+       leave
+.LCFI24:
+       sarq    %cl, %r8
+       orq     %r8, %rdx
+       movq    %rdx, %rax
+       ret
+.LFE0:
+       .size   callback_receiver, .-callback_receiver
+       .p2align 4,,15
+       .globl  callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+.LFB1:
+       pushq   %rbp
+.LCFI25:
+       leaq    callback_receiver(%rip), %rax
+       movq    %rsp, %rbp
+.LCFI26:
+       popq    %rbp
+.LCFI27:
+       ret
+.LFE1:
+       .size   callback_get_receiver, .-callback_get_receiver
+       .section        .eh_frame,"a",@progbits
+.Lframe1:
+       .long   .LECIE1-.LSCIE1
+.LSCIE1:
+       .long   0
+       .byte   0x3
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .uleb128 0x10
+       .uleb128 0x1
+       .byte   0x1b
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+.LECIE1:
+.LSFDE1:
+       .long   .LEFDE1-.LASFDE1
+.LASFDE1:
+       .long   .LASFDE1-.Lframe1
+       .long   .LFB0-.
+       .long   .LFE0-.LFB0
+       .uleb128 0
+       .byte   0x4
+       .long   .LCFI0-.LFB0
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI1-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   .LCFI2-.LCFI1
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI3-.LCFI2
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI4-.LCFI3
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI5-.LCFI4
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI6-.LCFI5
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI7-.LCFI6
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI8-.LCFI7
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI9-.LCFI8
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI10-.LCFI9
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI11-.LCFI10
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI12-.LCFI11
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI13-.LCFI12
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI14-.LCFI13
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI15-.LCFI14
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI16-.LCFI15
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI17-.LCFI16
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI18-.LCFI17
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI19-.LCFI18
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI20-.LCFI19
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI21-.LCFI20
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI22-.LCFI21
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI23-.LCFI22
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI24-.LCFI23
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .align 8
+.LEFDE1:
+.LSFDE3:
+       .long   .LEFDE3-.LASFDE3
+.LASFDE3:
+       .long   .LASFDE3-.Lframe1
+       .long   .LFB1-.
+       .long   .LFE1-.LFB1
+       .uleb128 0
+       .byte   0x4
+       .long   .LCFI25-.LFB1
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI26-.LCFI25
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   .LCFI27-.LCFI26
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .align 8
+.LEFDE3:
+       .ident  "GCC: (GNU) 5.4.0"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/callback/vacall_r/vacall-x86_64-x32-linux.s b/callback/vacall_r/vacall-x86_64-x32-linux.s
new file mode 100644 (file)
index 0000000..ae2bf5b
--- /dev/null
@@ -0,0 +1,338 @@
+       .file   "vacall-x86_64.c"
+       .section        .text.unlikely,"ax",@progbits
+.LCOLDB0:
+       .text
+.LHOTB0:
+       .p2align 4,,15
+       .type   callback_receiver, @function
+callback_receiver:
+.LFB0:
+       pushq   %rbp
+.LCFI0:
+       movl    %esp, %ebp
+.LCFI1:
+       pushq   %r14
+       pushq   %r12
+       subl    $176, %esp
+.LCFI2:
+       movq    %rdi, -72(%ebp)
+       leal    16(%rbp), %edi
+       movq    %rcx, -48(%ebp)
+       movl    (%r10d), %ecx
+       movsd   %xmm0, -144(%ebp)
+       movl    %edi, -168(%ebp)
+       movl    4(%r10d), %edi
+       movsd   %xmm1, -136(%ebp)
+       movq    %rsi, -64(%ebp)
+       movsd   %xmm2, -128(%ebp)
+       leal    -192(%rbp), %esi
+       movq    %rdx, -56(%ebp)
+       movsd   %xmm3, -120(%ebp)
+       movq    %r8, -40(%ebp)
+       movsd   %xmm4, -112(%ebp)
+       movq    %r9, -32(%ebp)
+       movsd   %xmm5, -104(%ebp)
+       movsd   %xmm6, -96(%ebp)
+       movl    $0, -192(%ebp)
+       movsd   %xmm7, -88(%ebp)
+       movl    $0, -164(%ebp)
+       movl    $0, -160(%ebp)
+       movl    $0, -80(%ebp)
+       movl    $0, -152(%ebp)
+       call    *%rcx
+       movl    -160(%ebp), %ecx
+       testl   %ecx, %ecx
+       je      .L1
+       cmpl    $1, %ecx
+       je      .L27
+       cmpl    $2, %ecx
+       je      .L27
+       cmpl    $3, %ecx
+       je      .L33
+       cmpl    $4, %ecx
+       je      .L34
+       cmpl    $5, %ecx
+       je      .L35
+       cmpl    $6, %ecx
+       je      .L28
+       cmpl    $7, %ecx
+       je      .L30
+       cmpl    $8, %ecx
+       je      .L28
+       cmpl    $9, %ecx
+       je      .L30
+       cmpl    $10, %ecx
+       je      .L31
+       cmpl    $11, %ecx
+       je      .L31
+       cmpl    $12, %ecx
+       je      .L36
+       cmpl    $13, %ecx
+       je      .L37
+       cmpl    $14, %ecx
+       je      .L30
+       cmpl    $15, %ecx
+       jne     .L1
+       testb   $4, -191(%ebp)
+       je      .L1
+       movl    -156(%ebp), %ecx
+       leal    -1(%rcx), %esi
+       cmpl    $15, %esi
+       ja      .L1
+       movl    -164(%ebp), %esi
+       movl    %esi, %edi
+       andl    $7, %esi
+       andl    $-8, %edi
+       cmpl    $8, %ecx
+       leal    (%rcx,%rsi), %r11d
+       ja      .L17
+       cmpl    $8, %r11d
+       ja      .L18
+       leal    -1(,%r11,8), %ecx
+       movl    $2, %r8d
+       salq    %cl, %r8
+       movq    %r8, %rcx
+       subq    $1, %rcx
+       andq    (%edi), %rcx
+       movq    %rcx, %rdi
+       leal    0(,%rsi,8), %ecx
+       sarq    %cl, %rdi
+       movq    %rdi, %rax
+.L1:
+       addl    $176, %esp
+       popq    %r12
+       popq    %r14
+       popq    %rbp
+.LCFI3:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L27:
+.LCFI4:
+       movsbq  -184(%ebp), %rax
+       addl    $176, %esp
+       popq    %r12
+       popq    %r14
+       popq    %rbp
+.LCFI5:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L28:
+.LCFI6:
+       movslq  -184(%ebp), %rax
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L33:
+       movzbl  -184(%ebp), %eax
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L34:
+       movswq  -184(%ebp), %rax
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L30:
+       movl    -184(%ebp), %eax
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L35:
+       movzwl  -184(%ebp), %eax
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L36:
+       movss   -184(%ebp), %xmm0
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L31:
+       movq    -184(%ebp), %rax
+       jmp     .L1
+.L37:
+       movsd   -184(%ebp), %xmm0
+       jmp     .L1
+.L17:
+       cmpl    $16, %r11d
+       leal    0(,%rsi,8), %r9d
+       jbe     .L38
+       negl    %esi
+       movq    8(%edi), %r8
+       movl    %r9d, %ecx
+       leal    64(,%rsi,8), %r12d
+       movq    (%edi), %rsi
+       movq    %r8, %r14
+       sarq    %cl, %rsi
+       movl    %r12d, %ecx
+       salq    %cl, %r14
+       leal    -129(,%r11,8), %ecx
+       orq     %r14, %rsi
+       movq    %rsi, %rax
+       movl    $2, %esi
+       salq    %cl, %rsi
+       movl    %r12d, %ecx
+       subq    $1, %rsi
+       andq    16(%edi), %rsi
+       salq    %cl, %rsi
+       movl    %r9d, %ecx
+       sarq    %cl, %r8
+       orq     %r8, %rsi
+       movq    %rsi, %rdx
+       jmp     .L1
+.L18:
+       leal    -65(,%r11,8), %ecx
+       movl    $2, %r8d
+       salq    %cl, %r8
+       movl    %esi, %ecx
+       subq    $1, %r8
+       andq    8(%edi), %r8
+       negl    %ecx
+       leal    64(,%rcx,8), %ecx
+       movq    (%edi), %rdi
+       salq    %cl, %r8
+       leal    0(,%rsi,8), %ecx
+       sarq    %cl, %rdi
+       orq     %rdi, %r8
+       movq    %r8, %rax
+       jmp     .L1
+.L38:
+       leal    -65(,%r11,8), %ecx
+       movl    $2, %r8d
+       movq    (%edi), %r11
+       imull   $-4, %esi, %esi
+       salq    %cl, %r8
+       movl    %r9d, %ecx
+       subq    $1, %r8
+       andq    8(%edi), %r8
+       sarq    %cl, %r11
+       addl    $32, %esi
+       movl    %esi, %ecx
+       movq    %r8, %rdi
+       salq    %cl, %rdi
+       salq    %cl, %rdi
+       movl    %r9d, %ecx
+       orq     %rdi, %r11
+       sarq    %cl, %r8
+       movq    %r11, %rax
+       movq    %r8, %rdx
+       jmp     .L1
+.LFE0:
+       .size   callback_receiver, .-callback_receiver
+       .section        .text.unlikely
+.LCOLDE0:
+       .text
+.LHOTE0:
+       .section        .text.unlikely
+.LCOLDB1:
+       .text
+.LHOTB1:
+       .p2align 4,,15
+       .globl  callback_get_receiver
+       .type   callback_get_receiver, @function
+callback_get_receiver:
+.LFB1:
+       pushq   %rbp
+.LCFI7:
+       leal    callback_receiver(%rip), %eax
+       movl    %esp, %ebp
+.LCFI8:
+       popq    %rbp
+.LCFI9:
+       ret
+.LFE1:
+       .size   callback_get_receiver, .-callback_get_receiver
+       .section        .text.unlikely
+.LCOLDE1:
+       .text
+.LHOTE1:
+       .section        .eh_frame,"a",@progbits
+.Lframe1:
+       .long   .LECIE1-.LSCIE1
+.LSCIE1:
+       .long   0
+       .byte   0x3
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .uleb128 0x10
+       .uleb128 0x1
+       .byte   0x1b
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 4
+.LECIE1:
+.LSFDE1:
+       .long   .LEFDE1-.LASFDE1
+.LASFDE1:
+       .long   .LASFDE1-.Lframe1
+       .long   .LFB0-.
+       .long   .LFE0-.LFB0
+       .uleb128 0
+       .byte   0x4
+       .long   .LCFI0-.LFB0
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI1-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   .LCFI2-.LCFI1
+       .byte   0x8e
+       .uleb128 0x3
+       .byte   0x8c
+       .uleb128 0x4
+       .byte   0x4
+       .long   .LCFI3-.LCFI2
+       .byte   0xa
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI4-.LCFI3
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI5-.LCFI4
+       .byte   0xa
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI6-.LCFI5
+       .byte   0xb
+       .align 4
+.LEFDE1:
+.LSFDE3:
+       .long   .LEFDE3-.LASFDE3
+.LASFDE3:
+       .long   .LASFDE3-.Lframe1
+       .long   .LFB1-.
+       .long   .LFE1-.LFB1
+       .uleb128 0
+       .byte   0x4
+       .long   .LCFI7-.LFB1
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI8-.LCFI7
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   .LCFI9-.LCFI8
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .align 4
+.LEFDE3:
+       .ident  "GCC: (GNU) 5.4.0"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/callback/vacall_r/vacall_r.h b/callback/vacall_r/vacall_r.h
new file mode 100644 (file)
index 0000000..0e66c2e
--- /dev/null
@@ -0,0 +1,548 @@
+/*
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#ifndef _VACALL_R_H
+#define _VACALL_R_H
+
+#include <stddef.h>
+
+#include "ffcall-abi.h"
+
+
+/* Use a consistent prefix for all symbols in libcallback. */
+#define vacall_start                   callback_start
+#define vacall_start_struct            callback_start_struct
+#define vacall_arg_char                callback_arg_char
+#define vacall_arg_schar               callback_arg_schar
+#define vacall_arg_uchar               callback_arg_uchar
+#define vacall_arg_short               callback_arg_short
+#define vacall_arg_ushort              callback_arg_ushort
+#define vacall_arg_int                 callback_arg_int
+#define vacall_arg_uint                callback_arg_uint
+#define vacall_arg_long                callback_arg_long
+#define vacall_arg_ulong               callback_arg_ulong
+#define vacall_arg_longlong            callback_arg_longlong
+#define vacall_arg_ulonglong           callback_arg_ulonglong
+#define vacall_arg_float               callback_arg_float
+#define vacall_arg_double              callback_arg_double
+#define vacall_arg_ptr                 callback_arg_ptr
+#define vacall_arg_struct              callback_arg_struct
+#define vacall_return_void             callback_return_void
+#define vacall_return_char             callback_return_char
+#define vacall_return_schar            callback_return_schar
+#define vacall_return_uchar            callback_return_uchar
+#define vacall_return_short            callback_return_short
+#define vacall_return_ushort           callback_return_ushort
+#define vacall_return_int              callback_return_int
+#define vacall_return_uint             callback_return_uint
+#define vacall_return_long             callback_return_long
+#define vacall_return_ulong            callback_return_ulong
+#define vacall_return_longlong         callback_return_longlong
+#define vacall_return_ulonglong        callback_return_ulonglong
+#define vacall_return_float            callback_return_float
+#define vacall_return_double           callback_return_double
+#define vacall_return_ptr              callback_return_ptr
+#define vacall_return_struct           callback_return_struct
+#define vacall_error_type_mismatch     callback_error_type_mismatch
+#define vacall_error_struct_too_large  callback_error_struct_too_large
+#define vacall_structcpy               callback_structcpy
+#define vacall_struct_buffer           callback_struct_buffer
+
+
+/* Determine whether the current ABI is LLP64
+   ('long' = 32-bit, 'long long' = 'void*' = 64-bit). */
+#if defined(__x86_64__) && defined(_WIN32) && !defined(__CYGWIN__)
+#define __VA_LLP64 1
+#endif
+
+/* Determine the alignment of a type at compile time.
+ */
+#if defined(__GNUC__) || defined(__IBM__ALIGNOF__)
+#define __VA_alignof __alignof__
+#elif defined(__cplusplus)
+template <class type> struct __VA_alignof_helper { char __slot1; type __slot2; };
+#define __VA_alignof(type) offsetof (__VA_alignof_helper<type>, __slot2)
+#elif defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) /* SGI compiler */
+#define __VA_alignof __builtin_alignof
+#else
+#define __VA_offsetof(type,ident)  ((unsigned long)&(((type*)0)->ident))
+#define __VA_alignof(type)  __VA_offsetof(struct { char __slot1; type __slot2; }, __slot2)
+#endif
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+/* C builtin types.
+ */
+#if defined(__mipsn32__) || defined(__x86_64_x32__) || defined(__VA_LLP64)
+typedef long long __vaword;
+#else
+typedef long __vaword;
+#endif
+
+enum __VAtype
+{
+  __VAvoid,
+  __VAchar,
+  __VAschar,
+  __VAuchar,
+  __VAshort,
+  __VAushort,
+  __VAint,
+  __VAuint,
+  __VAlong,
+  __VAulong,
+  __VAlonglong,
+  __VAulonglong,
+  __VAfloat,
+  __VAdouble,
+  __VAvoidp,
+  __VAstruct
+};
+
+enum __VA_alist_flags
+{
+
+  /* how to return structs */
+  /* There are basically 3 ways to return structs:
+   * a. The called function returns a pointer to static data. Not reentrant.
+   *    Not supported any more.
+   * b. The caller passes the return structure address in a dedicated register
+   *    or as a first (or last), invisible argument. The called function stores
+   *    its result there.
+   * c. Like b, and the called function also returns the return structure
+   *    address in the return value register. (This is not very distinguishable
+   *    from b.)
+   * Independently of this,
+   * r. small structures (<= 4 or <= 8 bytes) may be returned in the return
+   *    value register(s), or
+   * m. even small structures are passed in memory.
+   */
+  /* gcc-2.6.3 employs the following strategy:
+   *   - If PCC_STATIC_STRUCT_RETURN is defined in the machine description
+   *     it uses method a, else method c.
+   *   - If flag_pcc_struct_return is set (either by -fpcc-struct-return or if
+   *     DEFAULT_PCC_STRUCT_RETURN is defined to 1 in the machine description)
+   *     it uses method m, else (either by -freg-struct-return or if
+   *     DEFAULT_PCC_STRUCT_RETURN is defined to 0 in the machine description)
+   *     method r.
+   */
+  __VA_SMALL_STRUCT_RETURN     = 1<<1, /* r: special case for small structs */
+  __VA_GCC_STRUCT_RETURN       = 1<<2, /* consider 8 byte structs as small */
+#if defined(__sparc__) && !defined(__sparc64__)
+  __VA_SUNCC_STRUCT_RETURN     = 1<<3,
+  __VA_SUNPROCC_STRUCT_RETURN  = 1<<4,
+#else
+  __VA_SUNCC_STRUCT_RETURN     = 0,
+  __VA_SUNPROCC_STRUCT_RETURN  = 0,
+#endif
+#if defined(__i386__)
+  __VA_MSVC_STRUCT_RETURN      = 1<<4,
+#endif
+  /* the default way to return structs */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another struct returning convention,
+   * just  #define __VA_STRUCT_RETURN ...
+   * before or after #including <vacall_r.h>.
+   */
+#ifndef __VA_STRUCT_RETURN
+  __VA_STRUCT_RETURN           =
+#if defined(__sparc__) && !defined(__sparc64__) && defined(__sun) && (defined(__SUNPRO_C) || defined(__SUNPRO_CC)) /* SUNWspro cc or CC */
+                                 __VA_SUNPROCC_STRUCT_RETURN,
+#else
+#if (defined(__i386__) && (defined(_WIN32) || defined(__CYGWIN__) || (defined(__MACH__) && defined(__APPLE__)) || defined(__FreeBSD__) || defined(__DragonFly__) || defined(__OpenBSD__))) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__hppa__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || defined(__powerpc64_elfv2__) || defined(__ia64__) || defined(__x86_64__) || defined(__riscv32__) || defined(__riscv64__)
+                                 __VA_SMALL_STRUCT_RETURN |
+#endif
+#if defined(__GNUC__) && !((defined(__mipsn32__) || defined(__mips64__)) && ((__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3)))
+                                 __VA_GCC_STRUCT_RETURN |
+#endif
+#if defined(__i386__) && defined(_WIN32) && !defined(__CYGWIN__) /* native Windows */
+                                 __VA_MSVC_STRUCT_RETURN |
+#endif
+                                 0,
+#endif
+#endif
+
+  /* how to return floats */
+#if defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__))
+  __VA_SUNCC_FLOAT_RETURN      = 1<<5,
+#endif
+#if defined(__m68k__)
+  __VA_FREG_FLOAT_RETURN       = 1<<6,
+#endif
+  /* the default way to return floats */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another float returning convention,
+   * just  #define __VA_FLOAT_RETURN ...
+   * before or after #including <vacall_r.h>.
+   */
+#ifndef __VA_FLOAT_RETURN
+#if (defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__))) && !defined(__GNUC__) && defined(__sun) && !(defined(__SUNPRO_C) || defined(__SUNPRO_CC))  /* Sun cc or CC */
+  __VA_FLOAT_RETURN            = __VA_SUNCC_FLOAT_RETURN,
+#elif defined(__m68k__)
+  __VA_FLOAT_RETURN            = __VA_FREG_FLOAT_RETURN,
+#else
+  __VA_FLOAT_RETURN            = 0,
+#endif
+#endif
+
+  /* how to pass structs */
+#if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__)
+  __VA_SGICC_STRUCT_ARGS       = 1<<7,
+#endif
+#if defined(__powerpc__) || defined(__powerpc64__)
+  __VA_AIXCC_STRUCT_ARGS       = 1<<7,
+#endif
+#if defined(__ia64__)
+  __VA_OLDGCC_STRUCT_ARGS      = 1<<7,
+#endif
+  /* the default way to pass structs */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another structs passing convention,
+   * just  #define __VA_STRUCT_ARGS ...
+   * before or after #including <vacall_r.h>.
+   */
+#ifndef __VA_STRUCT_ARGS
+#if (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) && !defined(__GNUC__) /* SGI mips cc */
+  __VA_STRUCT_ARGS             = __VA_SGICC_STRUCT_ARGS,
+#else
+#if (defined(__mipsn32__) || defined(__mips64__)) && (!defined(__GNUC__) || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3)) /* SGI mips cc or gcc >= 3.4 */
+  __VA_STRUCT_ARGS             = __VA_SGICC_STRUCT_ARGS,
+#else
+#if defined(__powerpc__) && !defined(__powerpc64__) && defined(_AIX) && !defined(__GNUC__) /* AIX 32-bit cc, xlc */
+  __VA_STRUCT_ARGS             = __VA_AIXCC_STRUCT_ARGS,
+#else
+#if defined(__powerpc64__) && defined(_AIX) /* AIX 64-bit cc, xlc, gcc */
+  __VA_STRUCT_ARGS             = __VA_AIXCC_STRUCT_ARGS,
+#else
+#if defined(__ia64__) && !(defined(__GNUC__) && (__GNUC__ >= 3))
+  __VA_STRUCT_ARGS             = __VA_OLDGCC_STRUCT_ARGS,
+#else
+  __VA_STRUCT_ARGS             = 0,
+#endif
+#endif
+#endif
+#endif
+#endif
+#endif
+
+  /* how to pass floats */
+  /* ANSI C compilers and GNU gcc pass floats as floats.
+   * K&R C compilers pass floats as doubles. We don't support them any more.
+   */
+#if defined(__powerpc64__)
+  __VA_AIXCC_FLOAT_ARGS         = 1<<8,      /* pass floats in the low 4 bytes of an 8-bytes word */
+#endif
+  /* the default way to pass floats */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another float passing convention,
+   * just  #define __VA_FLOAT_ARGS ...
+   * before or after #including <vacall_r.h>.
+   */
+#ifndef __VA_FLOAT_ARGS
+#if defined(__powerpc64__) && defined(_AIX) && !defined(__GNUC__) /* AIX 64-bit xlc */
+  __VA_FLOAT_ARGS              = __VA_AIXCC_FLOAT_ARGS,
+#else
+  __VA_FLOAT_ARGS              = 0,
+#endif
+#endif
+
+  /* how to pass and return small integer arguments */
+  __VA_ANSI_INTEGERS           = 0, /* no promotions */
+  __VA_TRADITIONAL_INTEGERS    = 0, /* promote [u]char, [u]short to [u]int */
+  /* Fortunately these two methods are compatible. Our macros work with both. */
+
+  /* stack cleanup policy */
+  __VA_CDECL_CLEANUP           = 0, /* caller pops args after return */
+  __VA_STDCALL_CLEANUP         = 1<<9, /* callee pops args before return */
+                                    /* currently only supported on __i386__ */
+#ifndef __VA_CLEANUP
+  __VA_CLEANUP                 = __VA_CDECL_CLEANUP,
+#endif
+
+  /* These are for internal use only */
+#if defined(__i386__) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || defined(__powerpc__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv64__)
+  __VA_REGISTER_STRUCT_RETURN  = 1<<10,
+#endif
+#if defined(__mipsn32__) || defined(__mips64__)
+  __VA_REGISTER_FLOATSTRUCT_RETURN     = 1<<11,
+  __VA_REGISTER_DOUBLESTRUCT_RETURN    = 1<<12,
+#endif
+
+  __VA_flag_for_broken_compilers_that_dont_like_trailing_commas
+};
+
+/*
+ * Definition of the ‘va_alist’ type.
+ */
+struct vacall_alist
+/* GNU clisp pokes in internals of the alist! */
+#ifdef LISPFUN
+{
+  /* some va_... macros need these flags */
+  int            flags;
+#if defined(__i386__) || defined(__arm__) || defined(__armhf__) || (defined(__powerpc__) && !defined(__powerpc64__) && defined(__MACH__) && defined(__APPLE__))
+  __vaword       filler1;
+#endif
+  /* temporary storage for return value */
+  union {
+    char                _char;
+    signed char         _schar;
+    unsigned char       _uchar;
+    short               _short;
+    unsigned short      _ushort;
+    int                 _int;
+    unsigned int        _uint;
+    long                _long;
+    unsigned long       _ulong;
+    long long           _longlong;
+    unsigned long long  _ulonglong;
+    float               _float;
+    double              _double;
+    void*               _ptr;
+  }              tmp;
+}
+#endif
+;
+typedef struct vacall_alist * va_alist;
+
+
+/*
+ * Definition of the va_start_xxx macros.
+ */
+#define __VA_START_FLAGS  \
+  __VA_STRUCT_RETURN | __VA_FLOAT_RETURN | __VA_STRUCT_ARGS | __VA_FLOAT_ARGS | __VA_CLEANUP
+
+extern void vacall_start (va_alist /* LIST */, int /* RETTYPE */, int /* FLAGS */);
+
+#define va_start_void(LIST)     vacall_start(LIST,__VAvoid,     __VA_START_FLAGS)
+#define va_start_char(LIST)     vacall_start(LIST,__VAchar,     __VA_START_FLAGS)
+#define va_start_schar(LIST)    vacall_start(LIST,__VAschar,    __VA_START_FLAGS)
+#define va_start_uchar(LIST)    vacall_start(LIST,__VAuchar,    __VA_START_FLAGS)
+#define va_start_short(LIST)    vacall_start(LIST,__VAshort,    __VA_START_FLAGS)
+#define va_start_ushort(LIST)   vacall_start(LIST,__VAushort,   __VA_START_FLAGS)
+#define va_start_int(LIST)      vacall_start(LIST,__VAint,      __VA_START_FLAGS)
+#define va_start_uint(LIST)     vacall_start(LIST,__VAuint,     __VA_START_FLAGS)
+#define va_start_long(LIST)     vacall_start(LIST,__VAlong,     __VA_START_FLAGS)
+#define va_start_ulong(LIST)    vacall_start(LIST,__VAulong,    __VA_START_FLAGS)
+#define va_start_longlong(LIST)         vacall_start(LIST,__VAlonglong, __VA_START_FLAGS)
+#define va_start_ulonglong(LIST) vacall_start(LIST,__VAulonglong,__VA_START_FLAGS)
+#define va_start_float(LIST)    vacall_start(LIST,__VAfloat,    __VA_START_FLAGS)
+#define va_start_double(LIST)   vacall_start(LIST,__VAdouble,   __VA_START_FLAGS)
+#define va_start_ptr(LIST,TYPE)         vacall_start(LIST,__VAvoidp,    __VA_START_FLAGS)
+
+/*
+ * va_start_struct: Preparing structure return.
+ */
+extern void vacall_start_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */, int /* TYPE_SPLITTABLE */, int /* FLAGS */);
+
+#define va_start_struct(LIST,TYPE,TYPE_SPLITTABLE)  \
+  _va_start_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE),TYPE_SPLITTABLE)
+/* _va_start_struct() is like va_start_struct(), except that you pass
+ * the type's size and alignment instead of the type itself.
+ * Undocumented, but used by GNU clisp.
+ */
+#define _va_start_struct(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  vacall_start_struct(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE,__VA_START_FLAGS)
+
+
+/*
+ * Definition of the va_arg_xxx macros.
+ */
+
+extern char           vacall_arg_char   (va_alist /* LIST */);
+extern signed char    vacall_arg_schar  (va_alist /* LIST */);
+extern unsigned char  vacall_arg_uchar  (va_alist /* LIST */);
+extern short          vacall_arg_short  (va_alist /* LIST */);
+extern unsigned short vacall_arg_ushort (va_alist /* LIST */);
+extern int            vacall_arg_int    (va_alist /* LIST */);
+extern unsigned int   vacall_arg_uint   (va_alist /* LIST */);
+extern long           vacall_arg_long   (va_alist /* LIST */);
+extern unsigned long  vacall_arg_ulong  (va_alist /* LIST */);
+
+#define va_arg_char(LIST)      vacall_arg_char(LIST)
+#define va_arg_schar(LIST)     vacall_arg_schar(LIST)
+#define va_arg_uchar(LIST)     vacall_arg_uchar(LIST)
+#define va_arg_short(LIST)     vacall_arg_short(LIST)
+#define va_arg_ushort(LIST)    vacall_arg_ushort(LIST)
+#define va_arg_int(LIST)       vacall_arg_int(LIST)
+#define va_arg_uint(LIST)      vacall_arg_uint(LIST)
+#define va_arg_long(LIST)      vacall_arg_long(LIST)
+#define va_arg_ulong(LIST)     vacall_arg_ulong(LIST)
+
+extern long long          vacall_arg_longlong  (va_alist /* LIST */);
+extern unsigned long long vacall_arg_ulonglong (va_alist /* LIST */);
+
+#define va_arg_longlong(LIST)  vacall_arg_longlong(LIST)
+#define va_arg_ulonglong(LIST) vacall_arg_ulonglong(LIST)
+
+/* Floating point arguments. */
+
+extern float  vacall_arg_float  (va_alist /* LIST */);
+extern double vacall_arg_double (va_alist /* LIST */);
+
+#define va_arg_float(LIST)     vacall_arg_float(LIST)
+#define va_arg_double(LIST)    vacall_arg_double(LIST)
+
+/* Pointer arguments. */
+
+extern void* vacall_arg_ptr (va_alist /* LIST */);
+#define va_arg_ptr(LIST,TYPE)  ((TYPE)vacall_arg_ptr(LIST))
+
+/* Structure arguments. */
+
+extern void* vacall_arg_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */);
+
+#define va_arg_struct(LIST,TYPE)  \
+  *(TYPE*)vacall_arg_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE))
+/* _va_arg_struct() is like va_arg_struct(), except that you pass the type's
+ * size and alignment instead of the type and get the value's address instead
+ * of the value itself.
+ * Undocumented, but used by GNU clisp.
+ */
+#define _va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  vacall_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)
+
+
+/*
+ * Definition of the va_return_xxx macros.
+ */
+
+extern void vacall_return_void (va_alist /* LIST */);
+#define va_return_void(LIST)           vacall_return_void(LIST)
+
+extern void vacall_return_char (va_alist /* LIST */, char /* VAL */);
+extern void vacall_return_schar (va_alist /* LIST */, signed char /* VAL */);
+extern void vacall_return_uchar (va_alist /* LIST */, unsigned char /* VAL */);
+extern void vacall_return_short (va_alist /* LIST */, short /* VAL */);
+extern void vacall_return_ushort (va_alist /* LIST */, unsigned short /* VAL */);
+extern void vacall_return_int (va_alist /* LIST */, int /* VAL */);
+extern void vacall_return_uint (va_alist /* LIST */, unsigned int /* VAL */);
+extern void vacall_return_long (va_alist /* LIST */, long /* VAL */);
+extern void vacall_return_ulong (va_alist /* LIST */, unsigned long /* VAL */);
+#define va_return_char(LIST,VAL)       vacall_return_char(LIST,VAL)
+#define va_return_schar(LIST,VAL)      vacall_return_schar(LIST,VAL)
+#define va_return_uchar(LIST,VAL)      vacall_return_uchar(LIST,VAL)
+#define va_return_short(LIST,VAL)      vacall_return_short(LIST,VAL)
+#define va_return_ushort(LIST,VAL)     vacall_return_ushort(LIST,VAL)
+#define va_return_int(LIST,VAL)                vacall_return_int(LIST,VAL)
+#define va_return_uint(LIST,VAL)       vacall_return_uint(LIST,VAL)
+#define va_return_long(LIST,VAL)       vacall_return_long(LIST,VAL)
+#define va_return_ulong(LIST,VAL)      vacall_return_ulong(LIST,VAL)
+
+extern void vacall_return_longlong (va_alist /* LIST */, long long /* VAL */);
+extern void vacall_return_ulonglong (va_alist /* LIST */, unsigned long long /* VAL */);
+#define va_return_longlong(LIST,VAL)   vacall_return_longlong(LIST,VAL)
+#define va_return_ulonglong(LIST,VAL)  vacall_return_ulonglong(LIST,VAL)
+
+extern void vacall_return_float (va_alist /* LIST */, float /* VAL */);
+extern void vacall_return_double (va_alist /* LIST */, double /* VAL */);
+#define va_return_float(LIST,VAL)      vacall_return_float(LIST,VAL)
+#define va_return_double(LIST,VAL)     vacall_return_double(LIST,VAL)
+
+extern void vacall_return_ptr (va_alist /* LIST */, void* /* VAL */);
+#define va_return_ptr(LIST,TYPE,VAL)   vacall_return_ptr(LIST,(void*)(TYPE)(VAL))
+
+extern void vacall_return_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */, const void* /* VAL_ADDR */);
+
+#define va_return_struct(LIST,TYPE,VAL)  \
+  _va_return_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE),&(VAL))
+/* Undocumented, but used by GNU clisp. */
+#define _va_return_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR)  \
+  vacall_return_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR)
+
+
+/* Determine whether a struct type is word-splittable, i.e. whether each of
+ * its components fit into a register.
+ * The entire computation is done at compile time.
+ */
+#define va_word_splittable_1(slot1)  \
+  (__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword))
+#define va_word_splittable_2(slot1,slot2)  \
+  ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \
+   && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \
+  )
+#define va_word_splittable_3(slot1,slot2,slot3)  \
+  ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \
+   && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \
+   && (__va_offset3(slot1,slot2,slot3)/sizeof(__vaword) == (__va_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__vaword)) \
+  )
+#define va_word_splittable_4(slot1,slot2,slot3,slot4)  \
+  ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \
+   && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \
+   && (__va_offset3(slot1,slot2,slot3)/sizeof(__vaword) == (__va_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__vaword)) \
+   && (__va_offset4(slot1,slot2,slot3,slot4)/sizeof(__vaword) == (__va_offset4(slot1,slot2,slot3,slot4)+sizeof(slot4)-1)/sizeof(__vaword)) \
+  )
+#define __va_offset1(slot1)  \
+  0
+#define __va_offset2(slot1,slot2)  \
+  ((__va_offset1(slot1)+sizeof(slot1)+__VA_alignof(slot2)-1) & -(long)__VA_alignof(slot2))
+#define __va_offset3(slot1,slot2,slot3)  \
+  ((__va_offset2(slot1,slot2)+sizeof(slot2)+__VA_alignof(slot3)-1) & -(long)__VA_alignof(slot3))
+#define __va_offset4(slot1,slot2,slot3,slot4)  \
+  ((__va_offset3(slot1,slot2,slot3)+sizeof(slot3)+__VA_alignof(slot4)-1) & -(long)__VA_alignof(slot4))
+
+
+/*
+ * Miscellaneous declarations.
+ */
+
+#if defined(__sparc__) || defined(__sparc64__)
+/* On SPARC, PIC compiled code crashes when used outside of a shared library.
+   Therefore, don't use the callback_get_receiver indirection on this platform. */
+
+extern
+#ifdef __cplusplus
+"C"
+#endif
+void callback_receiver (); /* Actually it takes arguments and returns values! */
+
+#define callback_get_receiver() (&callback_receiver)
+
+#else
+
+/* A fake type for callback_receiver.
+   Actually it takes arguments and returns values. */
+typedef void (*__vacall_r_t) (void);
+
+/* This function returns the address of callback_receiver.
+   callback_receiver is not a global symbol, because on ELF platforms, functions
+   with global visibility cannot accept additional arguments in registers. See
+   elf-hack.txt for more details. */
+extern
+#ifdef __cplusplus
+"C"
+#endif
+__vacall_r_t callback_get_receiver (void);
+
+#endif
+
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* _VACALL_R_H */
diff --git a/common/asm-alpha.sh b/common/asm-alpha.sh
new file mode 100755 (executable)
index 0000000..f39b238
--- /dev/null
@@ -0,0 +1,44 @@
+#!/bin/sh
+# Translate the assembler syntax of alpha assembler programs
+# Usage: asm-alpha.sh < alphalinux-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e 's,% ,%,g' -e 's,//.*$,,'
+
+# Copyright (C) 2017 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+tmpscript1=sed$$tmp1
+tmpscript2=sed$$tmp2
+tmpremove='rm -f $tmpscript1 $tmpscript2'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript1 << \EOF
+# ----------- Remove gcc self-identification
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+cat > $tmpscript2 << \EOF
+# ----------- Introduce macro syntax for assembler pseudo-ops
+/\.section\([  ]\+\).*GNU-stack/d
+EOF
+
+sed -f $tmpscript1 | \
+sed -f $tmpscript2
+
+eval "$tmpremove"
diff --git a/common/asm-arm.h b/common/asm-arm.h
new file mode 100644 (file)
index 0000000..fee4030
--- /dev/null
@@ -0,0 +1,59 @@
+// Assembly language support for arm CPU.
+// Bruno Haible 1999-05-29
+
+// Copyright (C) 1999-2017 Bruno Haible <bruno@clisp.org>
+//
+// This program is free software: you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+// In order not to have to maintain several copies of the assembly language
+// code, we use some macros which expand into the correct syntax.
+// These macros are:
+//   C(name)
+//           This expands to the name of the C variable or function `name'.
+//           On Unix BSD systems, this prepends an underscore.
+//   L(label)
+//           This expands to the name of a local label, having the name `label'.
+//           On Unix ELF systems, where there is no underscore, names beginning
+//           with an alphabetic character are automatically exported, so this
+//           prepends a dot. Note that when defining a label, the `:' must
+//           be inside the parentheses, not outside, because otherwise some
+//           ANSI C preprocessor inserts a space between the label and the `:',
+//           and some assemblers don't like this.
+//   DECLARE_FUNCTION(name)
+//           Declare `name' to be a global function. When assembly language
+//           code is compiled into a shared library, ELF linkers need to know
+//           which symbols are functions.
+//   FUNBEGIN(name)
+//           Start the assembly language code for the C function `name'.
+//   FUNEND(name)
+//           End the assembly language code for the C function 'name'.
+
+#ifdef ASM_UNDERSCORE
+#define C(entrypoint) _##entrypoint
+#define L(label) L##label
+#else
+#define C(entrypoint) entrypoint
+#define L(label) .L##label
+#endif
+
+// When assembly language code is compiled into a shared library, ELF linkers
+// need to know which symbols are functions.
+#if defined(__ELF__) || !defined(ASM_UNDERSCORE)
+#define DECLARE_FUNCTION(name) .type C(name),%function
+#define FUNEND(name) .size C(name),.-C(name)
+#else
+#define DECLARE_FUNCTION(name)
+#define FUNEND(name)
+#endif
+#define FUNBEGIN(name) C(name):
diff --git a/common/asm-arm.sh b/common/asm-arm.sh
new file mode 100755 (executable)
index 0000000..d166ea9
--- /dev/null
@@ -0,0 +1,62 @@
+#!/bin/sh
+# Translate the assembler syntax of arm assembler programs
+# Usage: asm-arm.sh < riscix-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$,#,g'
+
+# Copyright (C) 1999-2018 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+tmpscript1=sed$$tmp1
+tmpscript2=sed$$tmp2
+tmpremove='rm -f $tmpscript1 $tmpscript2'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript1 << \EOF
+# ----------- Remove gcc self-identification
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+cat > $tmpscript2 << \EOF
+# ----------- Hide comments, to avoid trouble in preprocessing
+s,@,//,g
+# ----------- Turn # into $, to avoid trouble in preprocessing
+s,#,\$,g
+# ----------- Global symbols depends on ASM_UNDERSCORE
+/[     ]\.req[         ]/!{
+s/^\([A-Za-z0-9_]\+\)/C(\1)/
+}
+s/\.L\([A-Za-z0-9_]\+\)/L(\1)/
+s/\.global[    ]\([A-Za-z0-9_]*\)/.global C(\1)/
+# ----------- Introduce macro syntax for assembler pseudo-ops
+/\.file\([     ]\+\)/d
+/\.section\([  ]\+\).*GNU-stack/d
+s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/
+# ----------- Massage the beginning of functions
+/\.type/{
+s/\.type[      ]\([A-Za-z0-9_]*\), *function/DECLARE_FUNCTION(\1)/
+}
+# ----------- Massage the end of functions
+s/\.size[      ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1)/
+EOF
+
+sed -f $tmpscript1 | \
+sed -f $tmpscript2
+
+eval "$tmpremove"
diff --git a/common/asm-hppa.h b/common/asm-hppa.h
new file mode 100644 (file)
index 0000000..ac6c378
--- /dev/null
@@ -0,0 +1,73 @@
+// Assembly language support for hppa CPU.
+// Bruno Haible 2017-01-23
+
+// Copyright (C) 2017-2018 Bruno Haible <bruno@clisp.org>
+//
+// This program is free software: you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+// In order not to have to maintain several copies of the assembly language
+// code, we use some macros which expand into the correct syntax.
+// These macros are:
+//   IMPORT_MILLICODE(symbol)
+//           This expands to an import from the MILLICODE segment, if needed.
+//   IMPORT_DATA(symbol)
+//           This expands to an import from the DATA segment, if needed.
+//   TEXT1(), TEXT2()
+//           These expand to two lines that switch to the TEXT section/segment.
+//   GLOBL(symbol)
+//           This expands to a declaration that the given symbol, defined
+//           in this file, shall have global visibility.
+//   DEF(symbol)
+//           This expands to the declaration of a symbol or label.
+//   L(label)
+//           This expands to the name of a local label, having the name `label'.
+//   DECLARE_FUNCTION(name)
+//           Declare `name' to be a global function. When assembly language
+//           code is compiled into a shared library, ELF linkers need to know
+//           which symbols are functions.
+//   FUNEND(name)
+//           End the assembly language code for the C function 'name'.
+
+#if defined(__ELF__)
+/* Linux */
+#define IMPORT_MILLICODE(symbol)
+#define IMPORT_DATA(symbol)
+#define TEXT1() .text
+#define TEXT2()
+#define GLOBL(symbol) .globl symbol
+#define DEF(symbol) symbol:
+#define L(label) .L##label
+#define DECLARE_FUNCTION(name) .type name,%function
+#define FUNEND(name) .size name,.-name
+#else
+/* HP-UX */
+#define IMPORT_MILLICODE(symbol) .IMPORT symbol,MILLICODE
+#define IMPORT_DATA(symbol) .IMPORT symbol,DATA
+#if 1
+#define TEXT1() .SPACE $TEXT$
+#define TEXT2() .SUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY
+#else
+#define TEXT1() .code
+#define TEXT2()
+#endif
+#define GLOBL(symbol) .EXPORT symbol,ENTRY,PRIV_LEV=3
+#if 1
+#define DEF(symbol) symbol
+#else
+#define DEF(symbol) .label symbol
+#endif
+#define L(label) L$##label
+#define DECLARE_FUNCTION(name)
+#define FUNEND(name)
+#endif
diff --git a/common/asm-hppa.sh b/common/asm-hppa.sh
new file mode 100755 (executable)
index 0000000..180fd34
--- /dev/null
@@ -0,0 +1,68 @@
+#!/bin/sh
+# Translate the assembler syntax of hppa assembler programs
+# Usage: asm-hppa.sh < hppalinux-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e "s,!,',g"
+
+# Copyright (C) 2017 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+tmpscript1=sed$$tmp1
+tmpscript2=sed$$tmp2
+tmpremove='rm -f $tmpscript1 $tmpscript2'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript1 << \EOF
+# ----------- Remove #APP/#NO_APP lines and gcc self-identification
+/^#APP$/d
+/^#NO_APP$/d
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+cat > $tmpscript2 << \EOF
+# ----------- Turn ' into !, to avoid trouble in preprocessing
+s,',!,g
+# ----------- Add some imports
+/\.LEVEL/{
+s/$/\
+       IMPORT_MILLICODE($$dyncall)/
+}
+# ----------- Section switching
+s/\.text/TEXT1()\
+       TEXT2()/
+# ----------- Declaration of symbols and labels is different
+s/^\([A-Za-z0-9_.]\+\):$/DEF(\1)/
+# ----------- Label syntax is different
+/\.LEVEL/!{
+s/\.L\([A-Za-z0-9_]\+\)/L(\1)/
+}
+# ----------- Introduce macro syntax for assembler pseudo-ops
+s/\.globl[     ]\([A-Za-z0-9_]\+\)/GLOBL(\1)/
+# ----------- Massage the beginning of functions
+/\.type/{
+s/\.type[      ]\+\([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/
+}
+# ----------- Massage the end of functions
+s/\.size[      ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1)/
+EOF
+
+sed -f $tmpscript1 | \
+sed -f $tmpscript2
+
+eval "$tmpremove"
diff --git a/common/asm-hppa64.h b/common/asm-hppa64.h
new file mode 100644 (file)
index 0000000..fa653d1
--- /dev/null
@@ -0,0 +1,69 @@
+// Assembly language support for hppa64 CPU.
+// Bruno Haible 2017-01-23, 2017-08-05
+
+// Copyright (C) 2017-2018 Bruno Haible <bruno@clisp.org>
+//
+// This program is free software: you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+// In order not to have to maintain several copies of the assembly language
+// code, we use some macros which expand into the correct syntax.
+// These macros are:
+//   IMPORT_DATA(symbol)
+//           This expands to an import from the DATA segment, if needed.
+//   TEXT1(), TEXT2()
+//           These expand to two lines that switch to the TEXT section/segment.
+//   GLOBL(symbol)
+//           This expands to a declaration that the given symbol, defined
+//           in this file, shall have global visibility.
+//   DEF(symbol)
+//           This expands to the declaration of a symbol or label.
+//   L(label)
+//           This expands to the name of a local label, having the name `label'.
+//   DECLARE_FUNCTION(name)
+//           Declare `name' to be a global function. When assembly language
+//           code is compiled into a shared library, ELF linkers need to know
+//           which symbols are functions.
+//   FUNEND(name)
+//           End the assembly language code for the C function 'name'.
+
+#if defined(__ELF__)
+/* Linux */
+#define IMPORT_DATA(symbol)
+#define TEXT1() .text
+#define TEXT2()
+#define GLOBL(symbol) .globl symbol
+#define DEF(symbol) symbol:
+#define L(label) .L##label
+#define DECLARE_FUNCTION(name) .type name,%function
+#define FUNEND(name) .size name,.-name
+#else
+/* HP-UX */
+#define IMPORT_DATA(symbol) .IMPORT symbol,DATA
+#if 1
+#define TEXT1() .SPACE $TEXT$,SORT=8
+#define TEXT2() .SUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY,SORT=24
+#else
+#define TEXT1() .code
+#define TEXT2()
+#endif
+#define GLOBL(symbol) .EXPORT symbol,ENTRY,PRIV_LEV=3
+#if 1
+#define DEF(symbol) symbol
+#else
+#define DEF(symbol) .label symbol
+#endif
+#define L(label) L$##label
+#define DECLARE_FUNCTION(name)
+#define FUNEND(name)
+#endif
diff --git a/common/asm-hppa64.sh b/common/asm-hppa64.sh
new file mode 100755 (executable)
index 0000000..71d9d26
--- /dev/null
@@ -0,0 +1,63 @@
+#!/bin/sh
+# Translate the assembler syntax of hppa64 assembler programs
+# Usage: asm-hppa64.sh < hppalinux-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e "s,!,',g"
+
+# Copyright (C) 2017 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+tmpscript1=sed$$tmp1
+tmpscript2=sed$$tmp2
+tmpremove='rm -f $tmpscript1 $tmpscript2'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript1 << \EOF
+# ----------- Remove #APP/#NO_APP lines and gcc self-identification
+/^#APP$/d
+/^#NO_APP$/d
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+cat > $tmpscript2 << \EOF
+# ----------- Turn ' into !, to avoid trouble in preprocessing
+s,',!,g
+# ----------- Section switching
+s/\.text/TEXT1()\
+       TEXT2()/
+# ----------- Declaration of symbols and labels is different
+s/^\([A-Za-z0-9_.]\+\):$/DEF(\1)/
+# ----------- Label syntax is different
+/\.LEVEL/!{
+s/\.L\([A-Za-z0-9_]\+\)/L(\1)/
+}
+# ----------- Introduce macro syntax for assembler pseudo-ops
+s/\.globl[     ]\([A-Za-z0-9_]\+\)/GLOBL(\1)/
+# ----------- Massage the beginning of functions
+/\.type/{
+s/\.type[      ]\+\([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/
+}
+# ----------- Massage the end of functions
+s/\.size[      ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1)/
+EOF
+
+sed -f $tmpscript1 | \
+sed -f $tmpscript2
+
+eval "$tmpremove"
diff --git a/common/asm-i386.h b/common/asm-i386.h
new file mode 100644 (file)
index 0000000..ff1baab
--- /dev/null
@@ -0,0 +1,297 @@
+// Assembly language support for i386 CPU.
+// Bruno Haible 1997-06-21
+
+// Copyright (C) 1997-2018 Bruno Haible <bruno@clisp.org>
+//
+// This program is free software: you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+// An assembly language file for the i386/i486/i586/i686/786 CPUs:
+// On Unix, it is preprocessed and then assembled. NB: This file requires
+// an ANSI C or C++ preprocessor which understands C++ comments.
+// On Windows, with MSVC, it is preprocessed and then compiled with
+// optimization. (The MSVC development environment does not have a separate
+// assembler, we must use the C compiler's inline asm extension. Compiling
+// without optimization pushes the registers %ebx,%esi,%edi onto the stack
+// at function entry and pops them at function exit, which is not what we
+// want because it affects the %esp offsets of the function arguments.)
+
+// The assembly language file should
+// 1. include a configuration file which defines ASM_UNDERSCORE if appropriate.
+//    #ifndef _MSC_VER
+//    #include "config.h"
+//    #endif
+// 2. include this file.
+//    #include "asm-i386.h"
+// 3. define all assembly language code.
+
+// The three different assembler syntaxes for this CPU are a MAJOR annoyance.
+// In order not to have to maintain several copies of the assembly language
+// code, we use lots of macros which expand into the correct syntax.
+// These macros are:
+//   C(name)
+//           This expands to the name of the C variable or function `name'.
+//           On Unix BSD systems, this prepends an underscore.
+//   L(label)
+//           This expands to the name of a local label, having the name `label'.
+//           On Unix ELF systems, where there is no underscore, names beginning
+//           with an alphabetic character are automatically exported, so this
+//           prepends a dot. Note that when defining a label, the `:' must
+//           be inside the parentheses, not outside, because otherwise some
+//           ANSI C preprocessor inserts a space between the label and the `:',
+//           and some assemblers don't like this.
+//   R(reg)
+//           This expands to a reference to register `reg'. On Unix, this
+//           prepends a % charater.
+//   NUM(value)
+//           This expands to an immediate value. On Unix, this prepends a $
+//           character.
+//   ADDR(variable)
+//           This expands to an immediate value, the address of some variable
+//           or function. On Unix, this prepends a $ character. With MSVC,
+//           this prepends the keyword "OFFSET".
+//   About operand sizes: On Unix, a suffix to the instruction specifies the
+//           size of the operands (for example "movb", "movw", "movl"). With
+//           MSVC, there is no such suffix. Instead, the assembler infers the
+//           operand size from the names of the registers ("al" vs. "ax" vs.
+//           "eax"). This works well in most cases, but in instructions like
+//           "mul [esi]" the assembler guesses the operand size: "byte" by
+//           default. So it is better to explicitly specify the operand size
+//           of memory operands (prefix X1, X2, X4, X8).
+//           (Side note about Unix assemblers: Some Unix assemblers allow you
+//           to write "testb %eax,%eax" but silently treat this as
+//           "testb %al,%al".)
+//   X1
+//           This prefixes a memory reference of 1 byte.
+//   X2
+//           This prefixes a memory reference of 2 bytes.
+//   X4
+//           This prefixes a memory reference of 4 bytes.
+//   X8
+//           This prefixes a memory reference of 8 bytes.
+//   MEM(base)
+//           This expands to a memory reference at address `base'.
+//   MEM_DISP(base,displacement)
+//           This expands to a memory reference at address `base+displacement'.
+//   MEM_INDEX(base,index)
+//           This expands to a memory reference at address `base+index'.
+//   MEM_SHINDEX(base,index,size)
+//           This expands to a memory reference at address
+//           `base+index*size', where `size' is 1, 2, 4, or 8.
+//   MEM_DISP_SHINDEX0(displacement,index,size)
+//           This expands to a memory reference at address
+//           `displacement+index*size', where `size' is 1, 2, 4, or 8.
+//   MEM_DISP_SHINDEX(base,displacement,index,size)
+//           This expands to a memory reference at address
+//           `base+displacement+index*size', where `size' is 1, 2, 4, or 8.
+//   INDIR(value)
+//           This expands to an implicit indirection. On Unix, this prepends
+//           a * character.
+//   INSN1(mnemonic,size_suffix,dst)
+//           This expands to an instruction with one operand.
+//   INSN2(mnemonic,size_suffix,src,dst)
+//           This expands to an instruction with two operands. In our notation,
+//           `src' comes first and `dst' second, but they are reversed when
+//           expanding to Intel syntax.
+//   INSN2MOVXL(mnemonic,size_suffix,src,dst)
+//           This expands to an instruction with two operands, of type
+//           movsbl/movzbl, which in some syntaxes requires a second suffix.
+//   INSN2SHCL(mnemonic,size_suffix,src,dst)
+//           This expands to an instruction with two operands, of type
+//           shrd/shld, which in some syntaxes requires an additional operand
+//           %cl.
+//   REP, REPZ
+//           This expands to a prefix for string instructions.
+//   _
+//           For instructions which don't have a size suffix, like jump
+//           instructions. Expands to nothing. Needed for MSVC, which has
+//           problems with empty macro arguments.
+//   TEXT()
+//           Switch to the code section.
+//   ALIGN(log)
+//           Align to 2^log bytes.
+//   P2ALIGN(log,max)
+//           Align to 2^log bytes, but insert at most max bytes.
+//   GLOBL(name)
+//           Declare `name' to be a global symbol.
+//   DECLARE_FUNCTION(name)
+//           Declare `name' to be a global function. When assembly language
+//           code is compiled into a shared library, ELF linkers need to know
+//           which symbols are functions.
+//   FUNBEGIN(name)
+//           Start the assembly language code for the C function `name'.
+//   FUNEND(name,size_expression)
+//           End the assembly language code for the C function 'name'.
+
+// Define the C(name) and L(label) macros.
+#ifdef _MSC_VER
+#define C(entrypoint) entrypoint
+#define L(label) L##label
+#else
+#ifdef ASM_UNDERSCORE
+#define C(entrypoint) _##entrypoint
+#define L(label) L##label
+#else
+#define C(entrypoint) entrypoint
+#define L(label) .L##label
+#endif
+#endif
+
+// Define one of these.
+// BSD_SYNTAX for GNU assembler version 2.
+// ELF_SYNTAX for SVR4 and Solaris assemblers.
+// INTEL_SYNTAX for MS assembler.
+// Note: INTEL_SYNTAX is not the same syntax as produced by "gcc masm=intel"
+// as there are syntactic differences between that syntax and the one accepted
+// by the MS assembler (for R, MEM_DISP, P2ALIGN, FUNBEGIN, FUNEND etc.).
+#ifdef _MSC_VER
+#define INTEL_SYNTAX
+#else
+// On Unix, it happens that the ELF systems (ASM_UNDERSCORE not defined) use
+// the ELF syntax, while the BSD systems (ASM_UNDERSCORE defined) use the
+// BSD syntax. Neat to know, this saves us from enumerating all the systems.
+#ifdef ASM_UNDERSCORE
+#define BSD_SYNTAX
+#else
+#define ELF_SYNTAX
+#endif
+#endif
+
+#if defined (BSD_SYNTAX) || defined (ELF_SYNTAX)
+#define R(r) %r
+#define NUM(n) $ n
+#define ADDR(a) $##a
+#define X1
+#define X2
+#define X4
+#define X8
+#define MEM(base)(R(base))
+#define MEM_DISP(base,displacement)displacement(R(base))
+#define MEM_INDEX(base,index)(R(base),R(index))
+#define MEM_SHINDEX(base,index,size)(R(base),R(index),size)
+#define MEM_DISP_SHINDEX0(displacement,index,size)displacement(,R(index),size)
+#define MEM_DISP_SHINDEX(base,displacement,index,size)displacement(R(base),R(index),size)
+#define INDIR(value)*value
+#define INSNCONC(mnemonic,size_suffix)mnemonic##size_suffix
+#define INSN1(mnemonic,size_suffix,dst)INSNCONC(mnemonic,size_suffix) dst
+#define INSN2(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) src,dst
+#define INSN2MOVXL(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix##l) src,dst
+#if defined(__SVR4) /* Solaris */
+#define INSN2SHCL(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) src,dst
+#else
+#define INSN2SHCL(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) R(cl),src,dst
+#endif
+#if defined(BSD_SYNTAX) || defined(COHERENT)
+#define REPZ repe ;
+#else
+#define REPZ repz ;
+#endif
+#define REP rep ;
+#if defined(BSD_SYNTAX) && !(defined(__CYGWIN__) || defined(__MINGW32__))
+#define ALIGN(log) .align log,0x90
+#endif
+#if defined(ELF_SYNTAX) || defined(__CYGWIN__) || defined(__MINGW32__)
+#define ALIGN(log) .align 1<<log
+#endif
+#if defined(__SVR4) /* Solaris */
+#define P2ALIGN(log,max) .align 1<<log
+#else
+#define P2ALIGN(log,max) .p2align log,,max
+#endif
+#endif
+#ifdef INTEL_SYNTAX
+#define R(r) r
+#define NUM(n) n
+#define ADDR(a) OFFSET a
+#define X1 BYTE PTR
+#define X2 WORD PTR
+#define X4 DWORD PTR
+#define X8 QWORD PTR
+#define MEM(base) [base]
+#define MEM_DISP(base,displacement) [base+(displacement)]
+#define MEM_INDEX(base,index) [base+index]
+#define MEM_SHINDEX(base,index,size) [base+index*size]
+#define MEM_DISP_SHINDEX0(displacement,index,size) [(displacement)+index*size]
+#define MEM_DISP_SHINDEX(base,displacement,index,size) [base+(displacement)+index*size]
+#define INDIR(value)value
+#define INSNCONC(mnemonic,suffix)mnemonic##suffix
+#define INSN1(mnemonic,size_suffix,dst)mnemonic dst
+#define INSN2(mnemonic,size_suffix,src,dst)mnemonic dst,src
+#define INSN2MOVXL(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,x) dst,src
+#define INSN2SHCL(mnemonic,size_suffix,src,dst)mnemonic dst,src,R(cl)
+#define REPZ repz
+#define REP rep
+#define movsl  movs R(eax)
+#define stosl  stos R(eax)
+#define scasl  scas R(eax)
+#define cmpsl  cmpsd
+#ifdef _MSC_VER
+// No pseudo-ops available in MS inline assembler.
+#define ALIGN(log)
+#define P2ALIGN(log,max)
+#else
+#define ALIGN(log) .align log
+#define P2ALIGN(log,max) .align log
+#endif
+#endif
+
+#define _
+
+#ifdef _MSC_VER
+// No pseudo-ops available in MS inline assembler.
+#define TEXT()
+#else
+#define TEXT() .text
+#endif
+
+#ifdef _MSC_VER
+#define GLOBL(name)
+#else
+#define GLOBL(name) .globl name
+#endif
+
+// Define the DECLARE_FUNCTION(name) macro.
+#ifdef _MSC_VER
+#define DECLARE_FUNCTION(name)
+#elif defined(__SVR4) || defined(__ELF__) || defined(__NetBSD__) || defined(__FreeBSD__) || defined(__OpenBSD__) || defined(__DragonFly__) || defined(__ROSE__) || defined(_SEQUENT_) || defined(DGUX) || defined(_SCO_COFF) || defined(_SCO_ELF)
+#define DECLARE_FUNCTION(name) .type C(name),@function
+#else
+#define DECLARE_FUNCTION(name)
+#endif
+
+// Define the FUNBEGIN(name) and FUNEND() macros.
+#ifdef _MSC_VER
+// The "naked" attribute avoids the compiler generated prologue and epilogue
+// (which saves the registers %ebx,%esi,%edi if no optimization is enabled,
+// and those registers among %ebx,%esi,%edi which occur in the asm code
+// if optimization is enabled).
+#define FUNBEGIN(name) __declspec(naked) void name () { __asm {
+#define FUNEND(name,size_expression)                  }       }
+#else
+#define FUNBEGIN(name) C(name):
+#if defined(BSD_SYNTAX)
+#define FUNEND(name,size_expression)
+#else
+#define FUNEND(name,size_expression) .size C(name),.-C(name)
+#endif
+#endif
+
+// Here we go!
+
+TEXT()
+
+// Rules about registers:
+// Registers %eax,%edx,%ecx may be freely used.
+// Registers %ebx,%esi,%edi must be saved before being used.
+// Don't fiddle with register %ebp - some platforms don't like this.
+
diff --git a/common/asm-i386.sh b/common/asm-i386.sh
new file mode 100755 (executable)
index 0000000..0994dd1
--- /dev/null
@@ -0,0 +1,184 @@
+#!/bin/sh
+# Translate the assembler syntax of i386 assembler programs
+# Usage: asm-i386.sh [-no-C] < gas-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$,,' -e 's/##//g'
+# Warning! All comments are stripped.
+
+# Copyright (C) 1997-2018 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+tmpscript01=sed$$tmp01
+tmpscript02=sed$$tmp02
+tmpscript03=sed$$tmp03
+tmpscript04=sed$$tmp04
+tmpscript05=sed$$tmp05
+tmpscript06=sed$$tmp06
+tmpscript07=sed$$tmp07
+tmpscript08=sed$$tmp08
+tmpscript09=sed$$tmp09
+tmpscript10=sed$$tmp10
+tmpremove='rm -f $tmpscript01 $tmpscript02 $tmpscript03 $tmpscript04 $tmpscript05 $tmpscript06 $tmpscript07 $tmpscript08 $tmpscript09 $tmpscript10'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript01 << \EOF
+# ----------- Strip comments
+s,# .*,,
+s,[    ][      ]*$,,
+EOF
+
+cat > $tmpscript02 << \EOF
+# ----------- Remove #APP/#NO_APP lines and gcc self-identification, add a blank line at the end
+/^#APP$/d
+/^#NO_APP$/d
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+cat > $tmpscript03 << \EOF
+# ----------- Global symbols depends on ASM_UNDERSCORE
+s/^\([A-Za-z0-9_]\+\)/C(\1)/
+s/\.L\([A-Za-z0-9_]\+\)/L(\1)/
+# ----------- Massage the beginning of functions
+/\.type/{
+s/\.type[      ]\([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/
+}
+# ----------- Massage the end of functions
+s/\.size[      ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1,\2)/
+# ----------- Introduce conditionals for function references in PIC code
+# Note: This is hairy. It assumes that the register clobbered with
+# the 'addl $_GLOBAL_OFFSET_TABLE_ ...' instruction is the same as
+# the register that the @GOTOFF instructions reference.
+/^     addl    \$_GLOBAL_OFFSET_TABLE_,/{
+x
+s/.*/.LgotGOT/
+x
+s/^    addl    \$_GLOBAL_OFFSET_TABLE_, *\(%.*\)/#ifdef __ELF__\
+       addl    $_GLOBAL_OFFSET_TABLE_,\1\
+#else\
+.LgotGOT:\
+#endif/
+}
+/^     addl    \$_GLOBAL_OFFSET_TABLE_+\[\.-\(.*\)\],/{
+h
+s/^    addl    \$_GLOBAL_OFFSET_TABLE_+\[\.-\(.*\)\],.*/\1/
+x
+s/^    addl    \$_GLOBAL_OFFSET_TABLE_+\[\.-\(.*\)\], *\(%.*\)/#ifdef __ELF__\
+       addl    \$_GLOBAL_OFFSET_TABLE_+[.-\1],\2\
+#endif/
+}
+/@GOTOFF(/{
+G
+s/^    leal    \([A-Za-z0-9_]\+\)@GOTOFF\(.*\)\
+\(.*\)/#ifdef __ELF__\
+       leal    \1@GOTOFF\2\
+#else\
+       leal    C(\1)-\3\2\
+#endif/
+}
+EOF
+
+cat > $tmpscript04 << \EOF
+# ----------- Introduce macro syntax for operands
+s/\([-+0-9A-Z_]\+\)[(]%\(e..\)[)]/MEM_DISP(\2,\1)/g
+s/[(]%\(e..\)[)]/MEM(\1)/g
+s/\([-+0-9A-Z_]\+\)[(],%\(e..\),\([0-9]*\)[)]/MEM_DISP_SHINDEX0(\1,\2,\3)/g
+s/\([-+0-9A-Z_]\+\)[(]%\(e..\),%\(e..\),\([0-9]*\)[)]/MEM_DISP_SHINDEX(\2,\1,\3,\4)/g
+s/[(]%\(e..\),%\(e..\),\([0-9]*\)[)]/MEM_SHINDEX(\1,\2,\3)/g
+s/[(]%\(e..\),%\(e..\)[)]/MEM_INDEX(\1,\2)/g
+EOF
+
+cat > $tmpscript05 << \EOF
+# ----------- Introduce macro syntax for instructions
+s/\(push\|pop\|mul\|div\|not\|neg\|inc\|dec\|fld\|fstp\)\(.\)\([       ]\+\)\(.*\)$/INSN1(\1,\2        ,\4)/
+s/\(call\|jmp\|jc\|jnc\|je\|jne\|jz\|jnz\|ja\|jae\|jb\|jbe\|jl\|jge\|js\|jns\)\([      ]\+\)\(.*\)$/INSN1(\1,_ ,\3)/
+s/\(movs\|movz\)\(.\)l\([      ]\+\)\(.*\)$/INSN2MOVXL(\1,\2,\4)/
+s/\(mov\|add\|sub\|adc\|sbb\|xor\|test\|cmp\|rcl\|rcr\|and\|or\|sar\|shr\|shl\|lea\)\(.\)\([   ]\+\)\(.*\)$/INSN2(\1,\2        ,\4)/
+s/\(shld\|shrd\)\(.\)\([       ]\+\)%cl,[      ]*\(.*\)$/INSN2SHCL(\1,\2       ,\4)/
+s/rep[         ];/REP/
+s/repz[        ];/REPZ/
+EOF
+
+cat > $tmpscript06 << \EOF
+# ----------- Add size prefixes to memory references
+s/\([(]f[^(,]*,s.*\), *MEM/\1,X4 MEM/g
+s/\([(]f[^(,]*,l.*\), *MEM/\1,X8 MEM/g
+s/\([(][^(,]*,b.*\), *MEM/\1,X1 MEM/g
+s/\([(][^(,]*,w.*\), *MEM/\1,X2 MEM/g
+s/\([(][^(,]*,l.*\), *MEM/\1,X4 MEM/g
+EOF
+
+cat > $tmpscript07 << \EOF
+# ----------- Introduce macro syntax for register names
+s/%\(e..\)/R(\1)/g
+s/%\(..\)/R(\1)/g
+s/\$\([-0-9]*\)/NUM(\1)/g
+EOF
+
+cat > $tmpscript08 << \EOF
+# ----------- Treat table jumps (hairy)
+# (Needed because the MSVC inline assembler does not have pseudo-ops.
+# Note that we transform a table of absolute addresses with 4 bytes
+# per entry into a table of absolute addresses with 8 bytes per entry.)
+s/^    \.long \(.*\)$/#ifdef _MSC_VER\
+       nop\
+       nop\
+       push \1\
+#else\
+       .long \1\
+#endif/
+s/^    \(INSN1[(]jmp,_[^,]*,\)\*MEM_DISP_SHINDEX0[(]\([^,)]*\),\([^,)]*\),4[)][)]$/#ifdef _MSC_VER\
+       INSN2(lea,l     ,MEM_DISP_SHINDEX0(\2+8,\3,8),R(\3))\
+       INSN2(mov,l     ,X4 MEM_DISP(\3,-4),R(\3))\
+       INSN1(jmp,_     ,INDIR(R(\3)))\
+#else\
+       \1INDIR(MEM_DISP_SHINDEX0(\2,\3,4)))\
+#endif/
+EOF
+
+cat > $tmpscript09 << \EOF
+# ----------- Treat indirect calls
+s/\(INSN1[(]\(call\|jmp\),_[^,]*,\)\*\(\(R\)[(][^)]*[)]\)[)]$/\1INDIR(\3))/
+s/\(INSN1[(]\(call\|jmp\),_[^,]*,\)\*\(\(MEM\|MEM_DISP\|C\)[(][^)]*[)]\)[)]$/\1INDIR(X4 \3))/
+EOF
+
+cat > $tmpscript10 << \EOF
+# ----------- Introduce macro syntax for assembler pseudo-ops
+/\.file\([     ]\+\)/d
+s/\.text/TEXT()/
+s/^\([^#]*\)\.align \(.*\)/\1ALIGN(\2)/
+s/\.p2align \([^,]*\),,\(.*\)/P2ALIGN(\1,\2)/
+s/\.globl\( \+\)\(.*\)$/GLOBL(C(\2))/
+# ----------- Declare global symbols as functions (we have no variables)
+s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/
+EOF
+
+sed -f $tmpscript01 | \
+sed -f $tmpscript02 | \
+(cat - ; echo) | \
+(if [ $# = 1 -a "x$1" = "x-no-C" ] ; then cat - ; else sed -f $tmpscript03 ; fi) | \
+sed -f $tmpscript04 | \
+sed -f $tmpscript05 | \
+sed -f $tmpscript06 | \
+sed -f $tmpscript07 | \
+sed -f $tmpscript08 | \
+sed -f $tmpscript09 | \
+sed -f $tmpscript10
+
+eval "$tmpremove"
+
diff --git a/common/asm-m68k.h b/common/asm-m68k.h
new file mode 100644 (file)
index 0000000..736a7c3
--- /dev/null
@@ -0,0 +1,61 @@
+// Assembly language support for m68k CPU.
+// Bruno Haible 1999-05-29
+
+// Copyright (C) 1999-2017 Bruno Haible <bruno@clisp.org>
+//
+// This program is free software: you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+// In order not to have to maintain several copies of the assembly language
+// code, we use some macros which expand into the correct syntax.
+// These macros are:
+//   C(name)
+//           This expands to the name of the C variable or function `name'.
+//           On Unix BSD systems, this prepends an underscore.
+//   L(label)
+//           This expands to the name of a local label, having the name `label'.
+//           On Unix ELF systems, where there is no underscore, names beginning
+//           with an alphabetic character are automatically exported, so this
+//           prepends a dot. Note that when defining a label, the `:' must
+//           be inside the parentheses, not outside, because otherwise some
+//           ANSI C preprocessor inserts a space between the label and the `:',
+//           and some assemblers don't like this.
+//   DECLARE_FUNCTION(name)
+//           Declare `name' to be a global function. When assembly language
+//           code is compiled into a shared library, ELF linkers need to know
+//           which symbols are functions.
+//   FUNBEGIN(name)
+//           Start the assembly language code for the C function `name'.
+//   FUNEND(name)
+//           End the assembly language code for the C function 'name'.
+
+#ifdef ASM_UNDERSCORE
+// SunOS, NetBSD, OpenBSD, Linux/a.out
+#define C(entrypoint) _##entrypoint
+#define L(label) L##label
+#else
+// SVR4, A/UX, AMIX, Atari, Linux/ELF
+#define C(entrypoint) entrypoint
+#define L(label) .L##label
+#endif
+
+// When assembly language code is compiled into a shared library, ELF linkers
+// need to know which symbols are functions.
+#if defined(__NetBSD__) || defined(__OpenBSD__) || defined(__ELF__) || defined(__svr4__)
+#define DECLARE_FUNCTION(name) .type C(name),@function
+#define FUNEND(name) .size C(name),.-C(name)
+#else
+#define DECLARE_FUNCTION(name)
+#define FUNEND(name)
+#endif
+#define FUNBEGIN(name) C(name):
diff --git a/common/asm-m68k.sh b/common/asm-m68k.sh
new file mode 100755 (executable)
index 0000000..7912b19
--- /dev/null
@@ -0,0 +1,96 @@
+#!/bin/sh
+# Translate the assembler syntax of m68k assembler programs
+# Usage: asm-m68k.sh < sunos-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e 's,% ,%,g' -e 's,//.*$,,'
+
+# Copyright (C) 1999-2017 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+syntax="$1"
+
+case "$syntax" in
+  "") echo "missing syntax" 1>&2; exit 1;;
+  mit | motorola) ;;
+  *) echo "invalid syntax: $syntax" 1>&2; exit 1;;
+esac
+
+tmpscript1=sed$$tmp1
+tmpscript2=sed$$tmp2
+tmpremove='rm -f $tmpscript1 $tmpscript2'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript1 << \EOF
+# ----------- Remove #APP/#NO_APP lines
+/^#APP$/d
+/^#NO_APP$/d
+# ----------- Remove gcc self-identification
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+if test $syntax = mit; then
+cat > $tmpscript2 << \EOF
+# ----------- Global symbols depends on ASM_UNDERSCORE
+s/^L\([A-Za-z0-9_]\+\)/L(\1)/
+s/ L\([A-Za-z0-9_]\+\)/ L(\1)/
+# ----------- Prefix register names with $, to be turned into % later
+s/,/, /g
+s/\([^A-Za-z0-9_]\)\([ad][0-7]\|sp\|fp[0-7]\|pc\)\([^A-Za-z0-9_]\)/\1$\2\3/g
+s/\([^A-Za-z0-9_]\)\([ad][0-7]\|sp\|fp[0-7]\|pc\)$/\1$\2/g
+s/, /,/g
+# ----------- Declare global symbols as functions (we have no variables)
+s/\.globl[     ]_\([A-Za-z0-9_]*\)$/.globl _\1\
+       DECLARE_FUNCTION(\1)/
+# ----------- Global symbols depends on ASM_UNDERSCORE
+s/_\([A-Za-z0-9_]*\)/C(\1)/
+s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/
+/FUNBEGIN(/{
+h
+}
+${
+p
+s/.*//
+x
+s/FUNBEGIN/FUNEND/
+}
+EOF
+fi
+
+if test $syntax = motorola; then
+cat > $tmpscript2 << \EOF
+# ----------- Global symbols depends on ASM_UNDERSCORE
+s/^\([A-Za-z0-9_]\+\)/C(\1)/
+s/\.L\([A-Za-z0-9_]\+\)/L(\1)/
+s/\.globl[     ]\([A-Za-z0-9_]*\)/.globl C(\1)/
+# ----------- Introduce macro syntax for assembler pseudo-ops
+/\.file\([     ]\+\)/d
+s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/
+# ----------- Massage the beginning of functions
+/\.type/{
+s/\.type[      ]\([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/
+}
+# ----------- Massage the end of functions
+s/\.size[      ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1)/
+EOF
+fi
+
+sed -f $tmpscript1 | \
+sed -f $tmpscript2
+
+eval "$tmpremove"
diff --git a/common/asm-mips.h b/common/asm-mips.h
new file mode 100644 (file)
index 0000000..0d6f20b
--- /dev/null
@@ -0,0 +1,25 @@
+// Assembly language support for mips CPU.
+// Bruno Haible 1999-05-29
+
+// Copyright (C) 1999-2017 Bruno Haible <bruno@clisp.org>
+//
+// This program is free software: you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+// When assembly language code is compiled into a shared library, ELF linkers
+// need to know which symbols are functions.
+#if defined(__ELF__) || defined(__NetBSD__)
+#define DECLARE_FUNCTION(name) .type name,@function
+#else
+#define DECLARE_FUNCTION(name)
+#endif
diff --git a/common/asm-mips.sh b/common/asm-mips.sh
new file mode 100755 (executable)
index 0000000..5f57256
--- /dev/null
@@ -0,0 +1,54 @@
+#!/bin/sh
+# Translate the assembler syntax of mips assembler programs
+# Usage: asm-mips.sh < irix-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e 's,% ,%,g' -e 's,//.*$,,'
+
+# Copyright (C) 1999-2019 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+tmpscript1=sed$$tmp1
+tmpscript2=sed$$tmp2
+tmpremove='rm -f $tmpscript1 $tmpscript2'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript1 << \EOF
+# ----------- Remove gcc self-identification
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+cat > $tmpscript2 << \EOF
+# ----------- Remove comments, they would cause trouble in preprocessing
+s,#.*$,,
+# ----------- Remove assembler pseudo-ops that the IRIX assembler does not understand
+/\.section/d
+/\.previous/d
+/\.abicalls/d
+/\.nan/d
+/\.module/d
+# ----------- Massage the beginning of functions
+/\.type/{
+s/\.type[      ]\+\([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/
+}
+EOF
+
+sed -f $tmpscript1 | \
+sed -f $tmpscript2
+
+eval "$tmpremove"
diff --git a/common/asm-powerpc.sh b/common/asm-powerpc.sh
new file mode 100755 (executable)
index 0000000..432ed7b
--- /dev/null
@@ -0,0 +1,46 @@
+#!/bin/sh
+# Translate the assembler syntax of powerpc assembler programs
+# Usage: asm-powerpc.sh < powerpclinux-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e 's,% ,%,g' -e 's,//.*$,,'
+
+# Copyright (C) 2017 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+tmpscript1=sed$$tmp1
+tmpscript2=sed$$tmp2
+tmpremove='rm -f $tmpscript1 $tmpscript2'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript1 << \EOF
+# ----------- Remove #APP/#NO_APP lines and gcc self-identification
+/^#APP$/d
+/^#NO_APP$/d
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+cat > $tmpscript2 << \EOF
+# ----------- Introduce macro syntax for assembler pseudo-ops
+/\.section\([  ]\+\).*GNU-stack/d
+EOF
+
+sed -f $tmpscript1 | \
+sed -f $tmpscript2
+
+eval "$tmpremove"
diff --git a/common/asm-riscv.sh b/common/asm-riscv.sh
new file mode 100755 (executable)
index 0000000..5ef6b80
--- /dev/null
@@ -0,0 +1,44 @@
+#!/bin/sh
+# Translate the assembler syntax of RISC-V assembler programs
+# Usage: asm-riscv.sh < riscvlinux-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e 's,% ,%,g' -e 's,//.*$,,'
+
+# Copyright (C) 2017-2018 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+tmpscript1=sed$$tmp1
+tmpscript2=sed$$tmp2
+tmpremove='rm -f $tmpscript1 $tmpscript2'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript1 << \EOF
+# ----------- Remove gcc self-identification
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+cat > $tmpscript2 << \EOF
+# ----------- Introduce macro syntax for assembler pseudo-ops
+/\.section\([  ]\+\).*GNU-stack/d
+EOF
+
+sed -f $tmpscript1 | \
+sed -f $tmpscript2
+
+eval "$tmpremove"
diff --git a/common/asm-s390.sh b/common/asm-s390.sh
new file mode 100755 (executable)
index 0000000..5d9f1e9
--- /dev/null
@@ -0,0 +1,44 @@
+#!/bin/sh
+# Translate the assembler syntax of s390/s390x assembler programs
+# Usage: asm-s390.sh < s390linux-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e 's,% ,%,g' -e 's,//.*$,,'
+
+# Copyright (C) 2017 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+tmpscript1=sed$$tmp1
+tmpscript2=sed$$tmp2
+tmpremove='rm -f $tmpscript1 $tmpscript2'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript1 << \EOF
+# ----------- Remove gcc self-identification
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+cat > $tmpscript2 << \EOF
+# ----------- Introduce macro syntax for assembler pseudo-ops
+/\.section\([  ]\+\).*GNU-stack/d
+EOF
+
+sed -f $tmpscript1 | \
+sed -f $tmpscript2
+
+eval "$tmpremove"
diff --git a/common/asm-sparc.h b/common/asm-sparc.h
new file mode 100644 (file)
index 0000000..40eb787
--- /dev/null
@@ -0,0 +1,69 @@
+// Assembly language support for sparc CPU.
+// Bruno Haible 1999-05-29
+
+// Copyright (C) 1999-2017 Bruno Haible <bruno@clisp.org>
+//
+// This program is free software: you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+// In order not to have to maintain several copies of the assembly language
+// code, we use some macros which expand into the correct syntax.
+// These macros are:
+//   C(name)
+//           This expands to the name of the C variable or function `name'.
+//           On Unix BSD systems, this prepends an underscore.
+//   L(label)
+//           This expands to the name of a local label, having the name `label'.
+//           On Unix ELF systems, where there is no underscore, names beginning
+//           with an alphabetic character are automatically exported, so this
+//           prepends a dot. Note that when defining a label, the `:' must
+//           be inside the parentheses, not outside, because otherwise some
+//           ANSI C preprocessor inserts a space between the label and the `:',
+//           and some assemblers don't like this.
+//   DECLARE_FUNCTION(name)
+//           Declare `name' to be a global function. When assembly language
+//           code is compiled into a shared library, ELF linkers need to know
+//           which symbols are functions.
+//   FUNBEGIN(name)
+//           Start the assembly language code for the C function `name'.
+//   FUNEND(name)
+//           End the assembly language code for the C function 'name'.
+
+#ifdef ASM_UNDERSCORE
+// SunOS4, Linux/a.out
+#define C(entrypoint) _##entrypoint
+#define L(label) L##label
+#else
+// Solaris, Linux/ELF
+#define C(entrypoint) entrypoint
+#define L(label) .L##label
+#endif
+
+// When assembly language code is compiled into a shared library, ELF linkers
+// need to know which symbols are functions.
+#if defined(__NetBSD__) || defined(__OpenBSD__)
+#define DECLARE_FUNCTION(name) .type C(name),@function
+#define FUNEND(name) .size C(name),.-C(name)
+#elif defined(__SVR4) || defined(__ELF__)
+// Solaris, Linux/ELF
+// Some preprocessors keep the backslash in place, some don't.
+// Some complain about the # being not in front of an ANSI C macro.
+// Therefore we use a dollar, which will be sed-converted to # later.
+#define DECLARE_FUNCTION(name) .type C(name),$function
+#define FUNEND(name) .size C(name),.-C(name)
+#else
+// SunOS4, Linux/a.out
+#define DECLARE_FUNCTION(name)
+#define FUNEND(name)
+#endif
+#define FUNBEGIN(name) C(name):
diff --git a/common/asm-sparc.sh b/common/asm-sparc.sh
new file mode 100755 (executable)
index 0000000..954ede4
--- /dev/null
@@ -0,0 +1,58 @@
+#!/bin/sh
+# Translate the assembler syntax of sparc64 assembler programs
+# Usage: asm-sparc.sh < sparclinux-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e 's,% ,%,g' -e 's,//.*$,,' -e 's,\$,#,g' -e 's,# ,#,g'
+
+# Copyright (C) 1999-2017 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+tmpscript1=sed$$tmp1
+tmpscript2=sed$$tmp2
+tmpremove='rm -f $tmpscript1 $tmpscript2'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript1 << \EOF
+# ----------- Remove gcc self-identification
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+cat > $tmpscript2 << \EOF
+# ----------- Global symbols depends on ASM_UNDERSCORE
+s/^\([A-Za-z0-9_]\+\)/C(\1)/
+s/\.L\([A-Za-z0-9_]\+\)/L(\1)/
+s/\.global[    ]\([A-Za-z0-9_]*\)$/.global C(\1)/
+# ----------- Introduce macro syntax for assembler pseudo-ops
+/\.file\([     ]\+\)/d
+/\.section\([  ]\+\).*GNU-stack/d
+s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/
+# ----------- Massage the beginning of functions
+/\.type/{
+s/\.type[      ]\([A-Za-z0-9_]*\), *#function/DECLARE_FUNCTION(\1)/
+}
+# ----------- Massage the end of functions
+s/\.size[      ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1)/
+# ----------- Turn # into $, to avoid trouble in preprocessing
+s,#,\$,g
+EOF
+
+sed -f $tmpscript1 | \
+sed -f $tmpscript2
+
+eval "$tmpremove"
diff --git a/common/asm-x86_64.h b/common/asm-x86_64.h
new file mode 100644 (file)
index 0000000..99a51e8
--- /dev/null
@@ -0,0 +1,285 @@
+// Assembly language support for x86_64 CPU.
+// Bruno Haible 2016-12-28
+
+// Copyright (C) 1997-2018 Bruno Haible <bruno@clisp.org>
+//
+// This program is free software: you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+// In order not to have to maintain several copies of the assembly language
+// code, we use some macros which expand into the correct syntax.
+// These macros are:
+//   C(name)
+//           This expands to the name of the C variable or function `name'.
+//           On Unix BSD systems, this prepends an underscore.
+//   L(label)
+//           This expands to the name of a local label, having the name `label'.
+//           On Unix ELF systems, where there is no underscore, names beginning
+//           with an alphabetic character are automatically exported, so this
+//           prepends a dot. Note that when defining a label, the `:' must
+//           be inside the parentheses, not outside, because otherwise some
+//           ANSI C preprocessor inserts a space between the label and the `:',
+//           and some assemblers don't like this.
+//   R(reg)
+//           This expands to a reference to register `reg'. On Unix, this
+//           prepends a % charater.
+//   NUM(value)
+//           This expands to an immediate value. On Unix, this prepends a $
+//           character.
+//   ADDR(variable)
+//           This expands to an immediate value, the address of some variable
+//           or function. On Unix, this prepends a $ character. With MSVC,
+//           this prepends the keyword "OFFSET".
+//   ADDR_PCRELATIVE(variable)
+//           This expands to the address of symbol `variable', with program
+//           counter (%rip) relative addressing.
+//   About operand sizes: On Unix, a suffix to the instruction specifies the
+//           size of the operands (for example "movb", "movw", "movl"). With
+//           MSVC, there is no such suffix. Instead, the assembler infers the
+//           operand size from the names of the registers ("al" vs. "ax" vs.
+//           "eax"). This works well in most cases, but in instructions like
+//           "mul [esi]" the assembler guesses the operand size: "byte" by
+//           default. So it is better to explicitly specify the operand size
+//           of memory operands (prefix X1, X2, X4, X8).
+//           (Side note about Unix assemblers: Some Unix assemblers allow you
+//           to write "testb %eax,%eax" but silently treat this as
+//           "testb %al,%al".)
+//   X1
+//           This prefixes a memory reference of 1 byte.
+//   X2
+//           This prefixes a memory reference of 2 bytes.
+//   X4
+//           This prefixes a memory reference of 4 bytes.
+//   X8
+//           This prefixes a memory reference of 8 bytes.
+//   MEM(base)
+//           This expands to a memory reference at address `base'.
+//   MEM_DISP(base,displacement)
+//           This expands to a memory reference at address `base+displacement'.
+//   MEM_INDEX(base,index)
+//           This expands to a memory reference at address `base+index'.
+//   MEM_SHINDEX(base,index,size)
+//           This expands to a memory reference at address
+//           `base+index*size', where `size' is 1, 2, 4, or 8.
+//   MEM_DISP_SHINDEX0(displacement,index,size)
+//           This expands to a memory reference at address
+//           `displacement+index*size', where `size' is 1, 2, 4, or 8.
+//   MEM_DISP_SHINDEX(base,displacement,index,size)
+//           This expands to a memory reference at address
+//           `base+displacement+index*size', where `size' is 1, 2, 4, or 8.
+//   MEM_PCRELATIVE(variable)
+//           This expands to a memory reference at symbol `variable', with
+//           program counter (%rip) relative addressing.
+//   INDIR(value)
+//           This expands to an implicit indirection. On Unix, this prepends
+//           a * character.
+//   INSN1(mnemonic,size_suffix,dst)
+//           This expands to an instruction with one operand.
+//   INSN2(mnemonic,size_suffix,src,dst)
+//           This expands to an instruction with two operands. In our notation,
+//           `src' comes first and `dst' second, but they are reversed when
+//           expanding to Intel syntax. In Intel syntax, size_suffix is omitted.
+//   INSN2S(mnemonic,size_suffix,src,dst)
+//           This expands to an instruction with two operands. In our notation,
+//           `src' comes first and `dst' second, but they are reversed when
+//           expanding to Intel syntax. In Intel syntax, size_suffix is
+//           preserved.
+//   INSN2MOVXL(mnemonic,size_suffix,src,dst)
+//           This expands to an instruction with two operands, of type
+//           movsbl/movzbl, which in some syntaxes requires a second suffix.
+//   INSN2MOVXQ(mnemonic,size_suffix,src,dst)
+//           This expands to an instruction with two operands, of type
+//           movsbq/movzbq, which in some syntaxes requires a second suffix.
+//   INSN2MOVXLQ(mnemonic,size_suffix,src,dst)
+//           This expands to an instruction with two operands, of type
+//           movslq/movzlq, which in some syntaxes requires a second suffix.
+//   _
+//           For instructions which don't have a size suffix, like jump
+//           instructions. Expands to nothing. Needed for MSVC, which has
+//           problems with empty macro arguments.
+//   TEXT()
+//           Switch to the code section.
+//   P2ALIGN(log,max)
+//           Align to 2^log bytes, but insert at most max bytes.
+//   GLOBL(name)
+//           Declare `name' to be a global symbol.
+//   DECLARE_FUNCTION(name)
+//           Declare `name' to be a global function. When assembly language
+//           code is compiled into a shared library, ELF linkers need to know
+//           which symbols are functions.
+//   FUNBEGIN(name)
+//           Start the assembly language code for the C function `name'.
+//   FUNEND(name,size_expression)
+//           End the assembly language code for the C function 'name'.
+//   EH_FRAME_SECTION
+//           The arguments to the .section statement that introduces the
+//           exception handler section (on ELF platforms).
+
+#ifdef _MSC_VER
+// MSVC
+#define C(entrypoint) entrypoint
+#define L(label) $L##label
+#else
+#ifdef ASM_UNDERSCORE
+// Mac OS X
+#define C(entrypoint) _##entrypoint
+#define L(label) L##label
+#else
+// Linux/ELF, Solaris/ELF, Windows with GNU as
+#define C(entrypoint) entrypoint
+#define L(label) .L##label
+#endif
+#endif
+
+// The two syntaxes:
+// - ATT_SYNTAX for GNU assembler version 2.
+// - INTEL_SYNTAX for MS assembler.
+// Note: INTEL_SYNTAX is not the same syntax as produced by "gcc masm=intel"
+// as there are syntactic differences between that syntax and the one accepted
+// by the MS assembler (for MEM_DISP, INDIR, P2ALIGN, FUNBEGIN, FUNEND etc.).
+#ifdef _MSC_VER
+// MS assembler
+#define R(r) r
+#define NUM(n) n
+#define ADDR(a) OFFSET a
+#define ADDR_PCRELATIVE(a) OFFSET a
+#define X1 BYTE PTR
+#define X2 WORD PTR
+#define X4 DWORD PTR
+#define X8 QWORD PTR
+#define MEM(base) [base]
+#define MEM_DISP(base,displacement) [base+(displacement)]
+#define MEM_INDEX(base,index) [base+index]
+#define MEM_SHINDEX(base,index,size) [base+index*size]
+#define MEM_DISP_SHINDEX0(displacement,index,size) [(displacement)+index*size]
+#define MEM_DISP_SHINDEX(base,displacement,index,size) [base+(displacement)+index*size]
+#define MEM_PCRELATIVE(variable) variable
+#define INDIR(value)value
+#define INSNCONC(mnemonic,suffix)mnemonic##suffix
+#define INSN1(mnemonic,size_suffix,dst)mnemonic dst
+#define INSN2(mnemonic,size_suffix,src,dst)mnemonic dst,src
+#define INSN2S(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) dst,src
+#define INSN2MOVXL(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,x) dst,src
+#define INSN2MOVXQ(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,x) dst,src
+#define INSN2MOVXLQ(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,xd) dst,src
+#else
+// GNU assembler version 2
+#define R(r) %r
+#define NUM(n) $ n
+#define ADDR(a) $##a
+#define ADDR_PCRELATIVE(a) a(%rip)
+#define X1
+#define X2
+#define X4
+#define X8
+#define MEM(base)(R(base))
+#define MEM_DISP(base,displacement)displacement(R(base))
+#define MEM_INDEX(base,index)(R(base),R(index))
+#define MEM_SHINDEX(base,index,size)(R(base),R(index),size)
+#define MEM_DISP_SHINDEX0(displacement,index,size)displacement(,R(index),size)
+#define MEM_DISP_SHINDEX(base,displacement,index,size)displacement(R(base),R(index),size)
+#define MEM_PCRELATIVE(variable) variable(%rip)
+#define INDIR(value)*value
+#define INSNCONC(mnemonic,size_suffix)mnemonic##size_suffix
+#define INSN1(mnemonic,size_suffix,dst)INSNCONC(mnemonic,size_suffix) dst
+#define INSN2(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) src,dst
+#define INSN2S(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) src,dst
+#define INSN2MOVXL(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix##l) src,dst
+#define INSN2MOVXQ(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix##q) src,dst
+#define INSN2MOVXLQ(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix##q) src,dst
+#endif
+
+#define _
+
+#ifdef _MSC_VER
+// MS assembler
+#define TEXT() _TEXT SEGMENT
+#else
+#define TEXT() .text
+#endif
+
+#ifdef _MSC_VER
+// MS assembler
+// There is no equivalent for "p2align 4,,7". This comes closest:
+#define P2ALIGN(log,max) ALIGN 8
+#else
+#if defined __sun
+// Solaris
+#define P2ALIGN(log,max) .align 1<<log
+#else
+// Mac OS X, Linux, Windows with GNU as
+#define P2ALIGN(log,max) .p2align log,,max
+#endif
+#endif
+
+#ifdef _MSC_VER
+// MS assembler
+#define GLOBL(name)
+#else
+#define GLOBL(name) .globl name
+#endif
+
+// Define the DECLARE_FUNCTION(name) macro.
+#ifdef _MSC_VER
+// MS assembler
+#define DECLARE_FUNCTION(name) PUBLIC name
+#else
+#if defined _WIN32 || defined __CYGWIN__
+// Windows with GNU as
+#define DECLARE_FUNCTION(name) .def C(name); .scl 2; .type 32; .endef
+#else
+#ifdef ASM_UNDERSCORE
+// Mac OS X
+#define DECLARE_FUNCTION(name)
+#else
+// ELF
+#define DECLARE_FUNCTION(name) .type C(name),@function
+#endif
+#endif
+#endif
+
+// Define the FUNBEGIN(name) and FUNEND() macros.
+#ifdef _MSC_VER
+// MS assembler
+#define FUNBEGIN(name) name PROC
+#define FUNEND(name,size_expression) name ENDP
+#else
+#define FUNBEGIN(name) C(name):
+#if (defined _WIN32 || defined __CYGWIN__) || defined(ASM_UNDERSCORE)
+// Windows with GNU as, Mac OS X
+#define FUNEND(name,size_expression)
+#else
+// ELF
+#if defined __sun
+// Solaris/ELF
+#define FUNEND(name,size_expression) .size C(name), . - C(name)
+#else
+// Linux/ELF
+#define FUNEND(name,size_expression) .size C(name),size_expression
+#endif
+#endif
+#endif
+
+// Section of frame info for exception handlers
+#if defined __APPLE__ && defined __MACH__
+// Mac OS X
+#define EH_FRAME_SECTION __TEXT,__eh_frame,coalesced,no_toc+strip_static_syms+live_support
+#else
+#if defined __sun
+// Solaris/ELF
+#define EH_FRAME_SECTION .eh_frame,"aL",link=.text,@unwind
+#else
+// Linux/ELF
+#define EH_FRAME_SECTION .eh_frame,"aw",@progbits
+#endif
+#endif
diff --git a/common/asm-x86_64.sh b/common/asm-x86_64.sh
new file mode 100755 (executable)
index 0000000..bd42c2d
--- /dev/null
@@ -0,0 +1,149 @@
+#!/bin/sh
+# Translate the assembler syntax of x86_64 assembler programs
+# Usage: asm-x86_64.sh < linux-x86_64-asm-file > portable-asm-file
+# The portable-asm-file has to be
+#   1. preprocessed,
+#   2. grep -v '^ *#line' | grep -v '^#'
+#   3. sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$,,' -e 's/##//g'
+
+# Copyright (C) 1997-2018 Bruno Haible <bruno@clisp.org>
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+tmpscript1=sed$$tmp1
+tmpscript2=sed$$tmp2
+tmpscript3=sed$$tmp3
+tmpscript4=sed$$tmp4
+tmpscript5=sed$$tmp5
+tmpscript6=sed$$tmp6
+tmpscript7=sed$$tmp7
+tmpscript8=sed$$tmp8
+tmpscript9=sed$$tmp9
+tmpremove='rm -f $tmpscript1 $tmpscript2 $tmpscript3 $tmpscript4 $tmpscript5 $tmpscript6 $tmpscript7 $tmpscript8 $tmpscript9'
+trap "$tmpremove" 1 2 15
+
+cat > $tmpscript1 << \EOF
+# ----------- Remove #APP/#NO_APP lines and gcc self-identification
+/^#APP$/d
+/^#NO_APP$/d
+/gcc2_compiled/d
+/gnu_compiled_c/d
+/\.ident/d
+EOF
+
+cat > $tmpscript2 << \EOF
+# ----------- Global symbols depends on ASM_UNDERSCORE
+s/^\([A-Za-z0-9_]\+\)/C(\1)/
+s/\.L\([A-Za-z0-9_]\+\)/L(\1)/
+s/\([A-Za-z0-9_]\+\)(%rip)/C(\1)(%rip)/
+# ----------- Massage the beginning of functions
+/\.type/{
+s/\.type       \([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/
+}
+# ----------- Massage the end of functions
+s/\.size       \([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1,\2)/
+# ----------- Section of frame info for exception handlers
+s/\.section    \.eh_frame,"a[w]*",@progbits/.section   EH_FRAME_SECTION/
+# ----------- Disable the frame info for exception handlers on Solaris
+# (as the Solaris linker expects a different format, see
+# https://illumos.org/issues/3210)
+# Likewise this section does not assemble on Mac OS X 10.5 and on Windows.
+/EH_FRAME_SECTION/{
+s/^/#if !(defined __sun || (defined __APPLE__ \&\& defined __MACH__) || (defined _WIN32 || defined __CYGWIN__))\
+/
+}
+${
+s/$/\
+#endif/
+}
+EOF
+
+cat > $tmpscript3 << \EOF
+# ----------- Introduce macro syntax for operands
+s/\([-+0-9A-Z_]\+\)[(]%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\)[)]/MEM_DISP(\2,\1)/g
+s/\(C[(][A-Za-z0-9_]\+[)]\)[(]%rip[)]/MEM_PCRELATIVE(\1)/g
+s/[(]%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\)[)]/MEM(\1)/g
+s/\([-+0-9A-Z_]\+\)[(],%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),\([0-9]*\)[)]/MEM_DISP_SHINDEX0(\1,\2,\3)/g
+s/\([-+0-9A-Z_]\+\)[(]%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),\([0-9]*\)[)]/MEM_DISP_SHINDEX(\2,\1,\3,\4)/g
+s/[(]%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),\([0-9]*\)[)]/MEM_SHINDEX(\1,\2,\3)/g
+s/[(]%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\)[)]/MEM_INDEX(\1,\2)/g
+EOF
+
+cat > $tmpscript4 << \EOF
+# ----------- Add size suffix to 'mov' instructions
+s/mov\([       ]\+.*, *%\(e[abcd]x\|e[sd]i\|e[bs]p\|r[89]d\|r1[012345]d\)\)$/movl\1/
+# ----------- Introduce macro syntax for instructions
+s/\(push\|pop\|mul\|div\|not\|neg\|inc\|dec\)\(.\)\([  ]\+\)\(.*\)$/INSN1(\1,\2        ,\4)/
+s/\(call\|jmp\|jc\|jnc\|je\|jne\|jz\|jnz\|ja\|jae\|jb\|jbe\|jl\|jle\|jg\|jge\|js\|jns\)\([     ]\+\)\(.*\)$/INSN1(\1,_ ,\3)/
+s/\(movs\|movz\)\(.\)l\([      ]\+\)\(.*\)$/INSN2MOVXL(\1,\2,\4)/
+s/\(movs\|movz\)\([bw]\)q\([   ]\+\)\(.*\)$/INSN2MOVXQ(\1,\2,\4)/
+s/\(movs\|movz\)\(l\)q\([      ]\+\)\(.*\)$/INSN2MOVXLQ(\1,\2,\4)/
+s/\(mov\|movlp\|add\|sub\|adc\|sbb\|xor\|xorp\|test\|cmp\|rcl\|rcr\|and\|or\|sar\|sal\|shr\|shl\|lea\)\(.\)\([         ]\+\)\(.*\)$/INSN2(\1,\2        ,\4)/
+s/\(movs\)\([sd]\)\([  ]\+\)\(.*\)$/INSN2S(\1,\2       ,\4)/
+EOF
+
+cat > $tmpscript5 << \EOF
+# ----------- Rewrite lea operand
+s/INSN2[(]lea,\([^,]*\), *MEM_PCRELATIVE[(]/INSN2(lea,\1,ADDR_PCRELATIVE(/g
+EOF
+
+cat > $tmpscript6 << \EOF
+# ----------- Add size prefixes to memory references
+s/\([(][^(,]*,b.*\), *MEM/\1,X1 MEM/g
+s/\([(][^(,]*,w.*\), *MEM/\1,X2 MEM/g
+s/\([(][^(,]*,[ls].*\), *MEM/\1,X4 MEM/g
+s/\([(][^(,]*,[qd].*\), *MEM/\1,X8 MEM/g
+EOF
+
+cat > $tmpscript7 << \EOF
+# ----------- Introduce macro syntax for register names
+# Cf. https://stackoverflow.com/questions/1753602/
+s/%\([abcd]l\|[sd]il\|[bs]pl\|r[89]b\|r1[012345]b\)/R(\1)/g
+s/%\([abcd]x\|[sd]i\|[bs]p\|r[89]w\|r1[012345]w\)/R(\1)/g
+s/%\(e[abcd]x\|e[sd]i\|e[bs]p\|r[89]d\|r1[012345]d\)/R(\1)/g
+s/%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\)/R(\1)/g
+s/%\(xmm[0-9]\+\)/R(\1)/g
+s/\$\([-0-9]*\)/NUM(\1)/g
+EOF
+
+cat > $tmpscript8 << \EOF
+# ----------- Treat indirect calls
+s/\(INSN1[(]\(call\|jmp\),_[^,]*,\)\*\(\(R\)[(][^)]*[)]\)[)]$/\1INDIR(\3))/
+s/\(INSN1[(]\(call\|jmp\),_[^,]*,\)\*\(\(MEM\|MEM_DISP\|C\)[(][^)]*[)]\)[)]$/\1INDIR(X8 \3))/
+s/\(INSN1[(]\(call\|jmp\),_[^,]*,\)\*\(MEM_PCRELATIVE[(].*[)]\)[)]$/\1INDIR(X8 \3))/
+EOF
+
+cat > $tmpscript9 << \EOF
+# ----------- Introduce macro syntax for assembler pseudo-ops
+/\.file\([     ]\+\)/d
+s/\.text/TEXT()/
+s/\.p2align \([^,]*\),,\(.*\)/P2ALIGN(\1,\2)/
+s/\.p2align 3$/P2ALIGN(3,7)/
+s/\.globl\([   ]\+\)\(.*\)$/GLOBL(C(\2))/
+/\.section\([  ]\+\).*GNU-stack/d
+# ----------- Declare global symbols as functions (we have no variables)
+s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/
+EOF
+
+sed -f $tmpscript1 | \
+sed -f $tmpscript2 | \
+sed -f $tmpscript3 | \
+sed -f $tmpscript4 | \
+sed -f $tmpscript5 | \
+sed -f $tmpscript6 | \
+sed -f $tmpscript7 | \
+sed -f $tmpscript8 | \
+sed -f $tmpscript9
+
+eval "$tmpremove"
diff --git a/common/noexecstack-arm.h b/common/noexecstack-arm.h
new file mode 100644 (file)
index 0000000..29a8aed
--- /dev/null
@@ -0,0 +1,3 @@
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",%progbits
+#endif
diff --git a/common/noexecstack.h b/common/noexecstack.h
new file mode 100644 (file)
index 0000000..e9d1efd
--- /dev/null
@@ -0,0 +1,3 @@
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/common/structcpy.c b/common/structcpy.c
new file mode 100644 (file)
index 0000000..a04ce67
--- /dev/null
@@ -0,0 +1,33 @@
+/* copy structs */
+
+/*
+ * Copyright 1995-2005 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+void __structcpy (void* dest, const void* src, unsigned long size, unsigned long alignment)
+{
+  if (alignment % sizeof(long))
+    { char* d = (char*)dest;
+      const char* s = (const char*)src;
+      do { *d++ = *s++; } while (--size > 0);
+    }
+  else
+    /* If the alignment is a multiple of sizeof(long), the size is as well. */
+    { long* d = (long*)dest;
+      const long* s = (const long*)src;
+      do { *d++ = *s++; } while ((size -= sizeof(long)) > 0);
+    }
+}
diff --git a/common/uniq-u.c b/common/uniq-u.c
new file mode 100644 (file)
index 0000000..1c9ac0a
--- /dev/null
@@ -0,0 +1,277 @@
+/* uniq -- remove duplicate lines from a sorted file
+   Copyright (C) 1986-2016 Free Software Foundation, Inc.
+
+   This program is free software: you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 2 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Richard Stallman and David MacKenzie. */
+/* 2000-03-22  Trimmed down to the case of "uniq -u" by Bruno Haible. */
+
+#include <stddef.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+/* The name this program was run with. */
+static char *program_name;
+
+static void
+xalloc_fail (void)
+{
+  fprintf (stderr, "%s: virtual memory exhausted\n", program_name);
+  exit (1);
+}
+
+/* Allocate N bytes of memory dynamically, with error checking.  */
+
+void *
+xmalloc (size_t n)
+{
+  void *p;
+
+  p = malloc (n);
+  if (p == 0)
+    xalloc_fail ();
+  return p;
+}
+
+/* Change the size of an allocated block of memory P to N bytes,
+   with error checking.
+   If P is NULL, run xmalloc.  */
+
+void *
+xrealloc (void *p, size_t n)
+{
+  p = realloc (p, n);
+  if (p == 0)
+    xalloc_fail ();
+  return p;
+}
+
+/* A ‘struct linebuffer’ holds a line of text. */
+
+struct linebuffer
+{
+  size_t size;                 /* Allocated. */
+  size_t length;               /* Used. */
+  char *buffer;
+};
+
+/* Initialize linebuffer LINEBUFFER for use. */
+
+static void
+initbuffer (struct linebuffer *linebuffer)
+{
+  linebuffer->length = 0;
+  linebuffer->size = 200;
+  linebuffer->buffer = (char *) xmalloc (linebuffer->size);
+}
+
+/* Read an arbitrarily long line of text from STREAM into LINEBUFFER.
+   Keep the newline; append a newline if it's the last line of a file
+   that ends in a non-newline character.  Do not null terminate.
+   Return LINEBUFFER, except at end of file return 0.  */
+
+static struct linebuffer *
+readline (struct linebuffer *linebuffer, FILE *stream)
+{
+  int c;
+  char *buffer = linebuffer->buffer;
+  char *p = linebuffer->buffer;
+  char *end = buffer + linebuffer->size - 1; /* Sentinel. */
+
+  if (feof (stream) || ferror (stream))
+    return 0;
+
+  do
+    {
+      c = getc (stream);
+      if (c == EOF)
+       {
+         if (p == buffer)
+           return 0;
+         if (p[-1] == '\n')
+           break;
+         c = '\n';
+       }
+      if (p == end)
+       {
+         linebuffer->size *= 2;
+         buffer = (char *) xrealloc (buffer, linebuffer->size);
+         p = p - linebuffer->buffer + buffer;
+         linebuffer->buffer = buffer;
+         end = buffer + linebuffer->size - 1;
+       }
+      *p++ = c;
+    }
+  while (c != '\n');
+
+  linebuffer->length = p - buffer;
+  return linebuffer;
+}
+
+/* Free linebuffer LINEBUFFER's data. */
+
+static void
+freebuffer (struct linebuffer *linebuffer)
+{
+  free (linebuffer->buffer);
+}
+
+/* Undefine, to avoid warning about redefinition on some systems.  */
+#undef min
+#define min(x, y) ((x) < (y) ? (x) : (y))
+
+/* Return zero if two strings OLD and NEW match, nonzero if not.
+   OLD and NEW point not to the beginnings of the lines
+   but rather to the beginnings of the fields to compare.
+   OLDLEN and NEWLEN are their lengths. */
+
+static int
+different (const char *old, const char *new, size_t oldlen, size_t newlen)
+{
+  int order;
+
+  order = memcmp (old, new, min (oldlen, newlen));
+
+  if (order == 0)
+    return oldlen - newlen;
+  return order;
+}
+
+/* Output the line in linebuffer LINE to stream STREAM
+   provided that the switches say it should be output.
+   If requested, print the number of times it occurred, as well;
+   LINECOUNT + 1 is the number of times that the line occurred. */
+
+static void
+writeline (const struct linebuffer *line, FILE *stream, int linecount)
+{
+  if (linecount == 0)
+    fwrite (line->buffer, 1, line->length, stream);
+}
+
+/* Process input file INFILE with output to OUTFILE.
+   If either is "-", use the standard I/O stream for it instead. */
+
+static void
+check_file (const char *infile, const char *outfile)
+{
+  FILE *istream;
+  FILE *ostream;
+  struct linebuffer lb1, lb2;
+  struct linebuffer *thisline, *prevline, *exch;
+  char *prevfield, *thisfield;
+  size_t prevlen, thislen;
+  int match_count = 0;
+
+  if (!strcmp (infile, "-"))
+    istream = stdin;
+  else
+    istream = fopen (infile, "r");
+  if (istream == NULL)
+    {
+      fprintf (stderr, "%s: error opening %s\n", program_name, infile);
+      exit (1);
+    }
+
+  if (!strcmp (outfile, "-"))
+    ostream = stdout;
+  else
+    ostream = fopen (outfile, "w");
+  if (ostream == NULL)
+    {
+      fprintf (stderr, "%s: error opening %s\n", program_name, outfile);
+      exit (1);
+    }
+
+  thisline = &lb1;
+  prevline = &lb2;
+
+  initbuffer (thisline);
+  initbuffer (prevline);
+
+  if (readline (prevline, istream) == 0)
+    goto closefiles;
+  prevfield = prevline->buffer;
+  prevlen = prevline->length;
+
+  while (!feof (istream))
+    {
+      int match;
+      if (readline (thisline, istream) == 0)
+       break;
+      thisfield = thisline->buffer;
+      thislen = thisline->length;
+      match = !different (thisfield, prevfield, thislen, prevlen);
+
+      if (match)
+       ++match_count;
+
+      if (!match)
+       {
+         writeline (prevline, ostream, match_count);
+         exch = prevline;
+         prevline = thisline;
+         thisline = exch;
+         prevfield = thisfield;
+         prevlen = thislen;
+         if (!match)
+           match_count = 0;
+       }
+    }
+
+  writeline (prevline, ostream, match_count);
+
+ closefiles:
+  if (ferror (istream) || fclose (istream) == EOF)
+    {
+      fprintf (stderr, "%s: error reading %s\n", program_name, infile);
+      exit (1);
+    }
+
+  if (ferror (ostream) || fclose (ostream) == EOF)
+    {
+      fprintf (stderr, "%s: error writing %s\n", program_name, outfile);
+      exit (1);
+    }
+
+  freebuffer (&lb1);
+  freebuffer (&lb2);
+}
+
+int
+main (int argc, char **argv)
+{
+  const char *infile = "-";
+  const char *outfile = "-";
+  int optind = 1;
+
+  program_name = argv[0];
+
+  if (optind < argc)
+    infile = argv[optind++];
+
+  if (optind < argc)
+    outfile = argv[optind++];
+
+  if (optind < argc)
+    {
+      fprintf (stderr, "%s: too many arguments\n", program_name);
+      exit (1);
+    }
+
+  check_file (infile, outfile);
+
+  exit (0);
+}
diff --git a/config.h.in b/config.h.in
new file mode 100644 (file)
index 0000000..81bd760
--- /dev/null
@@ -0,0 +1,542 @@
+/* config.h.in.  Generated from configure.ac by autoheader.  */
+
+/* CPU and C ABI indicator */
+#ifndef __i386__
+#undef __i386__
+#endif
+#ifndef __x86_64_x32__
+#undef __x86_64_x32__
+#endif
+#ifndef __x86_64__
+#undef __x86_64__
+#endif
+#ifndef __alpha__
+#undef __alpha__
+#endif
+#ifndef __arm__
+#undef __arm__
+#endif
+#ifndef __armhf__
+#undef __armhf__
+#endif
+#ifndef __arm64_ilp32__
+#undef __arm64_ilp32__
+#endif
+#ifndef __arm64__
+#undef __arm64__
+#endif
+#ifndef __hppa__
+#undef __hppa__
+#endif
+#ifndef __hppa64__
+#undef __hppa64__
+#endif
+#ifndef __ia64_ilp32__
+#undef __ia64_ilp32__
+#endif
+#ifndef __ia64__
+#undef __ia64__
+#endif
+#ifndef __m68k__
+#undef __m68k__
+#endif
+#ifndef __mips__
+#undef __mips__
+#endif
+#ifndef __mipsn32__
+#undef __mipsn32__
+#endif
+#ifndef __mips64__
+#undef __mips64__
+#endif
+#ifndef __powerpc__
+#undef __powerpc__
+#endif
+#ifndef __powerpc64__
+#undef __powerpc64__
+#endif
+#ifndef __powerpc64_elfv2__
+#undef __powerpc64_elfv2__
+#endif
+#ifndef __riscv32__
+#undef __riscv32__
+#endif
+#ifndef __riscv64__
+#undef __riscv64__
+#endif
+#ifndef __riscv32_ilp32__
+#undef __riscv32_ilp32__
+#endif
+#ifndef __riscv32_ilp32f__
+#undef __riscv32_ilp32f__
+#endif
+#ifndef __riscv32_ilp32d__
+#undef __riscv32_ilp32d__
+#endif
+#ifndef __riscv64_ilp32__
+#undef __riscv64_ilp32__
+#endif
+#ifndef __riscv64_ilp32f__
+#undef __riscv64_ilp32f__
+#endif
+#ifndef __riscv64_ilp32d__
+#undef __riscv64_ilp32d__
+#endif
+#ifndef __riscv64_lp64__
+#undef __riscv64_lp64__
+#endif
+#ifndef __riscv64_lp64f__
+#undef __riscv64_lp64f__
+#endif
+#ifndef __riscv64_lp64d__
+#undef __riscv64_lp64d__
+#endif
+#ifndef __s390__
+#undef __s390__
+#endif
+#ifndef __s390x__
+#undef __s390x__
+#endif
+#ifndef __sh__
+#undef __sh__
+#endif
+#ifndef __sparc__
+#undef __sparc__
+#endif
+#ifndef __sparc64__
+#undef __sparc64__
+#endif
+
+
+/* Define to the number of bits in type 'ptrdiff_t'. */
+#undef BITSIZEOF_PTRDIFF_T
+
+/* Define to the number of bits in type 'sig_atomic_t'. */
+#undef BITSIZEOF_SIG_ATOMIC_T
+
+/* Define to the number of bits in type 'size_t'. */
+#undef BITSIZEOF_SIZE_T
+
+/* Define to the number of bits in type 'wchar_t'. */
+#undef BITSIZEOF_WCHAR_T
+
+/* Define to the number of bits in type 'wint_t'. */
+#undef BITSIZEOF_WINT_T
+
+/* whether code in malloc()ed memory is executable */
+#undef CODE_EXECUTABLE
+
+/* Define to a C preprocessor expression that evaluates to 1 or 0, depending
+   whether the gnulib module lock shall be considered present. */
+#undef GNULIB_LOCK
+
+/* Define to 1 if you have the <dlfcn.h> header file. */
+#undef HAVE_DLFCN_H
+
+/* have getpagesize() */
+#undef HAVE_GETPAGESIZE
+
+/* Define to 1 if you have the <inttypes.h> header file. */
+#undef HAVE_INTTYPES_H
+
+/* Define to 1 if you have the <limits.h> header file. */
+#undef HAVE_LIMITS_H
+
+/* Define to 1 if the system has the type 'long long int'. */
+#undef HAVE_LONG_LONG_INT
+
+/* have vm_allocate() and task_self() functions */
+#undef HAVE_MACH_VM
+
+/* Define to 1 if you have the <memory.h> header file. */
+#undef HAVE_MEMORY_H
+
+/* have <sys/mmap.h> and the mmap() function */
+#undef HAVE_MMAP
+
+/* <sys/mman.h> defines MAP_ANON and mmaping with MAP_ANON works */
+#undef HAVE_MMAP_ANON
+
+/* <sys/mman.h> defines MAP_ANONYMOUS and mmaping with MAP_ANONYMOUS works */
+#undef HAVE_MMAP_ANONYMOUS
+
+/* mmaping of the special device /dev/zero works */
+#undef HAVE_MMAP_DEVZERO
+
+/* have an mmap() function that, with MAP_SHARED, can make memory pages
+   executable */
+#undef HAVE_MMAP_SHARED_CAN_EXEC
+
+/* Define to 1 if you have the `mprotect' function. */
+#undef HAVE_MPROTECT
+
+/* have an mprotect() function that can make malloc()ed memory pages
+   executable */
+#undef HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC
+
+/* have an mprotect() function that can make mmap()ed memory pages executable
+   */
+#undef HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC
+
+/* Define if the <pthread.h> defines PTHREAD_MUTEX_RECURSIVE. */
+#undef HAVE_PTHREAD_MUTEX_RECURSIVE
+
+/* Define if the POSIX multithreading library has read/write locks. */
+#undef HAVE_PTHREAD_RWLOCK
+
+/* Define if the 'pthread_rwlock_rdlock' function prefers a writer to a
+   reader. */
+#undef HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER
+
+/* have <sys/shm.h> and <sys/ipc.h> and shared memory works */
+#undef HAVE_SHM
+
+/* Define to 1 if 'sig_atomic_t' is a signed integer type. */
+#undef HAVE_SIGNED_SIG_ATOMIC_T
+
+/* Define to 1 if 'wchar_t' is a signed integer type. */
+#undef HAVE_SIGNED_WCHAR_T
+
+/* Define to 1 if 'wint_t' is a signed integer type. */
+#undef HAVE_SIGNED_WINT_T
+
+/* Define to 1 if you have the <stdint.h> header file. */
+#undef HAVE_STDINT_H
+
+/* Define to 1 if you have the <stdlib.h> header file. */
+#undef HAVE_STDLIB_H
+
+/* Define to 1 if you have the <strings.h> header file. */
+#undef HAVE_STRINGS_H
+
+/* Define to 1 if you have the <string.h> header file. */
+#undef HAVE_STRING_H
+
+/* Define to 1 if you have the <sys/bitypes.h> header file. */
+#undef HAVE_SYS_BITYPES_H
+
+/* Define to 1 if you have the <sys/cachectl.h> header file. */
+#undef HAVE_SYS_CACHECTL_H
+
+/* Define to 1 if you have the <sys/inttypes.h> header file. */
+#undef HAVE_SYS_INTTYPES_H
+
+/* Define to 1 if you have the <sys/ipc.h> header file. */
+#undef HAVE_SYS_IPC_H
+
+/* Define to 1 if you have the <sys/param.h> header file. */
+#undef HAVE_SYS_PARAM_H
+
+/* Define to 1 if you have the <sys/shm.h> header file. */
+#undef HAVE_SYS_SHM_H
+
+/* Define to 1 if you have the <sys/stat.h> header file. */
+#undef HAVE_SYS_STAT_H
+
+/* Define to 1 if you have the <sys/sysmacros.h> header file. */
+#undef HAVE_SYS_SYSMACROS_H
+
+/* Define to 1 if you have the <sys/types.h> header file. */
+#undef HAVE_SYS_TYPES_H
+
+/* Define to 1 if you have the <threads.h> header file. */
+#undef HAVE_THREADS_H
+
+/* Define to 1 if you have the <unistd_h> header file. */
+#undef HAVE_UNISTD_H
+
+/* Define to 1 if the system has the type 'unsigned long long int'. */
+#undef HAVE_UNSIGNED_LONG_LONG_INT
+
+/* Define to 1 if you have the <wchar.h> header file. */
+#undef HAVE_WCHAR_H
+
+/* Define if you have the 'wint_t' type. */
+#undef HAVE_WINT_T
+
+/* have a working mprotect() function */
+#undef HAVE_WORKING_MPROTECT
+
+/* Version number: (major<<8) + minor */
+#undef LIBFFCALL_VERSION
+
+/* Define to the sub-directory where libtool stores uninstalled libraries. */
+#undef LT_OBJDIR
+
+/* Name of package */
+#undef PACKAGE
+
+/* Define to the address where bug reports for this package should be sent. */
+#undef PACKAGE_BUGREPORT
+
+/* Define to the full name of this package. */
+#undef PACKAGE_NAME
+
+/* Define to the full name and version of this package. */
+#undef PACKAGE_STRING
+
+/* Define to the one symbol short name of this package. */
+#undef PACKAGE_TARNAME
+
+/* Define to the home page for this package. */
+#undef PACKAGE_URL
+
+/* Define to the version of this package. */
+#undef PACKAGE_VERSION
+
+/* Define if the pthread_in_use() detection is hard. */
+#undef PTHREAD_IN_USE_DETECTION_HARD
+
+/* Define to l, ll, u, ul, ull, etc., as suitable for constants of type
+   'ptrdiff_t'. */
+#undef PTRDIFF_T_SUFFIX
+
+/* return type of getpagesize() */
+#undef RETGETPAGESIZETYPE
+
+/* Define to l, ll, u, ul, ull, etc., as suitable for constants of type
+   'sig_atomic_t'. */
+#undef SIG_ATOMIC_T_SUFFIX
+
+/* Define to l, ll, u, ul, ull, etc., as suitable for constants of type
+   'size_t'. */
+#undef SIZE_T_SUFFIX
+
+/* Define to 1 if you have the ANSI C header files. */
+#undef STDC_HEADERS
+
+/* Define to the prefix of C symbols at the assembler and linker level, either
+   an underscore or empty. */
+#undef USER_LABEL_PREFIX
+
+/* Define if the POSIX multithreading library can be used. */
+#undef USE_POSIX_THREADS
+
+/* Define if references to the POSIX multithreading library should be made
+   weak. */
+#undef USE_POSIX_THREADS_WEAK
+
+/* Enable extensions on AIX 3, Interix.  */
+#ifndef _ALL_SOURCE
+# undef _ALL_SOURCE
+#endif
+/* Enable general extensions on macOS.  */
+#ifndef _DARWIN_C_SOURCE
+# undef _DARWIN_C_SOURCE
+#endif
+/* Enable GNU extensions on systems that have them.  */
+#ifndef _GNU_SOURCE
+# undef _GNU_SOURCE
+#endif
+/* Enable NetBSD extensions on NetBSD.  */
+#ifndef _NETBSD_SOURCE
+# undef _NETBSD_SOURCE
+#endif
+/* Enable OpenBSD extensions on NetBSD.  */
+#ifndef _OPENBSD_SOURCE
+# undef _OPENBSD_SOURCE
+#endif
+/* Enable threading extensions on Solaris.  */
+#ifndef _POSIX_PTHREAD_SEMANTICS
+# undef _POSIX_PTHREAD_SEMANTICS
+#endif
+/* Enable extensions specified by ISO/IEC TS 18661-5:2014.  */
+#ifndef __STDC_WANT_IEC_60559_ATTRIBS_EXT__
+# undef __STDC_WANT_IEC_60559_ATTRIBS_EXT__
+#endif
+/* Enable extensions specified by ISO/IEC TS 18661-1:2014.  */
+#ifndef __STDC_WANT_IEC_60559_BFP_EXT__
+# undef __STDC_WANT_IEC_60559_BFP_EXT__
+#endif
+/* Enable extensions specified by ISO/IEC TS 18661-2:2015.  */
+#ifndef __STDC_WANT_IEC_60559_DFP_EXT__
+# undef __STDC_WANT_IEC_60559_DFP_EXT__
+#endif
+/* Enable extensions specified by ISO/IEC TS 18661-4:2015.  */
+#ifndef __STDC_WANT_IEC_60559_FUNCS_EXT__
+# undef __STDC_WANT_IEC_60559_FUNCS_EXT__
+#endif
+/* Enable extensions specified by ISO/IEC TS 18661-3:2015.  */
+#ifndef __STDC_WANT_IEC_60559_TYPES_EXT__
+# undef __STDC_WANT_IEC_60559_TYPES_EXT__
+#endif
+/* Enable extensions specified by ISO/IEC TR 24731-2:2010.  */
+#ifndef __STDC_WANT_LIB_EXT2__
+# undef __STDC_WANT_LIB_EXT2__
+#endif
+/* Enable extensions specified by ISO/IEC 24747:2009.  */
+#ifndef __STDC_WANT_MATH_SPEC_FUNCS__
+# undef __STDC_WANT_MATH_SPEC_FUNCS__
+#endif
+/* Enable extensions on HP NonStop.  */
+#ifndef _TANDEM_SOURCE
+# undef _TANDEM_SOURCE
+#endif
+/* Enable X/Open extensions if necessary.  HP-UX 11.11 defines
+   mbstate_t only if _XOPEN_SOURCE is defined to 500, regardless of
+   whether compiling with -Ae or -D_HPUX_SOURCE=1.  */
+#ifndef _XOPEN_SOURCE
+# undef _XOPEN_SOURCE
+#endif
+/* Enable X/Open compliant socket functions that do not require linking
+   with -lxnet on HP-UX 11.11.  */
+#ifndef _HPUX_ALT_XOPEN_SOCKET_API
+# undef _HPUX_ALT_XOPEN_SOCKET_API
+#endif
+/* Enable general extensions on Solaris.  */
+#ifndef __EXTENSIONS__
+# undef __EXTENSIONS__
+#endif
+
+
+/* Define if the native Windows multithreading API can be used. */
+#undef USE_WINDOWS_THREADS
+
+/* Version number of package */
+#undef VERSION
+
+/* Define to l, ll, u, ul, ull, etc., as suitable for constants of type
+   'wchar_t'. */
+#undef WCHAR_T_SUFFIX
+
+/* Define to l, ll, u, ul, ull, etc., as suitable for constants of type
+   'wint_t'. */
+#undef WINT_T_SUFFIX
+
+/* Define to 1 if on MINIX. */
+#undef _MINIX
+
+/* Define to 1 to make NetBSD features available. MINIX 3 needs this. */
+#undef _NETBSD_SOURCE
+
+/* The _Noreturn keyword of C11.  */
+#ifndef _Noreturn
+# if (defined __cplusplus \
+      && ((201103 <= __cplusplus && !(__GNUC__ == 4 && __GNUC_MINOR__ == 7)) \
+          || (defined _MSC_VER && 1900 <= _MSC_VER)))
+#  define _Noreturn [[noreturn]]
+# elif ((!defined __cplusplus || defined __clang__) \
+        && (201112 <= (defined __STDC_VERSION__ ? __STDC_VERSION__ : 0)  \
+            || 4 < __GNUC__ + (7 <= __GNUC_MINOR__)))
+   /* _Noreturn works as-is.  */
+# elif 2 < __GNUC__ + (8 <= __GNUC_MINOR__) || 0x5110 <= __SUNPRO_C
+#  define _Noreturn __attribute__ ((__noreturn__))
+# elif 1200 <= (defined _MSC_VER ? _MSC_VER : 0)
+#  define _Noreturn __declspec (noreturn)
+# else
+#  define _Noreturn
+# endif
+#endif
+
+
+/* Define to 2 if the system does not provide POSIX.1 features except with
+   this defined. */
+#undef _POSIX_1_SOURCE
+
+/* Define to 1 if you need to in order for 'stat' and other things to work. */
+#undef _POSIX_SOURCE
+
+/* For standard stat data types on VMS. */
+#undef _USE_STD_STAT
+
+/* whether floats are returned in integer registers */
+#undef __IREG_FLOAT_RETURN__
+
+/* whether small structs are returned in registers */
+#undef __SMALL_STRUCT_RETURN__
+
+/* Define to 1 if the system <stdint.h> predates C++11. */
+#undef __STDC_CONSTANT_MACROS
+
+/* Define to 1 if the system <stdint.h> predates C++11. */
+#undef __STDC_LIMIT_MACROS
+
+/* The _GL_ASYNC_SAFE marker should be attached to functions that are
+   signal handlers (for signals other than SIGABRT, SIGPIPE) or can be
+   invoked from such signal handlers.  Such functions have some restrictions:
+     * All functions that it calls should be marked _GL_ASYNC_SAFE as well,
+       or should be listed as async-signal-safe in POSIX
+       <http://pubs.opengroup.org/onlinepubs/9699919799/functions/V2_chap02.html#tag_15_04>
+       section 2.4.3.  Note that malloc(), sprintf(), and fwrite(), in
+       particular, are NOT async-signal-safe.
+     * All memory locations (variables and struct fields) that these functions
+       access must be marked 'volatile'.  This holds for both read and write
+       accesses.  Otherwise the compiler might optimize away stores to and
+       reads from such locations that occur in the program, depending on its
+       data flow analysis.  For example, when the program contains a loop
+       that is intended to inspect a variable set from within a signal handler
+           while (!signal_occurred)
+             ;
+       the compiler is allowed to transform this into an endless loop if the
+       variable 'signal_occurred' is not declared 'volatile'.
+   Additionally, recall that:
+     * A signal handler should not modify errno (except if it is a handler
+       for a fatal signal and ends by raising the same signal again, thus
+       provoking the termination of the process).  If it invokes a function
+       that may clobber errno, it needs to save and restore the value of
+       errno.  */
+#define _GL_ASYNC_SAFE
+
+
+/* Work around a bug in Apple GCC 4.0.1 build 5465: In C99 mode, it supports
+   the ISO C 99 semantics of 'extern inline' (unlike the GNU C semantics of
+   earlier versions), but does not display it by setting __GNUC_STDC_INLINE__.
+   __APPLE__ && __MACH__ test for Mac OS X.
+   __APPLE_CC__ tests for the Apple compiler and its version.
+   __STDC_VERSION__ tests for the C99 mode.  */
+#if defined __APPLE__ && defined __MACH__ && __APPLE_CC__ >= 5465 && !defined __cplusplus && __STDC_VERSION__ >= 199901L && !defined __GNUC_STDC_INLINE__
+# define __GNUC_STDC_INLINE__ 1
+#endif
+
+/* Define to `int' if <sys/types.h> does not define. */
+#undef mode_t
+
+/* Define to `int' if <sys/types.h> does not define. */
+#undef pid_t
+
+/* Define as a signed type of the same size as size_t. */
+#undef ssize_t
+
+/* Define as a marker that can be attached to declarations that might not
+    be used.  This helps to reduce warnings, such as from
+    GCC -Wunused-parameter.  */
+#if __GNUC__ >= 3 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 7)
+# define _GL_UNUSED __attribute__ ((__unused__))
+#else
+# define _GL_UNUSED
+#endif
+/* The name _UNUSED_PARAMETER_ is an earlier spelling, although the name
+   is a misnomer outside of parameter lists.  */
+#define _UNUSED_PARAMETER_ _GL_UNUSED
+
+/* gcc supports the "unused" attribute on possibly unused labels, and
+   g++ has since version 4.5.  Note to support C++ as well as C,
+   _GL_UNUSED_LABEL should be used with a trailing ;  */
+#if !defined __cplusplus || __GNUC__ > 4 \
+    || (__GNUC__ == 4 && __GNUC_MINOR__ >= 5)
+# define _GL_UNUSED_LABEL _GL_UNUSED
+#else
+# define _GL_UNUSED_LABEL
+#endif
+
+/* The __pure__ attribute was added in gcc 2.96.  */
+#if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 96)
+# define _GL_ATTRIBUTE_PURE __attribute__ ((__pure__))
+#else
+# define _GL_ATTRIBUTE_PURE /* empty */
+#endif
+
+/* The __const__ attribute was added in gcc 2.95.  */
+#if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 95)
+# define _GL_ATTRIBUTE_CONST __attribute__ ((__const__))
+#else
+# define _GL_ATTRIBUTE_CONST /* empty */
+#endif
+
+/* The __malloc__ attribute was added in gcc 3.  */
+#if 3 <= __GNUC__
+# define _GL_ATTRIBUTE_MALLOC __attribute__ ((__malloc__))
+#else
+# define _GL_ATTRIBUTE_MALLOC /* empty */
+#endif
+
diff --git a/configure b/configure
new file mode 100755 (executable)
index 0000000..542e9ff
--- /dev/null
+++ b/configure
@@ -0,0 +1,21711 @@
+#! /bin/sh
+# Guess values for system-dependent variables and create Makefiles.
+# Generated by GNU Autoconf 2.69 for GNU libffcall 2.2.
+#
+# Report bugs to <https://savannah.gnu.org/projects/libffcall>.
+#
+#
+# Copyright (C) 1992-1996, 1998-2012 Free Software Foundation, Inc.
+#
+#
+# This configure script is free software; the Free Software Foundation
+# gives unlimited permission to copy, distribute and modify it.
+## -------------------- ##
+## M4sh Initialization. ##
+## -------------------- ##
+
+# Be more Bourne compatible
+DUALCASE=1; export DUALCASE # for MKS sh
+if test -n "${ZSH_VERSION+set}" && (emulate sh) >/dev/null 2>&1; then :
+  emulate sh
+  NULLCMD=:
+  # Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which
+  # is contrary to our usage.  Disable this feature.
+  alias -g '${1+"$@"}'='"$@"'
+  setopt NO_GLOB_SUBST
+else
+  case `(set -o) 2>/dev/null` in #(
+  *posix*) :
+    set -o posix ;; #(
+  *) :
+     ;;
+esac
+fi
+
+
+as_nl='
+'
+export as_nl
+# Printing a long string crashes Solaris 7 /usr/bin/printf.
+as_echo='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\'
+as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo
+as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo$as_echo
+# Prefer a ksh shell builtin over an external printf program on Solaris,
+# but without wasting forks for bash or zsh.
+if test -z "$BASH_VERSION$ZSH_VERSION" \
+    && (test "X`print -r -- $as_echo`" = "X$as_echo") 2>/dev/null; then
+  as_echo='print -r --'
+  as_echo_n='print -rn --'
+elif (test "X`printf %s $as_echo`" = "X$as_echo") 2>/dev/null; then
+  as_echo='printf %s\n'
+  as_echo_n='printf %s'
+else
+  if test "X`(/usr/ucb/echo -n -n $as_echo) 2>/dev/null`" = "X-n $as_echo"; then
+    as_echo_body='eval /usr/ucb/echo -n "$1$as_nl"'
+    as_echo_n='/usr/ucb/echo -n'
+  else
+    as_echo_body='eval expr "X$1" : "X\\(.*\\)"'
+    as_echo_n_body='eval
+      arg=$1;
+      case $arg in #(
+      *"$as_nl"*)
+       expr "X$arg" : "X\\(.*\\)$as_nl";
+       arg=`expr "X$arg" : ".*$as_nl\\(.*\\)"`;;
+      esac;
+      expr "X$arg" : "X\\(.*\\)" | tr -d "$as_nl"
+    '
+    export as_echo_n_body
+    as_echo_n='sh -c $as_echo_n_body as_echo'
+  fi
+  export as_echo_body
+  as_echo='sh -c $as_echo_body as_echo'
+fi
+
+# The user is always right.
+if test "${PATH_SEPARATOR+set}" != set; then
+  PATH_SEPARATOR=:
+  (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && {
+    (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 ||
+      PATH_SEPARATOR=';'
+  }
+fi
+
+
+# IFS
+# We need space, tab and new line, in precisely that order.  Quoting is
+# there to prevent editors from complaining about space-tab.
+# (If _AS_PATH_WALK were called with IFS unset, it would disable word
+# splitting by setting IFS to empty value.)
+IFS=" ""       $as_nl"
+
+# Find who we are.  Look in the path if we contain no directory separator.
+as_myself=
+case $0 in #((
+  *[\\/]* ) as_myself=$0 ;;
+  *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    test -r "$as_dir/$0" && as_myself=$as_dir/$0 && break
+  done
+IFS=$as_save_IFS
+
+     ;;
+esac
+# We did not find ourselves, most probably we were run as `sh COMMAND'
+# in which case we are not to be found in the path.
+if test "x$as_myself" = x; then
+  as_myself=$0
+fi
+if test ! -f "$as_myself"; then
+  $as_echo "$as_myself: error: cannot find myself; rerun with an absolute file name" >&2
+  exit 1
+fi
+
+# Unset variables that we do not need and which cause bugs (e.g. in
+# pre-3.0 UWIN ksh).  But do not cause bugs in bash 2.01; the "|| exit 1"
+# suppresses any "Segmentation fault" message there.  '((' could
+# trigger a bug in pdksh 5.2.14.
+for as_var in BASH_ENV ENV MAIL MAILPATH
+do eval test x\${$as_var+set} = xset \
+  && ( (unset $as_var) || exit 1) >/dev/null 2>&1 && unset $as_var || :
+done
+PS1='$ '
+PS2='> '
+PS4='+ '
+
+# NLS nuisances.
+LC_ALL=C
+export LC_ALL
+LANGUAGE=C
+export LANGUAGE
+
+# CDPATH.
+(unset CDPATH) >/dev/null 2>&1 && unset CDPATH
+
+# Use a proper internal environment variable to ensure we don't fall
+  # into an infinite loop, continuously re-executing ourselves.
+  if test x"${_as_can_reexec}" != xno && test "x$CONFIG_SHELL" != x; then
+    _as_can_reexec=no; export _as_can_reexec;
+    # We cannot yet assume a decent shell, so we have to provide a
+# neutralization value for shells without unset; and this also
+# works around shells that cannot unset nonexistent variables.
+# Preserve -v and -x to the replacement shell.
+BASH_ENV=/dev/null
+ENV=/dev/null
+(unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV
+case $- in # ((((
+  *v*x* | *x*v* ) as_opts=-vx ;;
+  *v* ) as_opts=-v ;;
+  *x* ) as_opts=-x ;;
+  * ) as_opts= ;;
+esac
+exec $CONFIG_SHELL $as_opts "$as_myself" ${1+"$@"}
+# Admittedly, this is quite paranoid, since all the known shells bail
+# out after a failed `exec'.
+$as_echo "$0: could not re-execute with $CONFIG_SHELL" >&2
+as_fn_exit 255
+  fi
+  # We don't want this to propagate to other subprocesses.
+          { _as_can_reexec=; unset _as_can_reexec;}
+if test "x$CONFIG_SHELL" = x; then
+  as_bourne_compatible="if test -n \"\${ZSH_VERSION+set}\" && (emulate sh) >/dev/null 2>&1; then :
+  emulate sh
+  NULLCMD=:
+  # Pre-4.2 versions of Zsh do word splitting on \${1+\"\$@\"}, which
+  # is contrary to our usage.  Disable this feature.
+  alias -g '\${1+\"\$@\"}'='\"\$@\"'
+  setopt NO_GLOB_SUBST
+else
+  case \`(set -o) 2>/dev/null\` in #(
+  *posix*) :
+    set -o posix ;; #(
+  *) :
+     ;;
+esac
+fi
+"
+  as_required="as_fn_return () { (exit \$1); }
+as_fn_success () { as_fn_return 0; }
+as_fn_failure () { as_fn_return 1; }
+as_fn_ret_success () { return 0; }
+as_fn_ret_failure () { return 1; }
+
+exitcode=0
+as_fn_success || { exitcode=1; echo as_fn_success failed.; }
+as_fn_failure && { exitcode=1; echo as_fn_failure succeeded.; }
+as_fn_ret_success || { exitcode=1; echo as_fn_ret_success failed.; }
+as_fn_ret_failure && { exitcode=1; echo as_fn_ret_failure succeeded.; }
+if ( set x; as_fn_ret_success y && test x = \"\$1\" ); then :
+
+else
+  exitcode=1; echo positional parameters were not saved.
+fi
+test x\$exitcode = x0 || exit 1
+test -x / || exit 1"
+  as_suggested="  as_lineno_1=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_1a=\$LINENO
+  as_lineno_2=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_2a=\$LINENO
+  eval 'test \"x\$as_lineno_1'\$as_run'\" != \"x\$as_lineno_2'\$as_run'\" &&
+  test \"x\`expr \$as_lineno_1'\$as_run' + 1\`\" = \"x\$as_lineno_2'\$as_run'\"' || exit 1
+test \$(( 1 + 1 )) = 2 || exit 1
+
+  test -n \"\${ZSH_VERSION+set}\${BASH_VERSION+set}\" || (
+    ECHO='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\'
+    ECHO=\$ECHO\$ECHO\$ECHO\$ECHO\$ECHO
+    ECHO=\$ECHO\$ECHO\$ECHO\$ECHO\$ECHO\$ECHO
+    PATH=/empty FPATH=/empty; export PATH FPATH
+    test \"X\`printf %s \$ECHO\`\" = \"X\$ECHO\" \\
+      || test \"X\`print -r -- \$ECHO\`\" = \"X\$ECHO\" ) || exit 1"
+  if (eval "$as_required") 2>/dev/null; then :
+  as_have_required=yes
+else
+  as_have_required=no
+fi
+  if test x$as_have_required = xyes && (eval "$as_suggested") 2>/dev/null; then :
+
+else
+  as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+as_found=false
+for as_dir in /bin$PATH_SEPARATOR/usr/bin$PATH_SEPARATOR$PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+  as_found=:
+  case $as_dir in #(
+        /*)
+          for as_base in sh bash ksh sh5; do
+            # Try only shells that exist, to save several forks.
+            as_shell=$as_dir/$as_base
+            if { test -f "$as_shell" || test -f "$as_shell.exe"; } &&
+                   { $as_echo "$as_bourne_compatible""$as_required" | as_run=a "$as_shell"; } 2>/dev/null; then :
+  CONFIG_SHELL=$as_shell as_have_required=yes
+                  if { $as_echo "$as_bourne_compatible""$as_suggested" | as_run=a "$as_shell"; } 2>/dev/null; then :
+  break 2
+fi
+fi
+          done;;
+       esac
+  as_found=false
+done
+$as_found || { if { test -f "$SHELL" || test -f "$SHELL.exe"; } &&
+             { $as_echo "$as_bourne_compatible""$as_required" | as_run=a "$SHELL"; } 2>/dev/null; then :
+  CONFIG_SHELL=$SHELL as_have_required=yes
+fi; }
+IFS=$as_save_IFS
+
+
+      if test "x$CONFIG_SHELL" != x; then :
+  export CONFIG_SHELL
+             # We cannot yet assume a decent shell, so we have to provide a
+# neutralization value for shells without unset; and this also
+# works around shells that cannot unset nonexistent variables.
+# Preserve -v and -x to the replacement shell.
+BASH_ENV=/dev/null
+ENV=/dev/null
+(unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV
+case $- in # ((((
+  *v*x* | *x*v* ) as_opts=-vx ;;
+  *v* ) as_opts=-v ;;
+  *x* ) as_opts=-x ;;
+  * ) as_opts= ;;
+esac
+exec $CONFIG_SHELL $as_opts "$as_myself" ${1+"$@"}
+# Admittedly, this is quite paranoid, since all the known shells bail
+# out after a failed `exec'.
+$as_echo "$0: could not re-execute with $CONFIG_SHELL" >&2
+exit 255
+fi
+
+    if test x$as_have_required = xno; then :
+  $as_echo "$0: This script requires a shell more modern than all"
+  $as_echo "$0: the shells that I found on your system."
+  if test x${ZSH_VERSION+set} = xset ; then
+    $as_echo "$0: In particular, zsh $ZSH_VERSION has bugs and should"
+    $as_echo "$0: be upgraded to zsh 4.3.4 or later."
+  else
+    $as_echo "$0: Please tell bug-autoconf@gnu.org and
+$0: https://savannah.gnu.org/projects/libffcall about your
+$0: system, including any error possibly output before this
+$0: message. Then install a modern shell, or manually run
+$0: the script under such a shell if you do have one."
+  fi
+  exit 1
+fi
+fi
+fi
+SHELL=${CONFIG_SHELL-/bin/sh}
+export SHELL
+# Unset more variables known to interfere with behavior of common tools.
+CLICOLOR_FORCE= GREP_OPTIONS=
+unset CLICOLOR_FORCE GREP_OPTIONS
+
+## --------------------- ##
+## M4sh Shell Functions. ##
+## --------------------- ##
+# as_fn_unset VAR
+# ---------------
+# Portably unset VAR.
+as_fn_unset ()
+{
+  { eval $1=; unset $1;}
+}
+as_unset=as_fn_unset
+
+# as_fn_set_status STATUS
+# -----------------------
+# Set $? to STATUS, without forking.
+as_fn_set_status ()
+{
+  return $1
+} # as_fn_set_status
+
+# as_fn_exit STATUS
+# -----------------
+# Exit the shell with STATUS, even in a "trap 0" or "set -e" context.
+as_fn_exit ()
+{
+  set +e
+  as_fn_set_status $1
+  exit $1
+} # as_fn_exit
+
+# as_fn_mkdir_p
+# -------------
+# Create "$as_dir" as a directory, including parents if necessary.
+as_fn_mkdir_p ()
+{
+
+  case $as_dir in #(
+  -*) as_dir=./$as_dir;;
+  esac
+  test -d "$as_dir" || eval $as_mkdir_p || {
+    as_dirs=
+    while :; do
+      case $as_dir in #(
+      *\'*) as_qdir=`$as_echo "$as_dir" | sed "s/'/'\\\\\\\\''/g"`;; #'(
+      *) as_qdir=$as_dir;;
+      esac
+      as_dirs="'$as_qdir' $as_dirs"
+      as_dir=`$as_dirname -- "$as_dir" ||
+$as_expr X"$as_dir" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
+        X"$as_dir" : 'X\(//\)[^/]' \| \
+        X"$as_dir" : 'X\(//\)$' \| \
+        X"$as_dir" : 'X\(/\)' \| . 2>/dev/null ||
+$as_echo X"$as_dir" |
+    sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)[^/].*/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\).*/{
+           s//\1/
+           q
+         }
+         s/.*/./; q'`
+      test -d "$as_dir" && break
+    done
+    test -z "$as_dirs" || eval "mkdir $as_dirs"
+  } || test -d "$as_dir" || as_fn_error $? "cannot create directory $as_dir"
+
+
+} # as_fn_mkdir_p
+
+# as_fn_executable_p FILE
+# -----------------------
+# Test if FILE is an executable regular file.
+as_fn_executable_p ()
+{
+  test -f "$1" && test -x "$1"
+} # as_fn_executable_p
+# as_fn_append VAR VALUE
+# ----------------------
+# Append the text in VALUE to the end of the definition contained in VAR. Take
+# advantage of any shell optimizations that allow amortized linear growth over
+# repeated appends, instead of the typical quadratic growth present in naive
+# implementations.
+if (eval "as_var=1; as_var+=2; test x\$as_var = x12") 2>/dev/null; then :
+  eval 'as_fn_append ()
+  {
+    eval $1+=\$2
+  }'
+else
+  as_fn_append ()
+  {
+    eval $1=\$$1\$2
+  }
+fi # as_fn_append
+
+# as_fn_arith ARG...
+# ------------------
+# Perform arithmetic evaluation on the ARGs, and store the result in the
+# global $as_val. Take advantage of shells that can avoid forks. The arguments
+# must be portable across $(()) and expr.
+if (eval "test \$(( 1 + 1 )) = 2") 2>/dev/null; then :
+  eval 'as_fn_arith ()
+  {
+    as_val=$(( $* ))
+  }'
+else
+  as_fn_arith ()
+  {
+    as_val=`expr "$@" || test $? -eq 1`
+  }
+fi # as_fn_arith
+
+
+# as_fn_error STATUS ERROR [LINENO LOG_FD]
+# ----------------------------------------
+# Output "`basename $0`: error: ERROR" to stderr. If LINENO and LOG_FD are
+# provided, also output the error to LOG_FD, referencing LINENO. Then exit the
+# script with STATUS, using 1 if that was 0.
+as_fn_error ()
+{
+  as_status=$1; test $as_status -eq 0 && as_status=1
+  if test "$4"; then
+    as_lineno=${as_lineno-"$3"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
+    $as_echo "$as_me:${as_lineno-$LINENO}: error: $2" >&$4
+  fi
+  $as_echo "$as_me: error: $2" >&2
+  as_fn_exit $as_status
+} # as_fn_error
+
+if expr a : '\(a\)' >/dev/null 2>&1 &&
+   test "X`expr 00001 : '.*\(...\)'`" = X001; then
+  as_expr=expr
+else
+  as_expr=false
+fi
+
+if (basename -- /) >/dev/null 2>&1 && test "X`basename -- / 2>&1`" = "X/"; then
+  as_basename=basename
+else
+  as_basename=false
+fi
+
+if (as_dir=`dirname -- /` && test "X$as_dir" = X/) >/dev/null 2>&1; then
+  as_dirname=dirname
+else
+  as_dirname=false
+fi
+
+as_me=`$as_basename -- "$0" ||
+$as_expr X/"$0" : '.*/\([^/][^/]*\)/*$' \| \
+        X"$0" : 'X\(//\)$' \| \
+        X"$0" : 'X\(/\)' \| . 2>/dev/null ||
+$as_echo X/"$0" |
+    sed '/^.*\/\([^/][^/]*\)\/*$/{
+           s//\1/
+           q
+         }
+         /^X\/\(\/\/\)$/{
+           s//\1/
+           q
+         }
+         /^X\/\(\/\).*/{
+           s//\1/
+           q
+         }
+         s/.*/./; q'`
+
+# Avoid depending upon Character Ranges.
+as_cr_letters='abcdefghijklmnopqrstuvwxyz'
+as_cr_LETTERS='ABCDEFGHIJKLMNOPQRSTUVWXYZ'
+as_cr_Letters=$as_cr_letters$as_cr_LETTERS
+as_cr_digits='0123456789'
+as_cr_alnum=$as_cr_Letters$as_cr_digits
+
+
+  as_lineno_1=$LINENO as_lineno_1a=$LINENO
+  as_lineno_2=$LINENO as_lineno_2a=$LINENO
+  eval 'test "x$as_lineno_1'$as_run'" != "x$as_lineno_2'$as_run'" &&
+  test "x`expr $as_lineno_1'$as_run' + 1`" = "x$as_lineno_2'$as_run'"' || {
+  # Blame Lee E. McMahon (1931-1989) for sed's syntax.  :-)
+  sed -n '
+    p
+    /[$]LINENO/=
+  ' <$as_myself |
+    sed '
+      s/[$]LINENO.*/&-/
+      t lineno
+      b
+      :lineno
+      N
+      :loop
+      s/[$]LINENO\([^'$as_cr_alnum'_].*\n\)\(.*\)/\2\1\2/
+      t loop
+      s/-\n.*//
+    ' >$as_me.lineno &&
+  chmod +x "$as_me.lineno" ||
+    { $as_echo "$as_me: error: cannot create $as_me.lineno; rerun with a POSIX shell" >&2; as_fn_exit 1; }
+
+  # If we had to re-execute with $CONFIG_SHELL, we're ensured to have
+  # already done that, so ensure we don't try to do so again and fall
+  # in an infinite loop.  This has already happened in practice.
+  _as_can_reexec=no; export _as_can_reexec
+  # Don't try to exec as it changes $[0], causing all sort of problems
+  # (the dirname of $[0] is not the place where we might find the
+  # original and so on.  Autoconf is especially sensitive to this).
+  . "./$as_me.lineno"
+  # Exit status is that of the last command.
+  exit
+}
+
+ECHO_C= ECHO_N= ECHO_T=
+case `echo -n x` in #(((((
+-n*)
+  case `echo 'xy\c'` in
+  *c*) ECHO_T='        ';;     # ECHO_T is single tab character.
+  xy)  ECHO_C='\c';;
+  *)   echo `echo ksh88 bug on AIX 6.1` > /dev/null
+       ECHO_T='        ';;
+  esac;;
+*)
+  ECHO_N='-n';;
+esac
+
+rm -f conf$$ conf$$.exe conf$$.file
+if test -d conf$$.dir; then
+  rm -f conf$$.dir/conf$$.file
+else
+  rm -f conf$$.dir
+  mkdir conf$$.dir 2>/dev/null
+fi
+if (echo >conf$$.file) 2>/dev/null; then
+  if ln -s conf$$.file conf$$ 2>/dev/null; then
+    as_ln_s='ln -s'
+    # ... but there are two gotchas:
+    # 1) On MSYS, both `ln -s file dir' and `ln file dir' fail.
+    # 2) DJGPP < 2.04 has no symlinks; `ln -s' creates a wrapper executable.
+    # In both cases, we have to default to `cp -pR'.
+    ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe ||
+      as_ln_s='cp -pR'
+  elif ln conf$$.file conf$$ 2>/dev/null; then
+    as_ln_s=ln
+  else
+    as_ln_s='cp -pR'
+  fi
+else
+  as_ln_s='cp -pR'
+fi
+rm -f conf$$ conf$$.exe conf$$.dir/conf$$.file conf$$.file
+rmdir conf$$.dir 2>/dev/null
+
+if mkdir -p . 2>/dev/null; then
+  as_mkdir_p='mkdir -p "$as_dir"'
+else
+  test -d ./-p && rmdir ./-p
+  as_mkdir_p=false
+fi
+
+as_test_x='test -x'
+as_executable_p=as_fn_executable_p
+
+# Sed expression to map a string onto a valid CPP name.
+as_tr_cpp="eval sed 'y%*$as_cr_letters%P$as_cr_LETTERS%;s%[^_$as_cr_alnum]%_%g'"
+
+# Sed expression to map a string onto a valid variable name.
+as_tr_sh="eval sed 'y%*+%pp%;s%[^_$as_cr_alnum]%_%g'"
+
+SHELL=${CONFIG_SHELL-/bin/sh}
+
+
+test -n "$DJDIR" || exec 7<&0 </dev/null
+exec 6>&1
+
+# Name of the host.
+# hostname on some systems (SVR3.2, old GNU/Linux) returns a bogus exit status,
+# so uname gets run too.
+ac_hostname=`(hostname || uname -n) 2>/dev/null | sed 1q`
+
+#
+# Initializations.
+#
+ac_default_prefix=/usr/local
+ac_clean_files=
+ac_config_libobj_dir=.
+LIBOBJS=
+cross_compiling=no
+subdirs=
+MFLAGS=
+MAKEFLAGS=
+
+# Identity of this package.
+PACKAGE_NAME='GNU libffcall'
+PACKAGE_TARNAME='libffcall'
+PACKAGE_VERSION='2.2'
+PACKAGE_STRING='GNU libffcall 2.2'
+PACKAGE_BUGREPORT='https://savannah.gnu.org/projects/libffcall'
+PACKAGE_URL='http://www.gnu.org/software/libffcall/'
+
+ac_unique_file="trampoline/trampoline.h"
+# Factoring default headers for most tests.
+ac_includes_default="\
+#include <stdio.h>
+#ifdef HAVE_SYS_TYPES_H
+# include <sys/types.h>
+#endif
+#ifdef HAVE_SYS_STAT_H
+# include <sys/stat.h>
+#endif
+#ifdef STDC_HEADERS
+# include <stdlib.h>
+# include <stddef.h>
+#else
+# ifdef HAVE_STDLIB_H
+#  include <stdlib.h>
+# endif
+#endif
+#ifdef HAVE_STRING_H
+# if !defined STDC_HEADERS && defined HAVE_MEMORY_H
+#  include <memory.h>
+# endif
+# include <string.h>
+#endif
+#ifdef HAVE_STRINGS_H
+# include <strings.h>
+#endif
+#ifdef HAVE_INTTYPES_H
+# include <inttypes.h>
+#endif
+#ifdef HAVE_STDINT_H
+# include <stdint.h>
+#endif
+#ifdef HAVE_UNISTD_H
+# include <unistd.h>
+#endif"
+
+gl_use_threads_default=
+gl_use_winpthreads_default=
+gl_header_list=
+ac_subst_vars='gltests_LTLIBOBJS
+gltests_LIBOBJS
+gl_LTLIBOBJS
+gl_LIBOBJS
+am__EXEEXT_FALSE
+am__EXEEXT_TRUE
+LTLIBOBJS
+LIBOBJS
+gltests_WITNESS
+WINDOWS_STAT_INODES
+WINDOWS_64_BIT_OFF_T
+NEXT_AS_FIRST_DIRECTIVE_SYS_TYPES_H
+NEXT_SYS_TYPES_H
+GL_GENERATE_STDNORETURN_H_FALSE
+GL_GENERATE_STDNORETURN_H_TRUE
+STDNORETURN_H
+GL_GENERATE_STDINT_H_FALSE
+GL_GENERATE_STDINT_H_TRUE
+STDINT_H
+HAVE_SYS_INTTYPES_H
+HAVE_SYS_BITYPES_H
+HAVE_C99_STDINT_H
+WINT_T_SUFFIX
+WCHAR_T_SUFFIX
+SIG_ATOMIC_T_SUFFIX
+SIZE_T_SUFFIX
+PTRDIFF_T_SUFFIX
+HAVE_SIGNED_WINT_T
+HAVE_SIGNED_WCHAR_T
+HAVE_SIGNED_SIG_ATOMIC_T
+BITSIZEOF_WINT_T
+BITSIZEOF_WCHAR_T
+BITSIZEOF_SIG_ATOMIC_T
+BITSIZEOF_SIZE_T
+BITSIZEOF_PTRDIFF_T
+HAVE_STDINT_H
+NEXT_AS_FIRST_DIRECTIVE_STDINT_H
+NEXT_STDINT_H
+HAVE_SYS_TYPES_H
+HAVE_INTTYPES_H
+HAVE_WCHAR_H
+HAVE_UNSIGNED_LONG_LONG_INT
+HAVE_LONG_LONG_INT
+GNULIB_OVERRIDES_WINT_T
+APPLE_UNIVERSAL_BUILD
+LTLIBMULTITHREAD
+LIBMULTITHREAD
+LTLIBTHREAD
+LIBTHREAD
+GL_GENERATE_LIMITS_H_FALSE
+GL_GENERATE_LIMITS_H_TRUE
+LIMITS_H
+NEXT_AS_FIRST_DIRECTIVE_LIMITS_H
+NEXT_LIMITS_H
+PRAGMA_COLUMNS
+PRAGMA_SYSTEM_HEADER
+INCLUDE_NEXT_AS_FIRST_DIRECTIVE
+INCLUDE_NEXT
+GL_COND_LIBTOOL_FALSE
+GL_COND_LIBTOOL_TRUE
+DISABLE_TYPE_BASED_ALIASING
+WORKAROUND_BUG_81653
+CPU_OBJECTS
+LT_SYS_LIBRARY_PATH
+OTOOL64
+OTOOL
+LIPO
+NMEDIT
+DSYMUTIL
+MANIFEST_TOOL
+ac_ct_AR
+LN_S
+NM
+ac_ct_DUMPBIN
+DUMPBIN
+LD
+FGREP
+SED
+LIBTOOL
+OBJDUMP
+DLLTOOL
+AS
+ENDIANNESS
+HOST_CPU_C_ABI
+HOST_CPU
+host_os
+host_vendor
+host_cpu
+host
+build_os
+build_vendor
+build_cpu
+build
+LN
+IFNOT_MSVC
+IF_MSVC
+RANLIB
+ARFLAGS
+AR
+IF_CXX
+am__fastdepCXX_FALSE
+am__fastdepCXX_TRUE
+CXXDEPMODE
+ANSICXX_FALSE
+ANSICXX_TRUE
+CXXFLAGS
+ac_ct_CXX
+CXX
+CXX_CHOICE
+AS_UNDERSCORE
+ASM_SYMBOL_PREFIX
+GCC_X_NONE
+CC_GCC
+EGREP
+GREP
+CPP
+am__fastdepCC_FALSE
+am__fastdepCC_TRUE
+CCDEPMODE
+am__nodep
+AMDEPBACKSLASH
+AMDEP_FALSE
+AMDEP_TRUE
+am__quote
+am__include
+DEPDIR
+OBJEXT
+EXEEXT
+ac_ct_CC
+CPPFLAGS
+LDFLAGS
+CFLAGS
+CC
+AM_BACKSLASH
+AM_DEFAULT_VERBOSITY
+AM_DEFAULT_V
+AM_V
+am__untar
+am__tar
+AMTAR
+am__leading_dot
+SET_MAKE
+AWK
+mkdir_p
+MKDIR_P
+INSTALL_STRIP_PROGRAM
+STRIP
+install_sh
+MAKEINFO
+AUTOHEADER
+AUTOMAKE
+AUTOCONF
+ACLOCAL
+VERSION
+PACKAGE
+CYGPATH_W
+am__isrc
+INSTALL_DATA
+INSTALL_SCRIPT
+INSTALL_PROGRAM
+target_alias
+host_alias
+build_alias
+LIBS
+ECHO_T
+ECHO_N
+ECHO_C
+DEFS
+mandir
+localedir
+libdir
+psdir
+pdfdir
+dvidir
+htmldir
+infodir
+docdir
+oldincludedir
+includedir
+localstatedir
+sharedstatedir
+sysconfdir
+datadir
+datarootdir
+libexecdir
+sbindir
+bindir
+program_transform_name
+prefix
+exec_prefix
+PACKAGE_URL
+PACKAGE_BUGREPORT
+PACKAGE_STRING
+PACKAGE_VERSION
+PACKAGE_TARNAME
+PACKAGE_NAME
+PATH_SEPARATOR
+SHELL'
+ac_subst_files=''
+ac_user_opts='
+enable_option_checking
+enable_silent_rules
+enable_dependency_tracking
+enable_c__
+enable_threads
+enable_shared
+enable_static
+with_pic
+enable_fast_install
+with_aix_soname
+with_gnu_ld
+with_sysroot
+enable_libtool_lock
+'
+      ac_precious_vars='build_alias
+host_alias
+target_alias
+CC
+CFLAGS
+LDFLAGS
+LIBS
+CPPFLAGS
+CPP
+CXX
+CXXFLAGS
+LT_SYS_LIBRARY_PATH'
+
+
+# Initialize some variables set by options.
+ac_init_help=
+ac_init_version=false
+ac_unrecognized_opts=
+ac_unrecognized_sep=
+# The variables have the same names as the options, with
+# dashes changed to underlines.
+cache_file=/dev/null
+exec_prefix=NONE
+no_create=
+no_recursion=
+prefix=NONE
+program_prefix=NONE
+program_suffix=NONE
+program_transform_name=s,x,x,
+silent=
+site=
+srcdir=
+verbose=
+x_includes=NONE
+x_libraries=NONE
+
+# Installation directory options.
+# These are left unexpanded so users can "make install exec_prefix=/foo"
+# and all the variables that are supposed to be based on exec_prefix
+# by default will actually change.
+# Use braces instead of parens because sh, perl, etc. also accept them.
+# (The list follows the same order as the GNU Coding Standards.)
+bindir='${exec_prefix}/bin'
+sbindir='${exec_prefix}/sbin'
+libexecdir='${exec_prefix}/libexec'
+datarootdir='${prefix}/share'
+datadir='${datarootdir}'
+sysconfdir='${prefix}/etc'
+sharedstatedir='${prefix}/com'
+localstatedir='${prefix}/var'
+includedir='${prefix}/include'
+oldincludedir='/usr/include'
+docdir='${datarootdir}/doc/${PACKAGE_TARNAME}'
+infodir='${datarootdir}/info'
+htmldir='${docdir}'
+dvidir='${docdir}'
+pdfdir='${docdir}'
+psdir='${docdir}'
+libdir='${exec_prefix}/lib'
+localedir='${datarootdir}/locale'
+mandir='${datarootdir}/man'
+
+ac_prev=
+ac_dashdash=
+for ac_option
+do
+  # If the previous option needs an argument, assign it.
+  if test -n "$ac_prev"; then
+    eval $ac_prev=\$ac_option
+    ac_prev=
+    continue
+  fi
+
+  case $ac_option in
+  *=?*) ac_optarg=`expr "X$ac_option" : '[^=]*=\(.*\)'` ;;
+  *=)   ac_optarg= ;;
+  *)    ac_optarg=yes ;;
+  esac
+
+  # Accept the important Cygnus configure options, so we can diagnose typos.
+
+  case $ac_dashdash$ac_option in
+  --)
+    ac_dashdash=yes ;;
+
+  -bindir | --bindir | --bindi | --bind | --bin | --bi)
+    ac_prev=bindir ;;
+  -bindir=* | --bindir=* | --bindi=* | --bind=* | --bin=* | --bi=*)
+    bindir=$ac_optarg ;;
+
+  -build | --build | --buil | --bui | --bu)
+    ac_prev=build_alias ;;
+  -build=* | --build=* | --buil=* | --bui=* | --bu=*)
+    build_alias=$ac_optarg ;;
+
+  -cache-file | --cache-file | --cache-fil | --cache-fi \
+  | --cache-f | --cache- | --cache | --cach | --cac | --ca | --c)
+    ac_prev=cache_file ;;
+  -cache-file=* | --cache-file=* | --cache-fil=* | --cache-fi=* \
+  | --cache-f=* | --cache-=* | --cache=* | --cach=* | --cac=* | --ca=* | --c=*)
+    cache_file=$ac_optarg ;;
+
+  --config-cache | -C)
+    cache_file=config.cache ;;
+
+  -datadir | --datadir | --datadi | --datad)
+    ac_prev=datadir ;;
+  -datadir=* | --datadir=* | --datadi=* | --datad=*)
+    datadir=$ac_optarg ;;
+
+  -datarootdir | --datarootdir | --datarootdi | --datarootd | --dataroot \
+  | --dataroo | --dataro | --datar)
+    ac_prev=datarootdir ;;
+  -datarootdir=* | --datarootdir=* | --datarootdi=* | --datarootd=* \
+  | --dataroot=* | --dataroo=* | --dataro=* | --datar=*)
+    datarootdir=$ac_optarg ;;
+
+  -disable-* | --disable-*)
+    ac_useropt=`expr "x$ac_option" : 'x-*disable-\(.*\)'`
+    # Reject names that are not valid shell variable names.
+    expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
+      as_fn_error $? "invalid feature name: $ac_useropt"
+    ac_useropt_orig=$ac_useropt
+    ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
+    case $ac_user_opts in
+      *"
+"enable_$ac_useropt"
+"*) ;;
+      *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--disable-$ac_useropt_orig"
+        ac_unrecognized_sep=', ';;
+    esac
+    eval enable_$ac_useropt=no ;;
+
+  -docdir | --docdir | --docdi | --doc | --do)
+    ac_prev=docdir ;;
+  -docdir=* | --docdir=* | --docdi=* | --doc=* | --do=*)
+    docdir=$ac_optarg ;;
+
+  -dvidir | --dvidir | --dvidi | --dvid | --dvi | --dv)
+    ac_prev=dvidir ;;
+  -dvidir=* | --dvidir=* | --dvidi=* | --dvid=* | --dvi=* | --dv=*)
+    dvidir=$ac_optarg ;;
+
+  -enable-* | --enable-*)
+    ac_useropt=`expr "x$ac_option" : 'x-*enable-\([^=]*\)'`
+    # Reject names that are not valid shell variable names.
+    expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
+      as_fn_error $? "invalid feature name: $ac_useropt"
+    ac_useropt_orig=$ac_useropt
+    ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
+    case $ac_user_opts in
+      *"
+"enable_$ac_useropt"
+"*) ;;
+      *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--enable-$ac_useropt_orig"
+        ac_unrecognized_sep=', ';;
+    esac
+    eval enable_$ac_useropt=\$ac_optarg ;;
+
+  -exec-prefix | --exec_prefix | --exec-prefix | --exec-prefi \
+  | --exec-pref | --exec-pre | --exec-pr | --exec-p | --exec- \
+  | --exec | --exe | --ex)
+    ac_prev=exec_prefix ;;
+  -exec-prefix=* | --exec_prefix=* | --exec-prefix=* | --exec-prefi=* \
+  | --exec-pref=* | --exec-pre=* | --exec-pr=* | --exec-p=* | --exec-=* \
+  | --exec=* | --exe=* | --ex=*)
+    exec_prefix=$ac_optarg ;;
+
+  -gas | --gas | --ga | --g)
+    # Obsolete; use --with-gas.
+    with_gas=yes ;;
+
+  -help | --help | --hel | --he | -h)
+    ac_init_help=long ;;
+  -help=r* | --help=r* | --hel=r* | --he=r* | -hr*)
+    ac_init_help=recursive ;;
+  -help=s* | --help=s* | --hel=s* | --he=s* | -hs*)
+    ac_init_help=short ;;
+
+  -host | --host | --hos | --ho)
+    ac_prev=host_alias ;;
+  -host=* | --host=* | --hos=* | --ho=*)
+    host_alias=$ac_optarg ;;
+
+  -htmldir | --htmldir | --htmldi | --htmld | --html | --htm | --ht)
+    ac_prev=htmldir ;;
+  -htmldir=* | --htmldir=* | --htmldi=* | --htmld=* | --html=* | --htm=* \
+  | --ht=*)
+    htmldir=$ac_optarg ;;
+
+  -includedir | --includedir | --includedi | --included | --include \
+  | --includ | --inclu | --incl | --inc)
+    ac_prev=includedir ;;
+  -includedir=* | --includedir=* | --includedi=* | --included=* | --include=* \
+  | --includ=* | --inclu=* | --incl=* | --inc=*)
+    includedir=$ac_optarg ;;
+
+  -infodir | --infodir | --infodi | --infod | --info | --inf)
+    ac_prev=infodir ;;
+  -infodir=* | --infodir=* | --infodi=* | --infod=* | --info=* | --inf=*)
+    infodir=$ac_optarg ;;
+
+  -libdir | --libdir | --libdi | --libd)
+    ac_prev=libdir ;;
+  -libdir=* | --libdir=* | --libdi=* | --libd=*)
+    libdir=$ac_optarg ;;
+
+  -libexecdir | --libexecdir | --libexecdi | --libexecd | --libexec \
+  | --libexe | --libex | --libe)
+    ac_prev=libexecdir ;;
+  -libexecdir=* | --libexecdir=* | --libexecdi=* | --libexecd=* | --libexec=* \
+  | --libexe=* | --libex=* | --libe=*)
+    libexecdir=$ac_optarg ;;
+
+  -localedir | --localedir | --localedi | --localed | --locale)
+    ac_prev=localedir ;;
+  -localedir=* | --localedir=* | --localedi=* | --localed=* | --locale=*)
+    localedir=$ac_optarg ;;
+
+  -localstatedir | --localstatedir | --localstatedi | --localstated \
+  | --localstate | --localstat | --localsta | --localst | --locals)
+    ac_prev=localstatedir ;;
+  -localstatedir=* | --localstatedir=* | --localstatedi=* | --localstated=* \
+  | --localstate=* | --localstat=* | --localsta=* | --localst=* | --locals=*)
+    localstatedir=$ac_optarg ;;
+
+  -mandir | --mandir | --mandi | --mand | --man | --ma | --m)
+    ac_prev=mandir ;;
+  -mandir=* | --mandir=* | --mandi=* | --mand=* | --man=* | --ma=* | --m=*)
+    mandir=$ac_optarg ;;
+
+  -nfp | --nfp | --nf)
+    # Obsolete; use --without-fp.
+    with_fp=no ;;
+
+  -no-create | --no-create | --no-creat | --no-crea | --no-cre \
+  | --no-cr | --no-c | -n)
+    no_create=yes ;;
+
+  -no-recursion | --no-recursion | --no-recursio | --no-recursi \
+  | --no-recurs | --no-recur | --no-recu | --no-rec | --no-re | --no-r)
+    no_recursion=yes ;;
+
+  -oldincludedir | --oldincludedir | --oldincludedi | --oldincluded \
+  | --oldinclude | --oldinclud | --oldinclu | --oldincl | --oldinc \
+  | --oldin | --oldi | --old | --ol | --o)
+    ac_prev=oldincludedir ;;
+  -oldincludedir=* | --oldincludedir=* | --oldincludedi=* | --oldincluded=* \
+  | --oldinclude=* | --oldinclud=* | --oldinclu=* | --oldincl=* | --oldinc=* \
+  | --oldin=* | --oldi=* | --old=* | --ol=* | --o=*)
+    oldincludedir=$ac_optarg ;;
+
+  -prefix | --prefix | --prefi | --pref | --pre | --pr | --p)
+    ac_prev=prefix ;;
+  -prefix=* | --prefix=* | --prefi=* | --pref=* | --pre=* | --pr=* | --p=*)
+    prefix=$ac_optarg ;;
+
+  -program-prefix | --program-prefix | --program-prefi | --program-pref \
+  | --program-pre | --program-pr | --program-p)
+    ac_prev=program_prefix ;;
+  -program-prefix=* | --program-prefix=* | --program-prefi=* \
+  | --program-pref=* | --program-pre=* | --program-pr=* | --program-p=*)
+    program_prefix=$ac_optarg ;;
+
+  -program-suffix | --program-suffix | --program-suffi | --program-suff \
+  | --program-suf | --program-su | --program-s)
+    ac_prev=program_suffix ;;
+  -program-suffix=* | --program-suffix=* | --program-suffi=* \
+  | --program-suff=* | --program-suf=* | --program-su=* | --program-s=*)
+    program_suffix=$ac_optarg ;;
+
+  -program-transform-name | --program-transform-name \
+  | --program-transform-nam | --program-transform-na \
+  | --program-transform-n | --program-transform- \
+  | --program-transform | --program-transfor \
+  | --program-transfo | --program-transf \
+  | --program-trans | --program-tran \
+  | --progr-tra | --program-tr | --program-t)
+    ac_prev=program_transform_name ;;
+  -program-transform-name=* | --program-transform-name=* \
+  | --program-transform-nam=* | --program-transform-na=* \
+  | --program-transform-n=* | --program-transform-=* \
+  | --program-transform=* | --program-transfor=* \
+  | --program-transfo=* | --program-transf=* \
+  | --program-trans=* | --program-tran=* \
+  | --progr-tra=* | --program-tr=* | --program-t=*)
+    program_transform_name=$ac_optarg ;;
+
+  -pdfdir | --pdfdir | --pdfdi | --pdfd | --pdf | --pd)
+    ac_prev=pdfdir ;;
+  -pdfdir=* | --pdfdir=* | --pdfdi=* | --pdfd=* | --pdf=* | --pd=*)
+    pdfdir=$ac_optarg ;;
+
+  -psdir | --psdir | --psdi | --psd | --ps)
+    ac_prev=psdir ;;
+  -psdir=* | --psdir=* | --psdi=* | --psd=* | --ps=*)
+    psdir=$ac_optarg ;;
+
+  -q | -quiet | --quiet | --quie | --qui | --qu | --q \
+  | -silent | --silent | --silen | --sile | --sil)
+    silent=yes ;;
+
+  -sbindir | --sbindir | --sbindi | --sbind | --sbin | --sbi | --sb)
+    ac_prev=sbindir ;;
+  -sbindir=* | --sbindir=* | --sbindi=* | --sbind=* | --sbin=* \
+  | --sbi=* | --sb=*)
+    sbindir=$ac_optarg ;;
+
+  -sharedstatedir | --sharedstatedir | --sharedstatedi \
+  | --sharedstated | --sharedstate | --sharedstat | --sharedsta \
+  | --sharedst | --shareds | --shared | --share | --shar \
+  | --sha | --sh)
+    ac_prev=sharedstatedir ;;
+  -sharedstatedir=* | --sharedstatedir=* | --sharedstatedi=* \
+  | --sharedstated=* | --sharedstate=* | --sharedstat=* | --sharedsta=* \
+  | --sharedst=* | --shareds=* | --shared=* | --share=* | --shar=* \
+  | --sha=* | --sh=*)
+    sharedstatedir=$ac_optarg ;;
+
+  -site | --site | --sit)
+    ac_prev=site ;;
+  -site=* | --site=* | --sit=*)
+    site=$ac_optarg ;;
+
+  -srcdir | --srcdir | --srcdi | --srcd | --src | --sr)
+    ac_prev=srcdir ;;
+  -srcdir=* | --srcdir=* | --srcdi=* | --srcd=* | --src=* | --sr=*)
+    srcdir=$ac_optarg ;;
+
+  -sysconfdir | --sysconfdir | --sysconfdi | --sysconfd | --sysconf \
+  | --syscon | --sysco | --sysc | --sys | --sy)
+    ac_prev=sysconfdir ;;
+  -sysconfdir=* | --sysconfdir=* | --sysconfdi=* | --sysconfd=* | --sysconf=* \
+  | --syscon=* | --sysco=* | --sysc=* | --sys=* | --sy=*)
+    sysconfdir=$ac_optarg ;;
+
+  -target | --target | --targe | --targ | --tar | --ta | --t)
+    ac_prev=target_alias ;;
+  -target=* | --target=* | --targe=* | --targ=* | --tar=* | --ta=* | --t=*)
+    target_alias=$ac_optarg ;;
+
+  -v | -verbose | --verbose | --verbos | --verbo | --verb)
+    verbose=yes ;;
+
+  -version | --version | --versio | --versi | --vers | -V)
+    ac_init_version=: ;;
+
+  -with-* | --with-*)
+    ac_useropt=`expr "x$ac_option" : 'x-*with-\([^=]*\)'`
+    # Reject names that are not valid shell variable names.
+    expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
+      as_fn_error $? "invalid package name: $ac_useropt"
+    ac_useropt_orig=$ac_useropt
+    ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
+    case $ac_user_opts in
+      *"
+"with_$ac_useropt"
+"*) ;;
+      *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--with-$ac_useropt_orig"
+        ac_unrecognized_sep=', ';;
+    esac
+    eval with_$ac_useropt=\$ac_optarg ;;
+
+  -without-* | --without-*)
+    ac_useropt=`expr "x$ac_option" : 'x-*without-\(.*\)'`
+    # Reject names that are not valid shell variable names.
+    expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
+      as_fn_error $? "invalid package name: $ac_useropt"
+    ac_useropt_orig=$ac_useropt
+    ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
+    case $ac_user_opts in
+      *"
+"with_$ac_useropt"
+"*) ;;
+      *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--without-$ac_useropt_orig"
+        ac_unrecognized_sep=', ';;
+    esac
+    eval with_$ac_useropt=no ;;
+
+  --x)
+    # Obsolete; use --with-x.
+    with_x=yes ;;
+
+  -x-includes | --x-includes | --x-include | --x-includ | --x-inclu \
+  | --x-incl | --x-inc | --x-in | --x-i)
+    ac_prev=x_includes ;;
+  -x-includes=* | --x-includes=* | --x-include=* | --x-includ=* | --x-inclu=* \
+  | --x-incl=* | --x-inc=* | --x-in=* | --x-i=*)
+    x_includes=$ac_optarg ;;
+
+  -x-libraries | --x-libraries | --x-librarie | --x-librari \
+  | --x-librar | --x-libra | --x-libr | --x-lib | --x-li | --x-l)
+    ac_prev=x_libraries ;;
+  -x-libraries=* | --x-libraries=* | --x-librarie=* | --x-librari=* \
+  | --x-librar=* | --x-libra=* | --x-libr=* | --x-lib=* | --x-li=* | --x-l=*)
+    x_libraries=$ac_optarg ;;
+
+  -*) as_fn_error $? "unrecognized option: \`$ac_option'
+Try \`$0 --help' for more information"
+    ;;
+
+  *=*)
+    ac_envvar=`expr "x$ac_option" : 'x\([^=]*\)='`
+    # Reject names that are not valid shell variable names.
+    case $ac_envvar in #(
+      '' | [0-9]* | *[!_$as_cr_alnum]* )
+      as_fn_error $? "invalid variable name: \`$ac_envvar'" ;;
+    esac
+    eval $ac_envvar=\$ac_optarg
+    export $ac_envvar ;;
+
+  *)
+    # FIXME: should be removed in autoconf 3.0.
+    $as_echo "$as_me: WARNING: you should use --build, --host, --target" >&2
+    expr "x$ac_option" : ".*[^-._$as_cr_alnum]" >/dev/null &&
+      $as_echo "$as_me: WARNING: invalid host type: $ac_option" >&2
+    : "${build_alias=$ac_option} ${host_alias=$ac_option} ${target_alias=$ac_option}"
+    ;;
+
+  esac
+done
+
+if test -n "$ac_prev"; then
+  ac_option=--`echo $ac_prev | sed 's/_/-/g'`
+  as_fn_error $? "missing argument to $ac_option"
+fi
+
+if test -n "$ac_unrecognized_opts"; then
+  case $enable_option_checking in
+    no) ;;
+    fatal) as_fn_error $? "unrecognized options: $ac_unrecognized_opts" ;;
+    *)     $as_echo "$as_me: WARNING: unrecognized options: $ac_unrecognized_opts" >&2 ;;
+  esac
+fi
+
+# Check all directory arguments for consistency.
+for ac_var in  exec_prefix prefix bindir sbindir libexecdir datarootdir \
+               datadir sysconfdir sharedstatedir localstatedir includedir \
+               oldincludedir docdir infodir htmldir dvidir pdfdir psdir \
+               libdir localedir mandir
+do
+  eval ac_val=\$$ac_var
+  # Remove trailing slashes.
+  case $ac_val in
+    */ )
+      ac_val=`expr "X$ac_val" : 'X\(.*[^/]\)' \| "X$ac_val" : 'X\(.*\)'`
+      eval $ac_var=\$ac_val;;
+  esac
+  # Be sure to have absolute directory names.
+  case $ac_val in
+    [\\/$]* | ?:[\\/]* )  continue;;
+    NONE | '' ) case $ac_var in *prefix ) continue;; esac;;
+  esac
+  as_fn_error $? "expected an absolute directory name for --$ac_var: $ac_val"
+done
+
+# There might be people who depend on the old broken behavior: `$host'
+# used to hold the argument of --host etc.
+# FIXME: To remove some day.
+build=$build_alias
+host=$host_alias
+target=$target_alias
+
+# FIXME: To remove some day.
+if test "x$host_alias" != x; then
+  if test "x$build_alias" = x; then
+    cross_compiling=maybe
+  elif test "x$build_alias" != "x$host_alias"; then
+    cross_compiling=yes
+  fi
+fi
+
+ac_tool_prefix=
+test -n "$host_alias" && ac_tool_prefix=$host_alias-
+
+test "$silent" = yes && exec 6>/dev/null
+
+
+ac_pwd=`pwd` && test -n "$ac_pwd" &&
+ac_ls_di=`ls -di .` &&
+ac_pwd_ls_di=`cd "$ac_pwd" && ls -di .` ||
+  as_fn_error $? "working directory cannot be determined"
+test "X$ac_ls_di" = "X$ac_pwd_ls_di" ||
+  as_fn_error $? "pwd does not report name of working directory"
+
+
+# Find the source files, if location was not specified.
+if test -z "$srcdir"; then
+  ac_srcdir_defaulted=yes
+  # Try the directory containing this script, then the parent directory.
+  ac_confdir=`$as_dirname -- "$as_myself" ||
+$as_expr X"$as_myself" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
+        X"$as_myself" : 'X\(//\)[^/]' \| \
+        X"$as_myself" : 'X\(//\)$' \| \
+        X"$as_myself" : 'X\(/\)' \| . 2>/dev/null ||
+$as_echo X"$as_myself" |
+    sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)[^/].*/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\).*/{
+           s//\1/
+           q
+         }
+         s/.*/./; q'`
+  srcdir=$ac_confdir
+  if test ! -r "$srcdir/$ac_unique_file"; then
+    srcdir=..
+  fi
+else
+  ac_srcdir_defaulted=no
+fi
+if test ! -r "$srcdir/$ac_unique_file"; then
+  test "$ac_srcdir_defaulted" = yes && srcdir="$ac_confdir or .."
+  as_fn_error $? "cannot find sources ($ac_unique_file) in $srcdir"
+fi
+ac_msg="sources are in $srcdir, but \`cd $srcdir' does not work"
+ac_abs_confdir=`(
+       cd "$srcdir" && test -r "./$ac_unique_file" || as_fn_error $? "$ac_msg"
+       pwd)`
+# When building in place, set srcdir=.
+if test "$ac_abs_confdir" = "$ac_pwd"; then
+  srcdir=.
+fi
+# Remove unnecessary trailing slashes from srcdir.
+# Double slashes in file names in object file debugging info
+# mess up M-x gdb in Emacs.
+case $srcdir in
+*/) srcdir=`expr "X$srcdir" : 'X\(.*[^/]\)' \| "X$srcdir" : 'X\(.*\)'`;;
+esac
+for ac_var in $ac_precious_vars; do
+  eval ac_env_${ac_var}_set=\${${ac_var}+set}
+  eval ac_env_${ac_var}_value=\$${ac_var}
+  eval ac_cv_env_${ac_var}_set=\${${ac_var}+set}
+  eval ac_cv_env_${ac_var}_value=\$${ac_var}
+done
+
+#
+# Report the --help message.
+#
+if test "$ac_init_help" = "long"; then
+  # Omit some internal or obsolete options to make the list less imposing.
+  # This message is too long to be a string in the A/UX 3.1 sh.
+  cat <<_ACEOF
+\`configure' configures GNU libffcall 2.2 to adapt to many kinds of systems.
+
+Usage: $0 [OPTION]... [VAR=VALUE]...
+
+To assign environment variables (e.g., CC, CFLAGS...), specify them as
+VAR=VALUE.  See below for descriptions of some of the useful variables.
+
+Defaults for the options are specified in brackets.
+
+Configuration:
+  -h, --help              display this help and exit
+      --help=short        display options specific to this package
+      --help=recursive    display the short help of all the included packages
+  -V, --version           display version information and exit
+  -q, --quiet, --silent   do not print \`checking ...' messages
+      --cache-file=FILE   cache test results in FILE [disabled]
+  -C, --config-cache      alias for \`--cache-file=config.cache'
+  -n, --no-create         do not create output files
+      --srcdir=DIR        find the sources in DIR [configure dir or \`..']
+
+Installation directories:
+  --prefix=PREFIX         install architecture-independent files in PREFIX
+                          [$ac_default_prefix]
+  --exec-prefix=EPREFIX   install architecture-dependent files in EPREFIX
+                          [PREFIX]
+
+By default, \`make install' will install all the files in
+\`$ac_default_prefix/bin', \`$ac_default_prefix/lib' etc.  You can specify
+an installation prefix other than \`$ac_default_prefix' using \`--prefix',
+for instance \`--prefix=\$HOME'.
+
+For better control, use the options below.
+
+Fine tuning of the installation directories:
+  --bindir=DIR            user executables [EPREFIX/bin]
+  --sbindir=DIR           system admin executables [EPREFIX/sbin]
+  --libexecdir=DIR        program executables [EPREFIX/libexec]
+  --sysconfdir=DIR        read-only single-machine data [PREFIX/etc]
+  --sharedstatedir=DIR    modifiable architecture-independent data [PREFIX/com]
+  --localstatedir=DIR     modifiable single-machine data [PREFIX/var]
+  --libdir=DIR            object code libraries [EPREFIX/lib]
+  --includedir=DIR        C header files [PREFIX/include]
+  --oldincludedir=DIR     C header files for non-gcc [/usr/include]
+  --datarootdir=DIR       read-only arch.-independent data root [PREFIX/share]
+  --datadir=DIR           read-only architecture-independent data [DATAROOTDIR]
+  --infodir=DIR           info documentation [DATAROOTDIR/info]
+  --localedir=DIR         locale-dependent data [DATAROOTDIR/locale]
+  --mandir=DIR            man documentation [DATAROOTDIR/man]
+  --docdir=DIR            documentation root [DATAROOTDIR/doc/libffcall]
+  --htmldir=DIR           html documentation [DOCDIR]
+  --dvidir=DIR            dvi documentation [DOCDIR]
+  --pdfdir=DIR            pdf documentation [DOCDIR]
+  --psdir=DIR             ps documentation [DOCDIR]
+_ACEOF
+
+  cat <<\_ACEOF
+
+Program names:
+  --program-prefix=PREFIX            prepend PREFIX to installed program names
+  --program-suffix=SUFFIX            append SUFFIX to installed program names
+  --program-transform-name=PROGRAM   run sed PROGRAM on installed program names
+
+System types:
+  --build=BUILD     configure for building on BUILD [guessed]
+  --host=HOST       cross-compile to build programs to run on HOST [BUILD]
+_ACEOF
+fi
+
+if test -n "$ac_init_help"; then
+  case $ac_init_help in
+     short | recursive ) echo "Configuration of GNU libffcall 2.2:";;
+   esac
+  cat <<\_ACEOF
+
+Optional Features:
+  --disable-option-checking  ignore unrecognized --enable/--with options
+  --disable-FEATURE       do not include FEATURE (same as --enable-FEATURE=no)
+  --enable-FEATURE[=ARG]  include FEATURE [ARG=yes]
+  --enable-silent-rules   less verbose build output (undo: "make V=1")
+  --disable-silent-rules  verbose build output (undo: "make V=0")
+  --enable-dependency-tracking
+                          do not reject slow dependency extractors
+  --disable-dependency-tracking
+                          speeds up one-time build
+  --disable-c++           do not build C++ sources
+  --enable-threads={posix|windows}
+                          specify multithreading API
+  --disable-threads       build without multithread safety
+  --enable-shared[=PKGS]  build shared libraries [default=yes]
+  --enable-static[=PKGS]  build static libraries [default=yes]
+  --enable-fast-install[=PKGS]
+                          optimize for fast installation [default=yes]
+  --disable-libtool-lock  avoid locking (might break parallel builds)
+
+Optional Packages:
+  --with-PACKAGE[=ARG]    use PACKAGE [ARG=yes]
+  --without-PACKAGE       do not use PACKAGE (same as --with-PACKAGE=no)
+  --with-pic[=PKGS]       try to use only PIC/non-PIC objects [default=use
+                          both]
+  --with-aix-soname=aix|svr4|both
+                          shared library versioning (aka "SONAME") variant to
+                          provide on AIX, [default=aix].
+  --with-gnu-ld           assume the C compiler uses GNU ld [default=no]
+  --with-sysroot[=DIR]    Search for dependent libraries within DIR (or the
+                          compiler's sysroot if not specified).
+
+Some influential environment variables:
+  CC          C compiler command
+  CFLAGS      C compiler flags
+  LDFLAGS     linker flags, e.g. -L<lib dir> if you have libraries in a
+              nonstandard directory <lib dir>
+  LIBS        libraries to pass to the linker, e.g. -l<library>
+  CPPFLAGS    (Objective) C/C++ preprocessor flags, e.g. -I<include dir> if
+              you have headers in a nonstandard directory <include dir>
+  CPP         C preprocessor
+  CXX         C++ compiler command
+  CXXFLAGS    C++ compiler flags
+  LT_SYS_LIBRARY_PATH
+              User-defined run-time library search path.
+
+Use these variables to override the choices made by `configure' or to help
+it to find libraries and programs with nonstandard names/locations.
+
+Report bugs to <https://savannah.gnu.org/projects/libffcall>.
+GNU libffcall home page: <http://www.gnu.org/software/libffcall/>.
+General help using GNU software: <http://www.gnu.org/gethelp/>.
+_ACEOF
+ac_status=$?
+fi
+
+if test "$ac_init_help" = "recursive"; then
+  # If there are subdirs, report their specific --help.
+  for ac_dir in : $ac_subdirs_all; do test "x$ac_dir" = x: && continue
+    test -d "$ac_dir" ||
+      { cd "$srcdir" && ac_pwd=`pwd` && srcdir=. && test -d "$ac_dir"; } ||
+      continue
+    ac_builddir=.
+
+case "$ac_dir" in
+.) ac_dir_suffix= ac_top_builddir_sub=. ac_top_build_prefix= ;;
+*)
+  ac_dir_suffix=/`$as_echo "$ac_dir" | sed 's|^\.[\\/]||'`
+  # A ".." for each directory in $ac_dir_suffix.
+  ac_top_builddir_sub=`$as_echo "$ac_dir_suffix" | sed 's|/[^\\/]*|/..|g;s|/||'`
+  case $ac_top_builddir_sub in
+  "") ac_top_builddir_sub=. ac_top_build_prefix= ;;
+  *)  ac_top_build_prefix=$ac_top_builddir_sub/ ;;
+  esac ;;
+esac
+ac_abs_top_builddir=$ac_pwd
+ac_abs_builddir=$ac_pwd$ac_dir_suffix
+# for backward compatibility:
+ac_top_builddir=$ac_top_build_prefix
+
+case $srcdir in
+  .)  # We are building in place.
+    ac_srcdir=.
+    ac_top_srcdir=$ac_top_builddir_sub
+    ac_abs_top_srcdir=$ac_pwd ;;
+  [\\/]* | ?:[\\/]* )  # Absolute name.
+    ac_srcdir=$srcdir$ac_dir_suffix;
+    ac_top_srcdir=$srcdir
+    ac_abs_top_srcdir=$srcdir ;;
+  *) # Relative name.
+    ac_srcdir=$ac_top_build_prefix$srcdir$ac_dir_suffix
+    ac_top_srcdir=$ac_top_build_prefix$srcdir
+    ac_abs_top_srcdir=$ac_pwd/$srcdir ;;
+esac
+ac_abs_srcdir=$ac_abs_top_srcdir$ac_dir_suffix
+
+    cd "$ac_dir" || { ac_status=$?; continue; }
+    # Check for guested configure.
+    if test -f "$ac_srcdir/configure.gnu"; then
+      echo &&
+      $SHELL "$ac_srcdir/configure.gnu" --help=recursive
+    elif test -f "$ac_srcdir/configure"; then
+      echo &&
+      $SHELL "$ac_srcdir/configure" --help=recursive
+    else
+      $as_echo "$as_me: WARNING: no configuration information is in $ac_dir" >&2
+    fi || ac_status=$?
+    cd "$ac_pwd" || { ac_status=$?; break; }
+  done
+fi
+
+test -n "$ac_init_help" && exit $ac_status
+if $ac_init_version; then
+  cat <<\_ACEOF
+GNU libffcall configure 2.2
+generated by GNU Autoconf 2.69
+
+Copyright (C) 2012 Free Software Foundation, Inc.
+This configure script is free software; the Free Software Foundation
+gives unlimited permission to copy, distribute and modify it.
+_ACEOF
+  exit
+fi
+
+## ------------------------ ##
+## Autoconf initialization. ##
+## ------------------------ ##
+
+# ac_fn_c_try_compile LINENO
+# --------------------------
+# Try to compile conftest.$ac_ext, and return whether this succeeded.
+ac_fn_c_try_compile ()
+{
+  as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
+  rm -f conftest.$ac_objext
+  if { { ac_try="$ac_compile"
+case "(($ac_try" in
+  *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
+  *) ac_try_echo=$ac_try;;
+esac
+eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
+$as_echo "$ac_try_echo"; } >&5
+  (eval "$ac_compile") 2>conftest.err
+  ac_status=$?
+  if test -s conftest.err; then
+    grep -v '^ *+' conftest.err >conftest.er1
+    cat conftest.er1 >&5
+    mv -f conftest.er1 conftest.err
+  fi
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } && {
+        test -z "$ac_c_werror_flag" ||
+        test ! -s conftest.err
+       } && test -s conftest.$ac_objext; then :
+  ac_retval=0
+else
+  $as_echo "$as_me: failed program was:" >&5
+sed 's/^/| /' conftest.$ac_ext >&5
+
+       ac_retval=1
+fi
+  eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
+  as_fn_set_status $ac_retval
+
+} # ac_fn_c_try_compile
+
+# ac_fn_c_try_cpp LINENO
+# ----------------------
+# Try to preprocess conftest.$ac_ext, and return whether this succeeded.
+ac_fn_c_try_cpp ()
+{
+  as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
+  if { { ac_try="$ac_cpp conftest.$ac_ext"
+case "(($ac_try" in
+  *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
+  *) ac_try_echo=$ac_try;;
+esac
+eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
+$as_echo "$ac_try_echo"; } >&5
+  (eval "$ac_cpp conftest.$ac_ext") 2>conftest.err
+  ac_status=$?
+  if test -s conftest.err; then
+    grep -v '^ *+' conftest.err >conftest.er1
+    cat conftest.er1 >&5
+    mv -f conftest.er1 conftest.err
+  fi
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } > conftest.i && {
+        test -z "$ac_c_preproc_warn_flag$ac_c_werror_flag" ||
+        test ! -s conftest.err
+       }; then :
+  ac_retval=0
+else
+  $as_echo "$as_me: failed program was:" >&5
+sed 's/^/| /' conftest.$ac_ext >&5
+
+    ac_retval=1
+fi
+  eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
+  as_fn_set_status $ac_retval
+
+} # ac_fn_c_try_cpp
+
+# ac_fn_c_check_header_mongrel LINENO HEADER VAR INCLUDES
+# -------------------------------------------------------
+# Tests whether HEADER exists, giving a warning if it cannot be compiled using
+# the include files in INCLUDES and setting the cache variable VAR
+# accordingly.
+ac_fn_c_check_header_mongrel ()
+{
+  as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
+  if eval \${$3+:} false; then :
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5
+$as_echo_n "checking for $2... " >&6; }
+if eval \${$3+:} false; then :
+  $as_echo_n "(cached) " >&6
+fi
+eval ac_res=\$$3
+              { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
+$as_echo "$ac_res" >&6; }
+else
+  # Is the header compilable?
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking $2 usability" >&5
+$as_echo_n "checking $2 usability... " >&6; }
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+$4
+#include <$2>
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_header_compiler=yes
+else
+  ac_header_compiler=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_header_compiler" >&5
+$as_echo "$ac_header_compiler" >&6; }
+
+# Is the header present?
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking $2 presence" >&5
+$as_echo_n "checking $2 presence... " >&6; }
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <$2>
+_ACEOF
+if ac_fn_c_try_cpp "$LINENO"; then :
+  ac_header_preproc=yes
+else
+  ac_header_preproc=no
+fi
+rm -f conftest.err conftest.i conftest.$ac_ext
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_header_preproc" >&5
+$as_echo "$ac_header_preproc" >&6; }
+
+# So?  What about this header?
+case $ac_header_compiler:$ac_header_preproc:$ac_c_preproc_warn_flag in #((
+  yes:no: )
+    { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: accepted by the compiler, rejected by the preprocessor!" >&5
+$as_echo "$as_me: WARNING: $2: accepted by the compiler, rejected by the preprocessor!" >&2;}
+    { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: proceeding with the compiler's result" >&5
+$as_echo "$as_me: WARNING: $2: proceeding with the compiler's result" >&2;}
+    ;;
+  no:yes:* )
+    { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: present but cannot be compiled" >&5
+$as_echo "$as_me: WARNING: $2: present but cannot be compiled" >&2;}
+    { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2:     check for missing prerequisite headers?" >&5
+$as_echo "$as_me: WARNING: $2:     check for missing prerequisite headers?" >&2;}
+    { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: see the Autoconf documentation" >&5
+$as_echo "$as_me: WARNING: $2: see the Autoconf documentation" >&2;}
+    { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2:     section \"Present But Cannot Be Compiled\"" >&5
+$as_echo "$as_me: WARNING: $2:     section \"Present But Cannot Be Compiled\"" >&2;}
+    { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: proceeding with the compiler's result" >&5
+$as_echo "$as_me: WARNING: $2: proceeding with the compiler's result" >&2;}
+( $as_echo "## ---------------------------------------------------------- ##
+## Report this to https://savannah.gnu.org/projects/libffcall ##
+## ---------------------------------------------------------- ##"
+     ) | sed "s/^/$as_me: WARNING:     /" >&2
+    ;;
+esac
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5
+$as_echo_n "checking for $2... " >&6; }
+if eval \${$3+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  eval "$3=\$ac_header_compiler"
+fi
+eval ac_res=\$$3
+              { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
+$as_echo "$ac_res" >&6; }
+fi
+  eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
+
+} # ac_fn_c_check_header_mongrel
+
+# ac_fn_c_try_run LINENO
+# ----------------------
+# Try to link conftest.$ac_ext, and return whether this succeeded. Assumes
+# that executables *can* be run.
+ac_fn_c_try_run ()
+{
+  as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
+  if { { ac_try="$ac_link"
+case "(($ac_try" in
+  *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
+  *) ac_try_echo=$ac_try;;
+esac
+eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
+$as_echo "$ac_try_echo"; } >&5
+  (eval "$ac_link") 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } && { ac_try='./conftest$ac_exeext'
+  { { case "(($ac_try" in
+  *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
+  *) ac_try_echo=$ac_try;;
+esac
+eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
+$as_echo "$ac_try_echo"; } >&5
+  (eval "$ac_try") 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; }; then :
+  ac_retval=0
+else
+  $as_echo "$as_me: program exited with status $ac_status" >&5
+       $as_echo "$as_me: failed program was:" >&5
+sed 's/^/| /' conftest.$ac_ext >&5
+
+       ac_retval=$ac_status
+fi
+  rm -rf conftest.dSYM conftest_ipa8_conftest.oo
+  eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
+  as_fn_set_status $ac_retval
+
+} # ac_fn_c_try_run
+
+# ac_fn_c_check_header_compile LINENO HEADER VAR INCLUDES
+# -------------------------------------------------------
+# Tests whether HEADER exists and can be compiled using the include files in
+# INCLUDES, setting the cache variable VAR accordingly.
+ac_fn_c_check_header_compile ()
+{
+  as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5
+$as_echo_n "checking for $2... " >&6; }
+if eval \${$3+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+$4
+#include <$2>
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  eval "$3=yes"
+else
+  eval "$3=no"
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+eval ac_res=\$$3
+              { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
+$as_echo "$ac_res" >&6; }
+  eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
+
+} # ac_fn_c_check_header_compile
+
+# ac_fn_c_try_link LINENO
+# -----------------------
+# Try to link conftest.$ac_ext, and return whether this succeeded.
+ac_fn_c_try_link ()
+{
+  as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
+  rm -f conftest.$ac_objext conftest$ac_exeext
+  if { { ac_try="$ac_link"
+case "(($ac_try" in
+  *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
+  *) ac_try_echo=$ac_try;;
+esac
+eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
+$as_echo "$ac_try_echo"; } >&5
+  (eval "$ac_link") 2>conftest.err
+  ac_status=$?
+  if test -s conftest.err; then
+    grep -v '^ *+' conftest.err >conftest.er1
+    cat conftest.er1 >&5
+    mv -f conftest.er1 conftest.err
+  fi
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } && {
+        test -z "$ac_c_werror_flag" ||
+        test ! -s conftest.err
+       } && test -s conftest$ac_exeext && {
+        test "$cross_compiling" = yes ||
+        test -x conftest$ac_exeext
+       }; then :
+  ac_retval=0
+else
+  $as_echo "$as_me: failed program was:" >&5
+sed 's/^/| /' conftest.$ac_ext >&5
+
+       ac_retval=1
+fi
+  # Delete the IPA/IPO (Inter Procedural Analysis/Optimization) information
+  # created by the PGI compiler (conftest_ipa8_conftest.oo), as it would
+  # interfere with the next link command; also delete a directory that is
+  # left behind by Apple's compiler.  We do this before executing the actions.
+  rm -rf conftest.dSYM conftest_ipa8_conftest.oo
+  eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
+  as_fn_set_status $ac_retval
+
+} # ac_fn_c_try_link
+
+# ac_fn_c_check_func LINENO FUNC VAR
+# ----------------------------------
+# Tests whether FUNC exists, setting the cache variable VAR accordingly
+ac_fn_c_check_func ()
+{
+  as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5
+$as_echo_n "checking for $2... " >&6; }
+if eval \${$3+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+/* Define $2 to an innocuous variant, in case <limits.h> declares $2.
+   For example, HP-UX 11i <limits.h> declares gettimeofday.  */
+#define $2 innocuous_$2
+
+/* System header to define __stub macros and hopefully few prototypes,
+    which can conflict with char $2 (); below.
+    Prefer <limits.h> to <assert.h> if __STDC__ is defined, since
+    <limits.h> exists even on freestanding compilers.  */
+
+#ifdef __STDC__
+# include <limits.h>
+#else
+# include <assert.h>
+#endif
+
+#undef $2
+
+/* Override any GCC internal prototype to avoid an error.
+   Use char because int might match the return type of a GCC
+   builtin and then its argument prototype would still apply.  */
+#ifdef __cplusplus
+extern "C"
+#endif
+char $2 ();
+/* The GNU C library defines this for functions which it implements
+    to always fail with ENOSYS.  Some functions are actually named
+    something starting with __ and the normal name is an alias.  */
+#if defined __stub_$2 || defined __stub___$2
+choke me
+#endif
+
+int
+main ()
+{
+return $2 ();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  eval "$3=yes"
+else
+  eval "$3=no"
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+fi
+eval ac_res=\$$3
+              { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
+$as_echo "$ac_res" >&6; }
+  eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
+
+} # ac_fn_c_check_func
+
+# ac_fn_c_check_type LINENO TYPE VAR INCLUDES
+# -------------------------------------------
+# Tests whether TYPE exists after having included INCLUDES, setting cache
+# variable VAR accordingly.
+ac_fn_c_check_type ()
+{
+  as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5
+$as_echo_n "checking for $2... " >&6; }
+if eval \${$3+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  eval "$3=no"
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+$4
+int
+main ()
+{
+if (sizeof ($2))
+        return 0;
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+$4
+int
+main ()
+{
+if (sizeof (($2)))
+           return 0;
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+
+else
+  eval "$3=yes"
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+eval ac_res=\$$3
+              { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
+$as_echo "$ac_res" >&6; }
+  eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
+
+} # ac_fn_c_check_type
+
+# ac_fn_c_compute_int LINENO EXPR VAR INCLUDES
+# --------------------------------------------
+# Tries to find the compile-time value of EXPR in a program that includes
+# INCLUDES, setting VAR accordingly. Returns whether the value could be
+# computed
+ac_fn_c_compute_int ()
+{
+  as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
+  if test "$cross_compiling" = yes; then
+    # Depending upon the size, compute the lo and hi bounds.
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+$4
+int
+main ()
+{
+static int test_array [1 - 2 * !(($2) >= 0)];
+test_array [0] = 0;
+return test_array [0];
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_lo=0 ac_mid=0
+  while :; do
+    cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+$4
+int
+main ()
+{
+static int test_array [1 - 2 * !(($2) <= $ac_mid)];
+test_array [0] = 0;
+return test_array [0];
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_hi=$ac_mid; break
+else
+  as_fn_arith $ac_mid + 1 && ac_lo=$as_val
+                       if test $ac_lo -le $ac_mid; then
+                         ac_lo= ac_hi=
+                         break
+                       fi
+                       as_fn_arith 2 '*' $ac_mid + 1 && ac_mid=$as_val
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+  done
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+$4
+int
+main ()
+{
+static int test_array [1 - 2 * !(($2) < 0)];
+test_array [0] = 0;
+return test_array [0];
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_hi=-1 ac_mid=-1
+  while :; do
+    cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+$4
+int
+main ()
+{
+static int test_array [1 - 2 * !(($2) >= $ac_mid)];
+test_array [0] = 0;
+return test_array [0];
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_lo=$ac_mid; break
+else
+  as_fn_arith '(' $ac_mid ')' - 1 && ac_hi=$as_val
+                       if test $ac_mid -le $ac_hi; then
+                         ac_lo= ac_hi=
+                         break
+                       fi
+                       as_fn_arith 2 '*' $ac_mid && ac_mid=$as_val
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+  done
+else
+  ac_lo= ac_hi=
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+# Binary search between lo and hi bounds.
+while test "x$ac_lo" != "x$ac_hi"; do
+  as_fn_arith '(' $ac_hi - $ac_lo ')' / 2 + $ac_lo && ac_mid=$as_val
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+$4
+int
+main ()
+{
+static int test_array [1 - 2 * !(($2) <= $ac_mid)];
+test_array [0] = 0;
+return test_array [0];
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_hi=$ac_mid
+else
+  as_fn_arith '(' $ac_mid ')' + 1 && ac_lo=$as_val
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+done
+case $ac_lo in #((
+?*) eval "$3=\$ac_lo"; ac_retval=0 ;;
+'') ac_retval=1 ;;
+esac
+  else
+    cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+$4
+static long int longval () { return $2; }
+static unsigned long int ulongval () { return $2; }
+#include <stdio.h>
+#include <stdlib.h>
+int
+main ()
+{
+
+  FILE *f = fopen ("conftest.val", "w");
+  if (! f)
+    return 1;
+  if (($2) < 0)
+    {
+      long int i = longval ();
+      if (i != ($2))
+       return 1;
+      fprintf (f, "%ld", i);
+    }
+  else
+    {
+      unsigned long int i = ulongval ();
+      if (i != ($2))
+       return 1;
+      fprintf (f, "%lu", i);
+    }
+  /* Do not output a trailing newline, as this causes \r\n confusion
+     on some platforms.  */
+  return ferror (f) || fclose (f) != 0;
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  echo >>conftest.val; read $3 <conftest.val; ac_retval=0
+else
+  ac_retval=1
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+rm -f conftest.val
+
+  fi
+  eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
+  as_fn_set_status $ac_retval
+
+} # ac_fn_c_compute_int
+cat >config.log <<_ACEOF
+This file contains any messages produced by compilers while
+running configure, to aid debugging if configure makes a mistake.
+
+It was created by GNU libffcall $as_me 2.2, which was
+generated by GNU Autoconf 2.69.  Invocation command line was
+
+  $ $0 $@
+
+_ACEOF
+exec 5>>config.log
+{
+cat <<_ASUNAME
+## --------- ##
+## Platform. ##
+## --------- ##
+
+hostname = `(hostname || uname -n) 2>/dev/null | sed 1q`
+uname -m = `(uname -m) 2>/dev/null || echo unknown`
+uname -r = `(uname -r) 2>/dev/null || echo unknown`
+uname -s = `(uname -s) 2>/dev/null || echo unknown`
+uname -v = `(uname -v) 2>/dev/null || echo unknown`
+
+/usr/bin/uname -p = `(/usr/bin/uname -p) 2>/dev/null || echo unknown`
+/bin/uname -X     = `(/bin/uname -X) 2>/dev/null     || echo unknown`
+
+/bin/arch              = `(/bin/arch) 2>/dev/null              || echo unknown`
+/usr/bin/arch -k       = `(/usr/bin/arch -k) 2>/dev/null       || echo unknown`
+/usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null || echo unknown`
+/usr/bin/hostinfo      = `(/usr/bin/hostinfo) 2>/dev/null      || echo unknown`
+/bin/machine           = `(/bin/machine) 2>/dev/null           || echo unknown`
+/usr/bin/oslevel       = `(/usr/bin/oslevel) 2>/dev/null       || echo unknown`
+/bin/universe          = `(/bin/universe) 2>/dev/null          || echo unknown`
+
+_ASUNAME
+
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    $as_echo "PATH: $as_dir"
+  done
+IFS=$as_save_IFS
+
+} >&5
+
+cat >&5 <<_ACEOF
+
+
+## ----------- ##
+## Core tests. ##
+## ----------- ##
+
+_ACEOF
+
+
+# Keep a trace of the command line.
+# Strip out --no-create and --no-recursion so they do not pile up.
+# Strip out --silent because we don't want to record it for future runs.
+# Also quote any args containing shell meta-characters.
+# Make two passes to allow for proper duplicate-argument suppression.
+ac_configure_args=
+ac_configure_args0=
+ac_configure_args1=
+ac_must_keep_next=false
+for ac_pass in 1 2
+do
+  for ac_arg
+  do
+    case $ac_arg in
+    -no-create | --no-c* | -n | -no-recursion | --no-r*) continue ;;
+    -q | -quiet | --quiet | --quie | --qui | --qu | --q \
+    | -silent | --silent | --silen | --sile | --sil)
+      continue ;;
+    *\'*)
+      ac_arg=`$as_echo "$ac_arg" | sed "s/'/'\\\\\\\\''/g"` ;;
+    esac
+    case $ac_pass in
+    1) as_fn_append ac_configure_args0 " '$ac_arg'" ;;
+    2)
+      as_fn_append ac_configure_args1 " '$ac_arg'"
+      if test $ac_must_keep_next = true; then
+       ac_must_keep_next=false # Got value, back to normal.
+      else
+       case $ac_arg in
+         *=* | --config-cache | -C | -disable-* | --disable-* \
+         | -enable-* | --enable-* | -gas | --g* | -nfp | --nf* \
+         | -q | -quiet | --q* | -silent | --sil* | -v | -verb* \
+         | -with-* | --with-* | -without-* | --without-* | --x)
+           case "$ac_configure_args0 " in
+             "$ac_configure_args1"*" '$ac_arg' "* ) continue ;;
+           esac
+           ;;
+         -* ) ac_must_keep_next=true ;;
+       esac
+      fi
+      as_fn_append ac_configure_args " '$ac_arg'"
+      ;;
+    esac
+  done
+done
+{ ac_configure_args0=; unset ac_configure_args0;}
+{ ac_configure_args1=; unset ac_configure_args1;}
+
+# When interrupted or exit'd, cleanup temporary files, and complete
+# config.log.  We remove comments because anyway the quotes in there
+# would cause problems or look ugly.
+# WARNING: Use '\'' to represent an apostrophe within the trap.
+# WARNING: Do not start the trap code with a newline, due to a FreeBSD 4.0 bug.
+trap 'exit_status=$?
+  # Save into config.log some information that might help in debugging.
+  {
+    echo
+
+    $as_echo "## ---------------- ##
+## Cache variables. ##
+## ---------------- ##"
+    echo
+    # The following way of writing the cache mishandles newlines in values,
+(
+  for ac_var in `(set) 2>&1 | sed -n '\''s/^\([a-zA-Z_][a-zA-Z0-9_]*\)=.*/\1/p'\''`; do
+    eval ac_val=\$$ac_var
+    case $ac_val in #(
+    *${as_nl}*)
+      case $ac_var in #(
+      *_cv_*) { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: cache variable $ac_var contains a newline" >&5
+$as_echo "$as_me: WARNING: cache variable $ac_var contains a newline" >&2;} ;;
+      esac
+      case $ac_var in #(
+      _ | IFS | as_nl) ;; #(
+      BASH_ARGV | BASH_SOURCE) eval $ac_var= ;; #(
+      *) { eval $ac_var=; unset $ac_var;} ;;
+      esac ;;
+    esac
+  done
+  (set) 2>&1 |
+    case $as_nl`(ac_space='\'' '\''; set) 2>&1` in #(
+    *${as_nl}ac_space=\ *)
+      sed -n \
+       "s/'\''/'\''\\\\'\'''\''/g;
+         s/^\\([_$as_cr_alnum]*_cv_[_$as_cr_alnum]*\\)=\\(.*\\)/\\1='\''\\2'\''/p"
+      ;; #(
+    *)
+      sed -n "/^[_$as_cr_alnum]*_cv_[_$as_cr_alnum]*=/p"
+      ;;
+    esac |
+    sort
+)
+    echo
+
+    $as_echo "## ----------------- ##
+## Output variables. ##
+## ----------------- ##"
+    echo
+    for ac_var in $ac_subst_vars
+    do
+      eval ac_val=\$$ac_var
+      case $ac_val in
+      *\'\''*) ac_val=`$as_echo "$ac_val" | sed "s/'\''/'\''\\\\\\\\'\'''\''/g"`;;
+      esac
+      $as_echo "$ac_var='\''$ac_val'\''"
+    done | sort
+    echo
+
+    if test -n "$ac_subst_files"; then
+      $as_echo "## ------------------- ##
+## File substitutions. ##
+## ------------------- ##"
+      echo
+      for ac_var in $ac_subst_files
+      do
+       eval ac_val=\$$ac_var
+       case $ac_val in
+       *\'\''*) ac_val=`$as_echo "$ac_val" | sed "s/'\''/'\''\\\\\\\\'\'''\''/g"`;;
+       esac
+       $as_echo "$ac_var='\''$ac_val'\''"
+      done | sort
+      echo
+    fi
+
+    if test -s confdefs.h; then
+      $as_echo "## ----------- ##
+## confdefs.h. ##
+## ----------- ##"
+      echo
+      cat confdefs.h
+      echo
+    fi
+    test "$ac_signal" != 0 &&
+      $as_echo "$as_me: caught signal $ac_signal"
+    $as_echo "$as_me: exit $exit_status"
+  } >&5
+  rm -f core *.core core.conftest.* &&
+    rm -f -r conftest* confdefs* conf$$* $ac_clean_files &&
+    exit $exit_status
+' 0
+for ac_signal in 1 2 13 15; do
+  trap 'ac_signal='$ac_signal'; as_fn_exit 1' $ac_signal
+done
+ac_signal=0
+
+# confdefs.h avoids OS command line length limits that DEFS can exceed.
+rm -f -r conftest* confdefs.h
+
+$as_echo "/* confdefs.h */" > confdefs.h
+
+# Predefined preprocessor variables.
+
+cat >>confdefs.h <<_ACEOF
+#define PACKAGE_NAME "$PACKAGE_NAME"
+_ACEOF
+
+cat >>confdefs.h <<_ACEOF
+#define PACKAGE_TARNAME "$PACKAGE_TARNAME"
+_ACEOF
+
+cat >>confdefs.h <<_ACEOF
+#define PACKAGE_VERSION "$PACKAGE_VERSION"
+_ACEOF
+
+cat >>confdefs.h <<_ACEOF
+#define PACKAGE_STRING "$PACKAGE_STRING"
+_ACEOF
+
+cat >>confdefs.h <<_ACEOF
+#define PACKAGE_BUGREPORT "$PACKAGE_BUGREPORT"
+_ACEOF
+
+cat >>confdefs.h <<_ACEOF
+#define PACKAGE_URL "$PACKAGE_URL"
+_ACEOF
+
+
+# Let the site file select an alternate cache file if it wants to.
+# Prefer an explicitly selected file to automatically selected ones.
+ac_site_file1=NONE
+ac_site_file2=NONE
+if test -n "$CONFIG_SITE"; then
+  # We do not want a PATH search for config.site.
+  case $CONFIG_SITE in #((
+    -*)  ac_site_file1=./$CONFIG_SITE;;
+    */*) ac_site_file1=$CONFIG_SITE;;
+    *)   ac_site_file1=./$CONFIG_SITE;;
+  esac
+elif test "x$prefix" != xNONE; then
+  ac_site_file1=$prefix/share/config.site
+  ac_site_file2=$prefix/etc/config.site
+else
+  ac_site_file1=$ac_default_prefix/share/config.site
+  ac_site_file2=$ac_default_prefix/etc/config.site
+fi
+for ac_site_file in "$ac_site_file1" "$ac_site_file2"
+do
+  test "x$ac_site_file" = xNONE && continue
+  if test /dev/null != "$ac_site_file" && test -r "$ac_site_file"; then
+    { $as_echo "$as_me:${as_lineno-$LINENO}: loading site script $ac_site_file" >&5
+$as_echo "$as_me: loading site script $ac_site_file" >&6;}
+    sed 's/^/| /' "$ac_site_file" >&5
+    . "$ac_site_file" \
+      || { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
+as_fn_error $? "failed to load site script $ac_site_file
+See \`config.log' for more details" "$LINENO" 5; }
+  fi
+done
+
+if test -r "$cache_file"; then
+  # Some versions of bash will fail to source /dev/null (special files
+  # actually), so we avoid doing that.  DJGPP emulates it as a regular file.
+  if test /dev/null != "$cache_file" && test -f "$cache_file"; then
+    { $as_echo "$as_me:${as_lineno-$LINENO}: loading cache $cache_file" >&5
+$as_echo "$as_me: loading cache $cache_file" >&6;}
+    case $cache_file in
+      [\\/]* | ?:[\\/]* ) . "$cache_file";;
+      *)                      . "./$cache_file";;
+    esac
+  fi
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: creating cache $cache_file" >&5
+$as_echo "$as_me: creating cache $cache_file" >&6;}
+  >$cache_file
+fi
+
+gl_header_list="$gl_header_list limits.h"
+gl_header_list="$gl_header_list threads.h"
+gl_header_list="$gl_header_list wchar.h"
+gl_header_list="$gl_header_list stdint.h"
+# Check that the precious variables saved in the cache have kept the same
+# value.
+ac_cache_corrupted=false
+for ac_var in $ac_precious_vars; do
+  eval ac_old_set=\$ac_cv_env_${ac_var}_set
+  eval ac_new_set=\$ac_env_${ac_var}_set
+  eval ac_old_val=\$ac_cv_env_${ac_var}_value
+  eval ac_new_val=\$ac_env_${ac_var}_value
+  case $ac_old_set,$ac_new_set in
+    set,)
+      { $as_echo "$as_me:${as_lineno-$LINENO}: error: \`$ac_var' was set to \`$ac_old_val' in the previous run" >&5
+$as_echo "$as_me: error: \`$ac_var' was set to \`$ac_old_val' in the previous run" >&2;}
+      ac_cache_corrupted=: ;;
+    ,set)
+      { $as_echo "$as_me:${as_lineno-$LINENO}: error: \`$ac_var' was not set in the previous run" >&5
+$as_echo "$as_me: error: \`$ac_var' was not set in the previous run" >&2;}
+      ac_cache_corrupted=: ;;
+    ,);;
+    *)
+      if test "x$ac_old_val" != "x$ac_new_val"; then
+       # differences in whitespace do not lead to failure.
+       ac_old_val_w=`echo x $ac_old_val`
+       ac_new_val_w=`echo x $ac_new_val`
+       if test "$ac_old_val_w" != "$ac_new_val_w"; then
+         { $as_echo "$as_me:${as_lineno-$LINENO}: error: \`$ac_var' has changed since the previous run:" >&5
+$as_echo "$as_me: error: \`$ac_var' has changed since the previous run:" >&2;}
+         ac_cache_corrupted=:
+       else
+         { $as_echo "$as_me:${as_lineno-$LINENO}: warning: ignoring whitespace changes in \`$ac_var' since the previous run:" >&5
+$as_echo "$as_me: warning: ignoring whitespace changes in \`$ac_var' since the previous run:" >&2;}
+         eval $ac_var=\$ac_old_val
+       fi
+       { $as_echo "$as_me:${as_lineno-$LINENO}:   former value:  \`$ac_old_val'" >&5
+$as_echo "$as_me:   former value:  \`$ac_old_val'" >&2;}
+       { $as_echo "$as_me:${as_lineno-$LINENO}:   current value: \`$ac_new_val'" >&5
+$as_echo "$as_me:   current value: \`$ac_new_val'" >&2;}
+      fi;;
+  esac
+  # Pass precious variables to config.status.
+  if test "$ac_new_set" = set; then
+    case $ac_new_val in
+    *\'*) ac_arg=$ac_var=`$as_echo "$ac_new_val" | sed "s/'/'\\\\\\\\''/g"` ;;
+    *) ac_arg=$ac_var=$ac_new_val ;;
+    esac
+    case " $ac_configure_args " in
+      *" '$ac_arg' "*) ;; # Avoid dups.  Use of quotes ensures accuracy.
+      *) as_fn_append ac_configure_args " '$ac_arg'" ;;
+    esac
+  fi
+done
+if $ac_cache_corrupted; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
+  { $as_echo "$as_me:${as_lineno-$LINENO}: error: changes in the environment can compromise the build" >&5
+$as_echo "$as_me: error: changes in the environment can compromise the build" >&2;}
+  as_fn_error $? "run \`make distclean' and/or \`rm $cache_file' and start over" "$LINENO" 5
+fi
+## -------------------- ##
+## Main body of script. ##
+## -------------------- ##
+
+ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+
+ac_aux_dir=
+for ac_dir in build-aux "$srcdir"/build-aux; do
+  if test -f "$ac_dir/install-sh"; then
+    ac_aux_dir=$ac_dir
+    ac_install_sh="$ac_aux_dir/install-sh -c"
+    break
+  elif test -f "$ac_dir/install.sh"; then
+    ac_aux_dir=$ac_dir
+    ac_install_sh="$ac_aux_dir/install.sh -c"
+    break
+  elif test -f "$ac_dir/shtool"; then
+    ac_aux_dir=$ac_dir
+    ac_install_sh="$ac_aux_dir/shtool install -c"
+    break
+  fi
+done
+if test -z "$ac_aux_dir"; then
+  as_fn_error $? "cannot find install-sh, install.sh, or shtool in build-aux \"$srcdir\"/build-aux" "$LINENO" 5
+fi
+
+# These three variables are undocumented and unsupported,
+# and are intended to be withdrawn in a future Autoconf release.
+# They can cause serious problems if a builder's source tree is in a directory
+# whose full name contains unusual characters.
+ac_config_guess="$SHELL $ac_aux_dir/config.guess"  # Please don't use this var.
+ac_config_sub="$SHELL $ac_aux_dir/config.sub"  # Please don't use this var.
+ac_configure="$SHELL $ac_aux_dir/configure"  # Please don't use this var.
+
+
+am__api_version='1.15'
+
+# Find a good install program.  We prefer a C program (faster),
+# so one script is as good as another.  But avoid the broken or
+# incompatible versions:
+# SysV /etc/install, /usr/sbin/install
+# SunOS /usr/etc/install
+# IRIX /sbin/install
+# AIX /bin/install
+# AmigaOS /C/install, which installs bootblocks on floppy discs
+# AIX 4 /usr/bin/installbsd, which doesn't work without a -g flag
+# AFS /usr/afsws/bin/install, which mishandles nonexistent args
+# SVR4 /usr/ucb/install, which tries to use the nonexistent group "staff"
+# OS/2's system install, which has a completely different semantic
+# ./install, which can be erroneously created by make from ./install.sh.
+# Reject install programs that cannot install multiple files.
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for a BSD-compatible install" >&5
+$as_echo_n "checking for a BSD-compatible install... " >&6; }
+if test -z "$INSTALL"; then
+if ${ac_cv_path_install+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    # Account for people who put trailing slashes in PATH elements.
+case $as_dir/ in #((
+  ./ | .// | /[cC]/* | \
+  /etc/* | /usr/sbin/* | /usr/etc/* | /sbin/* | /usr/afsws/bin/* | \
+  ?:[\\/]os2[\\/]install[\\/]* | ?:[\\/]OS2[\\/]INSTALL[\\/]* | \
+  /usr/ucb/* ) ;;
+  *)
+    # OSF1 and SCO ODT 3.0 have their own names for install.
+    # Don't use installbsd from OSF since it installs stuff as root
+    # by default.
+    for ac_prog in ginstall scoinst install; do
+      for ac_exec_ext in '' $ac_executable_extensions; do
+       if as_fn_executable_p "$as_dir/$ac_prog$ac_exec_ext"; then
+         if test $ac_prog = install &&
+           grep dspmsg "$as_dir/$ac_prog$ac_exec_ext" >/dev/null 2>&1; then
+           # AIX install.  It has an incompatible calling convention.
+           :
+         elif test $ac_prog = install &&
+           grep pwplus "$as_dir/$ac_prog$ac_exec_ext" >/dev/null 2>&1; then
+           # program-specific install script used by HP pwplus--don't use.
+           :
+         else
+           rm -rf conftest.one conftest.two conftest.dir
+           echo one > conftest.one
+           echo two > conftest.two
+           mkdir conftest.dir
+           if "$as_dir/$ac_prog$ac_exec_ext" -c conftest.one conftest.two "`pwd`/conftest.dir" &&
+             test -s conftest.one && test -s conftest.two &&
+             test -s conftest.dir/conftest.one &&
+             test -s conftest.dir/conftest.two
+           then
+             ac_cv_path_install="$as_dir/$ac_prog$ac_exec_ext -c"
+             break 3
+           fi
+         fi
+       fi
+      done
+    done
+    ;;
+esac
+
+  done
+IFS=$as_save_IFS
+
+rm -rf conftest.one conftest.two conftest.dir
+
+fi
+  if test "${ac_cv_path_install+set}" = set; then
+    INSTALL=$ac_cv_path_install
+  else
+    # As a last resort, use the slow shell script.  Don't cache a
+    # value for INSTALL within a source directory, because that will
+    # break other packages using the cache if that directory is
+    # removed, or if the value is a relative name.
+    INSTALL=$ac_install_sh
+  fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $INSTALL" >&5
+$as_echo "$INSTALL" >&6; }
+
+# Use test -z because SunOS4 sh mishandles braces in ${var-val}.
+# It thinks the first close brace ends the variable substitution.
+test -z "$INSTALL_PROGRAM" && INSTALL_PROGRAM='${INSTALL}'
+
+test -z "$INSTALL_SCRIPT" && INSTALL_SCRIPT='${INSTALL}'
+
+test -z "$INSTALL_DATA" && INSTALL_DATA='${INSTALL} -m 644'
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether build environment is sane" >&5
+$as_echo_n "checking whether build environment is sane... " >&6; }
+# Reject unsafe characters in $srcdir or the absolute working directory
+# name.  Accept space and tab only in the latter.
+am_lf='
+'
+case `pwd` in
+  *[\\\"\#\$\&\'\`$am_lf]*)
+    as_fn_error $? "unsafe absolute working directory name" "$LINENO" 5;;
+esac
+case $srcdir in
+  *[\\\"\#\$\&\'\`$am_lf\ \    ]*)
+    as_fn_error $? "unsafe srcdir value: '$srcdir'" "$LINENO" 5;;
+esac
+
+# Do 'set' in a subshell so we don't clobber the current shell's
+# arguments.  Must try -L first in case configure is actually a
+# symlink; some systems play weird games with the mod time of symlinks
+# (eg FreeBSD returns the mod time of the symlink's containing
+# directory).
+if (
+   am_has_slept=no
+   for am_try in 1 2; do
+     echo "timestamp, slept: $am_has_slept" > conftest.file
+     set X `ls -Lt "$srcdir/configure" conftest.file 2> /dev/null`
+     if test "$*" = "X"; then
+       # -L didn't work.
+       set X `ls -t "$srcdir/configure" conftest.file`
+     fi
+     if test "$*" != "X $srcdir/configure conftest.file" \
+       && test "$*" != "X conftest.file $srcdir/configure"; then
+
+       # If neither matched, then we have a broken ls.  This can happen
+       # if, for instance, CONFIG_SHELL is bash and it inherits a
+       # broken ls alias from the environment.  This has actually
+       # happened.  Such a system could not be considered "sane".
+       as_fn_error $? "ls -t appears to fail.  Make sure there is not a broken
+  alias in your environment" "$LINENO" 5
+     fi
+     if test "$2" = conftest.file || test $am_try -eq 2; then
+       break
+     fi
+     # Just in case.
+     sleep 1
+     am_has_slept=yes
+   done
+   test "$2" = conftest.file
+   )
+then
+   # Ok.
+   :
+else
+   as_fn_error $? "newly created file is older than distributed files!
+Check your system clock" "$LINENO" 5
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5
+$as_echo "yes" >&6; }
+# If we didn't sleep, we still need to ensure time stamps of config.status and
+# generated files are strictly newer.
+am_sleep_pid=
+if grep 'slept: no' conftest.file >/dev/null 2>&1; then
+  ( sleep 1 ) &
+  am_sleep_pid=$!
+fi
+
+rm -f conftest.file
+
+test "$program_prefix" != NONE &&
+  program_transform_name="s&^&$program_prefix&;$program_transform_name"
+# Use a double $ so make ignores it.
+test "$program_suffix" != NONE &&
+  program_transform_name="s&\$&$program_suffix&;$program_transform_name"
+# Double any \ or $.
+# By default was `s,x,x', remove it if useless.
+ac_script='s/[\\$]/&&/g;s/;s,x,x,$//'
+program_transform_name=`$as_echo "$program_transform_name" | sed "$ac_script"`
+
+# Expand $ac_aux_dir to an absolute path.
+am_aux_dir=`cd "$ac_aux_dir" && pwd`
+
+if test x"${MISSING+set}" != xset; then
+  case $am_aux_dir in
+  *\ * | *\    *)
+    MISSING="\${SHELL} \"$am_aux_dir/missing\"" ;;
+  *)
+    MISSING="\${SHELL} $am_aux_dir/missing" ;;
+  esac
+fi
+# Use eval to expand $SHELL
+if eval "$MISSING --is-lightweight"; then
+  am_missing_run="$MISSING "
+else
+  am_missing_run=
+  { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: 'missing' script is too old or missing" >&5
+$as_echo "$as_me: WARNING: 'missing' script is too old or missing" >&2;}
+fi
+
+if test x"${install_sh+set}" != xset; then
+  case $am_aux_dir in
+  *\ * | *\    *)
+    install_sh="\${SHELL} '$am_aux_dir/install-sh'" ;;
+  *)
+    install_sh="\${SHELL} $am_aux_dir/install-sh"
+  esac
+fi
+
+# Installed binaries are usually stripped using 'strip' when the user
+# run "make install-strip".  However 'strip' might not be the right
+# tool to use in cross-compilation environments, therefore Automake
+# will honor the 'STRIP' environment variable to overrule this program.
+if test "$cross_compiling" != no; then
+  if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}strip", so it can be a program name with args.
+set dummy ${ac_tool_prefix}strip; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_STRIP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$STRIP"; then
+  ac_cv_prog_STRIP="$STRIP" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_STRIP="${ac_tool_prefix}strip"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+STRIP=$ac_cv_prog_STRIP
+if test -n "$STRIP"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $STRIP" >&5
+$as_echo "$STRIP" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_STRIP"; then
+  ac_ct_STRIP=$STRIP
+  # Extract the first word of "strip", so it can be a program name with args.
+set dummy strip; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_STRIP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_STRIP"; then
+  ac_cv_prog_ac_ct_STRIP="$ac_ct_STRIP" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_STRIP="strip"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_STRIP=$ac_cv_prog_ac_ct_STRIP
+if test -n "$ac_ct_STRIP"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_STRIP" >&5
+$as_echo "$ac_ct_STRIP" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_STRIP" = x; then
+    STRIP=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    STRIP=$ac_ct_STRIP
+  fi
+else
+  STRIP="$ac_cv_prog_STRIP"
+fi
+
+fi
+INSTALL_STRIP_PROGRAM="\$(install_sh) -c -s"
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for a thread-safe mkdir -p" >&5
+$as_echo_n "checking for a thread-safe mkdir -p... " >&6; }
+if test -z "$MKDIR_P"; then
+  if ${ac_cv_path_mkdir+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH$PATH_SEPARATOR/opt/sfw/bin
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_prog in mkdir gmkdir; do
+        for ac_exec_ext in '' $ac_executable_extensions; do
+          as_fn_executable_p "$as_dir/$ac_prog$ac_exec_ext" || continue
+          case `"$as_dir/$ac_prog$ac_exec_ext" --version 2>&1` in #(
+            'mkdir (GNU coreutils) '* | \
+            'mkdir (coreutils) '* | \
+            'mkdir (fileutils) '4.1*)
+              ac_cv_path_mkdir=$as_dir/$ac_prog$ac_exec_ext
+              break 3;;
+          esac
+        done
+       done
+  done
+IFS=$as_save_IFS
+
+fi
+
+  test -d ./--version && rmdir ./--version
+  if test "${ac_cv_path_mkdir+set}" = set; then
+    MKDIR_P="$ac_cv_path_mkdir -p"
+  else
+    # As a last resort, use the slow shell script.  Don't cache a
+    # value for MKDIR_P within a source directory, because that will
+    # break other packages using the cache if that directory is
+    # removed, or if the value is a relative name.
+    MKDIR_P="$ac_install_sh -d"
+  fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $MKDIR_P" >&5
+$as_echo "$MKDIR_P" >&6; }
+
+for ac_prog in gawk mawk nawk awk
+do
+  # Extract the first word of "$ac_prog", so it can be a program name with args.
+set dummy $ac_prog; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_AWK+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$AWK"; then
+  ac_cv_prog_AWK="$AWK" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_AWK="$ac_prog"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+AWK=$ac_cv_prog_AWK
+if test -n "$AWK"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $AWK" >&5
+$as_echo "$AWK" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+  test -n "$AWK" && break
+done
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether ${MAKE-make} sets \$(MAKE)" >&5
+$as_echo_n "checking whether ${MAKE-make} sets \$(MAKE)... " >&6; }
+set x ${MAKE-make}
+ac_make=`$as_echo "$2" | sed 's/+/p/g; s/[^a-zA-Z0-9_]/_/g'`
+if eval \${ac_cv_prog_make_${ac_make}_set+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat >conftest.make <<\_ACEOF
+SHELL = /bin/sh
+all:
+       @echo '@@@%%%=$(MAKE)=@@@%%%'
+_ACEOF
+# GNU make sometimes prints "make[1]: Entering ...", which would confuse us.
+case `${MAKE-make} -f conftest.make 2>/dev/null` in
+  *@@@%%%=?*=@@@%%%*)
+    eval ac_cv_prog_make_${ac_make}_set=yes;;
+  *)
+    eval ac_cv_prog_make_${ac_make}_set=no;;
+esac
+rm -f conftest.make
+fi
+if eval test \$ac_cv_prog_make_${ac_make}_set = yes; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5
+$as_echo "yes" >&6; }
+  SET_MAKE=
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+  SET_MAKE="MAKE=${MAKE-make}"
+fi
+
+rm -rf .tst 2>/dev/null
+mkdir .tst 2>/dev/null
+if test -d .tst; then
+  am__leading_dot=.
+else
+  am__leading_dot=_
+fi
+rmdir .tst 2>/dev/null
+
+# Check whether --enable-silent-rules was given.
+if test "${enable_silent_rules+set}" = set; then :
+  enableval=$enable_silent_rules;
+fi
+
+case $enable_silent_rules in # (((
+  yes) AM_DEFAULT_VERBOSITY=0;;
+   no) AM_DEFAULT_VERBOSITY=1;;
+    *) AM_DEFAULT_VERBOSITY=1;;
+esac
+am_make=${MAKE-make}
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $am_make supports nested variables" >&5
+$as_echo_n "checking whether $am_make supports nested variables... " >&6; }
+if ${am_cv_make_support_nested_variables+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if $as_echo 'TRUE=$(BAR$(V))
+BAR0=false
+BAR1=true
+V=1
+am__doit:
+       @$(TRUE)
+.PHONY: am__doit' | $am_make -f - >/dev/null 2>&1; then
+  am_cv_make_support_nested_variables=yes
+else
+  am_cv_make_support_nested_variables=no
+fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $am_cv_make_support_nested_variables" >&5
+$as_echo "$am_cv_make_support_nested_variables" >&6; }
+if test $am_cv_make_support_nested_variables = yes; then
+    AM_V='$(V)'
+  AM_DEFAULT_V='$(AM_DEFAULT_VERBOSITY)'
+else
+  AM_V=$AM_DEFAULT_VERBOSITY
+  AM_DEFAULT_V=$AM_DEFAULT_VERBOSITY
+fi
+AM_BACKSLASH='\'
+
+if test "`cd $srcdir && pwd`" != "`pwd`"; then
+  # Use -I$(srcdir) only when $(srcdir) != ., so that make's output
+  # is not polluted with repeated "-I."
+  am__isrc=' -I$(srcdir)'
+  # test to see if srcdir already configured
+  if test -f $srcdir/config.status; then
+    as_fn_error $? "source directory already configured; run \"make distclean\" there first" "$LINENO" 5
+  fi
+fi
+
+# test whether we have cygpath
+if test -z "$CYGPATH_W"; then
+  if (cygpath --version) >/dev/null 2>/dev/null; then
+    CYGPATH_W='cygpath -w'
+  else
+    CYGPATH_W=echo
+  fi
+fi
+
+
+# Define the identity of the package.
+ PACKAGE='libffcall'
+ VERSION='2.2'
+
+
+cat >>confdefs.h <<_ACEOF
+#define PACKAGE "$PACKAGE"
+_ACEOF
+
+
+cat >>confdefs.h <<_ACEOF
+#define VERSION "$VERSION"
+_ACEOF
+
+# Some tools Automake needs.
+
+ACLOCAL=${ACLOCAL-"${am_missing_run}aclocal-${am__api_version}"}
+
+
+AUTOCONF=${AUTOCONF-"${am_missing_run}autoconf"}
+
+
+AUTOMAKE=${AUTOMAKE-"${am_missing_run}automake-${am__api_version}"}
+
+
+AUTOHEADER=${AUTOHEADER-"${am_missing_run}autoheader"}
+
+
+MAKEINFO=${MAKEINFO-"${am_missing_run}makeinfo"}
+
+# For better backward compatibility.  To be removed once Automake 1.9.x
+# dies out for good.  For more background, see:
+# <http://lists.gnu.org/archive/html/automake/2012-07/msg00001.html>
+# <http://lists.gnu.org/archive/html/automake/2012-07/msg00014.html>
+mkdir_p='$(MKDIR_P)'
+
+# We need awk for the "check" target (and possibly the TAP driver).  The
+# system "awk" is bad on some platforms.
+# Always define AMTAR for backward compatibility.  Yes, it's still used
+# in the wild :-(  We should find a proper way to deprecate it ...
+AMTAR='$${TAR-tar}'
+
+
+# We'll loop over all known methods to create a tar archive until one works.
+_am_tools='gnutar  pax cpio none'
+
+am__tar='$${TAR-tar} chof - "$$tardir"' am__untar='$${TAR-tar} xf -'
+
+
+
+
+
+
+# POSIX will say in a future version that running "rm -f" with no argument
+# is OK; and we want to be able to make that assumption in our Makefile
+# recipes.  So use an aggressive probe to check that the usage we want is
+# actually supported "in the wild" to an acceptable degree.
+# See automake bug#10828.
+# To make any issue more visible, cause the running configure to be aborted
+# by default if the 'rm' program in use doesn't match our expectations; the
+# user can still override this though.
+if rm -f && rm -fr && rm -rf; then : OK; else
+  cat >&2 <<'END'
+Oops!
+
+Your 'rm' program seems unable to run without file operands specified
+on the command line, even when the '-f' option is present.  This is contrary
+to the behaviour of most rm programs out there, and not conforming with
+the upcoming POSIX standard: <http://austingroupbugs.net/view.php?id=542>
+
+Please tell bug-automake@gnu.org about your system, including the value
+of your $PATH and any error possibly output before this message.  This
+can help us improve future automake versions.
+
+END
+  if test x"$ACCEPT_INFERIOR_RM_PROGRAM" = x"yes"; then
+    echo 'Configuration will proceed anyway, since you have set the' >&2
+    echo 'ACCEPT_INFERIOR_RM_PROGRAM variable to "yes"' >&2
+    echo >&2
+  else
+    cat >&2 <<'END'
+Aborting the configuration process, to ensure you take notice of the issue.
+
+You can download and install GNU coreutils to get an 'rm' implementation
+that behaves properly: <http://www.gnu.org/software/coreutils/>.
+
+If you want to complete the configuration process using your problematic
+'rm' anyway, export the environment variable ACCEPT_INFERIOR_RM_PROGRAM
+to "yes", and re-run configure.
+
+END
+    as_fn_error $? "Your 'rm' program is bad, sorry." "$LINENO" 5
+  fi
+fi
+
+
+
+
+ac_config_headers="$ac_config_headers config.h"
+
+ac_config_headers="$ac_config_headers ffcall-version.h:ffcall-version.in.h"
+
+
+ac_config_files="$ac_config_files Makefile"
+
+ac_config_files="$ac_config_files gnulib-lib/Makefile"
+
+ac_config_files="$ac_config_files avcall/Makefile"
+
+ac_config_files="$ac_config_files vacall/Makefile"
+
+ac_config_files="$ac_config_files trampoline/Makefile"
+
+ac_config_files="$ac_config_files callback/Makefile"
+
+ac_config_files="$ac_config_files callback/vacall_r/Makefile"
+
+ac_config_files="$ac_config_files callback/trampoline_r/Makefile"
+
+
+
+sed_extract_major='/^[0-9]/{s/^\([0-9]*\).*/\1/p;q;}
+i\
+0
+q
+'
+sed_extract_minor='/^[0-9][0-9]*[.][0-9]/{s/^[0-9]*[.]\([0-9]*\).*/\1/p;q;}
+i\
+0
+q
+'
+
+version_major=`echo "${PACKAGE_VERSION}" | sed -n -e "$sed_extract_major"`
+version_minor=`echo "${PACKAGE_VERSION}" | sed -n -e "$sed_extract_minor"`
+HEXVERSION=`printf '0x%02X%02X' $version_major $version_minor`
+
+cat >>confdefs.h <<_ACEOF
+#define LIBFFCALL_VERSION $HEXVERSION
+_ACEOF
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether ${MAKE-make} sets \$(MAKE)" >&5
+$as_echo_n "checking whether ${MAKE-make} sets \$(MAKE)... " >&6; }
+set x ${MAKE-make}
+ac_make=`$as_echo "$2" | sed 's/+/p/g; s/[^a-zA-Z0-9_]/_/g'`
+if eval \${ac_cv_prog_make_${ac_make}_set+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat >conftest.make <<\_ACEOF
+SHELL = /bin/sh
+all:
+       @echo '@@@%%%=$(MAKE)=@@@%%%'
+_ACEOF
+# GNU make sometimes prints "make[1]: Entering ...", which would confuse us.
+case `${MAKE-make} -f conftest.make 2>/dev/null` in
+  *@@@%%%=?*=@@@%%%*)
+    eval ac_cv_prog_make_${ac_make}_set=yes;;
+  *)
+    eval ac_cv_prog_make_${ac_make}_set=no;;
+esac
+rm -f conftest.make
+fi
+if eval test \$ac_cv_prog_make_${ac_make}_set = yes; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5
+$as_echo "yes" >&6; }
+  SET_MAKE=
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+  SET_MAKE="MAKE=${MAKE-make}"
+fi
+
+
+ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}gcc", so it can be a program name with args.
+set dummy ${ac_tool_prefix}gcc; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_CC+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$CC"; then
+  ac_cv_prog_CC="$CC" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_CC="${ac_tool_prefix}gcc"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+CC=$ac_cv_prog_CC
+if test -n "$CC"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CC" >&5
+$as_echo "$CC" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_CC"; then
+  ac_ct_CC=$CC
+  # Extract the first word of "gcc", so it can be a program name with args.
+set dummy gcc; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_CC+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_CC"; then
+  ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_CC="gcc"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_CC=$ac_cv_prog_ac_ct_CC
+if test -n "$ac_ct_CC"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5
+$as_echo "$ac_ct_CC" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_CC" = x; then
+    CC=""
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    CC=$ac_ct_CC
+  fi
+else
+  CC="$ac_cv_prog_CC"
+fi
+
+if test -z "$CC"; then
+          if test -n "$ac_tool_prefix"; then
+    # Extract the first word of "${ac_tool_prefix}cc", so it can be a program name with args.
+set dummy ${ac_tool_prefix}cc; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_CC+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$CC"; then
+  ac_cv_prog_CC="$CC" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_CC="${ac_tool_prefix}cc"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+CC=$ac_cv_prog_CC
+if test -n "$CC"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CC" >&5
+$as_echo "$CC" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+  fi
+fi
+if test -z "$CC"; then
+  # Extract the first word of "cc", so it can be a program name with args.
+set dummy cc; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_CC+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$CC"; then
+  ac_cv_prog_CC="$CC" # Let the user override the test.
+else
+  ac_prog_rejected=no
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    if test "$as_dir/$ac_word$ac_exec_ext" = "/usr/ucb/cc"; then
+       ac_prog_rejected=yes
+       continue
+     fi
+    ac_cv_prog_CC="cc"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+if test $ac_prog_rejected = yes; then
+  # We found a bogon in the path, so make sure we never use it.
+  set dummy $ac_cv_prog_CC
+  shift
+  if test $# != 0; then
+    # We chose a different compiler from the bogus one.
+    # However, it has the same basename, so the bogon will be chosen
+    # first if we set CC to just the basename; use the full file name.
+    shift
+    ac_cv_prog_CC="$as_dir/$ac_word${1+' '}$@"
+  fi
+fi
+fi
+fi
+CC=$ac_cv_prog_CC
+if test -n "$CC"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CC" >&5
+$as_echo "$CC" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$CC"; then
+  if test -n "$ac_tool_prefix"; then
+  for ac_prog in cl.exe
+  do
+    # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args.
+set dummy $ac_tool_prefix$ac_prog; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_CC+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$CC"; then
+  ac_cv_prog_CC="$CC" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_CC="$ac_tool_prefix$ac_prog"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+CC=$ac_cv_prog_CC
+if test -n "$CC"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CC" >&5
+$as_echo "$CC" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+    test -n "$CC" && break
+  done
+fi
+if test -z "$CC"; then
+  ac_ct_CC=$CC
+  for ac_prog in cl.exe
+do
+  # Extract the first word of "$ac_prog", so it can be a program name with args.
+set dummy $ac_prog; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_CC+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_CC"; then
+  ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_CC="$ac_prog"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_CC=$ac_cv_prog_ac_ct_CC
+if test -n "$ac_ct_CC"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5
+$as_echo "$ac_ct_CC" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+  test -n "$ac_ct_CC" && break
+done
+
+  if test "x$ac_ct_CC" = x; then
+    CC=""
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    CC=$ac_ct_CC
+  fi
+fi
+
+fi
+
+
+test -z "$CC" && { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
+as_fn_error $? "no acceptable C compiler found in \$PATH
+See \`config.log' for more details" "$LINENO" 5; }
+
+# Provide some information about the compiler.
+$as_echo "$as_me:${as_lineno-$LINENO}: checking for C compiler version" >&5
+set X $ac_compile
+ac_compiler=$2
+for ac_option in --version -v -V -qversion; do
+  { { ac_try="$ac_compiler $ac_option >&5"
+case "(($ac_try" in
+  *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
+  *) ac_try_echo=$ac_try;;
+esac
+eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
+$as_echo "$ac_try_echo"; } >&5
+  (eval "$ac_compiler $ac_option >&5") 2>conftest.err
+  ac_status=$?
+  if test -s conftest.err; then
+    sed '10a\
+... rest of stderr output deleted ...
+         10q' conftest.err >conftest.er1
+    cat conftest.er1 >&5
+  fi
+  rm -f conftest.er1 conftest.err
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }
+done
+
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+ac_clean_files_save=$ac_clean_files
+ac_clean_files="$ac_clean_files a.out a.out.dSYM a.exe b.out"
+# Try to create an executable without -o first, disregard a.out.
+# It will help us diagnose broken compilers, and finding out an intuition
+# of exeext.
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the C compiler works" >&5
+$as_echo_n "checking whether the C compiler works... " >&6; }
+ac_link_default=`$as_echo "$ac_link" | sed 's/ -o *conftest[^ ]*//'`
+
+# The possible output files:
+ac_files="a.out conftest.exe conftest a.exe a_out.exe b.out conftest.*"
+
+ac_rmfiles=
+for ac_file in $ac_files
+do
+  case $ac_file in
+    *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj ) ;;
+    * ) ac_rmfiles="$ac_rmfiles $ac_file";;
+  esac
+done
+rm -f $ac_rmfiles
+
+if { { ac_try="$ac_link_default"
+case "(($ac_try" in
+  *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
+  *) ac_try_echo=$ac_try;;
+esac
+eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
+$as_echo "$ac_try_echo"; } >&5
+  (eval "$ac_link_default") 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; then :
+  # Autoconf-2.13 could set the ac_cv_exeext variable to `no'.
+# So ignore a value of `no', otherwise this would lead to `EXEEXT = no'
+# in a Makefile.  We should not override ac_cv_exeext if it was cached,
+# so that the user can short-circuit this test for compilers unknown to
+# Autoconf.
+for ac_file in $ac_files ''
+do
+  test -f "$ac_file" || continue
+  case $ac_file in
+    *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj )
+       ;;
+    [ab].out )
+       # We found the default executable, but exeext='' is most
+       # certainly right.
+       break;;
+    *.* )
+       if test "${ac_cv_exeext+set}" = set && test "$ac_cv_exeext" != no;
+       then :; else
+          ac_cv_exeext=`expr "$ac_file" : '[^.]*\(\..*\)'`
+       fi
+       # We set ac_cv_exeext here because the later test for it is not
+       # safe: cross compilers may not add the suffix if given an `-o'
+       # argument, so we may need to know it at that point already.
+       # Even if this section looks crufty: it has the advantage of
+       # actually working.
+       break;;
+    * )
+       break;;
+  esac
+done
+test "$ac_cv_exeext" = no && ac_cv_exeext=
+
+else
+  ac_file=''
+fi
+if test -z "$ac_file"; then :
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+$as_echo "$as_me: failed program was:" >&5
+sed 's/^/| /' conftest.$ac_ext >&5
+
+{ { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
+as_fn_error 77 "C compiler cannot create executables
+See \`config.log' for more details" "$LINENO" 5; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5
+$as_echo "yes" >&6; }
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for C compiler default output file name" >&5
+$as_echo_n "checking for C compiler default output file name... " >&6; }
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_file" >&5
+$as_echo "$ac_file" >&6; }
+ac_exeext=$ac_cv_exeext
+
+rm -f -r a.out a.out.dSYM a.exe conftest$ac_cv_exeext b.out
+ac_clean_files=$ac_clean_files_save
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for suffix of executables" >&5
+$as_echo_n "checking for suffix of executables... " >&6; }
+if { { ac_try="$ac_link"
+case "(($ac_try" in
+  *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
+  *) ac_try_echo=$ac_try;;
+esac
+eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
+$as_echo "$ac_try_echo"; } >&5
+  (eval "$ac_link") 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; then :
+  # If both `conftest.exe' and `conftest' are `present' (well, observable)
+# catch `conftest.exe'.  For instance with Cygwin, `ls conftest' will
+# work properly (i.e., refer to `conftest.exe'), while it won't with
+# `rm'.
+for ac_file in conftest.exe conftest conftest.*; do
+  test -f "$ac_file" || continue
+  case $ac_file in
+    *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj ) ;;
+    *.* ) ac_cv_exeext=`expr "$ac_file" : '[^.]*\(\..*\)'`
+         break;;
+    * ) break;;
+  esac
+done
+else
+  { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
+as_fn_error $? "cannot compute suffix of executables: cannot compile and link
+See \`config.log' for more details" "$LINENO" 5; }
+fi
+rm -f conftest conftest$ac_cv_exeext
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_exeext" >&5
+$as_echo "$ac_cv_exeext" >&6; }
+
+rm -f conftest.$ac_ext
+EXEEXT=$ac_cv_exeext
+ac_exeext=$EXEEXT
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <stdio.h>
+int
+main ()
+{
+FILE *f = fopen ("conftest.out", "w");
+ return ferror (f) || fclose (f) != 0;
+
+  ;
+  return 0;
+}
+_ACEOF
+ac_clean_files="$ac_clean_files conftest.out"
+# Check that the compiler produces executables we can run.  If not, either
+# the compiler is broken, or we cross compile.
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether we are cross compiling" >&5
+$as_echo_n "checking whether we are cross compiling... " >&6; }
+if test "$cross_compiling" != yes; then
+  { { ac_try="$ac_link"
+case "(($ac_try" in
+  *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
+  *) ac_try_echo=$ac_try;;
+esac
+eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
+$as_echo "$ac_try_echo"; } >&5
+  (eval "$ac_link") 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }
+  if { ac_try='./conftest$ac_cv_exeext'
+  { { case "(($ac_try" in
+  *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
+  *) ac_try_echo=$ac_try;;
+esac
+eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
+$as_echo "$ac_try_echo"; } >&5
+  (eval "$ac_try") 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; }; then
+    cross_compiling=no
+  else
+    if test "$cross_compiling" = maybe; then
+       cross_compiling=yes
+    else
+       { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
+as_fn_error $? "cannot run C compiled programs.
+If you meant to cross compile, use \`--host'.
+See \`config.log' for more details" "$LINENO" 5; }
+    fi
+  fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $cross_compiling" >&5
+$as_echo "$cross_compiling" >&6; }
+
+rm -f conftest.$ac_ext conftest$ac_cv_exeext conftest.out
+ac_clean_files=$ac_clean_files_save
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for suffix of object files" >&5
+$as_echo_n "checking for suffix of object files... " >&6; }
+if ${ac_cv_objext+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+rm -f conftest.o conftest.obj
+if { { ac_try="$ac_compile"
+case "(($ac_try" in
+  *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
+  *) ac_try_echo=$ac_try;;
+esac
+eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
+$as_echo "$ac_try_echo"; } >&5
+  (eval "$ac_compile") 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; then :
+  for ac_file in conftest.o conftest.obj conftest.*; do
+  test -f "$ac_file" || continue;
+  case $ac_file in
+    *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM ) ;;
+    *) ac_cv_objext=`expr "$ac_file" : '.*\.\(.*\)'`
+       break;;
+  esac
+done
+else
+  $as_echo "$as_me: failed program was:" >&5
+sed 's/^/| /' conftest.$ac_ext >&5
+
+{ { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
+as_fn_error $? "cannot compute suffix of object files: cannot compile
+See \`config.log' for more details" "$LINENO" 5; }
+fi
+rm -f conftest.$ac_cv_objext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_objext" >&5
+$as_echo "$ac_cv_objext" >&6; }
+OBJEXT=$ac_cv_objext
+ac_objext=$OBJEXT
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether we are using the GNU C compiler" >&5
+$as_echo_n "checking whether we are using the GNU C compiler... " >&6; }
+if ${ac_cv_c_compiler_gnu+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+#ifndef __GNUC__
+       choke me
+#endif
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_compiler_gnu=yes
+else
+  ac_compiler_gnu=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+ac_cv_c_compiler_gnu=$ac_compiler_gnu
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_compiler_gnu" >&5
+$as_echo "$ac_cv_c_compiler_gnu" >&6; }
+if test $ac_compiler_gnu = yes; then
+  GCC=yes
+else
+  GCC=
+fi
+ac_test_CFLAGS=${CFLAGS+set}
+ac_save_CFLAGS=$CFLAGS
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $CC accepts -g" >&5
+$as_echo_n "checking whether $CC accepts -g... " >&6; }
+if ${ac_cv_prog_cc_g+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_save_c_werror_flag=$ac_c_werror_flag
+   ac_c_werror_flag=yes
+   ac_cv_prog_cc_g=no
+   CFLAGS="-g"
+   cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_cv_prog_cc_g=yes
+else
+  CFLAGS=""
+      cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+
+else
+  ac_c_werror_flag=$ac_save_c_werror_flag
+        CFLAGS="-g"
+        cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_cv_prog_cc_g=yes
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+   ac_c_werror_flag=$ac_save_c_werror_flag
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_g" >&5
+$as_echo "$ac_cv_prog_cc_g" >&6; }
+if test "$ac_test_CFLAGS" = set; then
+  CFLAGS=$ac_save_CFLAGS
+elif test $ac_cv_prog_cc_g = yes; then
+  if test "$GCC" = yes; then
+    CFLAGS="-g -O2"
+  else
+    CFLAGS="-g"
+  fi
+else
+  if test "$GCC" = yes; then
+    CFLAGS="-O2"
+  else
+    CFLAGS=
+  fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $CC option to accept ISO C89" >&5
+$as_echo_n "checking for $CC option to accept ISO C89... " >&6; }
+if ${ac_cv_prog_cc_c89+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_cv_prog_cc_c89=no
+ac_save_CC=$CC
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <stdarg.h>
+#include <stdio.h>
+struct stat;
+/* Most of the following tests are stolen from RCS 5.7's src/conf.sh.  */
+struct buf { int x; };
+FILE * (*rcsopen) (struct buf *, struct stat *, int);
+static char *e (p, i)
+     char **p;
+     int i;
+{
+  return p[i];
+}
+static char *f (char * (*g) (char **, int), char **p, ...)
+{
+  char *s;
+  va_list v;
+  va_start (v,p);
+  s = g (p, va_arg (v,int));
+  va_end (v);
+  return s;
+}
+
+/* OSF 4.0 Compaq cc is some sort of almost-ANSI by default.  It has
+   function prototypes and stuff, but not '\xHH' hex character constants.
+   These don't provoke an error unfortunately, instead are silently treated
+   as 'x'.  The following induces an error, until -std is added to get
+   proper ANSI mode.  Curiously '\x00'!='x' always comes out true, for an
+   array size at least.  It's necessary to write '\x00'==0 to get something
+   that's true only with -std.  */
+int osf4_cc_array ['\x00' == 0 ? 1 : -1];
+
+/* IBM C 6 for AIX is almost-ANSI by default, but it replaces macro parameters
+   inside strings and character constants.  */
+#define FOO(x) 'x'
+int xlc6_cc_array[FOO(a) == 'x' ? 1 : -1];
+
+int test (int i, double x);
+struct s1 {int (*f) (int a);};
+struct s2 {int (*f) (double a);};
+int pairnames (int, char **, FILE *(*)(struct buf *, struct stat *, int), int, int);
+int argc;
+char **argv;
+int
+main ()
+{
+return f (e, argv, 0) != argv[0]  ||  f (e, argv, 1) != argv[1];
+  ;
+  return 0;
+}
+_ACEOF
+for ac_arg in '' -qlanglvl=extc89 -qlanglvl=ansi -std \
+       -Ae "-Aa -D_HPUX_SOURCE" "-Xc -D__EXTENSIONS__"
+do
+  CC="$ac_save_CC $ac_arg"
+  if ac_fn_c_try_compile "$LINENO"; then :
+  ac_cv_prog_cc_c89=$ac_arg
+fi
+rm -f core conftest.err conftest.$ac_objext
+  test "x$ac_cv_prog_cc_c89" != "xno" && break
+done
+rm -f conftest.$ac_ext
+CC=$ac_save_CC
+
+fi
+# AC_CACHE_VAL
+case "x$ac_cv_prog_cc_c89" in
+  x)
+    { $as_echo "$as_me:${as_lineno-$LINENO}: result: none needed" >&5
+$as_echo "none needed" >&6; } ;;
+  xno)
+    { $as_echo "$as_me:${as_lineno-$LINENO}: result: unsupported" >&5
+$as_echo "unsupported" >&6; } ;;
+  *)
+    CC="$CC $ac_cv_prog_cc_c89"
+    { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_c89" >&5
+$as_echo "$ac_cv_prog_cc_c89" >&6; } ;;
+esac
+if test "x$ac_cv_prog_cc_c89" != xno; then :
+
+fi
+
+ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $CC understands -c and -o together" >&5
+$as_echo_n "checking whether $CC understands -c and -o together... " >&6; }
+if ${am_cv_prog_cc_c_o+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+  # Make sure it works both with $CC and with simple cc.
+  # Following AC_PROG_CC_C_O, we do the test twice because some
+  # compilers refuse to overwrite an existing .o file with -o,
+  # though they will create one.
+  am_cv_prog_cc_c_o=yes
+  for am_i in 1 2; do
+    if { echo "$as_me:$LINENO: $CC -c conftest.$ac_ext -o conftest2.$ac_objext" >&5
+   ($CC -c conftest.$ac_ext -o conftest2.$ac_objext) >&5 2>&5
+   ac_status=$?
+   echo "$as_me:$LINENO: \$? = $ac_status" >&5
+   (exit $ac_status); } \
+         && test -f conftest2.$ac_objext; then
+      : OK
+    else
+      am_cv_prog_cc_c_o=no
+      break
+    fi
+  done
+  rm -f core conftest*
+  unset am_i
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $am_cv_prog_cc_c_o" >&5
+$as_echo "$am_cv_prog_cc_c_o" >&6; }
+if test "$am_cv_prog_cc_c_o" != yes; then
+   # Losing compiler, so override with the script.
+   # FIXME: It is wrong to rewrite CC.
+   # But if we don't then we get into trouble of one sort or another.
+   # A longer-term fix would be to have automake use am__CC in this case,
+   # and then we could set am__CC="\$(top_srcdir)/compile \$(CC)"
+   CC="$am_aux_dir/compile $CC"
+fi
+ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+DEPDIR="${am__leading_dot}deps"
+
+ac_config_commands="$ac_config_commands depfiles"
+
+
+am_make=${MAKE-make}
+cat > confinc << 'END'
+am__doit:
+       @echo this is the am__doit target
+.PHONY: am__doit
+END
+# If we don't find an include directive, just comment out the code.
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for style of include used by $am_make" >&5
+$as_echo_n "checking for style of include used by $am_make... " >&6; }
+am__include="#"
+am__quote=
+_am_result=none
+# First try GNU make style include.
+echo "include confinc" > confmf
+# Ignore all kinds of additional output from 'make'.
+case `$am_make -s -f confmf 2> /dev/null` in #(
+*the\ am__doit\ target*)
+  am__include=include
+  am__quote=
+  _am_result=GNU
+  ;;
+esac
+# Now try BSD make style include.
+if test "$am__include" = "#"; then
+   echo '.include "confinc"' > confmf
+   case `$am_make -s -f confmf 2> /dev/null` in #(
+   *the\ am__doit\ target*)
+     am__include=.include
+     am__quote="\""
+     _am_result=BSD
+     ;;
+   esac
+fi
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $_am_result" >&5
+$as_echo "$_am_result" >&6; }
+rm -f confinc confmf
+
+# Check whether --enable-dependency-tracking was given.
+if test "${enable_dependency_tracking+set}" = set; then :
+  enableval=$enable_dependency_tracking;
+fi
+
+if test "x$enable_dependency_tracking" != xno; then
+  am_depcomp="$ac_aux_dir/depcomp"
+  AMDEPBACKSLASH='\'
+  am__nodep='_no'
+fi
+ if test "x$enable_dependency_tracking" != xno; then
+  AMDEP_TRUE=
+  AMDEP_FALSE='#'
+else
+  AMDEP_TRUE='#'
+  AMDEP_FALSE=
+fi
+
+
+
+depcc="$CC"   am_compiler_list=
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking dependency style of $depcc" >&5
+$as_echo_n "checking dependency style of $depcc... " >&6; }
+if ${am_cv_CC_dependencies_compiler_type+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then
+  # We make a subdir and do the tests there.  Otherwise we can end up
+  # making bogus files that we don't know about and never remove.  For
+  # instance it was reported that on HP-UX the gcc test will end up
+  # making a dummy file named 'D' -- because '-MD' means "put the output
+  # in D".
+  rm -rf conftest.dir
+  mkdir conftest.dir
+  # Copy depcomp to subdir because otherwise we won't find it if we're
+  # using a relative directory.
+  cp "$am_depcomp" conftest.dir
+  cd conftest.dir
+  # We will build objects and dependencies in a subdirectory because
+  # it helps to detect inapplicable dependency modes.  For instance
+  # both Tru64's cc and ICC support -MD to output dependencies as a
+  # side effect of compilation, but ICC will put the dependencies in
+  # the current directory while Tru64 will put them in the object
+  # directory.
+  mkdir sub
+
+  am_cv_CC_dependencies_compiler_type=none
+  if test "$am_compiler_list" = ""; then
+     am_compiler_list=`sed -n 's/^#*\([a-zA-Z0-9]*\))$/\1/p' < ./depcomp`
+  fi
+  am__universal=false
+  case " $depcc " in #(
+     *\ -arch\ *\ -arch\ *) am__universal=true ;;
+     esac
+
+  for depmode in $am_compiler_list; do
+    # Setup a source with many dependencies, because some compilers
+    # like to wrap large dependency lists on column 80 (with \), and
+    # we should not choose a depcomp mode which is confused by this.
+    #
+    # We need to recreate these files for each test, as the compiler may
+    # overwrite some of them when testing with obscure command lines.
+    # This happens at least with the AIX C compiler.
+    : > sub/conftest.c
+    for i in 1 2 3 4 5 6; do
+      echo '#include "conftst'$i'.h"' >> sub/conftest.c
+      # Using ": > sub/conftst$i.h" creates only sub/conftst1.h with
+      # Solaris 10 /bin/sh.
+      echo '/* dummy */' > sub/conftst$i.h
+    done
+    echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf
+
+    # We check with '-c' and '-o' for the sake of the "dashmstdout"
+    # mode.  It turns out that the SunPro C++ compiler does not properly
+    # handle '-M -o', and we need to detect this.  Also, some Intel
+    # versions had trouble with output in subdirs.
+    am__obj=sub/conftest.${OBJEXT-o}
+    am__minus_obj="-o $am__obj"
+    case $depmode in
+    gcc)
+      # This depmode causes a compiler race in universal mode.
+      test "$am__universal" = false || continue
+      ;;
+    nosideeffect)
+      # After this tag, mechanisms are not by side-effect, so they'll
+      # only be used when explicitly requested.
+      if test "x$enable_dependency_tracking" = xyes; then
+       continue
+      else
+       break
+      fi
+      ;;
+    msvc7 | msvc7msys | msvisualcpp | msvcmsys)
+      # This compiler won't grok '-c -o', but also, the minuso test has
+      # not run yet.  These depmodes are late enough in the game, and
+      # so weak that their functioning should not be impacted.
+      am__obj=conftest.${OBJEXT-o}
+      am__minus_obj=
+      ;;
+    none) break ;;
+    esac
+    if depmode=$depmode \
+       source=sub/conftest.c object=$am__obj \
+       depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \
+       $SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \
+         >/dev/null 2>conftest.err &&
+       grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 &&
+       grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 &&
+       grep $am__obj sub/conftest.Po > /dev/null 2>&1 &&
+       ${MAKE-make} -s -f confmf > /dev/null 2>&1; then
+      # icc doesn't choke on unknown options, it will just issue warnings
+      # or remarks (even with -Werror).  So we grep stderr for any message
+      # that says an option was ignored or not supported.
+      # When given -MP, icc 7.0 and 7.1 complain thusly:
+      #   icc: Command line warning: ignoring option '-M'; no argument required
+      # The diagnosis changed in icc 8.0:
+      #   icc: Command line remark: option '-MP' not supported
+      if (grep 'ignoring option' conftest.err ||
+          grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else
+        am_cv_CC_dependencies_compiler_type=$depmode
+        break
+      fi
+    fi
+  done
+
+  cd ..
+  rm -rf conftest.dir
+else
+  am_cv_CC_dependencies_compiler_type=none
+fi
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $am_cv_CC_dependencies_compiler_type" >&5
+$as_echo "$am_cv_CC_dependencies_compiler_type" >&6; }
+CCDEPMODE=depmode=$am_cv_CC_dependencies_compiler_type
+
+ if
+  test "x$enable_dependency_tracking" != xno \
+  && test "$am_cv_CC_dependencies_compiler_type" = gcc3; then
+  am__fastdepCC_TRUE=
+  am__fastdepCC_FALSE='#'
+else
+  am__fastdepCC_TRUE='#'
+  am__fastdepCC_FALSE=
+fi
+
+
+ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking how to run the C preprocessor" >&5
+$as_echo_n "checking how to run the C preprocessor... " >&6; }
+# On Suns, sometimes $CPP names a directory.
+if test -n "$CPP" && test -d "$CPP"; then
+  CPP=
+fi
+if test -z "$CPP"; then
+  if ${ac_cv_prog_CPP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+      # Double quotes because CPP needs to be expanded
+    for CPP in "$CC -E" "$CC -E -traditional-cpp" "/lib/cpp"
+    do
+      ac_preproc_ok=false
+for ac_c_preproc_warn_flag in '' yes
+do
+  # Use a header file that comes with gcc, so configuring glibc
+  # with a fresh cross-compiler works.
+  # Prefer <limits.h> to <assert.h> if __STDC__ is defined, since
+  # <limits.h> exists even on freestanding compilers.
+  # On the NeXT, cc -E runs the code through the compiler's parser,
+  # not just through cpp. "Syntax error" is here to catch this case.
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#ifdef __STDC__
+# include <limits.h>
+#else
+# include <assert.h>
+#endif
+                    Syntax error
+_ACEOF
+if ac_fn_c_try_cpp "$LINENO"; then :
+
+else
+  # Broken: fails on valid input.
+continue
+fi
+rm -f conftest.err conftest.i conftest.$ac_ext
+
+  # OK, works on sane cases.  Now check whether nonexistent headers
+  # can be detected and how.
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <ac_nonexistent.h>
+_ACEOF
+if ac_fn_c_try_cpp "$LINENO"; then :
+  # Broken: success on invalid input.
+continue
+else
+  # Passes both tests.
+ac_preproc_ok=:
+break
+fi
+rm -f conftest.err conftest.i conftest.$ac_ext
+
+done
+# Because of `break', _AC_PREPROC_IFELSE's cleaning code was skipped.
+rm -f conftest.i conftest.err conftest.$ac_ext
+if $ac_preproc_ok; then :
+  break
+fi
+
+    done
+    ac_cv_prog_CPP=$CPP
+
+fi
+  CPP=$ac_cv_prog_CPP
+else
+  ac_cv_prog_CPP=$CPP
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $CPP" >&5
+$as_echo "$CPP" >&6; }
+ac_preproc_ok=false
+for ac_c_preproc_warn_flag in '' yes
+do
+  # Use a header file that comes with gcc, so configuring glibc
+  # with a fresh cross-compiler works.
+  # Prefer <limits.h> to <assert.h> if __STDC__ is defined, since
+  # <limits.h> exists even on freestanding compilers.
+  # On the NeXT, cc -E runs the code through the compiler's parser,
+  # not just through cpp. "Syntax error" is here to catch this case.
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#ifdef __STDC__
+# include <limits.h>
+#else
+# include <assert.h>
+#endif
+                    Syntax error
+_ACEOF
+if ac_fn_c_try_cpp "$LINENO"; then :
+
+else
+  # Broken: fails on valid input.
+continue
+fi
+rm -f conftest.err conftest.i conftest.$ac_ext
+
+  # OK, works on sane cases.  Now check whether nonexistent headers
+  # can be detected and how.
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <ac_nonexistent.h>
+_ACEOF
+if ac_fn_c_try_cpp "$LINENO"; then :
+  # Broken: success on invalid input.
+continue
+else
+  # Passes both tests.
+ac_preproc_ok=:
+break
+fi
+rm -f conftest.err conftest.i conftest.$ac_ext
+
+done
+# Because of `break', _AC_PREPROC_IFELSE's cleaning code was skipped.
+rm -f conftest.i conftest.err conftest.$ac_ext
+if $ac_preproc_ok; then :
+
+else
+  { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
+as_fn_error $? "C preprocessor \"$CPP\" fails sanity check
+See \`config.log' for more details" "$LINENO" 5; }
+fi
+
+ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for grep that handles long lines and -e" >&5
+$as_echo_n "checking for grep that handles long lines and -e... " >&6; }
+if ${ac_cv_path_GREP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -z "$GREP"; then
+  ac_path_GREP_found=false
+  # Loop through the user's path and test for each of PROGNAME-LIST
+  as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH$PATH_SEPARATOR/usr/xpg4/bin
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_prog in grep ggrep; do
+    for ac_exec_ext in '' $ac_executable_extensions; do
+      ac_path_GREP="$as_dir/$ac_prog$ac_exec_ext"
+      as_fn_executable_p "$ac_path_GREP" || continue
+# Check for GNU ac_path_GREP and select it if it is found.
+  # Check for GNU $ac_path_GREP
+case `"$ac_path_GREP" --version 2>&1` in
+*GNU*)
+  ac_cv_path_GREP="$ac_path_GREP" ac_path_GREP_found=:;;
+*)
+  ac_count=0
+  $as_echo_n 0123456789 >"conftest.in"
+  while :
+  do
+    cat "conftest.in" "conftest.in" >"conftest.tmp"
+    mv "conftest.tmp" "conftest.in"
+    cp "conftest.in" "conftest.nl"
+    $as_echo 'GREP' >> "conftest.nl"
+    "$ac_path_GREP" -e 'GREP$' -e '-(cannot match)-' < "conftest.nl" >"conftest.out" 2>/dev/null || break
+    diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break
+    as_fn_arith $ac_count + 1 && ac_count=$as_val
+    if test $ac_count -gt ${ac_path_GREP_max-0}; then
+      # Best one so far, save it but keep looking for a better one
+      ac_cv_path_GREP="$ac_path_GREP"
+      ac_path_GREP_max=$ac_count
+    fi
+    # 10*(2^10) chars as input seems more than enough
+    test $ac_count -gt 10 && break
+  done
+  rm -f conftest.in conftest.tmp conftest.nl conftest.out;;
+esac
+
+      $ac_path_GREP_found && break 3
+    done
+  done
+  done
+IFS=$as_save_IFS
+  if test -z "$ac_cv_path_GREP"; then
+    as_fn_error $? "no acceptable grep could be found in $PATH$PATH_SEPARATOR/usr/xpg4/bin" "$LINENO" 5
+  fi
+else
+  ac_cv_path_GREP=$GREP
+fi
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_GREP" >&5
+$as_echo "$ac_cv_path_GREP" >&6; }
+ GREP="$ac_cv_path_GREP"
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for egrep" >&5
+$as_echo_n "checking for egrep... " >&6; }
+if ${ac_cv_path_EGREP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if echo a | $GREP -E '(a|b)' >/dev/null 2>&1
+   then ac_cv_path_EGREP="$GREP -E"
+   else
+     if test -z "$EGREP"; then
+  ac_path_EGREP_found=false
+  # Loop through the user's path and test for each of PROGNAME-LIST
+  as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH$PATH_SEPARATOR/usr/xpg4/bin
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_prog in egrep; do
+    for ac_exec_ext in '' $ac_executable_extensions; do
+      ac_path_EGREP="$as_dir/$ac_prog$ac_exec_ext"
+      as_fn_executable_p "$ac_path_EGREP" || continue
+# Check for GNU ac_path_EGREP and select it if it is found.
+  # Check for GNU $ac_path_EGREP
+case `"$ac_path_EGREP" --version 2>&1` in
+*GNU*)
+  ac_cv_path_EGREP="$ac_path_EGREP" ac_path_EGREP_found=:;;
+*)
+  ac_count=0
+  $as_echo_n 0123456789 >"conftest.in"
+  while :
+  do
+    cat "conftest.in" "conftest.in" >"conftest.tmp"
+    mv "conftest.tmp" "conftest.in"
+    cp "conftest.in" "conftest.nl"
+    $as_echo 'EGREP' >> "conftest.nl"
+    "$ac_path_EGREP" 'EGREP$' < "conftest.nl" >"conftest.out" 2>/dev/null || break
+    diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break
+    as_fn_arith $ac_count + 1 && ac_count=$as_val
+    if test $ac_count -gt ${ac_path_EGREP_max-0}; then
+      # Best one so far, save it but keep looking for a better one
+      ac_cv_path_EGREP="$ac_path_EGREP"
+      ac_path_EGREP_max=$ac_count
+    fi
+    # 10*(2^10) chars as input seems more than enough
+    test $ac_count -gt 10 && break
+  done
+  rm -f conftest.in conftest.tmp conftest.nl conftest.out;;
+esac
+
+      $ac_path_EGREP_found && break 3
+    done
+  done
+  done
+IFS=$as_save_IFS
+  if test -z "$ac_cv_path_EGREP"; then
+    as_fn_error $? "no acceptable egrep could be found in $PATH$PATH_SEPARATOR/usr/xpg4/bin" "$LINENO" 5
+  fi
+else
+  ac_cv_path_EGREP=$EGREP
+fi
+
+   fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_EGREP" >&5
+$as_echo "$ac_cv_path_EGREP" >&6; }
+ EGREP="$ac_cv_path_EGREP"
+
+
+if test $ac_cv_c_compiler_gnu = yes; then
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $CC needs -traditional" >&5
+$as_echo_n "checking whether $CC needs -traditional... " >&6; }
+if ${ac_cv_prog_gcc_traditional+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+    ac_pattern="Autoconf.*'x'"
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <sgtty.h>
+Autoconf TIOCGETP
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "$ac_pattern" >/dev/null 2>&1; then :
+  ac_cv_prog_gcc_traditional=yes
+else
+  ac_cv_prog_gcc_traditional=no
+fi
+rm -f conftest*
+
+
+  if test $ac_cv_prog_gcc_traditional = no; then
+    cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <termio.h>
+Autoconf TCGETA
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "$ac_pattern" >/dev/null 2>&1; then :
+  ac_cv_prog_gcc_traditional=yes
+fi
+rm -f conftest*
+
+  fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_gcc_traditional" >&5
+$as_echo "$ac_cv_prog_gcc_traditional" >&6; }
+  if test $ac_cv_prog_gcc_traditional = yes; then
+    CC="$CC -traditional"
+  fi
+fi
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether using GNU C" >&5
+$as_echo_n "checking whether using GNU C... " >&6; }
+if ${cl_cv_prog_cc_gcc+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#ifdef __GNUC__
+        yes
+        #endif
+
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "yes" >/dev/null 2>&1; then :
+  cl_cv_prog_cc_gcc=yes
+else
+  cl_cv_prog_cc_gcc=no
+fi
+rm -f conftest*
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $cl_cv_prog_cc_gcc" >&5
+$as_echo "$cl_cv_prog_cc_gcc" >&6; }
+  if test $cl_cv_prog_cc_gcc = yes; then
+    CC_GCC=true
+    GCC_X_NONE='-x none'
+  else
+    CC_GCC=false
+    GCC_X_NONE=''
+  fi
+
+
+
+
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#ifdef _MSC_VER
+MicrosoftCompiler
+#endif
+
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "MicrosoftCompiler" >/dev/null 2>&1; then :
+  gl_asmext='asm'
+     gl_c_asm_opt='-c -Fa'
+
+else
+  gl_asmext='s'
+     gl_c_asm_opt='-S'
+
+fi
+rm -f conftest*
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether C symbols are prefixed with underscore at the linker level" >&5
+$as_echo_n "checking whether C symbols are prefixed with underscore at the linker level... " >&6; }
+if ${gl_cv_prog_as_underscore+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat > conftest.c <<EOF
+#ifdef __cplusplus
+extern "C" int foo (void);
+#endif
+int foo(void) { return 0; }
+EOF
+     # Look for the assembly language name in the .s file.
+     { ac_try='${CC-cc} $CFLAGS $CPPFLAGS $gl_c_asm_opt conftest.c'
+  { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_try\""; } >&5
+  (eval $ac_try) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; } >/dev/null 2>&1
+     if LC_ALL=C $EGREP '(^|[^a-zA-Z0-9_])_foo([^a-zA-Z0-9_]|$)' conftest.$gl_asmext >/dev/null; then
+       gl_cv_prog_as_underscore=yes
+     else
+       gl_cv_prog_as_underscore=no
+     fi
+     rm -f conftest*
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_prog_as_underscore" >&5
+$as_echo "$gl_cv_prog_as_underscore" >&6; }
+  if test $gl_cv_prog_as_underscore = yes; then
+    USER_LABEL_PREFIX=_
+  else
+    USER_LABEL_PREFIX=
+  fi
+
+cat >>confdefs.h <<_ACEOF
+#define USER_LABEL_PREFIX $USER_LABEL_PREFIX
+_ACEOF
+
+  ASM_SYMBOL_PREFIX='"'${USER_LABEL_PREFIX}'"'
+
+
+
+
+  if test "$USER_LABEL_PREFIX" = '_'; then
+    AS_UNDERSCORE=true
+  else
+    AS_UNDERSCORE=false
+  fi
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether to use C++" >&5
+$as_echo_n "checking whether to use C++... " >&6; }
+    # Check whether --enable-c++ was given.
+if test "${enable_c__+set}" = set; then :
+  enableval=$enable_c__; CXX_CHOICE="$enableval"
+else
+  CXX_CHOICE=yes
+fi
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CXX_CHOICE" >&5
+$as_echo "$CXX_CHOICE" >&6; }
+
+
+
+
+
+  if test "$CXX_CHOICE" = no; then
+    CXX=no
+  fi
+  if test -z "$CXX"; then
+    if test -n "$CCC"; then
+      CXX="$CCC"
+    else
+      if test -n "$ac_tool_prefix"; then
+  for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl FCC KCC RCC xlC_r xlC
+  do
+    # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args.
+set dummy $ac_tool_prefix$ac_prog; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_CXX+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$CXX"; then
+  ac_cv_prog_CXX="$CXX" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_CXX="$ac_tool_prefix$ac_prog"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+CXX=$ac_cv_prog_CXX
+if test -n "$CXX"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CXX" >&5
+$as_echo "$CXX" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+    test -n "$CXX" && break
+  done
+fi
+if test -z "$CXX"; then
+  ac_ct_CXX=$CXX
+  for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl FCC KCC RCC xlC_r xlC
+do
+  # Extract the first word of "$ac_prog", so it can be a program name with args.
+set dummy $ac_prog; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_CXX+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_CXX"; then
+  ac_cv_prog_ac_ct_CXX="$ac_ct_CXX" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_CXX="$ac_prog"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_CXX=$ac_cv_prog_ac_ct_CXX
+if test -n "$ac_ct_CXX"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CXX" >&5
+$as_echo "$ac_ct_CXX" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+  test -n "$ac_ct_CXX" && break
+done
+
+  if test "x$ac_ct_CXX" = x; then
+    CXX=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    CXX=$ac_ct_CXX
+  fi
+fi
+
+    fi
+  fi
+  if test "$CXX" != no; then
+            { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the C++ compiler ($CXX $CXXFLAGS $LDFLAGS) works" >&5
+$as_echo_n "checking whether the C++ compiler ($CXX $CXXFLAGS $LDFLAGS) works... " >&6; }
+    ac_ext=cpp
+ac_cpp='$CXXCPP $CPPFLAGS'
+ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_cxx_compiler_gnu
+
+
+
+    echo 'int main () { return 0; }' > conftest.$ac_ext
+    if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5
+  (eval $ac_link) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } && test -s conftest$ac_exeext; then
+      gl_cv_prog_ansicxx_works=yes
+      if (./conftest; exit) 2>/dev/null; then
+        gl_cv_prog_ansicxx_cross=no
+      else
+        gl_cv_prog_ansicxx_cross=yes
+      fi
+    else
+      gl_cv_prog_ansicxx_works=no
+    fi
+    rm -fr conftest*
+    ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+    { $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_prog_ansicxx_works" >&5
+$as_echo "$gl_cv_prog_ansicxx_works" >&6; }
+    if test $gl_cv_prog_ansicxx_works = no; then
+      CXX=no
+    else
+                  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the C++ compiler supports namespaces" >&5
+$as_echo_n "checking whether the C++ compiler supports namespaces... " >&6; }
+      ac_ext=cpp
+ac_cpp='$CXXCPP $CPPFLAGS'
+ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_cxx_compiler_gnu
+
+      cat <<EOF > conftest.$ac_ext
+#include <iostream>
+namespace test { using namespace std; }
+std::ostream* ptr;
+int main () { return 0; }
+EOF
+      if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5
+  (eval $ac_link) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } && test -s conftest$ac_exeext; then
+        gl_cv_prog_ansicxx_namespaces=yes
+      else
+        gl_cv_prog_ansicxx_namespaces=no
+      fi
+      rm -fr conftest*
+      ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+      { $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_prog_ansicxx_namespaces" >&5
+$as_echo "$gl_cv_prog_ansicxx_namespaces" >&6; }
+      if test $gl_cv_prog_ansicxx_namespaces = no; then
+        CXX=no
+      fi
+    fi
+  fi
+
+
+
+   if test "$CXX" != no; then
+  ANSICXX_TRUE=
+  ANSICXX_FALSE='#'
+else
+  ANSICXX_TRUE='#'
+  ANSICXX_FALSE=
+fi
+
+
+  if test "$CXX" != no; then
+
+depcc="$CXX"  am_compiler_list=
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking dependency style of $depcc" >&5
+$as_echo_n "checking dependency style of $depcc... " >&6; }
+if ${am_cv_CXX_dependencies_compiler_type+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then
+  # We make a subdir and do the tests there.  Otherwise we can end up
+  # making bogus files that we don't know about and never remove.  For
+  # instance it was reported that on HP-UX the gcc test will end up
+  # making a dummy file named 'D' -- because '-MD' means "put the output
+  # in D".
+  rm -rf conftest.dir
+  mkdir conftest.dir
+  # Copy depcomp to subdir because otherwise we won't find it if we're
+  # using a relative directory.
+  cp "$am_depcomp" conftest.dir
+  cd conftest.dir
+  # We will build objects and dependencies in a subdirectory because
+  # it helps to detect inapplicable dependency modes.  For instance
+  # both Tru64's cc and ICC support -MD to output dependencies as a
+  # side effect of compilation, but ICC will put the dependencies in
+  # the current directory while Tru64 will put them in the object
+  # directory.
+  mkdir sub
+
+  am_cv_CXX_dependencies_compiler_type=none
+  if test "$am_compiler_list" = ""; then
+     am_compiler_list=`sed -n 's/^#*\([a-zA-Z0-9]*\))$/\1/p' < ./depcomp`
+  fi
+  am__universal=false
+  case " $depcc " in #(
+     *\ -arch\ *\ -arch\ *) am__universal=true ;;
+     esac
+
+  for depmode in $am_compiler_list; do
+    # Setup a source with many dependencies, because some compilers
+    # like to wrap large dependency lists on column 80 (with \), and
+    # we should not choose a depcomp mode which is confused by this.
+    #
+    # We need to recreate these files for each test, as the compiler may
+    # overwrite some of them when testing with obscure command lines.
+    # This happens at least with the AIX C compiler.
+    : > sub/conftest.c
+    for i in 1 2 3 4 5 6; do
+      echo '#include "conftst'$i'.h"' >> sub/conftest.c
+      # Using ": > sub/conftst$i.h" creates only sub/conftst1.h with
+      # Solaris 10 /bin/sh.
+      echo '/* dummy */' > sub/conftst$i.h
+    done
+    echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf
+
+    # We check with '-c' and '-o' for the sake of the "dashmstdout"
+    # mode.  It turns out that the SunPro C++ compiler does not properly
+    # handle '-M -o', and we need to detect this.  Also, some Intel
+    # versions had trouble with output in subdirs.
+    am__obj=sub/conftest.${OBJEXT-o}
+    am__minus_obj="-o $am__obj"
+    case $depmode in
+    gcc)
+      # This depmode causes a compiler race in universal mode.
+      test "$am__universal" = false || continue
+      ;;
+    nosideeffect)
+      # After this tag, mechanisms are not by side-effect, so they'll
+      # only be used when explicitly requested.
+      if test "x$enable_dependency_tracking" = xyes; then
+       continue
+      else
+       break
+      fi
+      ;;
+    msvc7 | msvc7msys | msvisualcpp | msvcmsys)
+      # This compiler won't grok '-c -o', but also, the minuso test has
+      # not run yet.  These depmodes are late enough in the game, and
+      # so weak that their functioning should not be impacted.
+      am__obj=conftest.${OBJEXT-o}
+      am__minus_obj=
+      ;;
+    none) break ;;
+    esac
+    if depmode=$depmode \
+       source=sub/conftest.c object=$am__obj \
+       depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \
+       $SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \
+         >/dev/null 2>conftest.err &&
+       grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 &&
+       grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 &&
+       grep $am__obj sub/conftest.Po > /dev/null 2>&1 &&
+       ${MAKE-make} -s -f confmf > /dev/null 2>&1; then
+      # icc doesn't choke on unknown options, it will just issue warnings
+      # or remarks (even with -Werror).  So we grep stderr for any message
+      # that says an option was ignored or not supported.
+      # When given -MP, icc 7.0 and 7.1 complain thusly:
+      #   icc: Command line warning: ignoring option '-M'; no argument required
+      # The diagnosis changed in icc 8.0:
+      #   icc: Command line remark: option '-MP' not supported
+      if (grep 'ignoring option' conftest.err ||
+          grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else
+        am_cv_CXX_dependencies_compiler_type=$depmode
+        break
+      fi
+    fi
+  done
+
+  cd ..
+  rm -rf conftest.dir
+else
+  am_cv_CXX_dependencies_compiler_type=none
+fi
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $am_cv_CXX_dependencies_compiler_type" >&5
+$as_echo "$am_cv_CXX_dependencies_compiler_type" >&6; }
+CXXDEPMODE=depmode=$am_cv_CXX_dependencies_compiler_type
+
+ if
+  test "x$enable_dependency_tracking" != xno \
+  && test "$am_cv_CXX_dependencies_compiler_type" = gcc3; then
+  am__fastdepCXX_TRUE=
+  am__fastdepCXX_FALSE='#'
+else
+  am__fastdepCXX_TRUE='#'
+  am__fastdepCXX_FALSE=
+fi
+
+
+  else
+     if false; then
+  am__fastdepCXX_TRUE=
+  am__fastdepCXX_FALSE='#'
+else
+  am__fastdepCXX_TRUE='#'
+  am__fastdepCXX_FALSE=
+fi
+
+  fi
+
+if test "$CXX" != no; then
+  IF_CXX=''
+else
+  IF_CXX='# '
+fi
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for Minix Amsterdam compiler" >&5
+$as_echo_n "checking for Minix Amsterdam compiler... " >&6; }
+if ${gl_cv_c_amsterdam_compiler+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+
+      cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#ifdef __ACK__
+Amsterdam
+#endif
+
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "Amsterdam" >/dev/null 2>&1; then :
+  gl_cv_c_amsterdam_compiler=yes
+else
+  gl_cv_c_amsterdam_compiler=no
+fi
+rm -f conftest*
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_c_amsterdam_compiler" >&5
+$as_echo "$gl_cv_c_amsterdam_compiler" >&6; }
+
+      if test $gl_cv_c_amsterdam_compiler = yes; then
+    if test -z "$AR"; then
+      AR='cc -c.a'
+    fi
+    if test -z "$ARFLAGS"; then
+      ARFLAGS='-o'
+    fi
+  else
+                                                :
+  fi
+
+        if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}ar", so it can be a program name with args.
+set dummy ${ac_tool_prefix}ar; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_AR+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$AR"; then
+  ac_cv_prog_AR="$AR" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_AR="${ac_tool_prefix}ar"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+AR=$ac_cv_prog_AR
+if test -n "$AR"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $AR" >&5
+$as_echo "$AR" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_AR"; then
+  ac_ct_AR=$AR
+  # Extract the first word of "ar", so it can be a program name with args.
+set dummy ar; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_AR+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_AR"; then
+  ac_cv_prog_ac_ct_AR="$ac_ct_AR" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_AR="ar"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_AR=$ac_cv_prog_ac_ct_AR
+if test -n "$ac_ct_AR"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_AR" >&5
+$as_echo "$ac_ct_AR" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_AR" = x; then
+    AR="ar"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    AR=$ac_ct_AR
+  fi
+else
+  AR="$ac_cv_prog_AR"
+fi
+
+  if test -z "$ARFLAGS"; then
+    ARFLAGS='cr'
+  fi
+
+
+
+  if test -z "$RANLIB"; then
+    if test $gl_cv_c_amsterdam_compiler = yes; then
+      RANLIB=':'
+    else
+            if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}ranlib", so it can be a program name with args.
+set dummy ${ac_tool_prefix}ranlib; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_RANLIB+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$RANLIB"; then
+  ac_cv_prog_RANLIB="$RANLIB" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_RANLIB="${ac_tool_prefix}ranlib"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+RANLIB=$ac_cv_prog_RANLIB
+if test -n "$RANLIB"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $RANLIB" >&5
+$as_echo "$RANLIB" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_RANLIB"; then
+  ac_ct_RANLIB=$RANLIB
+  # Extract the first word of "ranlib", so it can be a program name with args.
+set dummy ranlib; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_RANLIB+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_RANLIB"; then
+  ac_cv_prog_ac_ct_RANLIB="$ac_ct_RANLIB" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_RANLIB="ranlib"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_RANLIB=$ac_cv_prog_ac_ct_RANLIB
+if test -n "$ac_ct_RANLIB"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_RANLIB" >&5
+$as_echo "$ac_ct_RANLIB" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_RANLIB" = x; then
+    RANLIB=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    RANLIB=$ac_ct_RANLIB
+  fi
+else
+  RANLIB="$ac_cv_prog_RANLIB"
+fi
+
+    fi
+  fi
+
+
+
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#ifdef _MSC_VER
+MicrosoftCompiler
+#endif
+
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "MicrosoftCompiler" >/dev/null 2>&1; then :
+  IF_MSVC=''
+   IFNOT_MSVC='# '
+
+else
+  IF_MSVC='# '
+   IFNOT_MSVC=''
+
+fi
+rm -f conftest*
+
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking how to make hard links" >&5
+$as_echo_n "checking how to make hard links... " >&6; }
+if ${cl_cv_prog_LN+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  rm -f conftestdata conftestfile
+     echo data > conftestfile
+     if ln conftestfile conftestdata 2>/dev/null; then
+       cl_cv_prog_LN=ln
+     else
+       cl_cv_prog_LN="cp -p"
+     fi
+     rm -f conftestdata conftestfile
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $cl_cv_prog_LN" >&5
+$as_echo "$cl_cv_prog_LN" >&6; }
+  LN="$cl_cv_prog_LN"
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for ANSI C header files" >&5
+$as_echo_n "checking for ANSI C header files... " >&6; }
+if ${ac_cv_header_stdc+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <stdlib.h>
+#include <stdarg.h>
+#include <string.h>
+#include <float.h>
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_cv_header_stdc=yes
+else
+  ac_cv_header_stdc=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+
+if test $ac_cv_header_stdc = yes; then
+  # SunOS 4.x string.h does not declare mem*, contrary to ANSI.
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <string.h>
+
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "memchr" >/dev/null 2>&1; then :
+
+else
+  ac_cv_header_stdc=no
+fi
+rm -f conftest*
+
+fi
+
+if test $ac_cv_header_stdc = yes; then
+  # ISC 2.0.2 stdlib.h does not declare free, contrary to ANSI.
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <stdlib.h>
+
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "free" >/dev/null 2>&1; then :
+
+else
+  ac_cv_header_stdc=no
+fi
+rm -f conftest*
+
+fi
+
+if test $ac_cv_header_stdc = yes; then
+  # /bin/cc in Irix-4.0.5 gets non-ANSI ctype macros unless using -ansi.
+  if test "$cross_compiling" = yes; then :
+  :
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <ctype.h>
+#include <stdlib.h>
+#if ((' ' & 0x0FF) == 0x020)
+# define ISLOWER(c) ('a' <= (c) && (c) <= 'z')
+# define TOUPPER(c) (ISLOWER(c) ? 'A' + ((c) - 'a') : (c))
+#else
+# define ISLOWER(c) \
+                  (('a' <= (c) && (c) <= 'i') \
+                    || ('j' <= (c) && (c) <= 'r') \
+                    || ('s' <= (c) && (c) <= 'z'))
+# define TOUPPER(c) (ISLOWER(c) ? ((c) | 0x40) : (c))
+#endif
+
+#define XOR(e, f) (((e) && !(f)) || (!(e) && (f)))
+int
+main ()
+{
+  int i;
+  for (i = 0; i < 256; i++)
+    if (XOR (islower (i), ISLOWER (i))
+       || toupper (i) != TOUPPER (i))
+      return 2;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+
+else
+  ac_cv_header_stdc=no
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_header_stdc" >&5
+$as_echo "$ac_cv_header_stdc" >&6; }
+if test $ac_cv_header_stdc = yes; then
+
+$as_echo "#define STDC_HEADERS 1" >>confdefs.h
+
+fi
+
+# On IRIX 5.3, sys/types and inttypes.h are conflicting.
+for ac_header in sys/types.h sys/stat.h stdlib.h string.h memory.h strings.h \
+                 inttypes.h stdint.h unistd.h
+do :
+  as_ac_Header=`$as_echo "ac_cv_header_$ac_header" | $as_tr_sh`
+ac_fn_c_check_header_compile "$LINENO" "$ac_header" "$as_ac_Header" "$ac_includes_default
+"
+if eval test \"x\$"$as_ac_Header"\" = x"yes"; then :
+  cat >>confdefs.h <<_ACEOF
+#define `$as_echo "HAVE_$ac_header" | $as_tr_cpp` 1
+_ACEOF
+
+fi
+
+done
+
+
+
+  ac_fn_c_check_header_mongrel "$LINENO" "minix/config.h" "ac_cv_header_minix_config_h" "$ac_includes_default"
+if test "x$ac_cv_header_minix_config_h" = xyes; then :
+  MINIX=yes
+else
+  MINIX=
+fi
+
+
+  if test "$MINIX" = yes; then
+
+$as_echo "#define _POSIX_SOURCE 1" >>confdefs.h
+
+
+$as_echo "#define _POSIX_1_SOURCE 2" >>confdefs.h
+
+
+$as_echo "#define _MINIX 1" >>confdefs.h
+
+
+$as_echo "#define _NETBSD_SOURCE 1" >>confdefs.h
+
+  fi
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether it is safe to define __EXTENSIONS__" >&5
+$as_echo_n "checking whether it is safe to define __EXTENSIONS__... " >&6; }
+if ${ac_cv_safe_to_define___extensions__+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#         define __EXTENSIONS__ 1
+          $ac_includes_default
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_cv_safe_to_define___extensions__=yes
+else
+  ac_cv_safe_to_define___extensions__=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_safe_to_define___extensions__" >&5
+$as_echo "$ac_cv_safe_to_define___extensions__" >&6; }
+  test $ac_cv_safe_to_define___extensions__ = yes &&
+    $as_echo "#define __EXTENSIONS__ 1" >>confdefs.h
+
+  $as_echo "#define _ALL_SOURCE 1" >>confdefs.h
+
+  $as_echo "#define _DARWIN_C_SOURCE 1" >>confdefs.h
+
+  $as_echo "#define _GNU_SOURCE 1" >>confdefs.h
+
+  $as_echo "#define _NETBSD_SOURCE 1" >>confdefs.h
+
+  $as_echo "#define _OPENBSD_SOURCE 1" >>confdefs.h
+
+  $as_echo "#define _POSIX_PTHREAD_SEMANTICS 1" >>confdefs.h
+
+  $as_echo "#define __STDC_WANT_IEC_60559_ATTRIBS_EXT__ 1" >>confdefs.h
+
+  $as_echo "#define __STDC_WANT_IEC_60559_BFP_EXT__ 1" >>confdefs.h
+
+  $as_echo "#define __STDC_WANT_IEC_60559_DFP_EXT__ 1" >>confdefs.h
+
+  $as_echo "#define __STDC_WANT_IEC_60559_FUNCS_EXT__ 1" >>confdefs.h
+
+  $as_echo "#define __STDC_WANT_IEC_60559_TYPES_EXT__ 1" >>confdefs.h
+
+  $as_echo "#define __STDC_WANT_LIB_EXT2__ 1" >>confdefs.h
+
+  $as_echo "#define __STDC_WANT_MATH_SPEC_FUNCS__ 1" >>confdefs.h
+
+  $as_echo "#define _TANDEM_SOURCE 1" >>confdefs.h
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether _XOPEN_SOURCE should be defined" >&5
+$as_echo_n "checking whether _XOPEN_SOURCE should be defined... " >&6; }
+if ${ac_cv_should_define__xopen_source+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_cv_should_define__xopen_source=no
+     cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+          #include <wchar.h>
+          mbstate_t x;
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+             #define _XOPEN_SOURCE 500
+             #include <wchar.h>
+             mbstate_t x;
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_cv_should_define__xopen_source=yes
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_should_define__xopen_source" >&5
+$as_echo "$ac_cv_should_define__xopen_source" >&6; }
+  test $ac_cv_should_define__xopen_source = yes &&
+    $as_echo "#define _XOPEN_SOURCE 500" >>confdefs.h
+
+  $as_echo "#define _HPUX_ALT_XOPEN_SOCKET_API 1" >>confdefs.h
+
+
+
+
+
+
+
+
+
+# Make sure we can run config.sub.
+$SHELL "$ac_aux_dir/config.sub" sun4 >/dev/null 2>&1 ||
+  as_fn_error $? "cannot run $SHELL $ac_aux_dir/config.sub" "$LINENO" 5
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking build system type" >&5
+$as_echo_n "checking build system type... " >&6; }
+if ${ac_cv_build+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_build_alias=$build_alias
+test "x$ac_build_alias" = x &&
+  ac_build_alias=`$SHELL "$ac_aux_dir/config.guess"`
+test "x$ac_build_alias" = x &&
+  as_fn_error $? "cannot guess build type; you must specify one" "$LINENO" 5
+ac_cv_build=`$SHELL "$ac_aux_dir/config.sub" $ac_build_alias` ||
+  as_fn_error $? "$SHELL $ac_aux_dir/config.sub $ac_build_alias failed" "$LINENO" 5
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_build" >&5
+$as_echo "$ac_cv_build" >&6; }
+case $ac_cv_build in
+*-*-*) ;;
+*) as_fn_error $? "invalid value of canonical build" "$LINENO" 5;;
+esac
+build=$ac_cv_build
+ac_save_IFS=$IFS; IFS='-'
+set x $ac_cv_build
+shift
+build_cpu=$1
+build_vendor=$2
+shift; shift
+# Remember, the first character of IFS is used to create $*,
+# except with old shells:
+build_os=$*
+IFS=$ac_save_IFS
+case $build_os in *\ *) build_os=`echo "$build_os" | sed 's/ /-/g'`;; esac
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking host system type" >&5
+$as_echo_n "checking host system type... " >&6; }
+if ${ac_cv_host+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test "x$host_alias" = x; then
+  ac_cv_host=$ac_cv_build
+else
+  ac_cv_host=`$SHELL "$ac_aux_dir/config.sub" $host_alias` ||
+    as_fn_error $? "$SHELL $ac_aux_dir/config.sub $host_alias failed" "$LINENO" 5
+fi
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_host" >&5
+$as_echo "$ac_cv_host" >&6; }
+case $ac_cv_host in
+*-*-*) ;;
+*) as_fn_error $? "invalid value of canonical host" "$LINENO" 5;;
+esac
+host=$ac_cv_host
+ac_save_IFS=$IFS; IFS='-'
+set x $ac_cv_host
+shift
+host_cpu=$1
+host_vendor=$2
+shift; shift
+# Remember, the first character of IFS is used to create $*,
+# except with old shells:
+host_os=$*
+IFS=$ac_save_IFS
+case $host_os in *\ *) host_os=`echo "$host_os" | sed 's/ /-/g'`;; esac
+
+
+
+
+
+
+
+
+  # Check whether --enable-threads was given.
+if test "${enable_threads+set}" = set; then :
+  enableval=$enable_threads; gl_use_threads=$enableval
+else
+  if test -n "$gl_use_threads_default"; then
+       gl_use_threads="$gl_use_threads_default"
+     else
+       case "$host_os" in
+                                    osf*) gl_use_threads=no ;;
+                                    cygwin*)
+               case `uname -r` in
+                 1.[0-5].*) gl_use_threads=no ;;
+                 *)         gl_use_threads=yes ;;
+               esac
+               ;;
+                  mingw*)
+               case "$gl_use_winpthreads_default" in
+                 yes) gl_use_threads=posix ;;
+                 no)  gl_use_threads=windows ;;
+                 *)   gl_use_threads=yes ;;
+               esac
+               ;;
+         *)    gl_use_threads=yes ;;
+       esac
+     fi
+
+fi
+
+  if test "$gl_use_threads" = yes || test "$gl_use_threads" = posix; then
+    # For using <pthread.h>:
+    case "$host_os" in
+      osf*)
+        # On OSF/1, the compiler needs the flag -D_REENTRANT so that it
+        # groks <pthread.h>. cc also understands the flag -pthread, but
+        # we don't use it because 1. gcc-2.95 doesn't understand -pthread,
+        # 2. putting a flag into CPPFLAGS that has an effect on the linker
+        # causes the AC_LINK_IFELSE test below to succeed unexpectedly,
+        # leading to wrong values of LIBTHREAD and LTLIBTHREAD.
+        CPPFLAGS="$CPPFLAGS -D_REENTRANT"
+        ;;
+    esac
+    # Some systems optimize for single-threaded programs by default, and
+    # need special flags to disable these optimizations. For example, the
+    # definition of 'errno' in <errno.h>.
+    case "$host_os" in
+      aix* | freebsd*) CPPFLAGS="$CPPFLAGS -D_THREAD_SAFE" ;;
+      solaris*) CPPFLAGS="$CPPFLAGS -D_REENTRANT" ;;
+    esac
+  fi
+
+
+
+  # Pre-early section.
+
+
+
+
+  # Code from module absolute-header:
+  # Code from module ansi-c++-opt:
+  # Code from module extensions:
+  # Code from module havelib:
+  # Code from module host-cpu-c-abi:
+  # Code from module include_next:
+  # Code from module limits-h:
+  # Code from module lock:
+  # Code from module longlong:
+  # Code from module multiarch:
+  # Code from module nocrash:
+  # Code from module snippet/_Noreturn:
+  # Code from module ssize_t:
+  # Code from module stdint:
+  # Code from module stdnoreturn:
+  # Code from module sys_types:
+  # Code from module threadlib:
+
+
+
+  # Code from module windows-mutex:
+  # Code from module windows-once:
+  # Code from module windows-recmutex:
+  # Code from module windows-rwlock:
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking host CPU and C ABI" >&5
+$as_echo_n "checking host CPU and C ABI... " >&6; }
+if ${gl_cv_host_cpu_c_abi+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  case "$host_cpu" in
+
+       i[4567]86 )
+         gl_cv_host_cpu_c_abi=i386
+         ;;
+
+       x86_64 )
+         # On x86_64 systems, the C compiler may be generating code in one of
+         # these ABIs:
+         # - 64-bit instruction set, 64-bit pointers, 64-bit 'long': x86_64.
+         # - 64-bit instruction set, 64-bit pointers, 32-bit 'long': x86_64
+         #   with native Windows (mingw, MSVC).
+         # - 64-bit instruction set, 32-bit pointers, 32-bit 'long': x86_64-x32.
+         # - 32-bit instruction set, 32-bit pointers, 32-bit 'long': i386.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if (defined __x86_64__ || defined __amd64__ \
+                     || defined _M_X64 || defined _M_AMD64)
+                 int ok;
+                #else
+                 error fail
+                #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined __ILP32__ || defined _ILP32
+                    int ok;
+                   #else
+                    error fail
+                   #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_host_cpu_c_abi=x86_64-x32
+else
+  gl_cv_host_cpu_c_abi=x86_64
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+else
+  gl_cv_host_cpu_c_abi=i386
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         ;;
+
+       alphaev[4-8] | alphaev56 | alphapca5[67] | alphaev6[78] )
+         gl_cv_host_cpu_c_abi=alpha
+         ;;
+
+       arm* | aarch64 )
+         # Assume arm with EABI.
+         # On arm64 systems, the C compiler may be generating code in one of
+         # these ABIs:
+         # - aarch64 instruction set, 64-bit pointers, 64-bit 'long': arm64.
+         # - aarch64 instruction set, 32-bit pointers, 32-bit 'long': arm64-ilp32.
+         # - 32-bit instruction set, 32-bit pointers, 32-bit 'long': arm or armhf.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#ifdef __aarch64__
+                 int ok;
+                #else
+                 error fail
+                #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined __ILP32__ || defined _ILP32
+                   int ok;
+                  #else
+                   error fail
+                  #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_host_cpu_c_abi=arm64-ilp32
+else
+  gl_cv_host_cpu_c_abi=arm64
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+else
+  # Don't distinguish little-endian and big-endian arm, since they
+            # don't require different machine code for simple operations and
+            # since the user can distinguish them through the preprocessor
+            # defines __ARMEL__ vs. __ARMEB__.
+            # But distinguish arm which passes floating-point arguments and
+            # return values in integer registers (r0, r1, ...) - this is
+            # gcc -mfloat-abi=soft or gcc -mfloat-abi=softfp - from arm which
+            # passes them in float registers (s0, s1, ...) and double registers
+            # (d0, d1, ...) - this is gcc -mfloat-abi=hard. GCC 4.6 or newer
+            # sets the preprocessor defines __ARM_PCS (for the first case) and
+            # __ARM_PCS_VFP (for the second case), but older GCC does not.
+            echo 'double ddd; void func (double dd) { ddd = dd; }' > conftest.c
+            # Look for a reference to the register d0 in the .s file.
+            { ac_try='${CC-cc} $CFLAGS $CPPFLAGS $gl_c_asm_opt conftest.c'
+  { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_try\""; } >&5
+  (eval $ac_try) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; } >/dev/null 2>&1
+            if LC_ALL=C grep 'd0,' conftest.$gl_asmext >/dev/null; then
+              gl_cv_host_cpu_c_abi=armhf
+            else
+              gl_cv_host_cpu_c_abi=arm
+            fi
+            rm -f conftest*
+
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         ;;
+
+       hppa1.0 | hppa1.1 | hppa2.0* | hppa64 )
+         # On hppa, the C compiler may be generating 32-bit code or 64-bit
+         # code. In the latter case, it defines _LP64 and __LP64__.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#ifdef __LP64__
+                 int ok;
+                #else
+                 error fail
+                #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_host_cpu_c_abi=hppa64
+else
+  gl_cv_host_cpu_c_abi=hppa
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         ;;
+
+       ia64* )
+         # On ia64 on HP-UX, the C compiler may be generating 64-bit code or
+         # 32-bit code. In the latter case, it defines _ILP32.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#ifdef _ILP32
+                 int ok;
+                #else
+                 error fail
+                #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_host_cpu_c_abi=ia64-ilp32
+else
+  gl_cv_host_cpu_c_abi=ia64
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         ;;
+
+       mips* )
+         # We should also check for (_MIPS_SZPTR == 64), but gcc keeps this
+         # at 32.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined _MIPS_SZLONG && (_MIPS_SZLONG == 64)
+                 int ok;
+                #else
+                 error fail
+                #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_host_cpu_c_abi=mips64
+else
+  # In the n32 ABI, _ABIN32 is defined, _ABIO32 is not defined (but
+            # may later get defined by <sgidefs.h>), and _MIPS_SIM == _ABIN32.
+            # In the 32 ABI, _ABIO32 is defined, _ABIN32 is not defined (but
+            # may later get defined by <sgidefs.h>), and _MIPS_SIM == _ABIO32.
+            cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if (_MIPS_SIM == _ABIN32)
+                    int ok;
+                   #else
+                    error fail
+                   #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_host_cpu_c_abi=mipsn32
+else
+  gl_cv_host_cpu_c_abi=mips
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         ;;
+
+       powerpc* )
+         # Different ABIs are in use on AIX vs. Mac OS X vs. Linux,*BSD.
+         # No need to distinguish them here; the caller may distinguish
+         # them based on the OS.
+         # On powerpc64 systems, the C compiler may still be generating
+         # 32-bit code. And on powerpc-ibm-aix systems, the C compiler may
+         # be generating 64-bit code.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined __powerpc64__ || defined _ARCH_PPC64
+                 int ok;
+                #else
+                 error fail
+                #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  # On powerpc64, there are two ABIs on Linux: The AIX compatible
+            # one and the ELFv2 one. The latter defines _CALL_ELF=2.
+            cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined _CALL_ELF && _CALL_ELF == 2
+                    int ok;
+                   #else
+                    error fail
+                   #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_host_cpu_c_abi=powerpc64-elfv2
+else
+  gl_cv_host_cpu_c_abi=powerpc64
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+
+else
+  gl_cv_host_cpu_c_abi=powerpc
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         ;;
+
+       rs6000 )
+         gl_cv_host_cpu_c_abi=powerpc
+         ;;
+
+       riscv32 | riscv64 )
+         # There are 2 architectures (with variants): rv32* and rv64*.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if __riscv_xlen == 64
+                  int ok;
+                #else
+                  error fail
+                #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  cpu=riscv64
+else
+  cpu=riscv32
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         # There are 6 ABIs: ilp32, ilp32f, ilp32d, lp64, lp64f, lp64d.
+         # Size of 'long' and 'void *':
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined __LP64__
+                  int ok;
+                #else
+                  error fail
+                #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  main_abi=lp64
+else
+  main_abi=ilp32
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         # Float ABIs:
+         # __riscv_float_abi_double:
+         #   'float' and 'double' are passed in floating-point registers.
+         # __riscv_float_abi_single:
+         #   'float' are passed in floating-point registers.
+         # __riscv_float_abi_soft:
+         #   No values are passed in floating-point registers.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined __riscv_float_abi_double
+                  int ok;
+                #else
+                  error fail
+                #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  float_abi=d
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined __riscv_float_abi_single
+                     int ok;
+                   #else
+                     error fail
+                   #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  float_abi=f
+else
+  float_abi=''
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         gl_cv_host_cpu_c_abi="${cpu}-${main_abi}${float_abi}"
+         ;;
+
+       s390* )
+         # On s390x, the C compiler may be generating 64-bit (= s390x) code
+         # or 31-bit (= s390) code.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined __LP64__ || defined __s390x__
+                  int ok;
+                #else
+                  error fail
+                #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_host_cpu_c_abi=s390x
+else
+  gl_cv_host_cpu_c_abi=s390
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         ;;
+
+       sparc | sparc64 )
+         # UltraSPARCs running Linux have `uname -m` = "sparc64", but the
+         # C compiler still generates 32-bit code.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined __sparcv9 || defined __arch64__
+                 int ok;
+                #else
+                 error fail
+                #endif
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_host_cpu_c_abi=sparc64
+else
+  gl_cv_host_cpu_c_abi=sparc
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         ;;
+
+       *)
+         gl_cv_host_cpu_c_abi="$host_cpu"
+         ;;
+     esac
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_host_cpu_c_abi" >&5
+$as_echo "$gl_cv_host_cpu_c_abi" >&6; }
+
+    HOST_CPU=`echo "$gl_cv_host_cpu_c_abi" | sed -e 's/-.*//'`
+  HOST_CPU_C_ABI="$gl_cv_host_cpu_c_abi"
+
+
+
+  # This was
+  #   AC_DEFINE_UNQUOTED([__${HOST_CPU}__])
+  #   AC_DEFINE_UNQUOTED([__${HOST_CPU_C_ABI}__])
+  # earlier, but KAI C++ 3.2d doesn't like this.
+  sed -e 's/-/_/g' >> confdefs.h <<EOF
+#ifndef __${HOST_CPU}__
+#define __${HOST_CPU}__ 1
+#endif
+#ifndef __${HOST_CPU_C_ABI}__
+#define __${HOST_CPU_C_ABI}__ 1
+#endif
+EOF
+
+
+
+
+
+  case "$host_cpu" in
+    arm* )
+      { $as_echo "$as_me:${as_lineno-$LINENO}: checking endianness" >&5
+$as_echo_n "checking endianness... " >&6; }
+if ${ffcall_cv_endianness+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined __ARMEL__
+            yes
+            #endif
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "yes" >/dev/null 2>&1; then :
+  ffcall_cv_endianness=little
+else
+  ffcall_cv_endianness=big
+fi
+rm -f conftest*
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_endianness" >&5
+$as_echo "$ffcall_cv_endianness" >&6; }
+      ;;
+    mips* )
+      { $as_echo "$as_me:${as_lineno-$LINENO}: checking endianness" >&5
+$as_echo_n "checking endianness... " >&6; }
+if ${ffcall_cv_endianness+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  # Compilers on IRIX define only _MIPSEB as indicator.
+         # Compilers on Linux define _MIPSEB, __MIPSEB__, __MIPSEB or - in
+         # the opposite case - _MIPSEL, __MIPSEL__, __MIPSEL.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined _MIPSEB
+            yes
+            #endif
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "yes" >/dev/null 2>&1; then :
+  ffcall_cv_endianness=big
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined _MIPSEL
+               yes
+               #endif
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "yes" >/dev/null 2>&1; then :
+  ffcall_cv_endianness=little
+else
+  ffcall_cv_endianness=unknown
+fi
+rm -f conftest*
+
+fi
+rm -f conftest*
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_endianness" >&5
+$as_echo "$ffcall_cv_endianness" >&6; }
+      ;;
+    powerpc*)
+      { $as_echo "$as_me:${as_lineno-$LINENO}: checking endianness" >&5
+$as_echo_n "checking endianness... " >&6; }
+if ${ffcall_cv_endianness+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  # Compilers on AIX and Linux define _BIG_ENDIAN, __BIG_ENDIAN__ or
+         # - in the opposite case - _LITTLE_ENDIAN, __LITTLE_ENDIAN__.
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined _BIG_ENDIAN
+            yes
+            #endif
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "yes" >/dev/null 2>&1; then :
+  ffcall_cv_endianness=big
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#if defined _LITTLE_ENDIAN
+               yes
+               #endif
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "yes" >/dev/null 2>&1; then :
+  ffcall_cv_endianness=little
+else
+  ffcall_cv_endianness=unknown
+fi
+rm -f conftest*
+
+fi
+rm -f conftest*
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_endianness" >&5
+$as_echo "$ffcall_cv_endianness" >&6; }
+      ;;
+    *) ffcall_cv_endianness=known ;;
+  esac
+  case "$ffcall_cv_endianness" in
+    big)    ENDIANNESS='eb' ;;
+    little) ENDIANNESS='el' ;;
+    *)      ENDIANNESS='' ;;
+  esac
+
+
+
+PACKAGE=libffcall
+case `pwd` in
+  *\ * | *\    *)
+    { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: Libtool does not cope well with whitespace in \`pwd\`" >&5
+$as_echo "$as_me: WARNING: Libtool does not cope well with whitespace in \`pwd\`" >&2;} ;;
+esac
+
+
+
+macro_version='2.4.6'
+macro_revision='2.4.6'
+
+
+
+
+
+
+
+
+
+
+
+
+
+ltmain=$ac_aux_dir/ltmain.sh
+
+# Backslashify metacharacters that are still active within
+# double-quoted strings.
+sed_quote_subst='s/\(["`$\\]\)/\\\1/g'
+
+# Same as above, but do not quote variable references.
+double_quote_subst='s/\(["`\\]\)/\\\1/g'
+
+# Sed substitution to delay expansion of an escaped shell variable in a
+# double_quote_subst'ed string.
+delay_variable_subst='s/\\\\\\\\\\\$/\\\\\\$/g'
+
+# Sed substitution to delay expansion of an escaped single quote.
+delay_single_quote_subst='s/'\''/'\'\\\\\\\'\''/g'
+
+# Sed substitution to avoid accidental globbing in evaled expressions
+no_glob_subst='s/\*/\\\*/g'
+
+ECHO='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\'
+ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO
+ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO$ECHO
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking how to print strings" >&5
+$as_echo_n "checking how to print strings... " >&6; }
+# Test print first, because it will be a builtin if present.
+if test "X`( print -r -- -n ) 2>/dev/null`" = X-n && \
+   test "X`print -r -- $ECHO 2>/dev/null`" = "X$ECHO"; then
+  ECHO='print -r --'
+elif test "X`printf %s $ECHO 2>/dev/null`" = "X$ECHO"; then
+  ECHO='printf %s\n'
+else
+  # Use this function as a fallback that always works.
+  func_fallback_echo ()
+  {
+    eval 'cat <<_LTECHO_EOF
+$1
+_LTECHO_EOF'
+  }
+  ECHO='func_fallback_echo'
+fi
+
+# func_echo_all arg...
+# Invoke $ECHO with all args, space-separated.
+func_echo_all ()
+{
+    $ECHO ""
+}
+
+case $ECHO in
+  printf*) { $as_echo "$as_me:${as_lineno-$LINENO}: result: printf" >&5
+$as_echo "printf" >&6; } ;;
+  print*) { $as_echo "$as_me:${as_lineno-$LINENO}: result: print -r" >&5
+$as_echo "print -r" >&6; } ;;
+  *) { $as_echo "$as_me:${as_lineno-$LINENO}: result: cat" >&5
+$as_echo "cat" >&6; } ;;
+esac
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for a sed that does not truncate output" >&5
+$as_echo_n "checking for a sed that does not truncate output... " >&6; }
+if ${ac_cv_path_SED+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+            ac_script=s/aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa/bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb/
+     for ac_i in 1 2 3 4 5 6 7; do
+       ac_script="$ac_script$as_nl$ac_script"
+     done
+     echo "$ac_script" 2>/dev/null | sed 99q >conftest.sed
+     { ac_script=; unset ac_script;}
+     if test -z "$SED"; then
+  ac_path_SED_found=false
+  # Loop through the user's path and test for each of PROGNAME-LIST
+  as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_prog in sed gsed; do
+    for ac_exec_ext in '' $ac_executable_extensions; do
+      ac_path_SED="$as_dir/$ac_prog$ac_exec_ext"
+      as_fn_executable_p "$ac_path_SED" || continue
+# Check for GNU ac_path_SED and select it if it is found.
+  # Check for GNU $ac_path_SED
+case `"$ac_path_SED" --version 2>&1` in
+*GNU*)
+  ac_cv_path_SED="$ac_path_SED" ac_path_SED_found=:;;
+*)
+  ac_count=0
+  $as_echo_n 0123456789 >"conftest.in"
+  while :
+  do
+    cat "conftest.in" "conftest.in" >"conftest.tmp"
+    mv "conftest.tmp" "conftest.in"
+    cp "conftest.in" "conftest.nl"
+    $as_echo '' >> "conftest.nl"
+    "$ac_path_SED" -f conftest.sed < "conftest.nl" >"conftest.out" 2>/dev/null || break
+    diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break
+    as_fn_arith $ac_count + 1 && ac_count=$as_val
+    if test $ac_count -gt ${ac_path_SED_max-0}; then
+      # Best one so far, save it but keep looking for a better one
+      ac_cv_path_SED="$ac_path_SED"
+      ac_path_SED_max=$ac_count
+    fi
+    # 10*(2^10) chars as input seems more than enough
+    test $ac_count -gt 10 && break
+  done
+  rm -f conftest.in conftest.tmp conftest.nl conftest.out;;
+esac
+
+      $ac_path_SED_found && break 3
+    done
+  done
+  done
+IFS=$as_save_IFS
+  if test -z "$ac_cv_path_SED"; then
+    as_fn_error $? "no acceptable sed could be found in \$PATH" "$LINENO" 5
+  fi
+else
+  ac_cv_path_SED=$SED
+fi
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_SED" >&5
+$as_echo "$ac_cv_path_SED" >&6; }
+ SED="$ac_cv_path_SED"
+  rm -f conftest.sed
+
+test -z "$SED" && SED=sed
+Xsed="$SED -e 1s/^X//"
+
+
+
+
+
+
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for fgrep" >&5
+$as_echo_n "checking for fgrep... " >&6; }
+if ${ac_cv_path_FGREP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if echo 'ab*c' | $GREP -F 'ab*c' >/dev/null 2>&1
+   then ac_cv_path_FGREP="$GREP -F"
+   else
+     if test -z "$FGREP"; then
+  ac_path_FGREP_found=false
+  # Loop through the user's path and test for each of PROGNAME-LIST
+  as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH$PATH_SEPARATOR/usr/xpg4/bin
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_prog in fgrep; do
+    for ac_exec_ext in '' $ac_executable_extensions; do
+      ac_path_FGREP="$as_dir/$ac_prog$ac_exec_ext"
+      as_fn_executable_p "$ac_path_FGREP" || continue
+# Check for GNU ac_path_FGREP and select it if it is found.
+  # Check for GNU $ac_path_FGREP
+case `"$ac_path_FGREP" --version 2>&1` in
+*GNU*)
+  ac_cv_path_FGREP="$ac_path_FGREP" ac_path_FGREP_found=:;;
+*)
+  ac_count=0
+  $as_echo_n 0123456789 >"conftest.in"
+  while :
+  do
+    cat "conftest.in" "conftest.in" >"conftest.tmp"
+    mv "conftest.tmp" "conftest.in"
+    cp "conftest.in" "conftest.nl"
+    $as_echo 'FGREP' >> "conftest.nl"
+    "$ac_path_FGREP" FGREP < "conftest.nl" >"conftest.out" 2>/dev/null || break
+    diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break
+    as_fn_arith $ac_count + 1 && ac_count=$as_val
+    if test $ac_count -gt ${ac_path_FGREP_max-0}; then
+      # Best one so far, save it but keep looking for a better one
+      ac_cv_path_FGREP="$ac_path_FGREP"
+      ac_path_FGREP_max=$ac_count
+    fi
+    # 10*(2^10) chars as input seems more than enough
+    test $ac_count -gt 10 && break
+  done
+  rm -f conftest.in conftest.tmp conftest.nl conftest.out;;
+esac
+
+      $ac_path_FGREP_found && break 3
+    done
+  done
+  done
+IFS=$as_save_IFS
+  if test -z "$ac_cv_path_FGREP"; then
+    as_fn_error $? "no acceptable fgrep could be found in $PATH$PATH_SEPARATOR/usr/xpg4/bin" "$LINENO" 5
+  fi
+else
+  ac_cv_path_FGREP=$FGREP
+fi
+
+   fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_FGREP" >&5
+$as_echo "$ac_cv_path_FGREP" >&6; }
+ FGREP="$ac_cv_path_FGREP"
+
+
+test -z "$GREP" && GREP=grep
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+# Check whether --with-gnu-ld was given.
+if test "${with_gnu_ld+set}" = set; then :
+  withval=$with_gnu_ld; test no = "$withval" || with_gnu_ld=yes
+else
+  with_gnu_ld=no
+fi
+
+ac_prog=ld
+if test yes = "$GCC"; then
+  # Check if gcc -print-prog-name=ld gives a path.
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for ld used by $CC" >&5
+$as_echo_n "checking for ld used by $CC... " >&6; }
+  case $host in
+  *-*-mingw*)
+    # gcc leaves a trailing carriage return, which upsets mingw
+    ac_prog=`($CC -print-prog-name=ld) 2>&5 | tr -d '\015'` ;;
+  *)
+    ac_prog=`($CC -print-prog-name=ld) 2>&5` ;;
+  esac
+  case $ac_prog in
+    # Accept absolute paths.
+    [\\/]* | ?:[\\/]*)
+      re_direlt='/[^/][^/]*/\.\./'
+      # Canonicalize the pathname of ld
+      ac_prog=`$ECHO "$ac_prog"| $SED 's%\\\\%/%g'`
+      while $ECHO "$ac_prog" | $GREP "$re_direlt" > /dev/null 2>&1; do
+       ac_prog=`$ECHO $ac_prog| $SED "s%$re_direlt%/%"`
+      done
+      test -z "$LD" && LD=$ac_prog
+      ;;
+  "")
+    # If it fails, then pretend we aren't using GCC.
+    ac_prog=ld
+    ;;
+  *)
+    # If it is relative, then search for the first ld in PATH.
+    with_gnu_ld=unknown
+    ;;
+  esac
+elif test yes = "$with_gnu_ld"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for GNU ld" >&5
+$as_echo_n "checking for GNU ld... " >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for non-GNU ld" >&5
+$as_echo_n "checking for non-GNU ld... " >&6; }
+fi
+if ${lt_cv_path_LD+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -z "$LD"; then
+  lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR
+  for ac_dir in $PATH; do
+    IFS=$lt_save_ifs
+    test -z "$ac_dir" && ac_dir=.
+    if test -f "$ac_dir/$ac_prog" || test -f "$ac_dir/$ac_prog$ac_exeext"; then
+      lt_cv_path_LD=$ac_dir/$ac_prog
+      # Check to see if the program is GNU ld.  I'd rather use --version,
+      # but apparently some variants of GNU ld only accept -v.
+      # Break only if it was the GNU/non-GNU ld that we prefer.
+      case `"$lt_cv_path_LD" -v 2>&1 </dev/null` in
+      *GNU* | *'with BFD'*)
+       test no != "$with_gnu_ld" && break
+       ;;
+      *)
+       test yes != "$with_gnu_ld" && break
+       ;;
+      esac
+    fi
+  done
+  IFS=$lt_save_ifs
+else
+  lt_cv_path_LD=$LD # Let the user override the test with a path.
+fi
+fi
+
+LD=$lt_cv_path_LD
+if test -n "$LD"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $LD" >&5
+$as_echo "$LD" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+test -z "$LD" && as_fn_error $? "no acceptable ld found in \$PATH" "$LINENO" 5
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking if the linker ($LD) is GNU ld" >&5
+$as_echo_n "checking if the linker ($LD) is GNU ld... " >&6; }
+if ${lt_cv_prog_gnu_ld+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  # I'd rather use --version here, but apparently some GNU lds only accept -v.
+case `$LD -v 2>&1 </dev/null` in
+*GNU* | *'with BFD'*)
+  lt_cv_prog_gnu_ld=yes
+  ;;
+*)
+  lt_cv_prog_gnu_ld=no
+  ;;
+esac
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_gnu_ld" >&5
+$as_echo "$lt_cv_prog_gnu_ld" >&6; }
+with_gnu_ld=$lt_cv_prog_gnu_ld
+
+
+
+
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for BSD- or MS-compatible name lister (nm)" >&5
+$as_echo_n "checking for BSD- or MS-compatible name lister (nm)... " >&6; }
+if ${lt_cv_path_NM+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$NM"; then
+  # Let the user override the test.
+  lt_cv_path_NM=$NM
+else
+  lt_nm_to_check=${ac_tool_prefix}nm
+  if test -n "$ac_tool_prefix" && test "$build" = "$host"; then
+    lt_nm_to_check="$lt_nm_to_check nm"
+  fi
+  for lt_tmp_nm in $lt_nm_to_check; do
+    lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR
+    for ac_dir in $PATH /usr/ccs/bin/elf /usr/ccs/bin /usr/ucb /bin; do
+      IFS=$lt_save_ifs
+      test -z "$ac_dir" && ac_dir=.
+      tmp_nm=$ac_dir/$lt_tmp_nm
+      if test -f "$tmp_nm" || test -f "$tmp_nm$ac_exeext"; then
+       # Check to see if the nm accepts a BSD-compat flag.
+       # Adding the 'sed 1q' prevents false positives on HP-UX, which says:
+       #   nm: unknown option "B" ignored
+       # Tru64's nm complains that /dev/null is an invalid object file
+       # MSYS converts /dev/null to NUL, MinGW nm treats NUL as empty
+       case $build_os in
+       mingw*) lt_bad_file=conftest.nm/nofile ;;
+       *) lt_bad_file=/dev/null ;;
+       esac
+       case `"$tmp_nm" -B $lt_bad_file 2>&1 | sed '1q'` in
+       *$lt_bad_file* | *'Invalid file or object type'*)
+         lt_cv_path_NM="$tmp_nm -B"
+         break 2
+         ;;
+       *)
+         case `"$tmp_nm" -p /dev/null 2>&1 | sed '1q'` in
+         */dev/null*)
+           lt_cv_path_NM="$tmp_nm -p"
+           break 2
+           ;;
+         *)
+           lt_cv_path_NM=${lt_cv_path_NM="$tmp_nm"} # keep the first match, but
+           continue # so that we can try to find one that supports BSD flags
+           ;;
+         esac
+         ;;
+       esac
+      fi
+    done
+    IFS=$lt_save_ifs
+  done
+  : ${lt_cv_path_NM=no}
+fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_path_NM" >&5
+$as_echo "$lt_cv_path_NM" >&6; }
+if test no != "$lt_cv_path_NM"; then
+  NM=$lt_cv_path_NM
+else
+  # Didn't find any BSD compatible name lister, look for dumpbin.
+  if test -n "$DUMPBIN"; then :
+    # Let the user override the test.
+  else
+    if test -n "$ac_tool_prefix"; then
+  for ac_prog in dumpbin "link -dump"
+  do
+    # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args.
+set dummy $ac_tool_prefix$ac_prog; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_DUMPBIN+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$DUMPBIN"; then
+  ac_cv_prog_DUMPBIN="$DUMPBIN" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_DUMPBIN="$ac_tool_prefix$ac_prog"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+DUMPBIN=$ac_cv_prog_DUMPBIN
+if test -n "$DUMPBIN"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $DUMPBIN" >&5
+$as_echo "$DUMPBIN" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+    test -n "$DUMPBIN" && break
+  done
+fi
+if test -z "$DUMPBIN"; then
+  ac_ct_DUMPBIN=$DUMPBIN
+  for ac_prog in dumpbin "link -dump"
+do
+  # Extract the first word of "$ac_prog", so it can be a program name with args.
+set dummy $ac_prog; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_DUMPBIN+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_DUMPBIN"; then
+  ac_cv_prog_ac_ct_DUMPBIN="$ac_ct_DUMPBIN" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_DUMPBIN="$ac_prog"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_DUMPBIN=$ac_cv_prog_ac_ct_DUMPBIN
+if test -n "$ac_ct_DUMPBIN"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_DUMPBIN" >&5
+$as_echo "$ac_ct_DUMPBIN" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+  test -n "$ac_ct_DUMPBIN" && break
+done
+
+  if test "x$ac_ct_DUMPBIN" = x; then
+    DUMPBIN=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    DUMPBIN=$ac_ct_DUMPBIN
+  fi
+fi
+
+    case `$DUMPBIN -symbols -headers /dev/null 2>&1 | sed '1q'` in
+    *COFF*)
+      DUMPBIN="$DUMPBIN -symbols -headers"
+      ;;
+    *)
+      DUMPBIN=:
+      ;;
+    esac
+  fi
+
+  if test : != "$DUMPBIN"; then
+    NM=$DUMPBIN
+  fi
+fi
+test -z "$NM" && NM=nm
+
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking the name lister ($NM) interface" >&5
+$as_echo_n "checking the name lister ($NM) interface... " >&6; }
+if ${lt_cv_nm_interface+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_nm_interface="BSD nm"
+  echo "int some_variable = 0;" > conftest.$ac_ext
+  (eval echo "\"\$as_me:$LINENO: $ac_compile\"" >&5)
+  (eval "$ac_compile" 2>conftest.err)
+  cat conftest.err >&5
+  (eval echo "\"\$as_me:$LINENO: $NM \\\"conftest.$ac_objext\\\"\"" >&5)
+  (eval "$NM \"conftest.$ac_objext\"" 2>conftest.err > conftest.out)
+  cat conftest.err >&5
+  (eval echo "\"\$as_me:$LINENO: output\"" >&5)
+  cat conftest.out >&5
+  if $GREP 'External.*some_variable' conftest.out > /dev/null; then
+    lt_cv_nm_interface="MS dumpbin"
+  fi
+  rm -f conftest*
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_nm_interface" >&5
+$as_echo "$lt_cv_nm_interface" >&6; }
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether ln -s works" >&5
+$as_echo_n "checking whether ln -s works... " >&6; }
+LN_S=$as_ln_s
+if test "$LN_S" = "ln -s"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5
+$as_echo "yes" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no, using $LN_S" >&5
+$as_echo "no, using $LN_S" >&6; }
+fi
+
+# find the maximum length of command line arguments
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking the maximum length of command line arguments" >&5
+$as_echo_n "checking the maximum length of command line arguments... " >&6; }
+if ${lt_cv_sys_max_cmd_len+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+    i=0
+  teststring=ABCD
+
+  case $build_os in
+  msdosdjgpp*)
+    # On DJGPP, this test can blow up pretty badly due to problems in libc
+    # (any single argument exceeding 2000 bytes causes a buffer overrun
+    # during glob expansion).  Even if it were fixed, the result of this
+    # check would be larger than it should be.
+    lt_cv_sys_max_cmd_len=12288;    # 12K is about right
+    ;;
+
+  gnu*)
+    # Under GNU Hurd, this test is not required because there is
+    # no limit to the length of command line arguments.
+    # Libtool will interpret -1 as no limit whatsoever
+    lt_cv_sys_max_cmd_len=-1;
+    ;;
+
+  cygwin* | mingw* | cegcc*)
+    # On Win9x/ME, this test blows up -- it succeeds, but takes
+    # about 5 minutes as the teststring grows exponentially.
+    # Worse, since 9x/ME are not pre-emptively multitasking,
+    # you end up with a "frozen" computer, even though with patience
+    # the test eventually succeeds (with a max line length of 256k).
+    # Instead, let's just punt: use the minimum linelength reported by
+    # all of the supported platforms: 8192 (on NT/2K/XP).
+    lt_cv_sys_max_cmd_len=8192;
+    ;;
+
+  mint*)
+    # On MiNT this can take a long time and run out of memory.
+    lt_cv_sys_max_cmd_len=8192;
+    ;;
+
+  amigaos*)
+    # On AmigaOS with pdksh, this test takes hours, literally.
+    # So we just punt and use a minimum line length of 8192.
+    lt_cv_sys_max_cmd_len=8192;
+    ;;
+
+  bitrig* | darwin* | dragonfly* | freebsd* | netbsd* | openbsd*)
+    # This has been around since 386BSD, at least.  Likely further.
+    if test -x /sbin/sysctl; then
+      lt_cv_sys_max_cmd_len=`/sbin/sysctl -n kern.argmax`
+    elif test -x /usr/sbin/sysctl; then
+      lt_cv_sys_max_cmd_len=`/usr/sbin/sysctl -n kern.argmax`
+    else
+      lt_cv_sys_max_cmd_len=65536      # usable default for all BSDs
+    fi
+    # And add a safety zone
+    lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 4`
+    lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \* 3`
+    ;;
+
+  interix*)
+    # We know the value 262144 and hardcode it with a safety zone (like BSD)
+    lt_cv_sys_max_cmd_len=196608
+    ;;
+
+  os2*)
+    # The test takes a long time on OS/2.
+    lt_cv_sys_max_cmd_len=8192
+    ;;
+
+  osf*)
+    # Dr. Hans Ekkehard Plesser reports seeing a kernel panic running configure
+    # due to this test when exec_disable_arg_limit is 1 on Tru64. It is not
+    # nice to cause kernel panics so lets avoid the loop below.
+    # First set a reasonable default.
+    lt_cv_sys_max_cmd_len=16384
+    #
+    if test -x /sbin/sysconfig; then
+      case `/sbin/sysconfig -q proc exec_disable_arg_limit` in
+        *1*) lt_cv_sys_max_cmd_len=-1 ;;
+      esac
+    fi
+    ;;
+  sco3.2v5*)
+    lt_cv_sys_max_cmd_len=102400
+    ;;
+  sysv5* | sco5v6* | sysv4.2uw2*)
+    kargmax=`grep ARG_MAX /etc/conf/cf.d/stune 2>/dev/null`
+    if test -n "$kargmax"; then
+      lt_cv_sys_max_cmd_len=`echo $kargmax | sed 's/.*[         ]//'`
+    else
+      lt_cv_sys_max_cmd_len=32768
+    fi
+    ;;
+  *)
+    lt_cv_sys_max_cmd_len=`(getconf ARG_MAX) 2> /dev/null`
+    if test -n "$lt_cv_sys_max_cmd_len" && \
+       test undefined != "$lt_cv_sys_max_cmd_len"; then
+      lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 4`
+      lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \* 3`
+    else
+      # Make teststring a little bigger before we do anything with it.
+      # a 1K string should be a reasonable start.
+      for i in 1 2 3 4 5 6 7 8; do
+        teststring=$teststring$teststring
+      done
+      SHELL=${SHELL-${CONFIG_SHELL-/bin/sh}}
+      # If test is not a shell built-in, we'll probably end up computing a
+      # maximum length that is only half of the actual maximum length, but
+      # we can't tell.
+      while { test X`env echo "$teststring$teststring" 2>/dev/null` \
+                = "X$teststring$teststring"; } >/dev/null 2>&1 &&
+             test 17 != "$i" # 1/2 MB should be enough
+      do
+        i=`expr $i + 1`
+        teststring=$teststring$teststring
+      done
+      # Only check the string length outside the loop.
+      lt_cv_sys_max_cmd_len=`expr "X$teststring" : ".*" 2>&1`
+      teststring=
+      # Add a significant safety factor because C++ compilers can tack on
+      # massive amounts of additional arguments before passing them to the
+      # linker.  It appears as though 1/2 is a usable value.
+      lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 2`
+    fi
+    ;;
+  esac
+
+fi
+
+if test -n "$lt_cv_sys_max_cmd_len"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_sys_max_cmd_len" >&5
+$as_echo "$lt_cv_sys_max_cmd_len" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: none" >&5
+$as_echo "none" >&6; }
+fi
+max_cmd_len=$lt_cv_sys_max_cmd_len
+
+
+
+
+
+
+: ${CP="cp -f"}
+: ${MV="mv -f"}
+: ${RM="rm -f"}
+
+if ( (MAIL=60; unset MAIL) || exit) >/dev/null 2>&1; then
+  lt_unset=unset
+else
+  lt_unset=false
+fi
+
+
+
+
+
+# test EBCDIC or ASCII
+case `echo X|tr X '\101'` in
+ A) # ASCII based system
+    # \n is not interpreted correctly by Solaris 8 /usr/ucb/tr
+  lt_SP2NL='tr \040 \012'
+  lt_NL2SP='tr \015\012 \040\040'
+  ;;
+ *) # EBCDIC based system
+  lt_SP2NL='tr \100 \n'
+  lt_NL2SP='tr \r\n \100\100'
+  ;;
+esac
+
+
+
+
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking how to convert $build file names to $host format" >&5
+$as_echo_n "checking how to convert $build file names to $host format... " >&6; }
+if ${lt_cv_to_host_file_cmd+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  case $host in
+  *-*-mingw* )
+    case $build in
+      *-*-mingw* ) # actually msys
+        lt_cv_to_host_file_cmd=func_convert_file_msys_to_w32
+        ;;
+      *-*-cygwin* )
+        lt_cv_to_host_file_cmd=func_convert_file_cygwin_to_w32
+        ;;
+      * ) # otherwise, assume *nix
+        lt_cv_to_host_file_cmd=func_convert_file_nix_to_w32
+        ;;
+    esac
+    ;;
+  *-*-cygwin* )
+    case $build in
+      *-*-mingw* ) # actually msys
+        lt_cv_to_host_file_cmd=func_convert_file_msys_to_cygwin
+        ;;
+      *-*-cygwin* )
+        lt_cv_to_host_file_cmd=func_convert_file_noop
+        ;;
+      * ) # otherwise, assume *nix
+        lt_cv_to_host_file_cmd=func_convert_file_nix_to_cygwin
+        ;;
+    esac
+    ;;
+  * ) # unhandled hosts (and "normal" native builds)
+    lt_cv_to_host_file_cmd=func_convert_file_noop
+    ;;
+esac
+
+fi
+
+to_host_file_cmd=$lt_cv_to_host_file_cmd
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_to_host_file_cmd" >&5
+$as_echo "$lt_cv_to_host_file_cmd" >&6; }
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking how to convert $build file names to toolchain format" >&5
+$as_echo_n "checking how to convert $build file names to toolchain format... " >&6; }
+if ${lt_cv_to_tool_file_cmd+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  #assume ordinary cross tools, or native build.
+lt_cv_to_tool_file_cmd=func_convert_file_noop
+case $host in
+  *-*-mingw* )
+    case $build in
+      *-*-mingw* ) # actually msys
+        lt_cv_to_tool_file_cmd=func_convert_file_msys_to_w32
+        ;;
+    esac
+    ;;
+esac
+
+fi
+
+to_tool_file_cmd=$lt_cv_to_tool_file_cmd
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_to_tool_file_cmd" >&5
+$as_echo "$lt_cv_to_tool_file_cmd" >&6; }
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $LD option to reload object files" >&5
+$as_echo_n "checking for $LD option to reload object files... " >&6; }
+if ${lt_cv_ld_reload_flag+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_ld_reload_flag='-r'
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_ld_reload_flag" >&5
+$as_echo "$lt_cv_ld_reload_flag" >&6; }
+reload_flag=$lt_cv_ld_reload_flag
+case $reload_flag in
+"" | " "*) ;;
+*) reload_flag=" $reload_flag" ;;
+esac
+reload_cmds='$LD$reload_flag -o $output$reload_objs'
+case $host_os in
+  cygwin* | mingw* | pw32* | cegcc*)
+    if test yes != "$GCC"; then
+      reload_cmds=false
+    fi
+    ;;
+  darwin*)
+    if test yes = "$GCC"; then
+      reload_cmds='$LTCC $LTCFLAGS -nostdlib $wl-r -o $output$reload_objs'
+    else
+      reload_cmds='$LD$reload_flag -o $output$reload_objs'
+    fi
+    ;;
+esac
+
+
+
+
+
+
+
+
+
+if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}objdump", so it can be a program name with args.
+set dummy ${ac_tool_prefix}objdump; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_OBJDUMP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$OBJDUMP"; then
+  ac_cv_prog_OBJDUMP="$OBJDUMP" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_OBJDUMP="${ac_tool_prefix}objdump"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+OBJDUMP=$ac_cv_prog_OBJDUMP
+if test -n "$OBJDUMP"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $OBJDUMP" >&5
+$as_echo "$OBJDUMP" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_OBJDUMP"; then
+  ac_ct_OBJDUMP=$OBJDUMP
+  # Extract the first word of "objdump", so it can be a program name with args.
+set dummy objdump; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_OBJDUMP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_OBJDUMP"; then
+  ac_cv_prog_ac_ct_OBJDUMP="$ac_ct_OBJDUMP" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_OBJDUMP="objdump"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_OBJDUMP=$ac_cv_prog_ac_ct_OBJDUMP
+if test -n "$ac_ct_OBJDUMP"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_OBJDUMP" >&5
+$as_echo "$ac_ct_OBJDUMP" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_OBJDUMP" = x; then
+    OBJDUMP="false"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    OBJDUMP=$ac_ct_OBJDUMP
+  fi
+else
+  OBJDUMP="$ac_cv_prog_OBJDUMP"
+fi
+
+test -z "$OBJDUMP" && OBJDUMP=objdump
+
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking how to recognize dependent libraries" >&5
+$as_echo_n "checking how to recognize dependent libraries... " >&6; }
+if ${lt_cv_deplibs_check_method+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_file_magic_cmd='$MAGIC_CMD'
+lt_cv_file_magic_test_file=
+lt_cv_deplibs_check_method='unknown'
+# Need to set the preceding variable on all platforms that support
+# interlibrary dependencies.
+# 'none' -- dependencies not supported.
+# 'unknown' -- same as none, but documents that we really don't know.
+# 'pass_all' -- all dependencies passed with no checks.
+# 'test_compile' -- check by making test program.
+# 'file_magic [[regex]]' -- check by looking for files in library path
+# that responds to the $file_magic_cmd with a given extended regex.
+# If you have 'file' or equivalent on your system and you're not sure
+# whether 'pass_all' will *always* work, you probably want this one.
+
+case $host_os in
+aix[4-9]*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+beos*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+bsdi[45]*)
+  lt_cv_deplibs_check_method='file_magic ELF [0-9][0-9]*-bit [ML]SB (shared object|dynamic lib)'
+  lt_cv_file_magic_cmd='/usr/bin/file -L'
+  lt_cv_file_magic_test_file=/shlib/libc.so
+  ;;
+
+cygwin*)
+  # func_win32_libid is a shell function defined in ltmain.sh
+  lt_cv_deplibs_check_method='file_magic ^x86 archive import|^x86 DLL'
+  lt_cv_file_magic_cmd='func_win32_libid'
+  ;;
+
+mingw* | pw32*)
+  # Base MSYS/MinGW do not provide the 'file' command needed by
+  # func_win32_libid shell function, so use a weaker test based on 'objdump',
+  # unless we find 'file', for example because we are cross-compiling.
+  if ( file / ) >/dev/null 2>&1; then
+    lt_cv_deplibs_check_method='file_magic ^x86 archive import|^x86 DLL'
+    lt_cv_file_magic_cmd='func_win32_libid'
+  else
+    # Keep this pattern in sync with the one in func_win32_libid.
+    lt_cv_deplibs_check_method='file_magic file format (pei*-i386(.*architecture: i386)?|pe-arm-wince|pe-x86-64)'
+    lt_cv_file_magic_cmd='$OBJDUMP -f'
+  fi
+  ;;
+
+cegcc*)
+  # use the weaker test based on 'objdump'. See mingw*.
+  lt_cv_deplibs_check_method='file_magic file format pe-arm-.*little(.*architecture: arm)?'
+  lt_cv_file_magic_cmd='$OBJDUMP -f'
+  ;;
+
+darwin* | rhapsody*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+freebsd* | dragonfly*)
+  if echo __ELF__ | $CC -E - | $GREP __ELF__ > /dev/null; then
+    case $host_cpu in
+    i*86 )
+      # Not sure whether the presence of OpenBSD here was a mistake.
+      # Let's accept both of them until this is cleared up.
+      lt_cv_deplibs_check_method='file_magic (FreeBSD|OpenBSD|DragonFly)/i[3-9]86 (compact )?demand paged shared library'
+      lt_cv_file_magic_cmd=/usr/bin/file
+      lt_cv_file_magic_test_file=`echo /usr/lib/libc.so.*`
+      ;;
+    esac
+  else
+    lt_cv_deplibs_check_method=pass_all
+  fi
+  ;;
+
+haiku*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+hpux10.20* | hpux11*)
+  lt_cv_file_magic_cmd=/usr/bin/file
+  case $host_cpu in
+  ia64*)
+    lt_cv_deplibs_check_method='file_magic (s[0-9][0-9][0-9]|ELF-[0-9][0-9]) shared object file - IA64'
+    lt_cv_file_magic_test_file=/usr/lib/hpux32/libc.so
+    ;;
+  hppa*64*)
+    lt_cv_deplibs_check_method='file_magic (s[0-9][0-9][0-9]|ELF[ -][0-9][0-9])(-bit)?( [LM]SB)? shared object( file)?[, -]* PA-RISC [0-9]\.[0-9]'
+    lt_cv_file_magic_test_file=/usr/lib/pa20_64/libc.sl
+    ;;
+  *)
+    lt_cv_deplibs_check_method='file_magic (s[0-9][0-9][0-9]|PA-RISC[0-9]\.[0-9]) shared library'
+    lt_cv_file_magic_test_file=/usr/lib/libc.sl
+    ;;
+  esac
+  ;;
+
+interix[3-9]*)
+  # PIC code is broken on Interix 3.x, that's why |\.a not |_pic\.a here
+  lt_cv_deplibs_check_method='match_pattern /lib[^/]+(\.so|\.a)$'
+  ;;
+
+irix5* | irix6* | nonstopux*)
+  case $LD in
+  *-32|*"-32 ") libmagic=32-bit;;
+  *-n32|*"-n32 ") libmagic=N32;;
+  *-64|*"-64 ") libmagic=64-bit;;
+  *) libmagic=never-match;;
+  esac
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+# This must be glibc/ELF.
+linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+netbsd*)
+  if echo __ELF__ | $CC -E - | $GREP __ELF__ > /dev/null; then
+    lt_cv_deplibs_check_method='match_pattern /lib[^/]+(\.so\.[0-9]+\.[0-9]+|_pic\.a)$'
+  else
+    lt_cv_deplibs_check_method='match_pattern /lib[^/]+(\.so|_pic\.a)$'
+  fi
+  ;;
+
+newos6*)
+  lt_cv_deplibs_check_method='file_magic ELF [0-9][0-9]*-bit [ML]SB (executable|dynamic lib)'
+  lt_cv_file_magic_cmd=/usr/bin/file
+  lt_cv_file_magic_test_file=/usr/lib/libnls.so
+  ;;
+
+*nto* | *qnx*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+openbsd* | bitrig*)
+  if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then
+    lt_cv_deplibs_check_method='match_pattern /lib[^/]+(\.so\.[0-9]+\.[0-9]+|\.so|_pic\.a)$'
+  else
+    lt_cv_deplibs_check_method='match_pattern /lib[^/]+(\.so\.[0-9]+\.[0-9]+|_pic\.a)$'
+  fi
+  ;;
+
+osf3* | osf4* | osf5*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+rdos*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+solaris*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX* | sysv4*uw2*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+sysv4 | sysv4.3*)
+  case $host_vendor in
+  motorola)
+    lt_cv_deplibs_check_method='file_magic ELF [0-9][0-9]*-bit [ML]SB (shared object|dynamic lib) M[0-9][0-9]* Version [0-9]'
+    lt_cv_file_magic_test_file=`echo /usr/lib/libc.so*`
+    ;;
+  ncr)
+    lt_cv_deplibs_check_method=pass_all
+    ;;
+  sequent)
+    lt_cv_file_magic_cmd='/bin/file'
+    lt_cv_deplibs_check_method='file_magic ELF [0-9][0-9]*-bit [LM]SB (shared object|dynamic lib )'
+    ;;
+  sni)
+    lt_cv_file_magic_cmd='/bin/file'
+    lt_cv_deplibs_check_method="file_magic ELF [0-9][0-9]*-bit [LM]SB dynamic lib"
+    lt_cv_file_magic_test_file=/lib/libc.so
+    ;;
+  siemens)
+    lt_cv_deplibs_check_method=pass_all
+    ;;
+  pc)
+    lt_cv_deplibs_check_method=pass_all
+    ;;
+  esac
+  ;;
+
+tpf*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+os2*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+esac
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_deplibs_check_method" >&5
+$as_echo "$lt_cv_deplibs_check_method" >&6; }
+
+file_magic_glob=
+want_nocaseglob=no
+if test "$build" = "$host"; then
+  case $host_os in
+  mingw* | pw32*)
+    if ( shopt | grep nocaseglob ) >/dev/null 2>&1; then
+      want_nocaseglob=yes
+    else
+      file_magic_glob=`echo aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ | $SED -e "s/\(..\)/s\/[\1]\/[\1]\/g;/g"`
+    fi
+    ;;
+  esac
+fi
+
+file_magic_cmd=$lt_cv_file_magic_cmd
+deplibs_check_method=$lt_cv_deplibs_check_method
+test -z "$deplibs_check_method" && deplibs_check_method=unknown
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}dlltool", so it can be a program name with args.
+set dummy ${ac_tool_prefix}dlltool; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_DLLTOOL+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$DLLTOOL"; then
+  ac_cv_prog_DLLTOOL="$DLLTOOL" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_DLLTOOL="${ac_tool_prefix}dlltool"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+DLLTOOL=$ac_cv_prog_DLLTOOL
+if test -n "$DLLTOOL"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $DLLTOOL" >&5
+$as_echo "$DLLTOOL" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_DLLTOOL"; then
+  ac_ct_DLLTOOL=$DLLTOOL
+  # Extract the first word of "dlltool", so it can be a program name with args.
+set dummy dlltool; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_DLLTOOL+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_DLLTOOL"; then
+  ac_cv_prog_ac_ct_DLLTOOL="$ac_ct_DLLTOOL" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_DLLTOOL="dlltool"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_DLLTOOL=$ac_cv_prog_ac_ct_DLLTOOL
+if test -n "$ac_ct_DLLTOOL"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_DLLTOOL" >&5
+$as_echo "$ac_ct_DLLTOOL" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_DLLTOOL" = x; then
+    DLLTOOL="false"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    DLLTOOL=$ac_ct_DLLTOOL
+  fi
+else
+  DLLTOOL="$ac_cv_prog_DLLTOOL"
+fi
+
+test -z "$DLLTOOL" && DLLTOOL=dlltool
+
+
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking how to associate runtime and link libraries" >&5
+$as_echo_n "checking how to associate runtime and link libraries... " >&6; }
+if ${lt_cv_sharedlib_from_linklib_cmd+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_sharedlib_from_linklib_cmd='unknown'
+
+case $host_os in
+cygwin* | mingw* | pw32* | cegcc*)
+  # two different shell functions defined in ltmain.sh;
+  # decide which one to use based on capabilities of $DLLTOOL
+  case `$DLLTOOL --help 2>&1` in
+  *--identify-strict*)
+    lt_cv_sharedlib_from_linklib_cmd=func_cygming_dll_for_implib
+    ;;
+  *)
+    lt_cv_sharedlib_from_linklib_cmd=func_cygming_dll_for_implib_fallback
+    ;;
+  esac
+  ;;
+*)
+  # fallback: assume linklib IS sharedlib
+  lt_cv_sharedlib_from_linklib_cmd=$ECHO
+  ;;
+esac
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_sharedlib_from_linklib_cmd" >&5
+$as_echo "$lt_cv_sharedlib_from_linklib_cmd" >&6; }
+sharedlib_from_linklib_cmd=$lt_cv_sharedlib_from_linklib_cmd
+test -z "$sharedlib_from_linklib_cmd" && sharedlib_from_linklib_cmd=$ECHO
+
+
+
+
+
+
+
+if test -n "$ac_tool_prefix"; then
+  for ac_prog in ar
+  do
+    # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args.
+set dummy $ac_tool_prefix$ac_prog; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_AR+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$AR"; then
+  ac_cv_prog_AR="$AR" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_AR="$ac_tool_prefix$ac_prog"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+AR=$ac_cv_prog_AR
+if test -n "$AR"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $AR" >&5
+$as_echo "$AR" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+    test -n "$AR" && break
+  done
+fi
+if test -z "$AR"; then
+  ac_ct_AR=$AR
+  for ac_prog in ar
+do
+  # Extract the first word of "$ac_prog", so it can be a program name with args.
+set dummy $ac_prog; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_AR+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_AR"; then
+  ac_cv_prog_ac_ct_AR="$ac_ct_AR" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_AR="$ac_prog"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_AR=$ac_cv_prog_ac_ct_AR
+if test -n "$ac_ct_AR"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_AR" >&5
+$as_echo "$ac_ct_AR" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+  test -n "$ac_ct_AR" && break
+done
+
+  if test "x$ac_ct_AR" = x; then
+    AR="false"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    AR=$ac_ct_AR
+  fi
+fi
+
+: ${AR=ar}
+: ${AR_FLAGS=cru}
+
+
+
+
+
+
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for archiver @FILE support" >&5
+$as_echo_n "checking for archiver @FILE support... " >&6; }
+if ${lt_cv_ar_at_file+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_ar_at_file=no
+   cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  echo conftest.$ac_objext > conftest.lst
+      lt_ar_try='$AR $AR_FLAGS libconftest.a @conftest.lst >&5'
+      { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$lt_ar_try\""; } >&5
+  (eval $lt_ar_try) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }
+      if test 0 -eq "$ac_status"; then
+       # Ensure the archiver fails upon bogus file names.
+       rm -f conftest.$ac_objext libconftest.a
+       { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$lt_ar_try\""; } >&5
+  (eval $lt_ar_try) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }
+       if test 0 -ne "$ac_status"; then
+          lt_cv_ar_at_file=@
+        fi
+      fi
+      rm -f conftest.* libconftest.a
+
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_ar_at_file" >&5
+$as_echo "$lt_cv_ar_at_file" >&6; }
+
+if test no = "$lt_cv_ar_at_file"; then
+  archiver_list_spec=
+else
+  archiver_list_spec=$lt_cv_ar_at_file
+fi
+
+
+
+
+
+
+
+if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}strip", so it can be a program name with args.
+set dummy ${ac_tool_prefix}strip; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_STRIP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$STRIP"; then
+  ac_cv_prog_STRIP="$STRIP" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_STRIP="${ac_tool_prefix}strip"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+STRIP=$ac_cv_prog_STRIP
+if test -n "$STRIP"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $STRIP" >&5
+$as_echo "$STRIP" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_STRIP"; then
+  ac_ct_STRIP=$STRIP
+  # Extract the first word of "strip", so it can be a program name with args.
+set dummy strip; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_STRIP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_STRIP"; then
+  ac_cv_prog_ac_ct_STRIP="$ac_ct_STRIP" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_STRIP="strip"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_STRIP=$ac_cv_prog_ac_ct_STRIP
+if test -n "$ac_ct_STRIP"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_STRIP" >&5
+$as_echo "$ac_ct_STRIP" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_STRIP" = x; then
+    STRIP=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    STRIP=$ac_ct_STRIP
+  fi
+else
+  STRIP="$ac_cv_prog_STRIP"
+fi
+
+test -z "$STRIP" && STRIP=:
+
+
+
+
+
+
+if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}ranlib", so it can be a program name with args.
+set dummy ${ac_tool_prefix}ranlib; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_RANLIB+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$RANLIB"; then
+  ac_cv_prog_RANLIB="$RANLIB" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_RANLIB="${ac_tool_prefix}ranlib"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+RANLIB=$ac_cv_prog_RANLIB
+if test -n "$RANLIB"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $RANLIB" >&5
+$as_echo "$RANLIB" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_RANLIB"; then
+  ac_ct_RANLIB=$RANLIB
+  # Extract the first word of "ranlib", so it can be a program name with args.
+set dummy ranlib; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_RANLIB+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_RANLIB"; then
+  ac_cv_prog_ac_ct_RANLIB="$ac_ct_RANLIB" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_RANLIB="ranlib"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_RANLIB=$ac_cv_prog_ac_ct_RANLIB
+if test -n "$ac_ct_RANLIB"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_RANLIB" >&5
+$as_echo "$ac_ct_RANLIB" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_RANLIB" = x; then
+    RANLIB=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    RANLIB=$ac_ct_RANLIB
+  fi
+else
+  RANLIB="$ac_cv_prog_RANLIB"
+fi
+
+test -z "$RANLIB" && RANLIB=:
+
+
+
+
+
+
+# Determine commands to create old-style static archives.
+old_archive_cmds='$AR $AR_FLAGS $oldlib$oldobjs'
+old_postinstall_cmds='chmod 644 $oldlib'
+old_postuninstall_cmds=
+
+if test -n "$RANLIB"; then
+  case $host_os in
+  bitrig* | openbsd*)
+    old_postinstall_cmds="$old_postinstall_cmds~\$RANLIB -t \$tool_oldlib"
+    ;;
+  *)
+    old_postinstall_cmds="$old_postinstall_cmds~\$RANLIB \$tool_oldlib"
+    ;;
+  esac
+  old_archive_cmds="$old_archive_cmds~\$RANLIB \$tool_oldlib"
+fi
+
+case $host_os in
+  darwin*)
+    lock_old_archive_extraction=yes ;;
+  *)
+    lock_old_archive_extraction=no ;;
+esac
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+# If no C compiler was specified, use CC.
+LTCC=${LTCC-"$CC"}
+
+# If no C compiler flags were specified, use CFLAGS.
+LTCFLAGS=${LTCFLAGS-"$CFLAGS"}
+
+# Allow CC to be a program name with arguments.
+compiler=$CC
+
+
+# Check for command to grab the raw symbol name followed by C symbol from nm.
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking command to parse $NM output from $compiler object" >&5
+$as_echo_n "checking command to parse $NM output from $compiler object... " >&6; }
+if ${lt_cv_sys_global_symbol_pipe+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+
+# These are sane defaults that work on at least a few old systems.
+# [They come from Ultrix.  What could be older than Ultrix?!! ;)]
+
+# Character class describing NM global symbol codes.
+symcode='[BCDEGRST]'
+
+# Regexp to match symbols that can be accessed directly from C.
+sympat='\([_A-Za-z][_A-Za-z0-9]*\)'
+
+# Define system-specific variables.
+case $host_os in
+aix*)
+  symcode='[BCDT]'
+  ;;
+cygwin* | mingw* | pw32* | cegcc*)
+  symcode='[ABCDGISTW]'
+  ;;
+hpux*)
+  if test ia64 = "$host_cpu"; then
+    symcode='[ABCDEGRST]'
+  fi
+  ;;
+irix* | nonstopux*)
+  symcode='[BCDEGRST]'
+  ;;
+osf*)
+  symcode='[BCDEGQRST]'
+  ;;
+solaris*)
+  symcode='[BCDRT]'
+  ;;
+sco3.2v5*)
+  symcode='[DT]'
+  ;;
+sysv4.2uw2*)
+  symcode='[DT]'
+  ;;
+sysv5* | sco5v6* | unixware* | OpenUNIX*)
+  symcode='[ABDT]'
+  ;;
+sysv4)
+  symcode='[DFNSTU]'
+  ;;
+esac
+
+# If we're using GNU nm, then use its standard symbol codes.
+case `$NM -V 2>&1` in
+*GNU* | *'with BFD'*)
+  symcode='[ABCDGIRSTW]' ;;
+esac
+
+if test "$lt_cv_nm_interface" = "MS dumpbin"; then
+  # Gets list of data symbols to import.
+  lt_cv_sys_global_symbol_to_import="sed -n -e 's/^I .* \(.*\)$/\1/p'"
+  # Adjust the below global symbol transforms to fixup imported variables.
+  lt_cdecl_hook=" -e 's/^I .* \(.*\)$/extern __declspec(dllimport) char \1;/p'"
+  lt_c_name_hook=" -e 's/^I .* \(.*\)$/  {\"\1\", (void *) 0},/p'"
+  lt_c_name_lib_hook="\
+  -e 's/^I .* \(lib.*\)$/  {\"\1\", (void *) 0},/p'\
+  -e 's/^I .* \(.*\)$/  {\"lib\1\", (void *) 0},/p'"
+else
+  # Disable hooks by default.
+  lt_cv_sys_global_symbol_to_import=
+  lt_cdecl_hook=
+  lt_c_name_hook=
+  lt_c_name_lib_hook=
+fi
+
+# Transform an extracted symbol line into a proper C declaration.
+# Some systems (esp. on ia64) link data and code symbols differently,
+# so use this general approach.
+lt_cv_sys_global_symbol_to_cdecl="sed -n"\
+$lt_cdecl_hook\
+" -e 's/^T .* \(.*\)$/extern int \1();/p'"\
+" -e 's/^$symcode$symcode* .* \(.*\)$/extern char \1;/p'"
+
+# Transform an extracted symbol line into symbol name and symbol address
+lt_cv_sys_global_symbol_to_c_name_address="sed -n"\
+$lt_c_name_hook\
+" -e 's/^: \(.*\) .*$/  {\"\1\", (void *) 0},/p'"\
+" -e 's/^$symcode$symcode* .* \(.*\)$/  {\"\1\", (void *) \&\1},/p'"
+
+# Transform an extracted symbol line into symbol name with lib prefix and
+# symbol address.
+lt_cv_sys_global_symbol_to_c_name_address_lib_prefix="sed -n"\
+$lt_c_name_lib_hook\
+" -e 's/^: \(.*\) .*$/  {\"\1\", (void *) 0},/p'"\
+" -e 's/^$symcode$symcode* .* \(lib.*\)$/  {\"\1\", (void *) \&\1},/p'"\
+" -e 's/^$symcode$symcode* .* \(.*\)$/  {\"lib\1\", (void *) \&\1},/p'"
+
+# Handle CRLF in mingw tool chain
+opt_cr=
+case $build_os in
+mingw*)
+  opt_cr=`$ECHO 'x\{0,1\}' | tr x '\015'` # option cr in regexp
+  ;;
+esac
+
+# Try without a prefix underscore, then with it.
+for ac_symprfx in "" "_"; do
+
+  # Transform symcode, sympat, and symprfx into a raw symbol and a C symbol.
+  symxfrm="\\1 $ac_symprfx\\2 \\2"
+
+  # Write the raw and C identifiers.
+  if test "$lt_cv_nm_interface" = "MS dumpbin"; then
+    # Fake it for dumpbin and say T for any non-static function,
+    # D for any global variable and I for any imported variable.
+    # Also find C++ and __fastcall symbols from MSVC++,
+    # which start with @ or ?.
+    lt_cv_sys_global_symbol_pipe="$AWK '"\
+"     {last_section=section; section=\$ 3};"\
+"     /^COFF SYMBOL TABLE/{for(i in hide) delete hide[i]};"\
+"     /Section length .*#relocs.*(pick any)/{hide[last_section]=1};"\
+"     /^ *Symbol name *: /{split(\$ 0,sn,\":\"); si=substr(sn[2],2)};"\
+"     /^ *Type *: code/{print \"T\",si,substr(si,length(prfx))};"\
+"     /^ *Type *: data/{print \"I\",si,substr(si,length(prfx))};"\
+"     \$ 0!~/External *\|/{next};"\
+"     / 0+ UNDEF /{next}; / UNDEF \([^|]\)*()/{next};"\
+"     {if(hide[section]) next};"\
+"     {f=\"D\"}; \$ 0~/\(\).*\|/{f=\"T\"};"\
+"     {split(\$ 0,a,/\||\r/); split(a[2],s)};"\
+"     s[1]~/^[@?]/{print f,s[1],s[1]; next};"\
+"     s[1]~prfx {split(s[1],t,\"@\"); print f,t[1],substr(t[1],length(prfx))}"\
+"     ' prfx=^$ac_symprfx"
+  else
+    lt_cv_sys_global_symbol_pipe="sed -n -e 's/^.*[     ]\($symcode$symcode*\)[         ][      ]*$ac_symprfx$sympat$opt_cr$/$symxfrm/p'"
+  fi
+  lt_cv_sys_global_symbol_pipe="$lt_cv_sys_global_symbol_pipe | sed '/ __gnu_lto/d'"
+
+  # Check to see that the pipe works correctly.
+  pipe_works=no
+
+  rm -f conftest*
+  cat > conftest.$ac_ext <<_LT_EOF
+#ifdef __cplusplus
+extern "C" {
+#endif
+char nm_test_var;
+void nm_test_func(void);
+void nm_test_func(void){}
+#ifdef __cplusplus
+}
+#endif
+int main(){nm_test_var='a';nm_test_func();return(0);}
+_LT_EOF
+
+  if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5
+  (eval $ac_compile) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; then
+    # Now try to grab the symbols.
+    nlist=conftest.nm
+    if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$NM conftest.$ac_objext \| "$lt_cv_sys_global_symbol_pipe" \> $nlist\""; } >&5
+  (eval $NM conftest.$ac_objext \| "$lt_cv_sys_global_symbol_pipe" \> $nlist) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } && test -s "$nlist"; then
+      # Try sorting and uniquifying the output.
+      if sort "$nlist" | uniq > "$nlist"T; then
+       mv -f "$nlist"T "$nlist"
+      else
+       rm -f "$nlist"T
+      fi
+
+      # Make sure that we snagged all the symbols we need.
+      if $GREP ' nm_test_var$' "$nlist" >/dev/null; then
+       if $GREP ' nm_test_func$' "$nlist" >/dev/null; then
+         cat <<_LT_EOF > conftest.$ac_ext
+/* Keep this code in sync between libtool.m4, ltmain, lt_system.h, and tests.  */
+#if defined _WIN32 || defined __CYGWIN__ || defined _WIN32_WCE
+/* DATA imports from DLLs on WIN32 can't be const, because runtime
+   relocations are performed -- see ld's documentation on pseudo-relocs.  */
+# define LT_DLSYM_CONST
+#elif defined __osf__
+/* This system does not cope well with relocations in const data.  */
+# define LT_DLSYM_CONST
+#else
+# define LT_DLSYM_CONST const
+#endif
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+_LT_EOF
+         # Now generate the symbol file.
+         eval "$lt_cv_sys_global_symbol_to_cdecl"' < "$nlist" | $GREP -v main >> conftest.$ac_ext'
+
+         cat <<_LT_EOF >> conftest.$ac_ext
+
+/* The mapping between symbol names and symbols.  */
+LT_DLSYM_CONST struct {
+  const char *name;
+  void       *address;
+}
+lt__PROGRAM__LTX_preloaded_symbols[] =
+{
+  { "@PROGRAM@", (void *) 0 },
+_LT_EOF
+         $SED "s/^$symcode$symcode* .* \(.*\)$/  {\"\1\", (void *) \&\1},/" < "$nlist" | $GREP -v main >> conftest.$ac_ext
+         cat <<\_LT_EOF >> conftest.$ac_ext
+  {0, (void *) 0}
+};
+
+/* This works around a problem in FreeBSD linker */
+#ifdef FREEBSD_WORKAROUND
+static const void *lt_preloaded_setup() {
+  return lt__PROGRAM__LTX_preloaded_symbols;
+}
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+_LT_EOF
+         # Now try linking the two files.
+         mv conftest.$ac_objext conftstm.$ac_objext
+         lt_globsym_save_LIBS=$LIBS
+         lt_globsym_save_CFLAGS=$CFLAGS
+         LIBS=conftstm.$ac_objext
+         CFLAGS="$CFLAGS$lt_prog_compiler_no_builtin_flag"
+         if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5
+  (eval $ac_link) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } && test -s conftest$ac_exeext; then
+           pipe_works=yes
+         fi
+         LIBS=$lt_globsym_save_LIBS
+         CFLAGS=$lt_globsym_save_CFLAGS
+       else
+         echo "cannot find nm_test_func in $nlist" >&5
+       fi
+      else
+       echo "cannot find nm_test_var in $nlist" >&5
+      fi
+    else
+      echo "cannot run $lt_cv_sys_global_symbol_pipe" >&5
+    fi
+  else
+    echo "$progname: failed program was:" >&5
+    cat conftest.$ac_ext >&5
+  fi
+  rm -rf conftest* conftst*
+
+  # Do not use the global_symbol_pipe unless it works.
+  if test yes = "$pipe_works"; then
+    break
+  else
+    lt_cv_sys_global_symbol_pipe=
+  fi
+done
+
+fi
+
+if test -z "$lt_cv_sys_global_symbol_pipe"; then
+  lt_cv_sys_global_symbol_to_cdecl=
+fi
+if test -z "$lt_cv_sys_global_symbol_pipe$lt_cv_sys_global_symbol_to_cdecl"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: failed" >&5
+$as_echo "failed" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: ok" >&5
+$as_echo "ok" >&6; }
+fi
+
+# Response file support.
+if test "$lt_cv_nm_interface" = "MS dumpbin"; then
+  nm_file_list_spec='@'
+elif $NM --help 2>/dev/null | grep '[@]FILE' >/dev/null; then
+  nm_file_list_spec='@'
+fi
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for sysroot" >&5
+$as_echo_n "checking for sysroot... " >&6; }
+
+# Check whether --with-sysroot was given.
+if test "${with_sysroot+set}" = set; then :
+  withval=$with_sysroot;
+else
+  with_sysroot=no
+fi
+
+
+lt_sysroot=
+case $with_sysroot in #(
+ yes)
+   if test yes = "$GCC"; then
+     lt_sysroot=`$CC --print-sysroot 2>/dev/null`
+   fi
+   ;; #(
+ /*)
+   lt_sysroot=`echo "$with_sysroot" | sed -e "$sed_quote_subst"`
+   ;; #(
+ no|'')
+   ;; #(
+ *)
+   { $as_echo "$as_me:${as_lineno-$LINENO}: result: $with_sysroot" >&5
+$as_echo "$with_sysroot" >&6; }
+   as_fn_error $? "The sysroot must be an absolute path." "$LINENO" 5
+   ;;
+esac
+
+ { $as_echo "$as_me:${as_lineno-$LINENO}: result: ${lt_sysroot:-no}" >&5
+$as_echo "${lt_sysroot:-no}" >&6; }
+
+
+
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for a working dd" >&5
+$as_echo_n "checking for a working dd... " >&6; }
+if ${ac_cv_path_lt_DD+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  printf 0123456789abcdef0123456789abcdef >conftest.i
+cat conftest.i conftest.i >conftest2.i
+: ${lt_DD:=$DD}
+if test -z "$lt_DD"; then
+  ac_path_lt_DD_found=false
+  # Loop through the user's path and test for each of PROGNAME-LIST
+  as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_prog in dd; do
+    for ac_exec_ext in '' $ac_executable_extensions; do
+      ac_path_lt_DD="$as_dir/$ac_prog$ac_exec_ext"
+      as_fn_executable_p "$ac_path_lt_DD" || continue
+if "$ac_path_lt_DD" bs=32 count=1 <conftest2.i >conftest.out 2>/dev/null; then
+  cmp -s conftest.i conftest.out \
+  && ac_cv_path_lt_DD="$ac_path_lt_DD" ac_path_lt_DD_found=:
+fi
+      $ac_path_lt_DD_found && break 3
+    done
+  done
+  done
+IFS=$as_save_IFS
+  if test -z "$ac_cv_path_lt_DD"; then
+    :
+  fi
+else
+  ac_cv_path_lt_DD=$lt_DD
+fi
+
+rm -f conftest.i conftest2.i conftest.out
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_lt_DD" >&5
+$as_echo "$ac_cv_path_lt_DD" >&6; }
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking how to truncate binary pipes" >&5
+$as_echo_n "checking how to truncate binary pipes... " >&6; }
+if ${lt_cv_truncate_bin+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  printf 0123456789abcdef0123456789abcdef >conftest.i
+cat conftest.i conftest.i >conftest2.i
+lt_cv_truncate_bin=
+if "$ac_cv_path_lt_DD" bs=32 count=1 <conftest2.i >conftest.out 2>/dev/null; then
+  cmp -s conftest.i conftest.out \
+  && lt_cv_truncate_bin="$ac_cv_path_lt_DD bs=4096 count=1"
+fi
+rm -f conftest.i conftest2.i conftest.out
+test -z "$lt_cv_truncate_bin" && lt_cv_truncate_bin="$SED -e 4q"
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_truncate_bin" >&5
+$as_echo "$lt_cv_truncate_bin" >&6; }
+
+
+
+
+
+
+
+# Calculate cc_basename.  Skip known compiler wrappers and cross-prefix.
+func_cc_basename ()
+{
+    for cc_temp in $*""; do
+      case $cc_temp in
+        compile | *[\\/]compile | ccache | *[\\/]ccache ) ;;
+        distcc | *[\\/]distcc | purify | *[\\/]purify ) ;;
+        \-*) ;;
+        *) break;;
+      esac
+    done
+    func_cc_basename_result=`$ECHO "$cc_temp" | $SED "s%.*/%%; s%^$host_alias-%%"`
+}
+
+# Check whether --enable-libtool-lock was given.
+if test "${enable_libtool_lock+set}" = set; then :
+  enableval=$enable_libtool_lock;
+fi
+
+test no = "$enable_libtool_lock" || enable_libtool_lock=yes
+
+# Some flags need to be propagated to the compiler or linker for good
+# libtool support.
+case $host in
+ia64-*-hpux*)
+  # Find out what ABI is being produced by ac_compile, and set mode
+  # options accordingly.
+  echo 'int i;' > conftest.$ac_ext
+  if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5
+  (eval $ac_compile) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; then
+    case `/usr/bin/file conftest.$ac_objext` in
+      *ELF-32*)
+       HPUX_IA64_MODE=32
+       ;;
+      *ELF-64*)
+       HPUX_IA64_MODE=64
+       ;;
+    esac
+  fi
+  rm -rf conftest*
+  ;;
+*-*-irix6*)
+  # Find out what ABI is being produced by ac_compile, and set linker
+  # options accordingly.
+  echo '#line '$LINENO' "configure"' > conftest.$ac_ext
+  if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5
+  (eval $ac_compile) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; then
+    if test yes = "$lt_cv_prog_gnu_ld"; then
+      case `/usr/bin/file conftest.$ac_objext` in
+       *32-bit*)
+         LD="${LD-ld} -melf32bsmip"
+         ;;
+       *N32*)
+         LD="${LD-ld} -melf32bmipn32"
+         ;;
+       *64-bit*)
+         LD="${LD-ld} -melf64bmip"
+       ;;
+      esac
+    else
+      case `/usr/bin/file conftest.$ac_objext` in
+       *32-bit*)
+         LD="${LD-ld} -32"
+         ;;
+       *N32*)
+         LD="${LD-ld} -n32"
+         ;;
+       *64-bit*)
+         LD="${LD-ld} -64"
+         ;;
+      esac
+    fi
+  fi
+  rm -rf conftest*
+  ;;
+
+mips64*-*linux*)
+  # Find out what ABI is being produced by ac_compile, and set linker
+  # options accordingly.
+  echo '#line '$LINENO' "configure"' > conftest.$ac_ext
+  if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5
+  (eval $ac_compile) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; then
+    emul=elf
+    case `/usr/bin/file conftest.$ac_objext` in
+      *32-bit*)
+       emul="${emul}32"
+       ;;
+      *64-bit*)
+       emul="${emul}64"
+       ;;
+    esac
+    case `/usr/bin/file conftest.$ac_objext` in
+      *MSB*)
+       emul="${emul}btsmip"
+       ;;
+      *LSB*)
+       emul="${emul}ltsmip"
+       ;;
+    esac
+    case `/usr/bin/file conftest.$ac_objext` in
+      *N32*)
+       emul="${emul}n32"
+       ;;
+    esac
+    LD="${LD-ld} -m $emul"
+  fi
+  rm -rf conftest*
+  ;;
+
+x86_64-*kfreebsd*-gnu|x86_64-*linux*|powerpc*-*linux*| \
+s390*-*linux*|s390*-*tpf*|sparc*-*linux*)
+  # Find out what ABI is being produced by ac_compile, and set linker
+  # options accordingly.  Note that the listed cases only cover the
+  # situations where additional linker options are needed (such as when
+  # doing 32-bit compilation for a host where ld defaults to 64-bit, or
+  # vice versa); the common cases where no linker options are needed do
+  # not appear in the list.
+  echo 'int i;' > conftest.$ac_ext
+  if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5
+  (eval $ac_compile) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; then
+    case `/usr/bin/file conftest.o` in
+      *32-bit*)
+       case $host in
+         x86_64-*kfreebsd*-gnu)
+           LD="${LD-ld} -m elf_i386_fbsd"
+           ;;
+         x86_64-*linux*)
+           case `/usr/bin/file conftest.o` in
+             *x86-64*)
+               LD="${LD-ld} -m elf32_x86_64"
+               ;;
+             *)
+               LD="${LD-ld} -m elf_i386"
+               ;;
+           esac
+           ;;
+         powerpc64le-*linux*)
+           LD="${LD-ld} -m elf32lppclinux"
+           ;;
+         powerpc64-*linux*)
+           LD="${LD-ld} -m elf32ppclinux"
+           ;;
+         s390x-*linux*)
+           LD="${LD-ld} -m elf_s390"
+           ;;
+         sparc64-*linux*)
+           LD="${LD-ld} -m elf32_sparc"
+           ;;
+       esac
+       ;;
+      *64-bit*)
+       case $host in
+         x86_64-*kfreebsd*-gnu)
+           LD="${LD-ld} -m elf_x86_64_fbsd"
+           ;;
+         x86_64-*linux*)
+           LD="${LD-ld} -m elf_x86_64"
+           ;;
+         powerpcle-*linux*)
+           LD="${LD-ld} -m elf64lppc"
+           ;;
+         powerpc-*linux*)
+           LD="${LD-ld} -m elf64ppc"
+           ;;
+         s390*-*linux*|s390*-*tpf*)
+           LD="${LD-ld} -m elf64_s390"
+           ;;
+         sparc*-*linux*)
+           LD="${LD-ld} -m elf64_sparc"
+           ;;
+       esac
+       ;;
+    esac
+  fi
+  rm -rf conftest*
+  ;;
+
+*-*-sco3.2v5*)
+  # On SCO OpenServer 5, we need -belf to get full-featured binaries.
+  SAVE_CFLAGS=$CFLAGS
+  CFLAGS="$CFLAGS -belf"
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the C compiler needs -belf" >&5
+$as_echo_n "checking whether the C compiler needs -belf... " >&6; }
+if ${lt_cv_cc_needs_belf+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+     cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  lt_cv_cc_needs_belf=yes
+else
+  lt_cv_cc_needs_belf=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+     ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_cc_needs_belf" >&5
+$as_echo "$lt_cv_cc_needs_belf" >&6; }
+  if test yes != "$lt_cv_cc_needs_belf"; then
+    # this is probably gcc 2.8.0, egcs 1.0 or newer; no need for -belf
+    CFLAGS=$SAVE_CFLAGS
+  fi
+  ;;
+*-*solaris*)
+  # Find out what ABI is being produced by ac_compile, and set linker
+  # options accordingly.
+  echo 'int i;' > conftest.$ac_ext
+  if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5
+  (eval $ac_compile) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }; then
+    case `/usr/bin/file conftest.o` in
+    *64-bit*)
+      case $lt_cv_prog_gnu_ld in
+      yes*)
+        case $host in
+        i?86-*-solaris*|x86_64-*-solaris*)
+          LD="${LD-ld} -m elf_x86_64"
+          ;;
+        sparc*-*-solaris*)
+          LD="${LD-ld} -m elf64_sparc"
+          ;;
+        esac
+        # GNU ld 2.21 introduced _sol2 emulations.  Use them if available.
+        if ${LD-ld} -V | grep _sol2 >/dev/null 2>&1; then
+          LD=${LD-ld}_sol2
+        fi
+        ;;
+      *)
+       if ${LD-ld} -64 -r -o conftest2.o conftest.o >/dev/null 2>&1; then
+         LD="${LD-ld} -64"
+       fi
+       ;;
+      esac
+      ;;
+    esac
+  fi
+  rm -rf conftest*
+  ;;
+esac
+
+need_locks=$enable_libtool_lock
+
+if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}mt", so it can be a program name with args.
+set dummy ${ac_tool_prefix}mt; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_MANIFEST_TOOL+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$MANIFEST_TOOL"; then
+  ac_cv_prog_MANIFEST_TOOL="$MANIFEST_TOOL" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_MANIFEST_TOOL="${ac_tool_prefix}mt"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+MANIFEST_TOOL=$ac_cv_prog_MANIFEST_TOOL
+if test -n "$MANIFEST_TOOL"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $MANIFEST_TOOL" >&5
+$as_echo "$MANIFEST_TOOL" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_MANIFEST_TOOL"; then
+  ac_ct_MANIFEST_TOOL=$MANIFEST_TOOL
+  # Extract the first word of "mt", so it can be a program name with args.
+set dummy mt; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_MANIFEST_TOOL+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_MANIFEST_TOOL"; then
+  ac_cv_prog_ac_ct_MANIFEST_TOOL="$ac_ct_MANIFEST_TOOL" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_MANIFEST_TOOL="mt"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_MANIFEST_TOOL=$ac_cv_prog_ac_ct_MANIFEST_TOOL
+if test -n "$ac_ct_MANIFEST_TOOL"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_MANIFEST_TOOL" >&5
+$as_echo "$ac_ct_MANIFEST_TOOL" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_MANIFEST_TOOL" = x; then
+    MANIFEST_TOOL=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    MANIFEST_TOOL=$ac_ct_MANIFEST_TOOL
+  fi
+else
+  MANIFEST_TOOL="$ac_cv_prog_MANIFEST_TOOL"
+fi
+
+test -z "$MANIFEST_TOOL" && MANIFEST_TOOL=mt
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking if $MANIFEST_TOOL is a manifest tool" >&5
+$as_echo_n "checking if $MANIFEST_TOOL is a manifest tool... " >&6; }
+if ${lt_cv_path_mainfest_tool+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_path_mainfest_tool=no
+  echo "$as_me:$LINENO: $MANIFEST_TOOL '-?'" >&5
+  $MANIFEST_TOOL '-?' 2>conftest.err > conftest.out
+  cat conftest.err >&5
+  if $GREP 'Manifest Tool' conftest.out > /dev/null; then
+    lt_cv_path_mainfest_tool=yes
+  fi
+  rm -f conftest*
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_path_mainfest_tool" >&5
+$as_echo "$lt_cv_path_mainfest_tool" >&6; }
+if test yes != "$lt_cv_path_mainfest_tool"; then
+  MANIFEST_TOOL=:
+fi
+
+
+
+
+
+
+  case $host_os in
+    rhapsody* | darwin*)
+    if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}dsymutil", so it can be a program name with args.
+set dummy ${ac_tool_prefix}dsymutil; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_DSYMUTIL+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$DSYMUTIL"; then
+  ac_cv_prog_DSYMUTIL="$DSYMUTIL" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_DSYMUTIL="${ac_tool_prefix}dsymutil"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+DSYMUTIL=$ac_cv_prog_DSYMUTIL
+if test -n "$DSYMUTIL"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $DSYMUTIL" >&5
+$as_echo "$DSYMUTIL" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_DSYMUTIL"; then
+  ac_ct_DSYMUTIL=$DSYMUTIL
+  # Extract the first word of "dsymutil", so it can be a program name with args.
+set dummy dsymutil; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_DSYMUTIL+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_DSYMUTIL"; then
+  ac_cv_prog_ac_ct_DSYMUTIL="$ac_ct_DSYMUTIL" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_DSYMUTIL="dsymutil"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_DSYMUTIL=$ac_cv_prog_ac_ct_DSYMUTIL
+if test -n "$ac_ct_DSYMUTIL"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_DSYMUTIL" >&5
+$as_echo "$ac_ct_DSYMUTIL" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_DSYMUTIL" = x; then
+    DSYMUTIL=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    DSYMUTIL=$ac_ct_DSYMUTIL
+  fi
+else
+  DSYMUTIL="$ac_cv_prog_DSYMUTIL"
+fi
+
+    if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}nmedit", so it can be a program name with args.
+set dummy ${ac_tool_prefix}nmedit; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_NMEDIT+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$NMEDIT"; then
+  ac_cv_prog_NMEDIT="$NMEDIT" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_NMEDIT="${ac_tool_prefix}nmedit"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+NMEDIT=$ac_cv_prog_NMEDIT
+if test -n "$NMEDIT"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $NMEDIT" >&5
+$as_echo "$NMEDIT" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_NMEDIT"; then
+  ac_ct_NMEDIT=$NMEDIT
+  # Extract the first word of "nmedit", so it can be a program name with args.
+set dummy nmedit; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_NMEDIT+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_NMEDIT"; then
+  ac_cv_prog_ac_ct_NMEDIT="$ac_ct_NMEDIT" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_NMEDIT="nmedit"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_NMEDIT=$ac_cv_prog_ac_ct_NMEDIT
+if test -n "$ac_ct_NMEDIT"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_NMEDIT" >&5
+$as_echo "$ac_ct_NMEDIT" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_NMEDIT" = x; then
+    NMEDIT=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    NMEDIT=$ac_ct_NMEDIT
+  fi
+else
+  NMEDIT="$ac_cv_prog_NMEDIT"
+fi
+
+    if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}lipo", so it can be a program name with args.
+set dummy ${ac_tool_prefix}lipo; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_LIPO+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$LIPO"; then
+  ac_cv_prog_LIPO="$LIPO" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_LIPO="${ac_tool_prefix}lipo"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+LIPO=$ac_cv_prog_LIPO
+if test -n "$LIPO"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $LIPO" >&5
+$as_echo "$LIPO" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_LIPO"; then
+  ac_ct_LIPO=$LIPO
+  # Extract the first word of "lipo", so it can be a program name with args.
+set dummy lipo; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_LIPO+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_LIPO"; then
+  ac_cv_prog_ac_ct_LIPO="$ac_ct_LIPO" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_LIPO="lipo"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_LIPO=$ac_cv_prog_ac_ct_LIPO
+if test -n "$ac_ct_LIPO"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_LIPO" >&5
+$as_echo "$ac_ct_LIPO" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_LIPO" = x; then
+    LIPO=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    LIPO=$ac_ct_LIPO
+  fi
+else
+  LIPO="$ac_cv_prog_LIPO"
+fi
+
+    if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}otool", so it can be a program name with args.
+set dummy ${ac_tool_prefix}otool; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_OTOOL+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$OTOOL"; then
+  ac_cv_prog_OTOOL="$OTOOL" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_OTOOL="${ac_tool_prefix}otool"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+OTOOL=$ac_cv_prog_OTOOL
+if test -n "$OTOOL"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $OTOOL" >&5
+$as_echo "$OTOOL" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_OTOOL"; then
+  ac_ct_OTOOL=$OTOOL
+  # Extract the first word of "otool", so it can be a program name with args.
+set dummy otool; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_OTOOL+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_OTOOL"; then
+  ac_cv_prog_ac_ct_OTOOL="$ac_ct_OTOOL" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_OTOOL="otool"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_OTOOL=$ac_cv_prog_ac_ct_OTOOL
+if test -n "$ac_ct_OTOOL"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_OTOOL" >&5
+$as_echo "$ac_ct_OTOOL" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_OTOOL" = x; then
+    OTOOL=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    OTOOL=$ac_ct_OTOOL
+  fi
+else
+  OTOOL="$ac_cv_prog_OTOOL"
+fi
+
+    if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}otool64", so it can be a program name with args.
+set dummy ${ac_tool_prefix}otool64; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_OTOOL64+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$OTOOL64"; then
+  ac_cv_prog_OTOOL64="$OTOOL64" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_OTOOL64="${ac_tool_prefix}otool64"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+OTOOL64=$ac_cv_prog_OTOOL64
+if test -n "$OTOOL64"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $OTOOL64" >&5
+$as_echo "$OTOOL64" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_OTOOL64"; then
+  ac_ct_OTOOL64=$OTOOL64
+  # Extract the first word of "otool64", so it can be a program name with args.
+set dummy otool64; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_OTOOL64+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_OTOOL64"; then
+  ac_cv_prog_ac_ct_OTOOL64="$ac_ct_OTOOL64" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_OTOOL64="otool64"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_OTOOL64=$ac_cv_prog_ac_ct_OTOOL64
+if test -n "$ac_ct_OTOOL64"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_OTOOL64" >&5
+$as_echo "$ac_ct_OTOOL64" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_OTOOL64" = x; then
+    OTOOL64=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    OTOOL64=$ac_ct_OTOOL64
+  fi
+else
+  OTOOL64="$ac_cv_prog_OTOOL64"
+fi
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for -single_module linker flag" >&5
+$as_echo_n "checking for -single_module linker flag... " >&6; }
+if ${lt_cv_apple_cc_single_mod+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_apple_cc_single_mod=no
+      if test -z "$LT_MULTI_MODULE"; then
+       # By default we will add the -single_module flag. You can override
+       # by either setting the environment variable LT_MULTI_MODULE
+       # non-empty at configure time, or by adding -multi_module to the
+       # link flags.
+       rm -rf libconftest.dylib*
+       echo "int foo(void){return 1;}" > conftest.c
+       echo "$LTCC $LTCFLAGS $LDFLAGS -o libconftest.dylib \
+-dynamiclib -Wl,-single_module conftest.c" >&5
+       $LTCC $LTCFLAGS $LDFLAGS -o libconftest.dylib \
+         -dynamiclib -Wl,-single_module conftest.c 2>conftest.err
+        _lt_result=$?
+       # If there is a non-empty error log, and "single_module"
+       # appears in it, assume the flag caused a linker warning
+        if test -s conftest.err && $GREP single_module conftest.err; then
+         cat conftest.err >&5
+       # Otherwise, if the output was created with a 0 exit code from
+       # the compiler, it worked.
+       elif test -f libconftest.dylib && test 0 = "$_lt_result"; then
+         lt_cv_apple_cc_single_mod=yes
+       else
+         cat conftest.err >&5
+       fi
+       rm -rf libconftest.dylib*
+       rm -f conftest.*
+      fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_apple_cc_single_mod" >&5
+$as_echo "$lt_cv_apple_cc_single_mod" >&6; }
+
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for -exported_symbols_list linker flag" >&5
+$as_echo_n "checking for -exported_symbols_list linker flag... " >&6; }
+if ${lt_cv_ld_exported_symbols_list+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_ld_exported_symbols_list=no
+      save_LDFLAGS=$LDFLAGS
+      echo "_main" > conftest.sym
+      LDFLAGS="$LDFLAGS -Wl,-exported_symbols_list,conftest.sym"
+      cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  lt_cv_ld_exported_symbols_list=yes
+else
+  lt_cv_ld_exported_symbols_list=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+       LDFLAGS=$save_LDFLAGS
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_ld_exported_symbols_list" >&5
+$as_echo "$lt_cv_ld_exported_symbols_list" >&6; }
+
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for -force_load linker flag" >&5
+$as_echo_n "checking for -force_load linker flag... " >&6; }
+if ${lt_cv_ld_force_load+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_ld_force_load=no
+      cat > conftest.c << _LT_EOF
+int forced_loaded() { return 2;}
+_LT_EOF
+      echo "$LTCC $LTCFLAGS -c -o conftest.o conftest.c" >&5
+      $LTCC $LTCFLAGS -c -o conftest.o conftest.c 2>&5
+      echo "$AR cru libconftest.a conftest.o" >&5
+      $AR cru libconftest.a conftest.o 2>&5
+      echo "$RANLIB libconftest.a" >&5
+      $RANLIB libconftest.a 2>&5
+      cat > conftest.c << _LT_EOF
+int main() { return 0;}
+_LT_EOF
+      echo "$LTCC $LTCFLAGS $LDFLAGS -o conftest conftest.c -Wl,-force_load,./libconftest.a" >&5
+      $LTCC $LTCFLAGS $LDFLAGS -o conftest conftest.c -Wl,-force_load,./libconftest.a 2>conftest.err
+      _lt_result=$?
+      if test -s conftest.err && $GREP force_load conftest.err; then
+       cat conftest.err >&5
+      elif test -f conftest && test 0 = "$_lt_result" && $GREP forced_load conftest >/dev/null 2>&1; then
+       lt_cv_ld_force_load=yes
+      else
+       cat conftest.err >&5
+      fi
+        rm -f conftest.err libconftest.a conftest conftest.c
+        rm -rf conftest.dSYM
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_ld_force_load" >&5
+$as_echo "$lt_cv_ld_force_load" >&6; }
+    case $host_os in
+    rhapsody* | darwin1.[012])
+      _lt_dar_allow_undefined='$wl-undefined ${wl}suppress' ;;
+    darwin1.*)
+      _lt_dar_allow_undefined='$wl-flat_namespace $wl-undefined ${wl}suppress' ;;
+    darwin*) # darwin 5.x on
+      # if running on 10.5 or later, the deployment target defaults
+      # to the OS version, if on x86, and 10.4, the deployment
+      # target defaults to 10.4. Don't you love it?
+      case ${MACOSX_DEPLOYMENT_TARGET-10.0},$host in
+       10.0,*86*-darwin8*|10.0,*-darwin[91]*)
+         _lt_dar_allow_undefined='$wl-undefined ${wl}dynamic_lookup' ;;
+       10.[012][,.]*)
+         _lt_dar_allow_undefined='$wl-flat_namespace $wl-undefined ${wl}suppress' ;;
+       10.*)
+         _lt_dar_allow_undefined='$wl-undefined ${wl}dynamic_lookup' ;;
+      esac
+    ;;
+  esac
+    if test yes = "$lt_cv_apple_cc_single_mod"; then
+      _lt_dar_single_mod='$single_module'
+    fi
+    if test yes = "$lt_cv_ld_exported_symbols_list"; then
+      _lt_dar_export_syms=' $wl-exported_symbols_list,$output_objdir/$libname-symbols.expsym'
+    else
+      _lt_dar_export_syms='~$NMEDIT -s $output_objdir/$libname-symbols.expsym $lib'
+    fi
+    if test : != "$DSYMUTIL" && test no = "$lt_cv_ld_force_load"; then
+      _lt_dsymutil='~$DSYMUTIL $lib || :'
+    else
+      _lt_dsymutil=
+    fi
+    ;;
+  esac
+
+# func_munge_path_list VARIABLE PATH
+# -----------------------------------
+# VARIABLE is name of variable containing _space_ separated list of
+# directories to be munged by the contents of PATH, which is string
+# having a format:
+# "DIR[:DIR]:"
+#       string "DIR[ DIR]" will be prepended to VARIABLE
+# ":DIR[:DIR]"
+#       string "DIR[ DIR]" will be appended to VARIABLE
+# "DIRP[:DIRP]::[DIRA:]DIRA"
+#       string "DIRP[ DIRP]" will be prepended to VARIABLE and string
+#       "DIRA[ DIRA]" will be appended to VARIABLE
+# "DIR[:DIR]"
+#       VARIABLE will be replaced by "DIR[ DIR]"
+func_munge_path_list ()
+{
+    case x$2 in
+    x)
+        ;;
+    *:)
+        eval $1=\"`$ECHO $2 | $SED 's/:/ /g'` \$$1\"
+        ;;
+    x:*)
+        eval $1=\"\$$1 `$ECHO $2 | $SED 's/:/ /g'`\"
+        ;;
+    *::*)
+        eval $1=\"\$$1\ `$ECHO $2 | $SED -e 's/.*:://' -e 's/:/ /g'`\"
+        eval $1=\"`$ECHO $2 | $SED -e 's/::.*//' -e 's/:/ /g'`\ \$$1\"
+        ;;
+    *)
+        eval $1=\"`$ECHO $2 | $SED 's/:/ /g'`\"
+        ;;
+    esac
+}
+
+for ac_header in dlfcn.h
+do :
+  ac_fn_c_check_header_compile "$LINENO" "dlfcn.h" "ac_cv_header_dlfcn_h" "$ac_includes_default
+"
+if test "x$ac_cv_header_dlfcn_h" = xyes; then :
+  cat >>confdefs.h <<_ACEOF
+#define HAVE_DLFCN_H 1
+_ACEOF
+
+fi
+
+done
+
+
+
+
+
+# Set options
+enable_win32_dll=yes
+
+case $host in
+*-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-cegcc*)
+  if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}as", so it can be a program name with args.
+set dummy ${ac_tool_prefix}as; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_AS+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$AS"; then
+  ac_cv_prog_AS="$AS" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_AS="${ac_tool_prefix}as"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+AS=$ac_cv_prog_AS
+if test -n "$AS"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $AS" >&5
+$as_echo "$AS" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_AS"; then
+  ac_ct_AS=$AS
+  # Extract the first word of "as", so it can be a program name with args.
+set dummy as; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_AS+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_AS"; then
+  ac_cv_prog_ac_ct_AS="$ac_ct_AS" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_AS="as"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_AS=$ac_cv_prog_ac_ct_AS
+if test -n "$ac_ct_AS"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_AS" >&5
+$as_echo "$ac_ct_AS" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_AS" = x; then
+    AS="false"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    AS=$ac_ct_AS
+  fi
+else
+  AS="$ac_cv_prog_AS"
+fi
+
+  if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}dlltool", so it can be a program name with args.
+set dummy ${ac_tool_prefix}dlltool; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_DLLTOOL+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$DLLTOOL"; then
+  ac_cv_prog_DLLTOOL="$DLLTOOL" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_DLLTOOL="${ac_tool_prefix}dlltool"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+DLLTOOL=$ac_cv_prog_DLLTOOL
+if test -n "$DLLTOOL"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $DLLTOOL" >&5
+$as_echo "$DLLTOOL" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_DLLTOOL"; then
+  ac_ct_DLLTOOL=$DLLTOOL
+  # Extract the first word of "dlltool", so it can be a program name with args.
+set dummy dlltool; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_DLLTOOL+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_DLLTOOL"; then
+  ac_cv_prog_ac_ct_DLLTOOL="$ac_ct_DLLTOOL" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_DLLTOOL="dlltool"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_DLLTOOL=$ac_cv_prog_ac_ct_DLLTOOL
+if test -n "$ac_ct_DLLTOOL"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_DLLTOOL" >&5
+$as_echo "$ac_ct_DLLTOOL" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_DLLTOOL" = x; then
+    DLLTOOL="false"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    DLLTOOL=$ac_ct_DLLTOOL
+  fi
+else
+  DLLTOOL="$ac_cv_prog_DLLTOOL"
+fi
+
+  if test -n "$ac_tool_prefix"; then
+  # Extract the first word of "${ac_tool_prefix}objdump", so it can be a program name with args.
+set dummy ${ac_tool_prefix}objdump; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_OBJDUMP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$OBJDUMP"; then
+  ac_cv_prog_OBJDUMP="$OBJDUMP" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_OBJDUMP="${ac_tool_prefix}objdump"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+OBJDUMP=$ac_cv_prog_OBJDUMP
+if test -n "$OBJDUMP"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $OBJDUMP" >&5
+$as_echo "$OBJDUMP" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+fi
+if test -z "$ac_cv_prog_OBJDUMP"; then
+  ac_ct_OBJDUMP=$OBJDUMP
+  # Extract the first word of "objdump", so it can be a program name with args.
+set dummy objdump; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_OBJDUMP+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_OBJDUMP"; then
+  ac_cv_prog_ac_ct_OBJDUMP="$ac_ct_OBJDUMP" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_OBJDUMP="objdump"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_OBJDUMP=$ac_cv_prog_ac_ct_OBJDUMP
+if test -n "$ac_ct_OBJDUMP"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_OBJDUMP" >&5
+$as_echo "$ac_ct_OBJDUMP" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+  if test "x$ac_ct_OBJDUMP" = x; then
+    OBJDUMP="false"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    OBJDUMP=$ac_ct_OBJDUMP
+  fi
+else
+  OBJDUMP="$ac_cv_prog_OBJDUMP"
+fi
+
+  ;;
+esac
+
+test -z "$AS" && AS=as
+
+
+
+
+
+test -z "$DLLTOOL" && DLLTOOL=dlltool
+
+
+
+
+
+test -z "$OBJDUMP" && OBJDUMP=objdump
+
+
+
+
+
+
+
+        enable_dlopen=no
+
+
+
+            # Check whether --enable-shared was given.
+if test "${enable_shared+set}" = set; then :
+  enableval=$enable_shared; p=${PACKAGE-default}
+    case $enableval in
+    yes) enable_shared=yes ;;
+    no) enable_shared=no ;;
+    *)
+      enable_shared=no
+      # Look at the argument we got.  We use all the common list separators.
+      lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR,
+      for pkg in $enableval; do
+       IFS=$lt_save_ifs
+       if test "X$pkg" = "X$p"; then
+         enable_shared=yes
+       fi
+      done
+      IFS=$lt_save_ifs
+      ;;
+    esac
+else
+  enable_shared=yes
+fi
+
+
+
+
+
+
+
+
+
+  # Check whether --enable-static was given.
+if test "${enable_static+set}" = set; then :
+  enableval=$enable_static; p=${PACKAGE-default}
+    case $enableval in
+    yes) enable_static=yes ;;
+    no) enable_static=no ;;
+    *)
+     enable_static=no
+      # Look at the argument we got.  We use all the common list separators.
+      lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR,
+      for pkg in $enableval; do
+       IFS=$lt_save_ifs
+       if test "X$pkg" = "X$p"; then
+         enable_static=yes
+       fi
+      done
+      IFS=$lt_save_ifs
+      ;;
+    esac
+else
+  enable_static=yes
+fi
+
+
+
+
+
+
+
+
+
+
+# Check whether --with-pic was given.
+if test "${with_pic+set}" = set; then :
+  withval=$with_pic; lt_p=${PACKAGE-default}
+    case $withval in
+    yes|no) pic_mode=$withval ;;
+    *)
+      pic_mode=default
+      # Look at the argument we got.  We use all the common list separators.
+      lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR,
+      for lt_pkg in $withval; do
+       IFS=$lt_save_ifs
+       if test "X$lt_pkg" = "X$lt_p"; then
+         pic_mode=yes
+       fi
+      done
+      IFS=$lt_save_ifs
+      ;;
+    esac
+else
+  pic_mode=default
+fi
+
+
+
+
+
+
+
+
+  # Check whether --enable-fast-install was given.
+if test "${enable_fast_install+set}" = set; then :
+  enableval=$enable_fast_install; p=${PACKAGE-default}
+    case $enableval in
+    yes) enable_fast_install=yes ;;
+    no) enable_fast_install=no ;;
+    *)
+      enable_fast_install=no
+      # Look at the argument we got.  We use all the common list separators.
+      lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR,
+      for pkg in $enableval; do
+       IFS=$lt_save_ifs
+       if test "X$pkg" = "X$p"; then
+         enable_fast_install=yes
+       fi
+      done
+      IFS=$lt_save_ifs
+      ;;
+    esac
+else
+  enable_fast_install=yes
+fi
+
+
+
+
+
+
+
+
+  shared_archive_member_spec=
+case $host,$enable_shared in
+power*-*-aix[5-9]*,yes)
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking which variant of shared library versioning to provide" >&5
+$as_echo_n "checking which variant of shared library versioning to provide... " >&6; }
+
+# Check whether --with-aix-soname was given.
+if test "${with_aix_soname+set}" = set; then :
+  withval=$with_aix_soname; case $withval in
+    aix|svr4|both)
+      ;;
+    *)
+      as_fn_error $? "Unknown argument to --with-aix-soname" "$LINENO" 5
+      ;;
+    esac
+    lt_cv_with_aix_soname=$with_aix_soname
+else
+  if ${lt_cv_with_aix_soname+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_with_aix_soname=aix
+fi
+
+    with_aix_soname=$lt_cv_with_aix_soname
+fi
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $with_aix_soname" >&5
+$as_echo "$with_aix_soname" >&6; }
+  if test aix != "$with_aix_soname"; then
+    # For the AIX way of multilib, we name the shared archive member
+    # based on the bitwidth used, traditionally 'shr.o' or 'shr_64.o',
+    # and 'shr.imp' or 'shr_64.imp', respectively, for the Import File.
+    # Even when GNU compilers ignore OBJECT_MODE but need '-maix64' flag,
+    # the AIX toolchain works better with OBJECT_MODE set (default 32).
+    if test 64 = "${OBJECT_MODE-32}"; then
+      shared_archive_member_spec=shr_64
+    else
+      shared_archive_member_spec=shr
+    fi
+  fi
+  ;;
+*)
+  with_aix_soname=aix
+  ;;
+esac
+
+
+
+
+
+
+
+
+
+
+# This can be used to rebuild libtool when needed
+LIBTOOL_DEPS=$ltmain
+
+# Always use our own libtool.
+LIBTOOL='$(SHELL) $(top_builddir)/libtool'
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+test -z "$LN_S" && LN_S="ln -s"
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+if test -n "${ZSH_VERSION+set}"; then
+   setopt NO_GLOB_SUBST
+fi
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for objdir" >&5
+$as_echo_n "checking for objdir... " >&6; }
+if ${lt_cv_objdir+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  rm -f .libs 2>/dev/null
+mkdir .libs 2>/dev/null
+if test -d .libs; then
+  lt_cv_objdir=.libs
+else
+  # MS-DOS does not allow filenames that begin with a dot.
+  lt_cv_objdir=_libs
+fi
+rmdir .libs 2>/dev/null
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_objdir" >&5
+$as_echo "$lt_cv_objdir" >&6; }
+objdir=$lt_cv_objdir
+
+
+
+
+
+cat >>confdefs.h <<_ACEOF
+#define LT_OBJDIR "$lt_cv_objdir/"
+_ACEOF
+
+
+
+
+case $host_os in
+aix3*)
+  # AIX sometimes has problems with the GCC collect2 program.  For some
+  # reason, if we set the COLLECT_NAMES environment variable, the problems
+  # vanish in a puff of smoke.
+  if test set != "${COLLECT_NAMES+set}"; then
+    COLLECT_NAMES=
+    export COLLECT_NAMES
+  fi
+  ;;
+esac
+
+# Global variables:
+ofile=libtool
+can_build_shared=yes
+
+# All known linkers require a '.a' archive for static linking (except MSVC,
+# which needs '.lib').
+libext=a
+
+with_gnu_ld=$lt_cv_prog_gnu_ld
+
+old_CC=$CC
+old_CFLAGS=$CFLAGS
+
+# Set sane defaults for various variables
+test -z "$CC" && CC=cc
+test -z "$LTCC" && LTCC=$CC
+test -z "$LTCFLAGS" && LTCFLAGS=$CFLAGS
+test -z "$LD" && LD=ld
+test -z "$ac_objext" && ac_objext=o
+
+func_cc_basename $compiler
+cc_basename=$func_cc_basename_result
+
+
+# Only perform the check for file, if the check method requires it
+test -z "$MAGIC_CMD" && MAGIC_CMD=file
+case $deplibs_check_method in
+file_magic*)
+  if test "$file_magic_cmd" = '$MAGIC_CMD'; then
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for ${ac_tool_prefix}file" >&5
+$as_echo_n "checking for ${ac_tool_prefix}file... " >&6; }
+if ${lt_cv_path_MAGIC_CMD+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  case $MAGIC_CMD in
+[\\/*] |  ?:[\\/]*)
+  lt_cv_path_MAGIC_CMD=$MAGIC_CMD # Let the user override the test with a path.
+  ;;
+*)
+  lt_save_MAGIC_CMD=$MAGIC_CMD
+  lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR
+  ac_dummy="/usr/bin$PATH_SEPARATOR$PATH"
+  for ac_dir in $ac_dummy; do
+    IFS=$lt_save_ifs
+    test -z "$ac_dir" && ac_dir=.
+    if test -f "$ac_dir/${ac_tool_prefix}file"; then
+      lt_cv_path_MAGIC_CMD=$ac_dir/"${ac_tool_prefix}file"
+      if test -n "$file_magic_test_file"; then
+       case $deplibs_check_method in
+       "file_magic "*)
+         file_magic_regex=`expr "$deplibs_check_method" : "file_magic \(.*\)"`
+         MAGIC_CMD=$lt_cv_path_MAGIC_CMD
+         if eval $file_magic_cmd \$file_magic_test_file 2> /dev/null |
+           $EGREP "$file_magic_regex" > /dev/null; then
+           :
+         else
+           cat <<_LT_EOF 1>&2
+
+*** Warning: the command libtool uses to detect shared libraries,
+*** $file_magic_cmd, produces output that libtool cannot recognize.
+*** The result is that libtool may fail to recognize shared libraries
+*** as such.  This will affect the creation of libtool libraries that
+*** depend on shared libraries, but programs linked with such libtool
+*** libraries will work regardless of this problem.  Nevertheless, you
+*** may want to report the problem to your system manager and/or to
+*** bug-libtool@gnu.org
+
+_LT_EOF
+         fi ;;
+       esac
+      fi
+      break
+    fi
+  done
+  IFS=$lt_save_ifs
+  MAGIC_CMD=$lt_save_MAGIC_CMD
+  ;;
+esac
+fi
+
+MAGIC_CMD=$lt_cv_path_MAGIC_CMD
+if test -n "$MAGIC_CMD"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $MAGIC_CMD" >&5
+$as_echo "$MAGIC_CMD" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+
+
+
+if test -z "$lt_cv_path_MAGIC_CMD"; then
+  if test -n "$ac_tool_prefix"; then
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for file" >&5
+$as_echo_n "checking for file... " >&6; }
+if ${lt_cv_path_MAGIC_CMD+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  case $MAGIC_CMD in
+[\\/*] |  ?:[\\/]*)
+  lt_cv_path_MAGIC_CMD=$MAGIC_CMD # Let the user override the test with a path.
+  ;;
+*)
+  lt_save_MAGIC_CMD=$MAGIC_CMD
+  lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR
+  ac_dummy="/usr/bin$PATH_SEPARATOR$PATH"
+  for ac_dir in $ac_dummy; do
+    IFS=$lt_save_ifs
+    test -z "$ac_dir" && ac_dir=.
+    if test -f "$ac_dir/file"; then
+      lt_cv_path_MAGIC_CMD=$ac_dir/"file"
+      if test -n "$file_magic_test_file"; then
+       case $deplibs_check_method in
+       "file_magic "*)
+         file_magic_regex=`expr "$deplibs_check_method" : "file_magic \(.*\)"`
+         MAGIC_CMD=$lt_cv_path_MAGIC_CMD
+         if eval $file_magic_cmd \$file_magic_test_file 2> /dev/null |
+           $EGREP "$file_magic_regex" > /dev/null; then
+           :
+         else
+           cat <<_LT_EOF 1>&2
+
+*** Warning: the command libtool uses to detect shared libraries,
+*** $file_magic_cmd, produces output that libtool cannot recognize.
+*** The result is that libtool may fail to recognize shared libraries
+*** as such.  This will affect the creation of libtool libraries that
+*** depend on shared libraries, but programs linked with such libtool
+*** libraries will work regardless of this problem.  Nevertheless, you
+*** may want to report the problem to your system manager and/or to
+*** bug-libtool@gnu.org
+
+_LT_EOF
+         fi ;;
+       esac
+      fi
+      break
+    fi
+  done
+  IFS=$lt_save_ifs
+  MAGIC_CMD=$lt_save_MAGIC_CMD
+  ;;
+esac
+fi
+
+MAGIC_CMD=$lt_cv_path_MAGIC_CMD
+if test -n "$MAGIC_CMD"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $MAGIC_CMD" >&5
+$as_echo "$MAGIC_CMD" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+  else
+    MAGIC_CMD=:
+  fi
+fi
+
+  fi
+  ;;
+esac
+
+# Use C for the default configuration in the libtool script
+
+lt_save_CC=$CC
+ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+
+# Source file extension for C test sources.
+ac_ext=c
+
+# Object file extension for compiled C test sources.
+objext=o
+objext=$objext
+
+# Code to be used in simple compile tests
+lt_simple_compile_test_code="int some_variable = 0;"
+
+# Code to be used in simple link tests
+lt_simple_link_test_code='int main(){return(0);}'
+
+
+
+
+
+
+
+# If no C compiler was specified, use CC.
+LTCC=${LTCC-"$CC"}
+
+# If no C compiler flags were specified, use CFLAGS.
+LTCFLAGS=${LTCFLAGS-"$CFLAGS"}
+
+# Allow CC to be a program name with arguments.
+compiler=$CC
+
+# Save the default compiler, since it gets overwritten when the other
+# tags are being tested, and _LT_TAGVAR(compiler, []) is a NOP.
+compiler_DEFAULT=$CC
+
+# save warnings/boilerplate of simple test code
+ac_outfile=conftest.$ac_objext
+echo "$lt_simple_compile_test_code" >conftest.$ac_ext
+eval "$ac_compile" 2>&1 >/dev/null | $SED '/^$/d; /^ *+/d' >conftest.err
+_lt_compiler_boilerplate=`cat conftest.err`
+$RM conftest*
+
+ac_outfile=conftest.$ac_objext
+echo "$lt_simple_link_test_code" >conftest.$ac_ext
+eval "$ac_link" 2>&1 >/dev/null | $SED '/^$/d; /^ *+/d' >conftest.err
+_lt_linker_boilerplate=`cat conftest.err`
+$RM -r conftest*
+
+
+## CAVEAT EMPTOR:
+## There is no encapsulation within the following macros, do not change
+## the running order or otherwise move them around unless you know exactly
+## what you are doing...
+if test -n "$compiler"; then
+
+lt_prog_compiler_no_builtin_flag=
+
+if test yes = "$GCC"; then
+  case $cc_basename in
+  nvcc*)
+    lt_prog_compiler_no_builtin_flag=' -Xcompiler -fno-builtin' ;;
+  *)
+    lt_prog_compiler_no_builtin_flag=' -fno-builtin' ;;
+  esac
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking if $compiler supports -fno-rtti -fno-exceptions" >&5
+$as_echo_n "checking if $compiler supports -fno-rtti -fno-exceptions... " >&6; }
+if ${lt_cv_prog_compiler_rtti_exceptions+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_prog_compiler_rtti_exceptions=no
+   ac_outfile=conftest.$ac_objext
+   echo "$lt_simple_compile_test_code" > conftest.$ac_ext
+   lt_compiler_flag="-fno-rtti -fno-exceptions"  ## exclude from sc_useless_quotes_in_assignment
+   # Insert the option either (1) after the last *FLAGS variable, or
+   # (2) before a word containing "conftest.", or (3) at the end.
+   # Note that $ac_compile itself does not contain backslashes and begins
+   # with a dollar sign (not a hyphen), so the echo should work correctly.
+   # The option is referenced via a variable to avoid confusing sed.
+   lt_compile=`echo "$ac_compile" | $SED \
+   -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \
+   -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \
+   -e 's:$: $lt_compiler_flag:'`
+   (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&5)
+   (eval "$lt_compile" 2>conftest.err)
+   ac_status=$?
+   cat conftest.err >&5
+   echo "$as_me:$LINENO: \$? = $ac_status" >&5
+   if (exit $ac_status) && test -s "$ac_outfile"; then
+     # The compiler can only warn and ignore the option if not recognized
+     # So say no if there are warnings other than the usual output.
+     $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' >conftest.exp
+     $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2
+     if test ! -s conftest.er2 || diff conftest.exp conftest.er2 >/dev/null; then
+       lt_cv_prog_compiler_rtti_exceptions=yes
+     fi
+   fi
+   $RM conftest*
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_rtti_exceptions" >&5
+$as_echo "$lt_cv_prog_compiler_rtti_exceptions" >&6; }
+
+if test yes = "$lt_cv_prog_compiler_rtti_exceptions"; then
+    lt_prog_compiler_no_builtin_flag="$lt_prog_compiler_no_builtin_flag -fno-rtti -fno-exceptions"
+else
+    :
+fi
+
+fi
+
+
+
+
+
+
+  lt_prog_compiler_wl=
+lt_prog_compiler_pic=
+lt_prog_compiler_static=
+
+
+  if test yes = "$GCC"; then
+    lt_prog_compiler_wl='-Wl,'
+    lt_prog_compiler_static='-static'
+
+    case $host_os in
+      aix*)
+      # All AIX code is PIC.
+      if test ia64 = "$host_cpu"; then
+       # AIX 5 now supports IA64 processor
+       lt_prog_compiler_static='-Bstatic'
+      fi
+      lt_prog_compiler_pic='-fPIC'
+      ;;
+
+    amigaos*)
+      case $host_cpu in
+      powerpc)
+            # see comment about AmigaOS4 .so support
+            lt_prog_compiler_pic='-fPIC'
+        ;;
+      m68k)
+            # FIXME: we need at least 68020 code to build shared libraries, but
+            # adding the '-m68020' flag to GCC prevents building anything better,
+            # like '-m68040'.
+            lt_prog_compiler_pic='-m68020 -resident32 -malways-restore-a4'
+        ;;
+      esac
+      ;;
+
+    beos* | irix5* | irix6* | nonstopux* | osf3* | osf4* | osf5*)
+      # PIC is the default for these OSes.
+      ;;
+
+    mingw* | cygwin* | pw32* | os2* | cegcc*)
+      # This hack is so that the source file can tell whether it is being
+      # built for inclusion in a dll (and should export symbols for example).
+      # Although the cygwin gcc ignores -fPIC, still need this for old-style
+      # (--disable-auto-import) libraries
+      lt_prog_compiler_pic='-DDLL_EXPORT'
+      case $host_os in
+      os2*)
+       lt_prog_compiler_static='$wl-static'
+       ;;
+      esac
+      ;;
+
+    darwin* | rhapsody*)
+      # PIC is the default on this platform
+      # Common symbols not allowed in MH_DYLIB files
+      lt_prog_compiler_pic='-fno-common'
+      ;;
+
+    haiku*)
+      # PIC is the default for Haiku.
+      # The "-static" flag exists, but is broken.
+      lt_prog_compiler_static=
+      ;;
+
+    hpux*)
+      # PIC is the default for 64-bit PA HP-UX, but not for 32-bit
+      # PA HP-UX.  On IA64 HP-UX, PIC is the default but the pic flag
+      # sets the default TLS model and affects inlining.
+      case $host_cpu in
+      hppa*64*)
+       # +Z the default
+       ;;
+      *)
+       lt_prog_compiler_pic='-fPIC'
+       ;;
+      esac
+      ;;
+
+    interix[3-9]*)
+      # Interix 3.x gcc -fpic/-fPIC options generate broken code.
+      # Instead, we relocate shared libraries at runtime.
+      ;;
+
+    msdosdjgpp*)
+      # Just because we use GCC doesn't mean we suddenly get shared libraries
+      # on systems that don't support them.
+      lt_prog_compiler_can_build_shared=no
+      enable_shared=no
+      ;;
+
+    *nto* | *qnx*)
+      # QNX uses GNU C++, but need to define -shared option too, otherwise
+      # it will coredump.
+      lt_prog_compiler_pic='-fPIC -shared'
+      ;;
+
+    sysv4*MP*)
+      if test -d /usr/nec; then
+       lt_prog_compiler_pic=-Kconform_pic
+      fi
+      ;;
+
+    *)
+      lt_prog_compiler_pic='-fPIC'
+      ;;
+    esac
+
+    case $cc_basename in
+    nvcc*) # Cuda Compiler Driver 2.2
+      lt_prog_compiler_wl='-Xlinker '
+      if test -n "$lt_prog_compiler_pic"; then
+        lt_prog_compiler_pic="-Xcompiler $lt_prog_compiler_pic"
+      fi
+      ;;
+    esac
+  else
+    # PORTME Check for flag to pass linker flags through the system compiler.
+    case $host_os in
+    aix*)
+      lt_prog_compiler_wl='-Wl,'
+      if test ia64 = "$host_cpu"; then
+       # AIX 5 now supports IA64 processor
+       lt_prog_compiler_static='-Bstatic'
+      else
+       lt_prog_compiler_static='-bnso -bI:/lib/syscalls.exp'
+      fi
+      ;;
+
+    darwin* | rhapsody*)
+      # PIC is the default on this platform
+      # Common symbols not allowed in MH_DYLIB files
+      lt_prog_compiler_pic='-fno-common'
+      case $cc_basename in
+      nagfor*)
+        # NAG Fortran compiler
+        lt_prog_compiler_wl='-Wl,-Wl,,'
+        lt_prog_compiler_pic='-PIC'
+        lt_prog_compiler_static='-Bstatic'
+        ;;
+      esac
+      ;;
+
+    mingw* | cygwin* | pw32* | os2* | cegcc*)
+      # This hack is so that the source file can tell whether it is being
+      # built for inclusion in a dll (and should export symbols for example).
+      lt_prog_compiler_pic='-DDLL_EXPORT'
+      case $host_os in
+      os2*)
+       lt_prog_compiler_static='$wl-static'
+       ;;
+      esac
+      ;;
+
+    hpux9* | hpux10* | hpux11*)
+      lt_prog_compiler_wl='-Wl,'
+      # PIC is the default for IA64 HP-UX and 64-bit HP-UX, but
+      # not for PA HP-UX.
+      case $host_cpu in
+      hppa*64*|ia64*)
+       # +Z the default
+       ;;
+      *)
+       lt_prog_compiler_pic='+Z'
+       ;;
+      esac
+      # Is there a better lt_prog_compiler_static that works with the bundled CC?
+      lt_prog_compiler_static='$wl-a ${wl}archive'
+      ;;
+
+    irix5* | irix6* | nonstopux*)
+      lt_prog_compiler_wl='-Wl,'
+      # PIC (with -KPIC) is the default.
+      lt_prog_compiler_static='-non_shared'
+      ;;
+
+    linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*)
+      case $cc_basename in
+      # old Intel for x86_64, which still supported -KPIC.
+      ecc*)
+       lt_prog_compiler_wl='-Wl,'
+       lt_prog_compiler_pic='-KPIC'
+       lt_prog_compiler_static='-static'
+        ;;
+      # icc used to be incompatible with GCC.
+      # ICC 10 doesn't accept -KPIC any more.
+      icc* | ifort*)
+       lt_prog_compiler_wl='-Wl,'
+       lt_prog_compiler_pic='-fPIC'
+       lt_prog_compiler_static='-static'
+        ;;
+      # Lahey Fortran 8.1.
+      lf95*)
+       lt_prog_compiler_wl='-Wl,'
+       lt_prog_compiler_pic='--shared'
+       lt_prog_compiler_static='--static'
+       ;;
+      nagfor*)
+       # NAG Fortran compiler
+       lt_prog_compiler_wl='-Wl,-Wl,,'
+       lt_prog_compiler_pic='-PIC'
+       lt_prog_compiler_static='-Bstatic'
+       ;;
+      tcc*)
+       # Fabrice Bellard et al's Tiny C Compiler
+       lt_prog_compiler_wl='-Wl,'
+       lt_prog_compiler_pic='-fPIC'
+       lt_prog_compiler_static='-static'
+       ;;
+      pgcc* | pgf77* | pgf90* | pgf95* | pgfortran*)
+        # Portland Group compilers (*not* the Pentium gcc compiler,
+       # which looks to be a dead project)
+       lt_prog_compiler_wl='-Wl,'
+       lt_prog_compiler_pic='-fpic'
+       lt_prog_compiler_static='-Bstatic'
+        ;;
+      ccc*)
+        lt_prog_compiler_wl='-Wl,'
+        # All Alpha code is PIC.
+        lt_prog_compiler_static='-non_shared'
+        ;;
+      xl* | bgxl* | bgf* | mpixl*)
+       # IBM XL C 8.0/Fortran 10.1, 11.1 on PPC and BlueGene
+       lt_prog_compiler_wl='-Wl,'
+       lt_prog_compiler_pic='-qpic'
+       lt_prog_compiler_static='-qstaticlink'
+       ;;
+      *)
+       case `$CC -V 2>&1 | sed 5q` in
+       *Sun\ Ceres\ Fortran* | *Sun*Fortran*\ [1-7].* | *Sun*Fortran*\ 8.[0-3]*)
+         # Sun Fortran 8.3 passes all unrecognized flags to the linker
+         lt_prog_compiler_pic='-KPIC'
+         lt_prog_compiler_static='-Bstatic'
+         lt_prog_compiler_wl=''
+         ;;
+       *Sun\ F* | *Sun*Fortran*)
+         lt_prog_compiler_pic='-KPIC'
+         lt_prog_compiler_static='-Bstatic'
+         lt_prog_compiler_wl='-Qoption ld '
+         ;;
+       *Sun\ C*)
+         # Sun C 5.9
+         lt_prog_compiler_pic='-KPIC'
+         lt_prog_compiler_static='-Bstatic'
+         lt_prog_compiler_wl='-Wl,'
+         ;;
+        *Intel*\ [CF]*Compiler*)
+         lt_prog_compiler_wl='-Wl,'
+         lt_prog_compiler_pic='-fPIC'
+         lt_prog_compiler_static='-static'
+         ;;
+       *Portland\ Group*)
+         lt_prog_compiler_wl='-Wl,'
+         lt_prog_compiler_pic='-fpic'
+         lt_prog_compiler_static='-Bstatic'
+         ;;
+       esac
+       ;;
+      esac
+      ;;
+
+    newsos6)
+      lt_prog_compiler_pic='-KPIC'
+      lt_prog_compiler_static='-Bstatic'
+      ;;
+
+    *nto* | *qnx*)
+      # QNX uses GNU C++, but need to define -shared option too, otherwise
+      # it will coredump.
+      lt_prog_compiler_pic='-fPIC -shared'
+      ;;
+
+    osf3* | osf4* | osf5*)
+      lt_prog_compiler_wl='-Wl,'
+      # All OSF/1 code is PIC.
+      lt_prog_compiler_static='-non_shared'
+      ;;
+
+    rdos*)
+      lt_prog_compiler_static='-non_shared'
+      ;;
+
+    solaris*)
+      lt_prog_compiler_pic='-KPIC'
+      lt_prog_compiler_static='-Bstatic'
+      case $cc_basename in
+      f77* | f90* | f95* | sunf77* | sunf90* | sunf95*)
+       lt_prog_compiler_wl='-Qoption ld ';;
+      *)
+       lt_prog_compiler_wl='-Wl,';;
+      esac
+      ;;
+
+    sunos4*)
+      lt_prog_compiler_wl='-Qoption ld '
+      lt_prog_compiler_pic='-PIC'
+      lt_prog_compiler_static='-Bstatic'
+      ;;
+
+    sysv4 | sysv4.2uw2* | sysv4.3*)
+      lt_prog_compiler_wl='-Wl,'
+      lt_prog_compiler_pic='-KPIC'
+      lt_prog_compiler_static='-Bstatic'
+      ;;
+
+    sysv4*MP*)
+      if test -d /usr/nec; then
+       lt_prog_compiler_pic='-Kconform_pic'
+       lt_prog_compiler_static='-Bstatic'
+      fi
+      ;;
+
+    sysv5* | unixware* | sco3.2v5* | sco5v6* | OpenUNIX*)
+      lt_prog_compiler_wl='-Wl,'
+      lt_prog_compiler_pic='-KPIC'
+      lt_prog_compiler_static='-Bstatic'
+      ;;
+
+    unicos*)
+      lt_prog_compiler_wl='-Wl,'
+      lt_prog_compiler_can_build_shared=no
+      ;;
+
+    uts4*)
+      lt_prog_compiler_pic='-pic'
+      lt_prog_compiler_static='-Bstatic'
+      ;;
+
+    *)
+      lt_prog_compiler_can_build_shared=no
+      ;;
+    esac
+  fi
+
+case $host_os in
+  # For platforms that do not support PIC, -DPIC is meaningless:
+  *djgpp*)
+    lt_prog_compiler_pic=
+    ;;
+  *)
+    lt_prog_compiler_pic="$lt_prog_compiler_pic -DPIC"
+    ;;
+esac
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $compiler option to produce PIC" >&5
+$as_echo_n "checking for $compiler option to produce PIC... " >&6; }
+if ${lt_cv_prog_compiler_pic+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_prog_compiler_pic=$lt_prog_compiler_pic
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_pic" >&5
+$as_echo "$lt_cv_prog_compiler_pic" >&6; }
+lt_prog_compiler_pic=$lt_cv_prog_compiler_pic
+
+#
+# Check to make sure the PIC flag actually works.
+#
+if test -n "$lt_prog_compiler_pic"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking if $compiler PIC flag $lt_prog_compiler_pic works" >&5
+$as_echo_n "checking if $compiler PIC flag $lt_prog_compiler_pic works... " >&6; }
+if ${lt_cv_prog_compiler_pic_works+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_prog_compiler_pic_works=no
+   ac_outfile=conftest.$ac_objext
+   echo "$lt_simple_compile_test_code" > conftest.$ac_ext
+   lt_compiler_flag="$lt_prog_compiler_pic -DPIC"  ## exclude from sc_useless_quotes_in_assignment
+   # Insert the option either (1) after the last *FLAGS variable, or
+   # (2) before a word containing "conftest.", or (3) at the end.
+   # Note that $ac_compile itself does not contain backslashes and begins
+   # with a dollar sign (not a hyphen), so the echo should work correctly.
+   # The option is referenced via a variable to avoid confusing sed.
+   lt_compile=`echo "$ac_compile" | $SED \
+   -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \
+   -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \
+   -e 's:$: $lt_compiler_flag:'`
+   (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&5)
+   (eval "$lt_compile" 2>conftest.err)
+   ac_status=$?
+   cat conftest.err >&5
+   echo "$as_me:$LINENO: \$? = $ac_status" >&5
+   if (exit $ac_status) && test -s "$ac_outfile"; then
+     # The compiler can only warn and ignore the option if not recognized
+     # So say no if there are warnings other than the usual output.
+     $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' >conftest.exp
+     $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2
+     if test ! -s conftest.er2 || diff conftest.exp conftest.er2 >/dev/null; then
+       lt_cv_prog_compiler_pic_works=yes
+     fi
+   fi
+   $RM conftest*
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_pic_works" >&5
+$as_echo "$lt_cv_prog_compiler_pic_works" >&6; }
+
+if test yes = "$lt_cv_prog_compiler_pic_works"; then
+    case $lt_prog_compiler_pic in
+     "" | " "*) ;;
+     *) lt_prog_compiler_pic=" $lt_prog_compiler_pic" ;;
+     esac
+else
+    lt_prog_compiler_pic=
+     lt_prog_compiler_can_build_shared=no
+fi
+
+fi
+
+
+
+
+
+
+
+
+
+
+
+#
+# Check to make sure the static flag actually works.
+#
+wl=$lt_prog_compiler_wl eval lt_tmp_static_flag=\"$lt_prog_compiler_static\"
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking if $compiler static flag $lt_tmp_static_flag works" >&5
+$as_echo_n "checking if $compiler static flag $lt_tmp_static_flag works... " >&6; }
+if ${lt_cv_prog_compiler_static_works+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_prog_compiler_static_works=no
+   save_LDFLAGS=$LDFLAGS
+   LDFLAGS="$LDFLAGS $lt_tmp_static_flag"
+   echo "$lt_simple_link_test_code" > conftest.$ac_ext
+   if (eval $ac_link 2>conftest.err) && test -s conftest$ac_exeext; then
+     # The linker can only warn and ignore the option if not recognized
+     # So say no if there are warnings
+     if test -s conftest.err; then
+       # Append any errors to the config.log.
+       cat conftest.err 1>&5
+       $ECHO "$_lt_linker_boilerplate" | $SED '/^$/d' > conftest.exp
+       $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2
+       if diff conftest.exp conftest.er2 >/dev/null; then
+         lt_cv_prog_compiler_static_works=yes
+       fi
+     else
+       lt_cv_prog_compiler_static_works=yes
+     fi
+   fi
+   $RM -r conftest*
+   LDFLAGS=$save_LDFLAGS
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_static_works" >&5
+$as_echo "$lt_cv_prog_compiler_static_works" >&6; }
+
+if test yes = "$lt_cv_prog_compiler_static_works"; then
+    :
+else
+    lt_prog_compiler_static=
+fi
+
+
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking if $compiler supports -c -o file.$ac_objext" >&5
+$as_echo_n "checking if $compiler supports -c -o file.$ac_objext... " >&6; }
+if ${lt_cv_prog_compiler_c_o+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_prog_compiler_c_o=no
+   $RM -r conftest 2>/dev/null
+   mkdir conftest
+   cd conftest
+   mkdir out
+   echo "$lt_simple_compile_test_code" > conftest.$ac_ext
+
+   lt_compiler_flag="-o out/conftest2.$ac_objext"
+   # Insert the option either (1) after the last *FLAGS variable, or
+   # (2) before a word containing "conftest.", or (3) at the end.
+   # Note that $ac_compile itself does not contain backslashes and begins
+   # with a dollar sign (not a hyphen), so the echo should work correctly.
+   lt_compile=`echo "$ac_compile" | $SED \
+   -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \
+   -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \
+   -e 's:$: $lt_compiler_flag:'`
+   (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&5)
+   (eval "$lt_compile" 2>out/conftest.err)
+   ac_status=$?
+   cat out/conftest.err >&5
+   echo "$as_me:$LINENO: \$? = $ac_status" >&5
+   if (exit $ac_status) && test -s out/conftest2.$ac_objext
+   then
+     # The compiler can only warn and ignore the option if not recognized
+     # So say no if there are warnings
+     $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' > out/conftest.exp
+     $SED '/^$/d; /^ *+/d' out/conftest.err >out/conftest.er2
+     if test ! -s out/conftest.er2 || diff out/conftest.exp out/conftest.er2 >/dev/null; then
+       lt_cv_prog_compiler_c_o=yes
+     fi
+   fi
+   chmod u+w . 2>&5
+   $RM conftest*
+   # SGI C++ compiler will create directory out/ii_files/ for
+   # template instantiation
+   test -d out/ii_files && $RM out/ii_files/* && rmdir out/ii_files
+   $RM out/* && rmdir out
+   cd ..
+   $RM -r conftest
+   $RM conftest*
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_c_o" >&5
+$as_echo "$lt_cv_prog_compiler_c_o" >&6; }
+
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking if $compiler supports -c -o file.$ac_objext" >&5
+$as_echo_n "checking if $compiler supports -c -o file.$ac_objext... " >&6; }
+if ${lt_cv_prog_compiler_c_o+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_prog_compiler_c_o=no
+   $RM -r conftest 2>/dev/null
+   mkdir conftest
+   cd conftest
+   mkdir out
+   echo "$lt_simple_compile_test_code" > conftest.$ac_ext
+
+   lt_compiler_flag="-o out/conftest2.$ac_objext"
+   # Insert the option either (1) after the last *FLAGS variable, or
+   # (2) before a word containing "conftest.", or (3) at the end.
+   # Note that $ac_compile itself does not contain backslashes and begins
+   # with a dollar sign (not a hyphen), so the echo should work correctly.
+   lt_compile=`echo "$ac_compile" | $SED \
+   -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \
+   -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \
+   -e 's:$: $lt_compiler_flag:'`
+   (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&5)
+   (eval "$lt_compile" 2>out/conftest.err)
+   ac_status=$?
+   cat out/conftest.err >&5
+   echo "$as_me:$LINENO: \$? = $ac_status" >&5
+   if (exit $ac_status) && test -s out/conftest2.$ac_objext
+   then
+     # The compiler can only warn and ignore the option if not recognized
+     # So say no if there are warnings
+     $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' > out/conftest.exp
+     $SED '/^$/d; /^ *+/d' out/conftest.err >out/conftest.er2
+     if test ! -s out/conftest.er2 || diff out/conftest.exp out/conftest.er2 >/dev/null; then
+       lt_cv_prog_compiler_c_o=yes
+     fi
+   fi
+   chmod u+w . 2>&5
+   $RM conftest*
+   # SGI C++ compiler will create directory out/ii_files/ for
+   # template instantiation
+   test -d out/ii_files && $RM out/ii_files/* && rmdir out/ii_files
+   $RM out/* && rmdir out
+   cd ..
+   $RM -r conftest
+   $RM conftest*
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_c_o" >&5
+$as_echo "$lt_cv_prog_compiler_c_o" >&6; }
+
+
+
+
+hard_links=nottested
+if test no = "$lt_cv_prog_compiler_c_o" && test no != "$need_locks"; then
+  # do not overwrite the value of need_locks provided by the user
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking if we can lock with hard links" >&5
+$as_echo_n "checking if we can lock with hard links... " >&6; }
+  hard_links=yes
+  $RM conftest*
+  ln conftest.a conftest.b 2>/dev/null && hard_links=no
+  touch conftest.a
+  ln conftest.a conftest.b 2>&5 || hard_links=no
+  ln conftest.a conftest.b 2>/dev/null && hard_links=no
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $hard_links" >&5
+$as_echo "$hard_links" >&6; }
+  if test no = "$hard_links"; then
+    { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: '$CC' does not support '-c -o', so 'make -j' may be unsafe" >&5
+$as_echo "$as_me: WARNING: '$CC' does not support '-c -o', so 'make -j' may be unsafe" >&2;}
+    need_locks=warn
+  fi
+else
+  need_locks=no
+fi
+
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the $compiler linker ($LD) supports shared libraries" >&5
+$as_echo_n "checking whether the $compiler linker ($LD) supports shared libraries... " >&6; }
+
+  runpath_var=
+  allow_undefined_flag=
+  always_export_symbols=no
+  archive_cmds=
+  archive_expsym_cmds=
+  compiler_needs_object=no
+  enable_shared_with_static_runtimes=no
+  export_dynamic_flag_spec=
+  export_symbols_cmds='$NM $libobjs $convenience | $global_symbol_pipe | $SED '\''s/.* //'\'' | sort | uniq > $export_symbols'
+  hardcode_automatic=no
+  hardcode_direct=no
+  hardcode_direct_absolute=no
+  hardcode_libdir_flag_spec=
+  hardcode_libdir_separator=
+  hardcode_minus_L=no
+  hardcode_shlibpath_var=unsupported
+  inherit_rpath=no
+  link_all_deplibs=unknown
+  module_cmds=
+  module_expsym_cmds=
+  old_archive_from_new_cmds=
+  old_archive_from_expsyms_cmds=
+  thread_safe_flag_spec=
+  whole_archive_flag_spec=
+  # include_expsyms should be a list of space-separated symbols to be *always*
+  # included in the symbol list
+  include_expsyms=
+  # exclude_expsyms can be an extended regexp of symbols to exclude
+  # it will be wrapped by ' (' and ')$', so one must not match beginning or
+  # end of line.  Example: 'a|bc|.*d.*' will exclude the symbols 'a' and 'bc',
+  # as well as any symbol that contains 'd'.
+  exclude_expsyms='_GLOBAL_OFFSET_TABLE_|_GLOBAL__F[ID]_.*'
+  # Although _GLOBAL_OFFSET_TABLE_ is a valid symbol C name, most a.out
+  # platforms (ab)use it in PIC code, but their linkers get confused if
+  # the symbol is explicitly referenced.  Since portable code cannot
+  # rely on this symbol name, it's probably fine to never include it in
+  # preloaded symbol tables.
+  # Exclude shared library initialization/finalization symbols.
+  extract_expsyms_cmds=
+
+  case $host_os in
+  cygwin* | mingw* | pw32* | cegcc*)
+    # FIXME: the MSVC++ port hasn't been tested in a loooong time
+    # When not using gcc, we currently assume that we are using
+    # Microsoft Visual C++.
+    if test yes != "$GCC"; then
+      with_gnu_ld=no
+    fi
+    ;;
+  interix*)
+    # we just hope/assume this is gcc and not c89 (= MSVC++)
+    with_gnu_ld=yes
+    ;;
+  openbsd* | bitrig*)
+    with_gnu_ld=no
+    ;;
+  esac
+
+  ld_shlibs=yes
+
+  # On some targets, GNU ld is compatible enough with the native linker
+  # that we're better off using the native interface for both.
+  lt_use_gnu_ld_interface=no
+  if test yes = "$with_gnu_ld"; then
+    case $host_os in
+      aix*)
+       # The AIX port of GNU ld has always aspired to compatibility
+       # with the native linker.  However, as the warning in the GNU ld
+       # block says, versions before 2.19.5* couldn't really create working
+       # shared libraries, regardless of the interface used.
+       case `$LD -v 2>&1` in
+         *\ \(GNU\ Binutils\)\ 2.19.5*) ;;
+         *\ \(GNU\ Binutils\)\ 2.[2-9]*) ;;
+         *\ \(GNU\ Binutils\)\ [3-9]*) ;;
+         *)
+           lt_use_gnu_ld_interface=yes
+           ;;
+       esac
+       ;;
+      *)
+       lt_use_gnu_ld_interface=yes
+       ;;
+    esac
+  fi
+
+  if test yes = "$lt_use_gnu_ld_interface"; then
+    # If archive_cmds runs LD, not CC, wlarc should be empty
+    wlarc='$wl'
+
+    # Set some defaults for GNU ld with shared library support. These
+    # are reset later if shared libraries are not supported. Putting them
+    # here allows them to be overridden if necessary.
+    runpath_var=LD_RUN_PATH
+    hardcode_libdir_flag_spec='$wl-rpath $wl$libdir'
+    export_dynamic_flag_spec='$wl--export-dynamic'
+    # ancient GNU ld didn't support --whole-archive et. al.
+    if $LD --help 2>&1 | $GREP 'no-whole-archive' > /dev/null; then
+      whole_archive_flag_spec=$wlarc'--whole-archive$convenience '$wlarc'--no-whole-archive'
+    else
+      whole_archive_flag_spec=
+    fi
+    supports_anon_versioning=no
+    case `$LD -v | $SED -e 's/(^)\+)\s\+//' 2>&1` in
+      *GNU\ gold*) supports_anon_versioning=yes ;;
+      *\ [01].* | *\ 2.[0-9].* | *\ 2.10.*) ;; # catch versions < 2.11
+      *\ 2.11.93.0.2\ *) supports_anon_versioning=yes ;; # RH7.3 ...
+      *\ 2.11.92.0.12\ *) supports_anon_versioning=yes ;; # Mandrake 8.2 ...
+      *\ 2.11.*) ;; # other 2.11 versions
+      *) supports_anon_versioning=yes ;;
+    esac
+
+    # See if GNU ld supports shared libraries.
+    case $host_os in
+    aix[3-9]*)
+      # On AIX/PPC, the GNU linker is very broken
+      if test ia64 != "$host_cpu"; then
+       ld_shlibs=no
+       cat <<_LT_EOF 1>&2
+
+*** Warning: the GNU linker, at least up to release 2.19, is reported
+*** to be unable to reliably create shared libraries on AIX.
+*** Therefore, libtool is disabling shared libraries support.  If you
+*** really care for shared libraries, you may want to install binutils
+*** 2.20 or above, or modify your PATH so that a non-GNU linker is found.
+*** You will then need to restart the configuration process.
+
+_LT_EOF
+      fi
+      ;;
+
+    amigaos*)
+      case $host_cpu in
+      powerpc)
+            # see comment about AmigaOS4 .so support
+            archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+            archive_expsym_cmds=''
+        ;;
+      m68k)
+            archive_cmds='$RM $output_objdir/a2ixlibrary.data~$ECHO "#define NAME $libname" > $output_objdir/a2ixlibrary.data~$ECHO "#define LIBRARY_ID 1" >> $output_objdir/a2ixlibrary.data~$ECHO "#define VERSION $major" >> $output_objdir/a2ixlibrary.data~$ECHO "#define REVISION $revision" >> $output_objdir/a2ixlibrary.data~$AR $AR_FLAGS $lib $libobjs~$RANLIB $lib~(cd $output_objdir && a2ixlibrary -32)'
+            hardcode_libdir_flag_spec='-L$libdir'
+            hardcode_minus_L=yes
+        ;;
+      esac
+      ;;
+
+    beos*)
+      if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then
+       allow_undefined_flag=unsupported
+       # Joseph Beckenbach <jrb3@best.com> says some releases of gcc
+       # support --undefined.  This deserves some investigation.  FIXME
+       archive_cmds='$CC -nostart $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+      else
+       ld_shlibs=no
+      fi
+      ;;
+
+    cygwin* | mingw* | pw32* | cegcc*)
+      # _LT_TAGVAR(hardcode_libdir_flag_spec, ) is actually meaningless,
+      # as there is no search path for DLLs.
+      hardcode_libdir_flag_spec='-L$libdir'
+      export_dynamic_flag_spec='$wl--export-all-symbols'
+      allow_undefined_flag=unsupported
+      always_export_symbols=no
+      enable_shared_with_static_runtimes=yes
+      export_symbols_cmds='$NM $libobjs $convenience | $global_symbol_pipe | $SED -e '\''/^[BCDGRS][ ]/s/.*[ ]\([^ ]*\)/\1 DATA/;s/^.*[ ]__nm__\([^ ]*\)[ ][^ ]*/\1 DATA/;/^I[ ]/d;/^[AITW][ ]/s/.* //'\'' | sort | uniq > $export_symbols'
+      exclude_expsyms='[_]+GLOBAL_OFFSET_TABLE_|[_]+GLOBAL__[FID]_.*|[_]+head_[A-Za-z0-9_]+_dll|[A-Za-z0-9_]+_dll_iname'
+
+      if $LD --help 2>&1 | $GREP 'auto-import' > /dev/null; then
+        archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib'
+       # If the export-symbols file already is a .def file, use it as
+       # is; otherwise, prepend EXPORTS...
+       archive_expsym_cmds='if   test DEF = "`$SED -n     -e '\''s/^[   ]*//'\''     -e '\''/^\(;.*\)*$/d'\''     -e '\''s/^\(EXPORTS\|LIBRARY\)\([     ].*\)*$/DEF/p'\''     -e q     $export_symbols`" ; then
+          cp $export_symbols $output_objdir/$soname.def;
+        else
+          echo EXPORTS > $output_objdir/$soname.def;
+          cat $export_symbols >> $output_objdir/$soname.def;
+        fi~
+        $CC -shared $output_objdir/$soname.def $libobjs $deplibs $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib'
+      else
+       ld_shlibs=no
+      fi
+      ;;
+
+    haiku*)
+      archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+      link_all_deplibs=yes
+      ;;
+
+    os2*)
+      hardcode_libdir_flag_spec='-L$libdir'
+      hardcode_minus_L=yes
+      allow_undefined_flag=unsupported
+      shrext_cmds=.dll
+      archive_cmds='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~
+       $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~
+       $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~
+       $ECHO EXPORTS >> $output_objdir/$libname.def~
+       emxexp $libobjs | $SED /"_DLL_InitTerm"/d >> $output_objdir/$libname.def~
+       $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~
+       emximp -o $lib $output_objdir/$libname.def'
+      archive_expsym_cmds='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~
+       $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~
+       $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~
+       $ECHO EXPORTS >> $output_objdir/$libname.def~
+       prefix_cmds="$SED"~
+       if test EXPORTS = "`$SED 1q $export_symbols`"; then
+         prefix_cmds="$prefix_cmds -e 1d";
+       fi~
+       prefix_cmds="$prefix_cmds -e \"s/^\(.*\)$/_\1/g\""~
+       cat $export_symbols | $prefix_cmds >> $output_objdir/$libname.def~
+       $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~
+       emximp -o $lib $output_objdir/$libname.def'
+      old_archive_From_new_cmds='emximp -o $output_objdir/${libname}_dll.a $output_objdir/$libname.def'
+      enable_shared_with_static_runtimes=yes
+      ;;
+
+    interix[3-9]*)
+      hardcode_direct=no
+      hardcode_shlibpath_var=no
+      hardcode_libdir_flag_spec='$wl-rpath,$libdir'
+      export_dynamic_flag_spec='$wl-E'
+      # Hack: On Interix 3.x, we cannot compile PIC because of a broken gcc.
+      # Instead, shared libraries are loaded at an image base (0x10000000 by
+      # default) and relocated if they conflict, which is a slow very memory
+      # consuming and fragmenting process.  To avoid this, we pick a random,
+      # 256 KiB-aligned image base between 0x50000000 and 0x6FFC0000 at link
+      # time.  Moving up from 0x10000000 also allows more sbrk(2) space.
+      archive_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib'
+      archive_expsym_cmds='sed "s|^|_|" $export_symbols >$output_objdir/$soname.expsym~$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--retain-symbols-file,$output_objdir/$soname.expsym $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib'
+      ;;
+
+    gnu* | linux* | tpf* | k*bsd*-gnu | kopensolaris*-gnu)
+      tmp_diet=no
+      if test linux-dietlibc = "$host_os"; then
+       case $cc_basename in
+         diet\ *) tmp_diet=yes;;       # linux-dietlibc with static linking (!diet-dyn)
+       esac
+      fi
+      if $LD --help 2>&1 | $EGREP ': supported targets:.* elf' > /dev/null \
+        && test no = "$tmp_diet"
+      then
+       tmp_addflag=' $pic_flag'
+       tmp_sharedflag='-shared'
+       case $cc_basename,$host_cpu in
+        pgcc*)                         # Portland Group C compiler
+         whole_archive_flag_spec='$wl--whole-archive`for conv in $convenience\"\"; do test  -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive'
+         tmp_addflag=' $pic_flag'
+         ;;
+       pgf77* | pgf90* | pgf95* | pgfortran*)
+                                       # Portland Group f77 and f90 compilers
+         whole_archive_flag_spec='$wl--whole-archive`for conv in $convenience\"\"; do test  -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive'
+         tmp_addflag=' $pic_flag -Mnomain' ;;
+       ecc*,ia64* | icc*,ia64*)        # Intel C compiler on ia64
+         tmp_addflag=' -i_dynamic' ;;
+       efc*,ia64* | ifort*,ia64*)      # Intel Fortran compiler on ia64
+         tmp_addflag=' -i_dynamic -nofor_main' ;;
+       ifc* | ifort*)                  # Intel Fortran compiler
+         tmp_addflag=' -nofor_main' ;;
+       lf95*)                          # Lahey Fortran 8.1
+         whole_archive_flag_spec=
+         tmp_sharedflag='--shared' ;;
+        nagfor*)                        # NAGFOR 5.3
+          tmp_sharedflag='-Wl,-shared' ;;
+       xl[cC]* | bgxl[cC]* | mpixl[cC]*) # IBM XL C 8.0 on PPC (deal with xlf below)
+         tmp_sharedflag='-qmkshrobj'
+         tmp_addflag= ;;
+       nvcc*)  # Cuda Compiler Driver 2.2
+         whole_archive_flag_spec='$wl--whole-archive`for conv in $convenience\"\"; do test  -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive'
+         compiler_needs_object=yes
+         ;;
+       esac
+       case `$CC -V 2>&1 | sed 5q` in
+       *Sun\ C*)                       # Sun C 5.9
+         whole_archive_flag_spec='$wl--whole-archive`new_convenience=; for conv in $convenience\"\"; do test -z \"$conv\" || new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive'
+         compiler_needs_object=yes
+         tmp_sharedflag='-G' ;;
+       *Sun\ F*)                       # Sun Fortran 8.3
+         tmp_sharedflag='-G' ;;
+       esac
+       archive_cmds='$CC '"$tmp_sharedflag""$tmp_addflag"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+
+        if test yes = "$supports_anon_versioning"; then
+          archive_expsym_cmds='echo "{ global:" > $output_objdir/$libname.ver~
+            cat $export_symbols | sed -e "s/\(.*\)/\1;/" >> $output_objdir/$libname.ver~
+            echo "local: *; };" >> $output_objdir/$libname.ver~
+            $CC '"$tmp_sharedflag""$tmp_addflag"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-version-script $wl$output_objdir/$libname.ver -o $lib'
+        fi
+
+       case $cc_basename in
+       tcc*)
+         export_dynamic_flag_spec='-rdynamic'
+         ;;
+       xlf* | bgf* | bgxlf* | mpixlf*)
+         # IBM XL Fortran 10.1 on PPC cannot create shared libs itself
+         whole_archive_flag_spec='--whole-archive$convenience --no-whole-archive'
+         hardcode_libdir_flag_spec='$wl-rpath $wl$libdir'
+         archive_cmds='$LD -shared $libobjs $deplibs $linker_flags -soname $soname -o $lib'
+         if test yes = "$supports_anon_versioning"; then
+           archive_expsym_cmds='echo "{ global:" > $output_objdir/$libname.ver~
+              cat $export_symbols | sed -e "s/\(.*\)/\1;/" >> $output_objdir/$libname.ver~
+              echo "local: *; };" >> $output_objdir/$libname.ver~
+              $LD -shared $libobjs $deplibs $linker_flags -soname $soname -version-script $output_objdir/$libname.ver -o $lib'
+         fi
+         ;;
+       esac
+      else
+        ld_shlibs=no
+      fi
+      ;;
+
+    netbsd*)
+      if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then
+       archive_cmds='$LD -Bshareable $libobjs $deplibs $linker_flags -o $lib'
+       wlarc=
+      else
+       archive_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+       archive_expsym_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+      fi
+      ;;
+
+    solaris*)
+      if $LD -v 2>&1 | $GREP 'BFD 2\.8' > /dev/null; then
+       ld_shlibs=no
+       cat <<_LT_EOF 1>&2
+
+*** Warning: The releases 2.8.* of the GNU linker cannot reliably
+*** create shared libraries on Solaris systems.  Therefore, libtool
+*** is disabling shared libraries support.  We urge you to upgrade GNU
+*** binutils to release 2.9.1 or newer.  Another option is to modify
+*** your PATH or compiler configuration so that the native linker is
+*** used, and then restart.
+
+_LT_EOF
+      elif $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then
+       archive_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+       archive_expsym_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+      else
+       ld_shlibs=no
+      fi
+      ;;
+
+    sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX*)
+      case `$LD -v 2>&1` in
+        *\ [01].* | *\ 2.[0-9].* | *\ 2.1[0-5].*)
+       ld_shlibs=no
+       cat <<_LT_EOF 1>&2
+
+*** Warning: Releases of the GNU linker prior to 2.16.91.0.3 cannot
+*** reliably create shared libraries on SCO systems.  Therefore, libtool
+*** is disabling shared libraries support.  We urge you to upgrade GNU
+*** binutils to release 2.16.91.0.3 or newer.  Another option is to modify
+*** your PATH or compiler configuration so that the native linker is
+*** used, and then restart.
+
+_LT_EOF
+       ;;
+       *)
+         # For security reasons, it is highly recommended that you always
+         # use absolute paths for naming shared libraries, and exclude the
+         # DT_RUNPATH tag from executables and libraries.  But doing so
+         # requires that you compile everything twice, which is a pain.
+         if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then
+           hardcode_libdir_flag_spec='$wl-rpath $wl$libdir'
+           archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+           archive_expsym_cmds='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+         else
+           ld_shlibs=no
+         fi
+       ;;
+      esac
+      ;;
+
+    sunos4*)
+      archive_cmds='$LD -assert pure-text -Bshareable -o $lib $libobjs $deplibs $linker_flags'
+      wlarc=
+      hardcode_direct=yes
+      hardcode_shlibpath_var=no
+      ;;
+
+    *)
+      if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then
+       archive_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+       archive_expsym_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+      else
+       ld_shlibs=no
+      fi
+      ;;
+    esac
+
+    if test no = "$ld_shlibs"; then
+      runpath_var=
+      hardcode_libdir_flag_spec=
+      export_dynamic_flag_spec=
+      whole_archive_flag_spec=
+    fi
+  else
+    # PORTME fill in a description of your system's linker (not GNU ld)
+    case $host_os in
+    aix3*)
+      allow_undefined_flag=unsupported
+      always_export_symbols=yes
+      archive_expsym_cmds='$LD -o $output_objdir/$soname $libobjs $deplibs $linker_flags -bE:$export_symbols -T512 -H512 -bM:SRE~$AR $AR_FLAGS $lib $output_objdir/$soname'
+      # Note: this linker hardcodes the directories in LIBPATH if there
+      # are no directories specified by -L.
+      hardcode_minus_L=yes
+      if test yes = "$GCC" && test -z "$lt_prog_compiler_static"; then
+       # Neither direct hardcoding nor static linking is supported with a
+       # broken collect2.
+       hardcode_direct=unsupported
+      fi
+      ;;
+
+    aix[4-9]*)
+      if test ia64 = "$host_cpu"; then
+       # On IA64, the linker does run time linking by default, so we don't
+       # have to do anything special.
+       aix_use_runtimelinking=no
+       exp_sym_flag='-Bexport'
+       no_entry_flag=
+      else
+       # If we're using GNU nm, then we don't want the "-C" option.
+       # -C means demangle to GNU nm, but means don't demangle to AIX nm.
+       # Without the "-l" option, or with the "-B" option, AIX nm treats
+       # weak defined symbols like other global defined symbols, whereas
+       # GNU nm marks them as "W".
+       # While the 'weak' keyword is ignored in the Export File, we need
+       # it in the Import File for the 'aix-soname' feature, so we have
+       # to replace the "-B" option with "-P" for AIX nm.
+       if $NM -V 2>&1 | $GREP 'GNU' > /dev/null; then
+         export_symbols_cmds='$NM -Bpg $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "W")) && (substr(\$ 3,1,1) != ".")) { if (\$ 2 == "W") { print \$ 3 " weak" } else { print \$ 3 } } }'\'' | sort -u > $export_symbols'
+       else
+         export_symbols_cmds='`func_echo_all $NM | $SED -e '\''s/B\([^B]*\)$/P\1/'\''` -PCpgl $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) && (substr(\$ 1,1,1) != ".")) { if ((\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) { print \$ 1 " weak" } else { print \$ 1 } } }'\'' | sort -u > $export_symbols'
+       fi
+       aix_use_runtimelinking=no
+
+       # Test if we are trying to use run time linking or normal
+       # AIX style linking. If -brtl is somewhere in LDFLAGS, we
+       # have runtime linking enabled, and use it for executables.
+       # For shared libraries, we enable/disable runtime linking
+       # depending on the kind of the shared library created -
+       # when "with_aix_soname,aix_use_runtimelinking" is:
+       # "aix,no"   lib.a(lib.so.V) shared, rtl:no,  for executables
+       # "aix,yes"  lib.so          shared, rtl:yes, for executables
+       #            lib.a           static archive
+       # "both,no"  lib.so.V(shr.o) shared, rtl:yes
+       #            lib.a(lib.so.V) shared, rtl:no,  for executables
+       # "both,yes" lib.so.V(shr.o) shared, rtl:yes, for executables
+       #            lib.a(lib.so.V) shared, rtl:no
+       # "svr4,*"   lib.so.V(shr.o) shared, rtl:yes, for executables
+       #            lib.a           static archive
+       case $host_os in aix4.[23]|aix4.[23].*|aix[5-9]*)
+         for ld_flag in $LDFLAGS; do
+         if (test x-brtl = "x$ld_flag" || test x-Wl,-brtl = "x$ld_flag"); then
+           aix_use_runtimelinking=yes
+           break
+         fi
+         done
+         if test svr4,no = "$with_aix_soname,$aix_use_runtimelinking"; then
+           # With aix-soname=svr4, we create the lib.so.V shared archives only,
+           # so we don't have lib.a shared libs to link our executables.
+           # We have to force runtime linking in this case.
+           aix_use_runtimelinking=yes
+           LDFLAGS="$LDFLAGS -Wl,-brtl"
+         fi
+         ;;
+       esac
+
+       exp_sym_flag='-bexport'
+       no_entry_flag='-bnoentry'
+      fi
+
+      # When large executables or shared objects are built, AIX ld can
+      # have problems creating the table of contents.  If linking a library
+      # or program results in "error TOC overflow" add -mminimal-toc to
+      # CXXFLAGS/CFLAGS for g++/gcc.  In the cases where that is not
+      # enough to fix the problem, add -Wl,-bbigtoc to LDFLAGS.
+
+      archive_cmds=''
+      hardcode_direct=yes
+      hardcode_direct_absolute=yes
+      hardcode_libdir_separator=':'
+      link_all_deplibs=yes
+      file_list_spec='$wl-f,'
+      case $with_aix_soname,$aix_use_runtimelinking in
+      aix,*) ;; # traditional, no import file
+      svr4,* | *,yes) # use import file
+       # The Import File defines what to hardcode.
+       hardcode_direct=no
+       hardcode_direct_absolute=no
+       ;;
+      esac
+
+      if test yes = "$GCC"; then
+       case $host_os in aix4.[012]|aix4.[012].*)
+       # We only want to do this on AIX 4.2 and lower, the check
+       # below for broken collect2 doesn't work under 4.3+
+         collect2name=`$CC -print-prog-name=collect2`
+         if test -f "$collect2name" &&
+          strings "$collect2name" | $GREP resolve_lib_name >/dev/null
+         then
+         # We have reworked collect2
+         :
+         else
+         # We have old collect2
+         hardcode_direct=unsupported
+         # It fails to find uninstalled libraries when the uninstalled
+         # path is not listed in the libpath.  Setting hardcode_minus_L
+         # to unsupported forces relinking
+         hardcode_minus_L=yes
+         hardcode_libdir_flag_spec='-L$libdir'
+         hardcode_libdir_separator=
+         fi
+         ;;
+       esac
+       shared_flag='-shared'
+       if test yes = "$aix_use_runtimelinking"; then
+         shared_flag="$shared_flag "'$wl-G'
+       fi
+       # Need to ensure runtime linking is disabled for the traditional
+       # shared library, or the linker may eventually find shared libraries
+       # /with/ Import File - we do not want to mix them.
+       shared_flag_aix='-shared'
+       shared_flag_svr4='-shared $wl-G'
+      else
+       # not using gcc
+       if test ia64 = "$host_cpu"; then
+       # VisualAge C++, Version 5.5 for AIX 5L for IA-64, Beta 3 Release
+       # chokes on -Wl,-G. The following line is correct:
+         shared_flag='-G'
+       else
+         if test yes = "$aix_use_runtimelinking"; then
+           shared_flag='$wl-G'
+         else
+           shared_flag='$wl-bM:SRE'
+         fi
+         shared_flag_aix='$wl-bM:SRE'
+         shared_flag_svr4='$wl-G'
+       fi
+      fi
+
+      export_dynamic_flag_spec='$wl-bexpall'
+      # It seems that -bexpall does not export symbols beginning with
+      # underscore (_), so it is better to generate a list of symbols to export.
+      always_export_symbols=yes
+      if test aix,yes = "$with_aix_soname,$aix_use_runtimelinking"; then
+       # Warning - without using the other runtime loading flags (-brtl),
+       # -berok will link without error, but may produce a broken library.
+       allow_undefined_flag='-berok'
+        # Determine the default libpath from the value encoded in an
+        # empty executable.
+        if test set = "${lt_cv_aix_libpath+set}"; then
+  aix_libpath=$lt_cv_aix_libpath
+else
+  if ${lt_cv_aix_libpath_+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+
+  lt_aix_libpath_sed='
+      /Import File Strings/,/^$/ {
+         /^0/ {
+             s/^0  *\([^ ]*\) *$/\1/
+             p
+         }
+      }'
+  lt_cv_aix_libpath_=`dump -H conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"`
+  # Check for a 64-bit object if we didn't find anything.
+  if test -z "$lt_cv_aix_libpath_"; then
+    lt_cv_aix_libpath_=`dump -HX64 conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"`
+  fi
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+  if test -z "$lt_cv_aix_libpath_"; then
+    lt_cv_aix_libpath_=/usr/lib:/lib
+  fi
+
+fi
+
+  aix_libpath=$lt_cv_aix_libpath_
+fi
+
+        hardcode_libdir_flag_spec='$wl-blibpath:$libdir:'"$aix_libpath"
+        archive_expsym_cmds='$CC -o $output_objdir/$soname $libobjs $deplibs $wl'$no_entry_flag' $compiler_flags `if test -n "$allow_undefined_flag"; then func_echo_all "$wl$allow_undefined_flag"; else :; fi` $wl'$exp_sym_flag:\$export_symbols' '$shared_flag
+      else
+       if test ia64 = "$host_cpu"; then
+         hardcode_libdir_flag_spec='$wl-R $libdir:/usr/lib:/lib'
+         allow_undefined_flag="-z nodefs"
+         archive_expsym_cmds="\$CC $shared_flag"' -o $output_objdir/$soname $libobjs $deplibs '"\$wl$no_entry_flag"' $compiler_flags $wl$allow_undefined_flag '"\$wl$exp_sym_flag:\$export_symbols"
+       else
+        # Determine the default libpath from the value encoded in an
+        # empty executable.
+        if test set = "${lt_cv_aix_libpath+set}"; then
+  aix_libpath=$lt_cv_aix_libpath
+else
+  if ${lt_cv_aix_libpath_+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+
+  lt_aix_libpath_sed='
+      /Import File Strings/,/^$/ {
+         /^0/ {
+             s/^0  *\([^ ]*\) *$/\1/
+             p
+         }
+      }'
+  lt_cv_aix_libpath_=`dump -H conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"`
+  # Check for a 64-bit object if we didn't find anything.
+  if test -z "$lt_cv_aix_libpath_"; then
+    lt_cv_aix_libpath_=`dump -HX64 conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"`
+  fi
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+  if test -z "$lt_cv_aix_libpath_"; then
+    lt_cv_aix_libpath_=/usr/lib:/lib
+  fi
+
+fi
+
+  aix_libpath=$lt_cv_aix_libpath_
+fi
+
+        hardcode_libdir_flag_spec='$wl-blibpath:$libdir:'"$aix_libpath"
+         # Warning - without using the other run time loading flags,
+         # -berok will link without error, but may produce a broken library.
+         no_undefined_flag=' $wl-bernotok'
+         allow_undefined_flag=' $wl-berok'
+         if test yes = "$with_gnu_ld"; then
+           # We only use this code for GNU lds that support --whole-archive.
+           whole_archive_flag_spec='$wl--whole-archive$convenience $wl--no-whole-archive'
+         else
+           # Exported symbols can be pulled into shared objects from archives
+           whole_archive_flag_spec='$convenience'
+         fi
+         archive_cmds_need_lc=yes
+         archive_expsym_cmds='$RM -r $output_objdir/$realname.d~$MKDIR $output_objdir/$realname.d'
+         # -brtl affects multiple linker settings, -berok does not and is overridden later
+         compiler_flags_filtered='`func_echo_all "$compiler_flags " | $SED -e "s%-brtl\\([, ]\\)%-berok\\1%g"`'
+         if test svr4 != "$with_aix_soname"; then
+           # This is similar to how AIX traditionally builds its shared libraries.
+           archive_expsym_cmds="$archive_expsym_cmds"'~$CC '$shared_flag_aix' -o $output_objdir/$realname.d/$soname $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$AR $AR_FLAGS $output_objdir/$libname$release.a $output_objdir/$realname.d/$soname'
+         fi
+         if test aix != "$with_aix_soname"; then
+           archive_expsym_cmds="$archive_expsym_cmds"'~$CC '$shared_flag_svr4' -o $output_objdir/$realname.d/$shared_archive_member_spec.o $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$STRIP -e $output_objdir/$realname.d/$shared_archive_member_spec.o~( func_echo_all "#! $soname($shared_archive_member_spec.o)"; if test shr_64 = "$shared_archive_member_spec"; then func_echo_all "# 64"; else func_echo_all "# 32"; fi; cat $export_symbols ) > $output_objdir/$realname.d/$shared_archive_member_spec.imp~$AR $AR_FLAGS $output_objdir/$soname $output_objdir/$realname.d/$shared_archive_member_spec.o $output_objdir/$realname.d/$shared_archive_member_spec.imp'
+         else
+           # used by -dlpreopen to get the symbols
+           archive_expsym_cmds="$archive_expsym_cmds"'~$MV  $output_objdir/$realname.d/$soname $output_objdir'
+         fi
+         archive_expsym_cmds="$archive_expsym_cmds"'~$RM -r $output_objdir/$realname.d'
+       fi
+      fi
+      ;;
+
+    amigaos*)
+      case $host_cpu in
+      powerpc)
+            # see comment about AmigaOS4 .so support
+            archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+            archive_expsym_cmds=''
+        ;;
+      m68k)
+            archive_cmds='$RM $output_objdir/a2ixlibrary.data~$ECHO "#define NAME $libname" > $output_objdir/a2ixlibrary.data~$ECHO "#define LIBRARY_ID 1" >> $output_objdir/a2ixlibrary.data~$ECHO "#define VERSION $major" >> $output_objdir/a2ixlibrary.data~$ECHO "#define REVISION $revision" >> $output_objdir/a2ixlibrary.data~$AR $AR_FLAGS $lib $libobjs~$RANLIB $lib~(cd $output_objdir && a2ixlibrary -32)'
+            hardcode_libdir_flag_spec='-L$libdir'
+            hardcode_minus_L=yes
+        ;;
+      esac
+      ;;
+
+    bsdi[45]*)
+      export_dynamic_flag_spec=-rdynamic
+      ;;
+
+    cygwin* | mingw* | pw32* | cegcc*)
+      # When not using gcc, we currently assume that we are using
+      # Microsoft Visual C++.
+      # hardcode_libdir_flag_spec is actually meaningless, as there is
+      # no search path for DLLs.
+      case $cc_basename in
+      cl*)
+       # Native MSVC
+       hardcode_libdir_flag_spec=' '
+       allow_undefined_flag=unsupported
+       always_export_symbols=yes
+       file_list_spec='@'
+       # Tell ltmain to make .lib files, not .a files.
+       libext=lib
+       # Tell ltmain to make .dll files, not .so files.
+       shrext_cmds=.dll
+       # FIXME: Setting linknames here is a bad hack.
+       archive_cmds='$CC -o $output_objdir/$soname $libobjs $compiler_flags $deplibs -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~linknames='
+       archive_expsym_cmds='if   test DEF = "`$SED -n     -e '\''s/^[   ]*//'\''     -e '\''/^\(;.*\)*$/d'\''     -e '\''s/^\(EXPORTS\|LIBRARY\)\([     ].*\)*$/DEF/p'\''     -e q     $export_symbols`" ; then
+            cp "$export_symbols" "$output_objdir/$soname.def";
+            echo "$tool_output_objdir$soname.def" > "$output_objdir/$soname.exp";
+          else
+            $SED -e '\''s/^/-link -EXPORT:/'\'' < $export_symbols > $output_objdir/$soname.exp;
+          fi~
+          $CC -o $tool_output_objdir$soname $libobjs $compiler_flags $deplibs "@$tool_output_objdir$soname.exp" -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~
+          linknames='
+       # The linker will not automatically build a static lib if we build a DLL.
+       # _LT_TAGVAR(old_archive_from_new_cmds, )='true'
+       enable_shared_with_static_runtimes=yes
+       exclude_expsyms='_NULL_IMPORT_DESCRIPTOR|_IMPORT_DESCRIPTOR_.*'
+       export_symbols_cmds='$NM $libobjs $convenience | $global_symbol_pipe | $SED -e '\''/^[BCDGRS][ ]/s/.*[ ]\([^ ]*\)/\1,DATA/'\'' | $SED -e '\''/^[AITW][ ]/s/.*[ ]//'\'' | sort | uniq > $export_symbols'
+       # Don't use ranlib
+       old_postinstall_cmds='chmod 644 $oldlib'
+       postlink_cmds='lt_outputfile="@OUTPUT@"~
+          lt_tool_outputfile="@TOOL_OUTPUT@"~
+          case $lt_outputfile in
+            *.exe|*.EXE) ;;
+            *)
+              lt_outputfile=$lt_outputfile.exe
+              lt_tool_outputfile=$lt_tool_outputfile.exe
+              ;;
+          esac~
+          if test : != "$MANIFEST_TOOL" && test -f "$lt_outputfile.manifest"; then
+            $MANIFEST_TOOL -manifest "$lt_tool_outputfile.manifest" -outputresource:"$lt_tool_outputfile" || exit 1;
+            $RM "$lt_outputfile.manifest";
+          fi'
+       ;;
+      *)
+       # Assume MSVC wrapper
+       hardcode_libdir_flag_spec=' '
+       allow_undefined_flag=unsupported
+       # Tell ltmain to make .lib files, not .a files.
+       libext=lib
+       # Tell ltmain to make .dll files, not .so files.
+       shrext_cmds=.dll
+       # FIXME: Setting linknames here is a bad hack.
+       archive_cmds='$CC -o $lib $libobjs $compiler_flags `func_echo_all "$deplibs" | $SED '\''s/ -lc$//'\''` -link -dll~linknames='
+       # The linker will automatically build a .lib file if we build a DLL.
+       old_archive_from_new_cmds='true'
+       # FIXME: Should let the user specify the lib program.
+       old_archive_cmds='lib -OUT:$oldlib$oldobjs$old_deplibs'
+       enable_shared_with_static_runtimes=yes
+       ;;
+      esac
+      ;;
+
+    darwin* | rhapsody*)
+
+
+  archive_cmds_need_lc=no
+  hardcode_direct=no
+  hardcode_automatic=yes
+  hardcode_shlibpath_var=unsupported
+  if test yes = "$lt_cv_ld_force_load"; then
+    whole_archive_flag_spec='`for conv in $convenience\"\"; do test  -n \"$conv\" && new_convenience=\"$new_convenience $wl-force_load,$conv\"; done; func_echo_all \"$new_convenience\"`'
+
+  else
+    whole_archive_flag_spec=''
+  fi
+  link_all_deplibs=yes
+  allow_undefined_flag=$_lt_dar_allow_undefined
+  case $cc_basename in
+     ifort*|nagfor*) _lt_dar_can_shared=yes ;;
+     *) _lt_dar_can_shared=$GCC ;;
+  esac
+  if test yes = "$_lt_dar_can_shared"; then
+    output_verbose_link_cmd=func_echo_all
+    archive_cmds="\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$libobjs \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring $_lt_dar_single_mod$_lt_dsymutil"
+    module_cmds="\$CC \$allow_undefined_flag -o \$lib -bundle \$libobjs \$deplibs \$compiler_flags$_lt_dsymutil"
+    archive_expsym_cmds="sed 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$libobjs \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring $_lt_dar_single_mod$_lt_dar_export_syms$_lt_dsymutil"
+    module_expsym_cmds="sed -e 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC \$allow_undefined_flag -o \$lib -bundle \$libobjs \$deplibs \$compiler_flags$_lt_dar_export_syms$_lt_dsymutil"
+
+  else
+  ld_shlibs=no
+  fi
+
+      ;;
+
+    dgux*)
+      archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+      hardcode_libdir_flag_spec='-L$libdir'
+      hardcode_shlibpath_var=no
+      ;;
+
+    # FreeBSD 2.2.[012] allows us to include c++rt0.o to get C++ constructor
+    # support.  Future versions do this automatically, but an explicit c++rt0.o
+    # does not break anything, and helps significantly (at the cost of a little
+    # extra space).
+    freebsd2.2*)
+      archive_cmds='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags /usr/lib/c++rt0.o'
+      hardcode_libdir_flag_spec='-R$libdir'
+      hardcode_direct=yes
+      hardcode_shlibpath_var=no
+      ;;
+
+    # Unfortunately, older versions of FreeBSD 2 do not have this feature.
+    freebsd2.*)
+      archive_cmds='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags'
+      hardcode_direct=yes
+      hardcode_minus_L=yes
+      hardcode_shlibpath_var=no
+      ;;
+
+    # FreeBSD 3 and greater uses gcc -shared to do shared libraries.
+    freebsd* | dragonfly*)
+      archive_cmds='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags'
+      hardcode_libdir_flag_spec='-R$libdir'
+      hardcode_direct=yes
+      hardcode_shlibpath_var=no
+      ;;
+
+    hpux9*)
+      if test yes = "$GCC"; then
+       archive_cmds='$RM $output_objdir/$soname~$CC -shared $pic_flag $wl+b $wl$install_libdir -o $output_objdir/$soname $libobjs $deplibs $compiler_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib'
+      else
+       archive_cmds='$RM $output_objdir/$soname~$LD -b +b $install_libdir -o $output_objdir/$soname $libobjs $deplibs $linker_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib'
+      fi
+      hardcode_libdir_flag_spec='$wl+b $wl$libdir'
+      hardcode_libdir_separator=:
+      hardcode_direct=yes
+
+      # hardcode_minus_L: Not really in the search PATH,
+      # but as the default location of the library.
+      hardcode_minus_L=yes
+      export_dynamic_flag_spec='$wl-E'
+      ;;
+
+    hpux10*)
+      if test yes,no = "$GCC,$with_gnu_ld"; then
+       archive_cmds='$CC -shared $pic_flag $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags'
+      else
+       archive_cmds='$LD -b +h $soname +b $install_libdir -o $lib $libobjs $deplibs $linker_flags'
+      fi
+      if test no = "$with_gnu_ld"; then
+       hardcode_libdir_flag_spec='$wl+b $wl$libdir'
+       hardcode_libdir_separator=:
+       hardcode_direct=yes
+       hardcode_direct_absolute=yes
+       export_dynamic_flag_spec='$wl-E'
+       # hardcode_minus_L: Not really in the search PATH,
+       # but as the default location of the library.
+       hardcode_minus_L=yes
+      fi
+      ;;
+
+    hpux11*)
+      if test yes,no = "$GCC,$with_gnu_ld"; then
+       case $host_cpu in
+       hppa*64*)
+         archive_cmds='$CC -shared $wl+h $wl$soname -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+       ia64*)
+         archive_cmds='$CC -shared $pic_flag $wl+h $wl$soname $wl+nodefaultrpath -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+       *)
+         archive_cmds='$CC -shared $pic_flag $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+       esac
+      else
+       case $host_cpu in
+       hppa*64*)
+         archive_cmds='$CC -b $wl+h $wl$soname -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+       ia64*)
+         archive_cmds='$CC -b $wl+h $wl$soname $wl+nodefaultrpath -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+       *)
+
+         # Older versions of the 11.00 compiler do not understand -b yet
+         # (HP92453-01 A.11.01.20 doesn't, HP92453-01 B.11.X.35175-35176.GP does)
+         { $as_echo "$as_me:${as_lineno-$LINENO}: checking if $CC understands -b" >&5
+$as_echo_n "checking if $CC understands -b... " >&6; }
+if ${lt_cv_prog_compiler__b+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_prog_compiler__b=no
+   save_LDFLAGS=$LDFLAGS
+   LDFLAGS="$LDFLAGS -b"
+   echo "$lt_simple_link_test_code" > conftest.$ac_ext
+   if (eval $ac_link 2>conftest.err) && test -s conftest$ac_exeext; then
+     # The linker can only warn and ignore the option if not recognized
+     # So say no if there are warnings
+     if test -s conftest.err; then
+       # Append any errors to the config.log.
+       cat conftest.err 1>&5
+       $ECHO "$_lt_linker_boilerplate" | $SED '/^$/d' > conftest.exp
+       $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2
+       if diff conftest.exp conftest.er2 >/dev/null; then
+         lt_cv_prog_compiler__b=yes
+       fi
+     else
+       lt_cv_prog_compiler__b=yes
+     fi
+   fi
+   $RM -r conftest*
+   LDFLAGS=$save_LDFLAGS
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler__b" >&5
+$as_echo "$lt_cv_prog_compiler__b" >&6; }
+
+if test yes = "$lt_cv_prog_compiler__b"; then
+    archive_cmds='$CC -b $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags'
+else
+    archive_cmds='$LD -b +h $soname +b $install_libdir -o $lib $libobjs $deplibs $linker_flags'
+fi
+
+         ;;
+       esac
+      fi
+      if test no = "$with_gnu_ld"; then
+       hardcode_libdir_flag_spec='$wl+b $wl$libdir'
+       hardcode_libdir_separator=:
+
+       case $host_cpu in
+       hppa*64*|ia64*)
+         hardcode_direct=no
+         hardcode_shlibpath_var=no
+         ;;
+       *)
+         hardcode_direct=yes
+         hardcode_direct_absolute=yes
+         export_dynamic_flag_spec='$wl-E'
+
+         # hardcode_minus_L: Not really in the search PATH,
+         # but as the default location of the library.
+         hardcode_minus_L=yes
+         ;;
+       esac
+      fi
+      ;;
+
+    irix5* | irix6* | nonstopux*)
+      if test yes = "$GCC"; then
+       archive_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib'
+       # Try to use the -exported_symbol ld option, if it does not
+       # work, assume that -exports_file does not work either and
+       # implicitly export all symbols.
+       # This should be the same for all languages, so no per-tag cache variable.
+       { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the $host_os linker accepts -exported_symbol" >&5
+$as_echo_n "checking whether the $host_os linker accepts -exported_symbol... " >&6; }
+if ${lt_cv_irix_exported_symbol+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  save_LDFLAGS=$LDFLAGS
+          LDFLAGS="$LDFLAGS -shared $wl-exported_symbol ${wl}foo $wl-update_registry $wl/dev/null"
+          cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+int foo (void) { return 0; }
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  lt_cv_irix_exported_symbol=yes
+else
+  lt_cv_irix_exported_symbol=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+           LDFLAGS=$save_LDFLAGS
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_irix_exported_symbol" >&5
+$as_echo "$lt_cv_irix_exported_symbol" >&6; }
+       if test yes = "$lt_cv_irix_exported_symbol"; then
+          archive_expsym_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations $wl-exports_file $wl$export_symbols -o $lib'
+       fi
+      else
+       archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib'
+       archive_expsym_cmds='$CC -shared $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -exports_file $export_symbols -o $lib'
+      fi
+      archive_cmds_need_lc='no'
+      hardcode_libdir_flag_spec='$wl-rpath $wl$libdir'
+      hardcode_libdir_separator=:
+      inherit_rpath=yes
+      link_all_deplibs=yes
+      ;;
+
+    linux*)
+      case $cc_basename in
+      tcc*)
+       # Fabrice Bellard et al's Tiny C Compiler
+       ld_shlibs=yes
+       archive_cmds='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags'
+       ;;
+      esac
+      ;;
+
+    netbsd*)
+      if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then
+       archive_cmds='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags'  # a.out
+      else
+       archive_cmds='$LD -shared -o $lib $libobjs $deplibs $linker_flags'      # ELF
+      fi
+      hardcode_libdir_flag_spec='-R$libdir'
+      hardcode_direct=yes
+      hardcode_shlibpath_var=no
+      ;;
+
+    newsos6)
+      archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+      hardcode_direct=yes
+      hardcode_libdir_flag_spec='$wl-rpath $wl$libdir'
+      hardcode_libdir_separator=:
+      hardcode_shlibpath_var=no
+      ;;
+
+    *nto* | *qnx*)
+      ;;
+
+    openbsd* | bitrig*)
+      if test -f /usr/libexec/ld.so; then
+       hardcode_direct=yes
+       hardcode_shlibpath_var=no
+       hardcode_direct_absolute=yes
+       if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then
+         archive_cmds='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags'
+         archive_expsym_cmds='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags $wl-retain-symbols-file,$export_symbols'
+         hardcode_libdir_flag_spec='$wl-rpath,$libdir'
+         export_dynamic_flag_spec='$wl-E'
+       else
+         archive_cmds='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags'
+         hardcode_libdir_flag_spec='$wl-rpath,$libdir'
+       fi
+      else
+       ld_shlibs=no
+      fi
+      ;;
+
+    os2*)
+      hardcode_libdir_flag_spec='-L$libdir'
+      hardcode_minus_L=yes
+      allow_undefined_flag=unsupported
+      shrext_cmds=.dll
+      archive_cmds='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~
+       $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~
+       $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~
+       $ECHO EXPORTS >> $output_objdir/$libname.def~
+       emxexp $libobjs | $SED /"_DLL_InitTerm"/d >> $output_objdir/$libname.def~
+       $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~
+       emximp -o $lib $output_objdir/$libname.def'
+      archive_expsym_cmds='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~
+       $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~
+       $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~
+       $ECHO EXPORTS >> $output_objdir/$libname.def~
+       prefix_cmds="$SED"~
+       if test EXPORTS = "`$SED 1q $export_symbols`"; then
+         prefix_cmds="$prefix_cmds -e 1d";
+       fi~
+       prefix_cmds="$prefix_cmds -e \"s/^\(.*\)$/_\1/g\""~
+       cat $export_symbols | $prefix_cmds >> $output_objdir/$libname.def~
+       $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~
+       emximp -o $lib $output_objdir/$libname.def'
+      old_archive_From_new_cmds='emximp -o $output_objdir/${libname}_dll.a $output_objdir/$libname.def'
+      enable_shared_with_static_runtimes=yes
+      ;;
+
+    osf3*)
+      if test yes = "$GCC"; then
+       allow_undefined_flag=' $wl-expect_unresolved $wl\*'
+       archive_cmds='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib'
+      else
+       allow_undefined_flag=' -expect_unresolved \*'
+       archive_cmds='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib'
+      fi
+      archive_cmds_need_lc='no'
+      hardcode_libdir_flag_spec='$wl-rpath $wl$libdir'
+      hardcode_libdir_separator=:
+      ;;
+
+    osf4* | osf5*)     # as osf3* with the addition of -msym flag
+      if test yes = "$GCC"; then
+       allow_undefined_flag=' $wl-expect_unresolved $wl\*'
+       archive_cmds='$CC -shared$allow_undefined_flag $pic_flag $libobjs $deplibs $compiler_flags $wl-msym $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib'
+       hardcode_libdir_flag_spec='$wl-rpath $wl$libdir'
+      else
+       allow_undefined_flag=' -expect_unresolved \*'
+       archive_cmds='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags -msym -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib'
+       archive_expsym_cmds='for i in `cat $export_symbols`; do printf "%s %s\\n" -exported_symbol "\$i" >> $lib.exp; done; printf "%s\\n" "-hidden">> $lib.exp~
+          $CC -shared$allow_undefined_flag $wl-input $wl$lib.exp $compiler_flags $libobjs $deplibs -soname $soname `test -n "$verstring" && $ECHO "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib~$RM $lib.exp'
+
+       # Both c and cxx compiler support -rpath directly
+       hardcode_libdir_flag_spec='-rpath $libdir'
+      fi
+      archive_cmds_need_lc='no'
+      hardcode_libdir_separator=:
+      ;;
+
+    solaris*)
+      no_undefined_flag=' -z defs'
+      if test yes = "$GCC"; then
+       wlarc='$wl'
+       archive_cmds='$CC -shared $pic_flag $wl-z ${wl}text $wl-h $wl$soname -o $lib $libobjs $deplibs $compiler_flags'
+       archive_expsym_cmds='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~
+          $CC -shared $pic_flag $wl-z ${wl}text $wl-M $wl$lib.exp $wl-h $wl$soname -o $lib $libobjs $deplibs $compiler_flags~$RM $lib.exp'
+      else
+       case `$CC -V 2>&1` in
+       *"Compilers 5.0"*)
+         wlarc=''
+         archive_cmds='$LD -G$allow_undefined_flag -h $soname -o $lib $libobjs $deplibs $linker_flags'
+         archive_expsym_cmds='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~
+            $LD -G$allow_undefined_flag -M $lib.exp -h $soname -o $lib $libobjs $deplibs $linker_flags~$RM $lib.exp'
+         ;;
+       *)
+         wlarc='$wl'
+         archive_cmds='$CC -G$allow_undefined_flag -h $soname -o $lib $libobjs $deplibs $compiler_flags'
+         archive_expsym_cmds='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~
+            $CC -G$allow_undefined_flag -M $lib.exp -h $soname -o $lib $libobjs $deplibs $compiler_flags~$RM $lib.exp'
+         ;;
+       esac
+      fi
+      hardcode_libdir_flag_spec='-R$libdir'
+      hardcode_shlibpath_var=no
+      case $host_os in
+      solaris2.[0-5] | solaris2.[0-5].*) ;;
+      *)
+       # The compiler driver will combine and reorder linker options,
+       # but understands '-z linker_flag'.  GCC discards it without '$wl',
+       # but is careful enough not to reorder.
+       # Supported since Solaris 2.6 (maybe 2.5.1?)
+       if test yes = "$GCC"; then
+         whole_archive_flag_spec='$wl-z ${wl}allextract$convenience $wl-z ${wl}defaultextract'
+       else
+         whole_archive_flag_spec='-z allextract$convenience -z defaultextract'
+       fi
+       ;;
+      esac
+      link_all_deplibs=yes
+      ;;
+
+    sunos4*)
+      if test sequent = "$host_vendor"; then
+       # Use $CC to link under sequent, because it throws in some extra .o
+       # files that make .init and .fini sections work.
+       archive_cmds='$CC -G $wl-h $soname -o $lib $libobjs $deplibs $compiler_flags'
+      else
+       archive_cmds='$LD -assert pure-text -Bstatic -o $lib $libobjs $deplibs $linker_flags'
+      fi
+      hardcode_libdir_flag_spec='-L$libdir'
+      hardcode_direct=yes
+      hardcode_minus_L=yes
+      hardcode_shlibpath_var=no
+      ;;
+
+    sysv4)
+      case $host_vendor in
+       sni)
+         archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+         hardcode_direct=yes # is this really true???
+       ;;
+       siemens)
+         ## LD is ld it makes a PLAMLIB
+         ## CC just makes a GrossModule.
+         archive_cmds='$LD -G -o $lib $libobjs $deplibs $linker_flags'
+         reload_cmds='$CC -r -o $output$reload_objs'
+         hardcode_direct=no
+        ;;
+       motorola)
+         archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+         hardcode_direct=no #Motorola manual says yes, but my tests say they lie
+       ;;
+      esac
+      runpath_var='LD_RUN_PATH'
+      hardcode_shlibpath_var=no
+      ;;
+
+    sysv4.3*)
+      archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+      hardcode_shlibpath_var=no
+      export_dynamic_flag_spec='-Bexport'
+      ;;
+
+    sysv4*MP*)
+      if test -d /usr/nec; then
+       archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+       hardcode_shlibpath_var=no
+       runpath_var=LD_RUN_PATH
+       hardcode_runpath_var=yes
+       ld_shlibs=yes
+      fi
+      ;;
+
+    sysv4*uw2* | sysv5OpenUNIX* | sysv5UnixWare7.[01].[10]* | unixware7* | sco3.2v5.0.[024]*)
+      no_undefined_flag='$wl-z,text'
+      archive_cmds_need_lc=no
+      hardcode_shlibpath_var=no
+      runpath_var='LD_RUN_PATH'
+
+      if test yes = "$GCC"; then
+       archive_cmds='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+       archive_expsym_cmds='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+      else
+       archive_cmds='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+       archive_expsym_cmds='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+      fi
+      ;;
+
+    sysv5* | sco3.2v5* | sco5v6*)
+      # Note: We CANNOT use -z defs as we might desire, because we do not
+      # link with -lc, and that would cause any symbols used from libc to
+      # always be unresolved, which means just about no library would
+      # ever link correctly.  If we're not using GNU ld we use -z text
+      # though, which does catch some bad symbols but isn't as heavy-handed
+      # as -z defs.
+      no_undefined_flag='$wl-z,text'
+      allow_undefined_flag='$wl-z,nodefs'
+      archive_cmds_need_lc=no
+      hardcode_shlibpath_var=no
+      hardcode_libdir_flag_spec='$wl-R,$libdir'
+      hardcode_libdir_separator=':'
+      link_all_deplibs=yes
+      export_dynamic_flag_spec='$wl-Bexport'
+      runpath_var='LD_RUN_PATH'
+
+      if test yes = "$GCC"; then
+       archive_cmds='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+       archive_expsym_cmds='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+      else
+       archive_cmds='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+       archive_expsym_cmds='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+      fi
+      ;;
+
+    uts4*)
+      archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+      hardcode_libdir_flag_spec='-L$libdir'
+      hardcode_shlibpath_var=no
+      ;;
+
+    *)
+      ld_shlibs=no
+      ;;
+    esac
+
+    if test sni = "$host_vendor"; then
+      case $host in
+      sysv4 | sysv4.2uw2* | sysv4.3* | sysv5*)
+       export_dynamic_flag_spec='$wl-Blargedynsym'
+       ;;
+      esac
+    fi
+  fi
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ld_shlibs" >&5
+$as_echo "$ld_shlibs" >&6; }
+test no = "$ld_shlibs" && can_build_shared=no
+
+with_gnu_ld=$with_gnu_ld
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+#
+# Do we need to explicitly link libc?
+#
+case "x$archive_cmds_need_lc" in
+x|xyes)
+  # Assume -lc should be added
+  archive_cmds_need_lc=yes
+
+  if test yes,yes = "$GCC,$enable_shared"; then
+    case $archive_cmds in
+    *'~'*)
+      # FIXME: we may have to deal with multi-command sequences.
+      ;;
+    '$CC '*)
+      # Test whether the compiler implicitly links with -lc since on some
+      # systems, -lgcc has to come before -lc. If gcc already passes -lc
+      # to ld, don't add -lc before -lgcc.
+      { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether -lc should be explicitly linked in" >&5
+$as_echo_n "checking whether -lc should be explicitly linked in... " >&6; }
+if ${lt_cv_archive_cmds_need_lc+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  $RM conftest*
+       echo "$lt_simple_compile_test_code" > conftest.$ac_ext
+
+       if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5
+  (eval $ac_compile) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } 2>conftest.err; then
+         soname=conftest
+         lib=conftest
+         libobjs=conftest.$ac_objext
+         deplibs=
+         wl=$lt_prog_compiler_wl
+         pic_flag=$lt_prog_compiler_pic
+         compiler_flags=-v
+         linker_flags=-v
+         verstring=
+         output_objdir=.
+         libname=conftest
+         lt_save_allow_undefined_flag=$allow_undefined_flag
+         allow_undefined_flag=
+         if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$archive_cmds 2\>\&1 \| $GREP \" -lc \" \>/dev/null 2\>\&1\""; } >&5
+  (eval $archive_cmds 2\>\&1 \| $GREP \" -lc \" \>/dev/null 2\>\&1) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; }
+         then
+           lt_cv_archive_cmds_need_lc=no
+         else
+           lt_cv_archive_cmds_need_lc=yes
+         fi
+         allow_undefined_flag=$lt_save_allow_undefined_flag
+       else
+         cat conftest.err 1>&5
+       fi
+       $RM conftest*
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_archive_cmds_need_lc" >&5
+$as_echo "$lt_cv_archive_cmds_need_lc" >&6; }
+      archive_cmds_need_lc=$lt_cv_archive_cmds_need_lc
+      ;;
+    esac
+  fi
+  ;;
+esac
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking dynamic linker characteristics" >&5
+$as_echo_n "checking dynamic linker characteristics... " >&6; }
+
+if test yes = "$GCC"; then
+  case $host_os in
+    darwin*) lt_awk_arg='/^libraries:/,/LR/' ;;
+    *) lt_awk_arg='/^libraries:/' ;;
+  esac
+  case $host_os in
+    mingw* | cegcc*) lt_sed_strip_eq='s|=\([A-Za-z]:\)|\1|g' ;;
+    *) lt_sed_strip_eq='s|=/|/|g' ;;
+  esac
+  lt_search_path_spec=`$CC -print-search-dirs | awk $lt_awk_arg | $SED -e "s/^libraries://" -e $lt_sed_strip_eq`
+  case $lt_search_path_spec in
+  *\;*)
+    # if the path contains ";" then we assume it to be the separator
+    # otherwise default to the standard path separator (i.e. ":") - it is
+    # assumed that no part of a normal pathname contains ";" but that should
+    # okay in the real world where ";" in dirpaths is itself problematic.
+    lt_search_path_spec=`$ECHO "$lt_search_path_spec" | $SED 's/;/ /g'`
+    ;;
+  *)
+    lt_search_path_spec=`$ECHO "$lt_search_path_spec" | $SED "s/$PATH_SEPARATOR/ /g"`
+    ;;
+  esac
+  # Ok, now we have the path, separated by spaces, we can step through it
+  # and add multilib dir if necessary...
+  lt_tmp_lt_search_path_spec=
+  lt_multi_os_dir=/`$CC $CPPFLAGS $CFLAGS $LDFLAGS -print-multi-os-directory 2>/dev/null`
+  # ...but if some path component already ends with the multilib dir we assume
+  # that all is fine and trust -print-search-dirs as is (GCC 4.2? or newer).
+  case "$lt_multi_os_dir; $lt_search_path_spec " in
+  "/; "* | "/.; "* | "/./; "* | *"$lt_multi_os_dir "* | *"$lt_multi_os_dir/ "*)
+    lt_multi_os_dir=
+    ;;
+  esac
+  for lt_sys_path in $lt_search_path_spec; do
+    if test -d "$lt_sys_path$lt_multi_os_dir"; then
+      lt_tmp_lt_search_path_spec="$lt_tmp_lt_search_path_spec $lt_sys_path$lt_multi_os_dir"
+    elif test -n "$lt_multi_os_dir"; then
+      test -d "$lt_sys_path" && \
+       lt_tmp_lt_search_path_spec="$lt_tmp_lt_search_path_spec $lt_sys_path"
+    fi
+  done
+  lt_search_path_spec=`$ECHO "$lt_tmp_lt_search_path_spec" | awk '
+BEGIN {RS = " "; FS = "/|\n";} {
+  lt_foo = "";
+  lt_count = 0;
+  for (lt_i = NF; lt_i > 0; lt_i--) {
+    if ($lt_i != "" && $lt_i != ".") {
+      if ($lt_i == "..") {
+        lt_count++;
+      } else {
+        if (lt_count == 0) {
+          lt_foo = "/" $lt_i lt_foo;
+        } else {
+          lt_count--;
+        }
+      }
+    }
+  }
+  if (lt_foo != "") { lt_freq[lt_foo]++; }
+  if (lt_freq[lt_foo] == 1) { print lt_foo; }
+}'`
+  # AWK program above erroneously prepends '/' to C:/dos/paths
+  # for these hosts.
+  case $host_os in
+    mingw* | cegcc*) lt_search_path_spec=`$ECHO "$lt_search_path_spec" |\
+      $SED 's|/\([A-Za-z]:\)|\1|g'` ;;
+  esac
+  sys_lib_search_path_spec=`$ECHO "$lt_search_path_spec" | $lt_NL2SP`
+else
+  sys_lib_search_path_spec="/lib /usr/lib /usr/local/lib"
+fi
+library_names_spec=
+libname_spec='lib$name'
+soname_spec=
+shrext_cmds=.so
+postinstall_cmds=
+postuninstall_cmds=
+finish_cmds=
+finish_eval=
+shlibpath_var=
+shlibpath_overrides_runpath=unknown
+version_type=none
+dynamic_linker="$host_os ld.so"
+sys_lib_dlsearch_path_spec="/lib /usr/lib"
+need_lib_prefix=unknown
+hardcode_into_libs=no
+
+# when you set need_version to no, make sure it does not cause -set_version
+# flags to be left without arguments
+need_version=unknown
+
+
+
+case $host_os in
+aix3*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  library_names_spec='$libname$release$shared_ext$versuffix $libname.a'
+  shlibpath_var=LIBPATH
+
+  # AIX 3 has no versioning support, so we append a major version to the name.
+  soname_spec='$libname$release$shared_ext$major'
+  ;;
+
+aix[4-9]*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  hardcode_into_libs=yes
+  if test ia64 = "$host_cpu"; then
+    # AIX 5 supports IA64
+    library_names_spec='$libname$release$shared_ext$major $libname$release$shared_ext$versuffix $libname$shared_ext'
+    shlibpath_var=LD_LIBRARY_PATH
+  else
+    # With GCC up to 2.95.x, collect2 would create an import file
+    # for dependence libraries.  The import file would start with
+    # the line '#! .'.  This would cause the generated library to
+    # depend on '.', always an invalid library.  This was fixed in
+    # development snapshots of GCC prior to 3.0.
+    case $host_os in
+      aix4 | aix4.[01] | aix4.[01].*)
+      if { echo '#if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 97)'
+          echo ' yes '
+          echo '#endif'; } | $CC -E - | $GREP yes > /dev/null; then
+       :
+      else
+       can_build_shared=no
+      fi
+      ;;
+    esac
+    # Using Import Files as archive members, it is possible to support
+    # filename-based versioning of shared library archives on AIX. While
+    # this would work for both with and without runtime linking, it will
+    # prevent static linking of such archives. So we do filename-based
+    # shared library versioning with .so extension only, which is used
+    # when both runtime linking and shared linking is enabled.
+    # Unfortunately, runtime linking may impact performance, so we do
+    # not want this to be the default eventually. Also, we use the
+    # versioned .so libs for executables only if there is the -brtl
+    # linker flag in LDFLAGS as well, or --with-aix-soname=svr4 only.
+    # To allow for filename-based versioning support, we need to create
+    # libNAME.so.V as an archive file, containing:
+    # *) an Import File, referring to the versioned filename of the
+    #    archive as well as the shared archive member, telling the
+    #    bitwidth (32 or 64) of that shared object, and providing the
+    #    list of exported symbols of that shared object, eventually
+    #    decorated with the 'weak' keyword
+    # *) the shared object with the F_LOADONLY flag set, to really avoid
+    #    it being seen by the linker.
+    # At run time we better use the real file rather than another symlink,
+    # but for link time we create the symlink libNAME.so -> libNAME.so.V
+
+    case $with_aix_soname,$aix_use_runtimelinking in
+    # AIX (on Power*) has no versioning support, so currently we cannot hardcode correct
+    # soname into executable. Probably we can add versioning support to
+    # collect2, so additional links can be useful in future.
+    aix,yes) # traditional libtool
+      dynamic_linker='AIX unversionable lib.so'
+      # If using run time linking (on AIX 4.2 or later) use lib<name>.so
+      # instead of lib<name>.a to let people know that these are not
+      # typical AIX shared libraries.
+      library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+      ;;
+    aix,no) # traditional AIX only
+      dynamic_linker='AIX lib.a(lib.so.V)'
+      # We preserve .a as extension for shared libraries through AIX4.2
+      # and later when we are not doing run time linking.
+      library_names_spec='$libname$release.a $libname.a'
+      soname_spec='$libname$release$shared_ext$major'
+      ;;
+    svr4,*) # full svr4 only
+      dynamic_linker="AIX lib.so.V($shared_archive_member_spec.o)"
+      library_names_spec='$libname$release$shared_ext$major $libname$shared_ext'
+      # We do not specify a path in Import Files, so LIBPATH fires.
+      shlibpath_overrides_runpath=yes
+      ;;
+    *,yes) # both, prefer svr4
+      dynamic_linker="AIX lib.so.V($shared_archive_member_spec.o), lib.a(lib.so.V)"
+      library_names_spec='$libname$release$shared_ext$major $libname$shared_ext'
+      # unpreferred sharedlib libNAME.a needs extra handling
+      postinstall_cmds='test -n "$linkname" || linkname="$realname"~func_stripname "" ".so" "$linkname"~$install_shared_prog "$dir/$func_stripname_result.$libext" "$destdir/$func_stripname_result.$libext"~test -z "$tstripme" || test -z "$striplib" || $striplib "$destdir/$func_stripname_result.$libext"'
+      postuninstall_cmds='for n in $library_names $old_library; do :; done~func_stripname "" ".so" "$n"~test "$func_stripname_result" = "$n" || func_append rmfiles " $odir/$func_stripname_result.$libext"'
+      # We do not specify a path in Import Files, so LIBPATH fires.
+      shlibpath_overrides_runpath=yes
+      ;;
+    *,no) # both, prefer aix
+      dynamic_linker="AIX lib.a(lib.so.V), lib.so.V($shared_archive_member_spec.o)"
+      library_names_spec='$libname$release.a $libname.a'
+      soname_spec='$libname$release$shared_ext$major'
+      # unpreferred sharedlib libNAME.so.V and symlink libNAME.so need extra handling
+      postinstall_cmds='test -z "$dlname" || $install_shared_prog $dir/$dlname $destdir/$dlname~test -z "$tstripme" || test -z "$striplib" || $striplib $destdir/$dlname~test -n "$linkname" || linkname=$realname~func_stripname "" ".a" "$linkname"~(cd "$destdir" && $LN_S -f $dlname $func_stripname_result.so)'
+      postuninstall_cmds='test -z "$dlname" || func_append rmfiles " $odir/$dlname"~for n in $old_library $library_names; do :; done~func_stripname "" ".a" "$n"~func_append rmfiles " $odir/$func_stripname_result.so"'
+      ;;
+    esac
+    shlibpath_var=LIBPATH
+  fi
+  ;;
+
+amigaos*)
+  case $host_cpu in
+  powerpc)
+    # Since July 2007 AmigaOS4 officially supports .so libraries.
+    # When compiling the executable, add -use-dynld -Lsobjs: to the compileline.
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+    ;;
+  m68k)
+    library_names_spec='$libname.ixlibrary $libname.a'
+    # Create ${libname}_ixlibrary.a entries in /sys/libs.
+    finish_eval='for lib in `ls $libdir/*.ixlibrary 2>/dev/null`; do libname=`func_echo_all "$lib" | $SED '\''s%^.*/\([^/]*\)\.ixlibrary$%\1%'\''`; $RM /sys/libs/${libname}_ixlibrary.a; $show "cd /sys/libs && $LN_S $lib ${libname}_ixlibrary.a"; cd /sys/libs && $LN_S $lib ${libname}_ixlibrary.a || exit 1; done'
+    ;;
+  esac
+  ;;
+
+beos*)
+  library_names_spec='$libname$shared_ext'
+  dynamic_linker="$host_os ld.so"
+  shlibpath_var=LIBRARY_PATH
+  ;;
+
+bsdi[45]*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  finish_cmds='PATH="\$PATH:/sbin" ldconfig $libdir'
+  shlibpath_var=LD_LIBRARY_PATH
+  sys_lib_search_path_spec="/shlib /usr/lib /usr/X11/lib /usr/contrib/lib /lib /usr/local/lib"
+  sys_lib_dlsearch_path_spec="/shlib /usr/lib /usr/local/lib"
+  # the default ld.so.conf also contains /usr/contrib/lib and
+  # /usr/X11R6/lib (/usr/X11 is a link to /usr/X11R6), but let us allow
+  # libtool to hard-code these into programs
+  ;;
+
+cygwin* | mingw* | pw32* | cegcc*)
+  version_type=windows
+  shrext_cmds=.dll
+  need_version=no
+  need_lib_prefix=no
+
+  case $GCC,$cc_basename in
+  yes,*)
+    # gcc
+    library_names_spec='$libname.dll.a'
+    # DLL is installed to $(libdir)/../bin by postinstall_cmds
+    postinstall_cmds='base_file=`basename \$file`~
+      dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; echo \$dlname'\''`~
+      dldir=$destdir/`dirname \$dlpath`~
+      test -d \$dldir || mkdir -p \$dldir~
+      $install_prog $dir/$dlname \$dldir/$dlname~
+      chmod a+x \$dldir/$dlname~
+      if test -n '\''$stripme'\'' && test -n '\''$striplib'\''; then
+        eval '\''$striplib \$dldir/$dlname'\'' || exit \$?;
+      fi'
+    postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; echo \$dlname'\''`~
+      dlpath=$dir/\$dldll~
+       $RM \$dlpath'
+    shlibpath_overrides_runpath=yes
+
+    case $host_os in
+    cygwin*)
+      # Cygwin DLLs use 'cyg' prefix rather than 'lib'
+      soname_spec='`echo $libname | sed -e 's/^lib/cyg/'``echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext'
+
+      sys_lib_search_path_spec="$sys_lib_search_path_spec /usr/lib/w32api"
+      ;;
+    mingw* | cegcc*)
+      # MinGW DLLs use traditional 'lib' prefix
+      soname_spec='$libname`echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext'
+      ;;
+    pw32*)
+      # pw32 DLLs use 'pw' prefix rather than 'lib'
+      library_names_spec='`echo $libname | sed -e 's/^lib/pw/'``echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext'
+      ;;
+    esac
+    dynamic_linker='Win32 ld.exe'
+    ;;
+
+  *,cl*)
+    # Native MSVC
+    libname_spec='$name'
+    soname_spec='$libname`echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext'
+    library_names_spec='$libname.dll.lib'
+
+    case $build_os in
+    mingw*)
+      sys_lib_search_path_spec=
+      lt_save_ifs=$IFS
+      IFS=';'
+      for lt_path in $LIB
+      do
+        IFS=$lt_save_ifs
+        # Let DOS variable expansion print the short 8.3 style file name.
+        lt_path=`cd "$lt_path" 2>/dev/null && cmd //C "for %i in (".") do @echo %~si"`
+        sys_lib_search_path_spec="$sys_lib_search_path_spec $lt_path"
+      done
+      IFS=$lt_save_ifs
+      # Convert to MSYS style.
+      sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | sed -e 's|\\\\|/|g' -e 's| \\([a-zA-Z]\\):| /\\1|g' -e 's|^ ||'`
+      ;;
+    cygwin*)
+      # Convert to unix form, then to dos form, then back to unix form
+      # but this time dos style (no spaces!) so that the unix form looks
+      # like /cygdrive/c/PROGRA~1:/cygdr...
+      sys_lib_search_path_spec=`cygpath --path --unix "$LIB"`
+      sys_lib_search_path_spec=`cygpath --path --dos "$sys_lib_search_path_spec" 2>/dev/null`
+      sys_lib_search_path_spec=`cygpath --path --unix "$sys_lib_search_path_spec" | $SED -e "s/$PATH_SEPARATOR/ /g"`
+      ;;
+    *)
+      sys_lib_search_path_spec=$LIB
+      if $ECHO "$sys_lib_search_path_spec" | $GREP ';[c-zC-Z]:/' >/dev/null; then
+        # It is most probably a Windows format PATH.
+        sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e 's/;/ /g'`
+      else
+        sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e "s/$PATH_SEPARATOR/ /g"`
+      fi
+      # FIXME: find the short name or the path components, as spaces are
+      # common. (e.g. "Program Files" -> "PROGRA~1")
+      ;;
+    esac
+
+    # DLL is installed to $(libdir)/../bin by postinstall_cmds
+    postinstall_cmds='base_file=`basename \$file`~
+      dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; echo \$dlname'\''`~
+      dldir=$destdir/`dirname \$dlpath`~
+      test -d \$dldir || mkdir -p \$dldir~
+      $install_prog $dir/$dlname \$dldir/$dlname'
+    postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; echo \$dlname'\''`~
+      dlpath=$dir/\$dldll~
+       $RM \$dlpath'
+    shlibpath_overrides_runpath=yes
+    dynamic_linker='Win32 link.exe'
+    ;;
+
+  *)
+    # Assume MSVC wrapper
+    library_names_spec='$libname`echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext $libname.lib'
+    dynamic_linker='Win32 ld.exe'
+    ;;
+  esac
+  # FIXME: first we should search . and the directory the executable is in
+  shlibpath_var=PATH
+  ;;
+
+darwin* | rhapsody*)
+  dynamic_linker="$host_os dyld"
+  version_type=darwin
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$major$shared_ext $libname$shared_ext'
+  soname_spec='$libname$release$major$shared_ext'
+  shlibpath_overrides_runpath=yes
+  shlibpath_var=DYLD_LIBRARY_PATH
+  shrext_cmds='`test .$module = .yes && echo .so || echo .dylib`'
+
+  sys_lib_search_path_spec="$sys_lib_search_path_spec /usr/local/lib"
+  sys_lib_dlsearch_path_spec='/usr/local/lib /lib /usr/lib'
+  ;;
+
+dgux*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  ;;
+
+freebsd* | dragonfly*)
+  # DragonFly does not have aout.  When/if they implement a new
+  # versioning mechanism, adjust this.
+  if test -x /usr/bin/objformat; then
+    objformat=`/usr/bin/objformat`
+  else
+    case $host_os in
+    freebsd[23].*) objformat=aout ;;
+    *) objformat=elf ;;
+    esac
+  fi
+  version_type=freebsd-$objformat
+  case $version_type in
+    freebsd-elf*)
+      library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+      soname_spec='$libname$release$shared_ext$major'
+      need_version=no
+      need_lib_prefix=no
+      ;;
+    freebsd-*)
+      library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix'
+      need_version=yes
+      ;;
+  esac
+  shlibpath_var=LD_LIBRARY_PATH
+  case $host_os in
+  freebsd2.*)
+    shlibpath_overrides_runpath=yes
+    ;;
+  freebsd3.[01]* | freebsdelf3.[01]*)
+    shlibpath_overrides_runpath=yes
+    hardcode_into_libs=yes
+    ;;
+  freebsd3.[2-9]* | freebsdelf3.[2-9]* | \
+  freebsd4.[0-5] | freebsdelf4.[0-5] | freebsd4.1.1 | freebsdelf4.1.1)
+    shlibpath_overrides_runpath=no
+    hardcode_into_libs=yes
+    ;;
+  *) # from 4.6 on, and DragonFly
+    shlibpath_overrides_runpath=yes
+    hardcode_into_libs=yes
+    ;;
+  esac
+  ;;
+
+haiku*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  dynamic_linker="$host_os runtime_loader"
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LIBRARY_PATH
+  shlibpath_overrides_runpath=no
+  sys_lib_dlsearch_path_spec='/boot/home/config/lib /boot/common/lib /boot/system/lib'
+  hardcode_into_libs=yes
+  ;;
+
+hpux9* | hpux10* | hpux11*)
+  # Give a soname corresponding to the major version so that dld.sl refuses to
+  # link against other versions.
+  version_type=sunos
+  need_lib_prefix=no
+  need_version=no
+  case $host_cpu in
+  ia64*)
+    shrext_cmds='.so'
+    hardcode_into_libs=yes
+    dynamic_linker="$host_os dld.so"
+    shlibpath_var=LD_LIBRARY_PATH
+    shlibpath_overrides_runpath=yes # Unless +noenvvar is specified.
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+    soname_spec='$libname$release$shared_ext$major'
+    if test 32 = "$HPUX_IA64_MODE"; then
+      sys_lib_search_path_spec="/usr/lib/hpux32 /usr/local/lib/hpux32 /usr/local/lib"
+      sys_lib_dlsearch_path_spec=/usr/lib/hpux32
+    else
+      sys_lib_search_path_spec="/usr/lib/hpux64 /usr/local/lib/hpux64"
+      sys_lib_dlsearch_path_spec=/usr/lib/hpux64
+    fi
+    ;;
+  hppa*64*)
+    shrext_cmds='.sl'
+    hardcode_into_libs=yes
+    dynamic_linker="$host_os dld.sl"
+    shlibpath_var=LD_LIBRARY_PATH # How should we handle SHLIB_PATH
+    shlibpath_overrides_runpath=yes # Unless +noenvvar is specified.
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+    soname_spec='$libname$release$shared_ext$major'
+    sys_lib_search_path_spec="/usr/lib/pa20_64 /usr/ccs/lib/pa20_64"
+    sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec
+    ;;
+  *)
+    shrext_cmds='.sl'
+    dynamic_linker="$host_os dld.sl"
+    shlibpath_var=SHLIB_PATH
+    shlibpath_overrides_runpath=no # +s is required to enable SHLIB_PATH
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+    soname_spec='$libname$release$shared_ext$major'
+    ;;
+  esac
+  # HP-UX runs *really* slowly unless shared libraries are mode 555, ...
+  postinstall_cmds='chmod 555 $lib'
+  # or fails outright, so override atomically:
+  install_override_mode=555
+  ;;
+
+interix[3-9]*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  dynamic_linker='Interix 3.x ld.so.1 (PE, like ELF)'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=no
+  hardcode_into_libs=yes
+  ;;
+
+irix5* | irix6* | nonstopux*)
+  case $host_os in
+    nonstopux*) version_type=nonstopux ;;
+    *)
+       if test yes = "$lt_cv_prog_gnu_ld"; then
+               version_type=linux # correct to gnu/linux during the next big refactor
+       else
+               version_type=irix
+       fi ;;
+  esac
+  need_lib_prefix=no
+  need_version=no
+  soname_spec='$libname$release$shared_ext$major'
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$release$shared_ext $libname$shared_ext'
+  case $host_os in
+  irix5* | nonstopux*)
+    libsuff= shlibsuff=
+    ;;
+  *)
+    case $LD in # libtool.m4 will add one of these switches to LD
+    *-32|*"-32 "|*-melf32bsmip|*"-melf32bsmip ")
+      libsuff= shlibsuff= libmagic=32-bit;;
+    *-n32|*"-n32 "|*-melf32bmipn32|*"-melf32bmipn32 ")
+      libsuff=32 shlibsuff=N32 libmagic=N32;;
+    *-64|*"-64 "|*-melf64bmip|*"-melf64bmip ")
+      libsuff=64 shlibsuff=64 libmagic=64-bit;;
+    *) libsuff= shlibsuff= libmagic=never-match;;
+    esac
+    ;;
+  esac
+  shlibpath_var=LD_LIBRARY${shlibsuff}_PATH
+  shlibpath_overrides_runpath=no
+  sys_lib_search_path_spec="/usr/lib$libsuff /lib$libsuff /usr/local/lib$libsuff"
+  sys_lib_dlsearch_path_spec="/usr/lib$libsuff /lib$libsuff"
+  hardcode_into_libs=yes
+  ;;
+
+# No shared lib support for Linux oldld, aout, or coff.
+linux*oldld* | linux*aout* | linux*coff*)
+  dynamic_linker=no
+  ;;
+
+linux*android*)
+  version_type=none # Android doesn't support versioned libraries.
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext'
+  soname_spec='$libname$release$shared_ext'
+  finish_cmds=
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+
+  # This implies no fast_install, which is unacceptable.
+  # Some rework will be needed to allow for fast_install
+  # before this can be enabled.
+  hardcode_into_libs=yes
+
+  dynamic_linker='Android linker'
+  # Don't embed -rpath directories since the linker doesn't support them.
+  hardcode_libdir_flag_spec='-L$libdir'
+  ;;
+
+# This must be glibc/ELF.
+linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  finish_cmds='PATH="\$PATH:/sbin" ldconfig -n $libdir'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=no
+
+  # Some binutils ld are patched to set DT_RUNPATH
+  if ${lt_cv_shlibpath_overrides_runpath+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  lt_cv_shlibpath_overrides_runpath=no
+    save_LDFLAGS=$LDFLAGS
+    save_libdir=$libdir
+    eval "libdir=/foo; wl=\"$lt_prog_compiler_wl\"; \
+        LDFLAGS=\"\$LDFLAGS $hardcode_libdir_flag_spec\""
+    cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  if  ($OBJDUMP -p conftest$ac_exeext) 2>/dev/null | grep "RUNPATH.*$libdir" >/dev/null; then :
+  lt_cv_shlibpath_overrides_runpath=yes
+fi
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+    LDFLAGS=$save_LDFLAGS
+    libdir=$save_libdir
+
+fi
+
+  shlibpath_overrides_runpath=$lt_cv_shlibpath_overrides_runpath
+
+  # This implies no fast_install, which is unacceptable.
+  # Some rework will be needed to allow for fast_install
+  # before this can be enabled.
+  hardcode_into_libs=yes
+
+  # Ideally, we could use ldconfig to report *all* directores which are
+  # searched for libraries, however this is still not possible.  Aside from not
+  # being certain /sbin/ldconfig is available, command
+  # 'ldconfig -N -X -v | grep ^/' on 64bit Fedora does not report /usr/lib64,
+  # even though it is searched at run-time.  Try to do the best guess by
+  # appending ld.so.conf contents (and includes) to the search path.
+  if test -f /etc/ld.so.conf; then
+    lt_ld_extra=`awk '/^include / { system(sprintf("cd /etc; cat %s 2>/dev/null", \$2)); skip = 1; } { if (!skip) print \$0; skip = 0; }' < /etc/ld.so.conf | $SED -e 's/#.*//;/^[      ]*hwcap[        ]/d;s/[:,      ]/ /g;s/=[^=]*$//;s/=[^= ]* / /g;s/"//g;/^$/d' | tr '\n' ' '`
+    sys_lib_dlsearch_path_spec="/lib /usr/lib $lt_ld_extra"
+  fi
+
+  # We used to test for /lib/ld.so.1 and disable shared libraries on
+  # powerpc, because MkLinux only supported shared libraries with the
+  # GNU dynamic linker.  Since this was broken with cross compilers,
+  # most powerpc-linux boxes support dynamic linking these days and
+  # people can always --disable-shared, the test was removed, and we
+  # assume the GNU/Linux dynamic linker is in use.
+  dynamic_linker='GNU/Linux ld.so'
+  ;;
+
+netbsd*)
+  version_type=sunos
+  need_lib_prefix=no
+  need_version=no
+  if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix'
+    finish_cmds='PATH="\$PATH:/sbin" ldconfig -m $libdir'
+    dynamic_linker='NetBSD (a.out) ld.so'
+  else
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+    soname_spec='$libname$release$shared_ext$major'
+    dynamic_linker='NetBSD ld.elf_so'
+  fi
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  hardcode_into_libs=yes
+  ;;
+
+newsos6)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  ;;
+
+*nto* | *qnx*)
+  version_type=qnx
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=no
+  hardcode_into_libs=yes
+  dynamic_linker='ldqnx.so'
+  ;;
+
+openbsd* | bitrig*)
+  version_type=sunos
+  sys_lib_dlsearch_path_spec=/usr/lib
+  need_lib_prefix=no
+  if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then
+    need_version=no
+  else
+    need_version=yes
+  fi
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix'
+  finish_cmds='PATH="\$PATH:/sbin" ldconfig -m $libdir'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  ;;
+
+os2*)
+  libname_spec='$name'
+  version_type=windows
+  shrext_cmds=.dll
+  need_version=no
+  need_lib_prefix=no
+  # OS/2 can only load a DLL with a base name of 8 characters or less.
+  soname_spec='`test -n "$os2dllname" && libname="$os2dllname";
+    v=$($ECHO $release$versuffix | tr -d .-);
+    n=$($ECHO $libname | cut -b -$((8 - ${#v})) | tr . _);
+    $ECHO $n$v`$shared_ext'
+  library_names_spec='${libname}_dll.$libext'
+  dynamic_linker='OS/2 ld.exe'
+  shlibpath_var=BEGINLIBPATH
+  sys_lib_search_path_spec="/lib /usr/lib /usr/local/lib"
+  sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec
+  postinstall_cmds='base_file=`basename \$file`~
+    dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; $ECHO \$dlname'\''`~
+    dldir=$destdir/`dirname \$dlpath`~
+    test -d \$dldir || mkdir -p \$dldir~
+    $install_prog $dir/$dlname \$dldir/$dlname~
+    chmod a+x \$dldir/$dlname~
+    if test -n '\''$stripme'\'' && test -n '\''$striplib'\''; then
+      eval '\''$striplib \$dldir/$dlname'\'' || exit \$?;
+    fi'
+  postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; $ECHO \$dlname'\''`~
+    dlpath=$dir/\$dldll~
+    $RM \$dlpath'
+  ;;
+
+osf3* | osf4* | osf5*)
+  version_type=osf
+  need_lib_prefix=no
+  need_version=no
+  soname_spec='$libname$release$shared_ext$major'
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  shlibpath_var=LD_LIBRARY_PATH
+  sys_lib_search_path_spec="/usr/shlib /usr/ccs/lib /usr/lib/cmplrs/cc /usr/lib /usr/local/lib /var/shlib"
+  sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec
+  ;;
+
+rdos*)
+  dynamic_linker=no
+  ;;
+
+solaris*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  hardcode_into_libs=yes
+  # ldd complains unless libraries are executable
+  postinstall_cmds='chmod +x $lib'
+  ;;
+
+sunos4*)
+  version_type=sunos
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix'
+  finish_cmds='PATH="\$PATH:/usr/etc" ldconfig $libdir'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  if test yes = "$with_gnu_ld"; then
+    need_lib_prefix=no
+  fi
+  need_version=yes
+  ;;
+
+sysv4 | sysv4.3*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  case $host_vendor in
+    sni)
+      shlibpath_overrides_runpath=no
+      need_lib_prefix=no
+      runpath_var=LD_RUN_PATH
+      ;;
+    siemens)
+      need_lib_prefix=no
+      ;;
+    motorola)
+      need_lib_prefix=no
+      need_version=no
+      shlibpath_overrides_runpath=no
+      sys_lib_search_path_spec='/lib /usr/lib /usr/ccs/lib'
+      ;;
+  esac
+  ;;
+
+sysv4*MP*)
+  if test -d /usr/nec; then
+    version_type=linux # correct to gnu/linux during the next big refactor
+    library_names_spec='$libname$shared_ext.$versuffix $libname$shared_ext.$major $libname$shared_ext'
+    soname_spec='$libname$shared_ext.$major'
+    shlibpath_var=LD_LIBRARY_PATH
+  fi
+  ;;
+
+sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX* | sysv4*uw2*)
+  version_type=sco
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  hardcode_into_libs=yes
+  if test yes = "$with_gnu_ld"; then
+    sys_lib_search_path_spec='/usr/local/lib /usr/gnu/lib /usr/ccs/lib /usr/lib /lib'
+  else
+    sys_lib_search_path_spec='/usr/ccs/lib /usr/lib'
+    case $host_os in
+      sco3.2v5*)
+        sys_lib_search_path_spec="$sys_lib_search_path_spec /lib"
+       ;;
+    esac
+  fi
+  sys_lib_dlsearch_path_spec='/usr/lib'
+  ;;
+
+tpf*)
+  # TPF is a cross-target only.  Preferred cross-host = GNU/Linux.
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=no
+  hardcode_into_libs=yes
+  ;;
+
+uts4*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  ;;
+
+*)
+  dynamic_linker=no
+  ;;
+esac
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $dynamic_linker" >&5
+$as_echo "$dynamic_linker" >&6; }
+test no = "$dynamic_linker" && can_build_shared=no
+
+variables_saved_for_relink="PATH $shlibpath_var $runpath_var"
+if test yes = "$GCC"; then
+  variables_saved_for_relink="$variables_saved_for_relink GCC_EXEC_PREFIX COMPILER_PATH LIBRARY_PATH"
+fi
+
+if test set = "${lt_cv_sys_lib_search_path_spec+set}"; then
+  sys_lib_search_path_spec=$lt_cv_sys_lib_search_path_spec
+fi
+
+if test set = "${lt_cv_sys_lib_dlsearch_path_spec+set}"; then
+  sys_lib_dlsearch_path_spec=$lt_cv_sys_lib_dlsearch_path_spec
+fi
+
+# remember unaugmented sys_lib_dlsearch_path content for libtool script decls...
+configure_time_dlsearch_path=$sys_lib_dlsearch_path_spec
+
+# ... but it needs LT_SYS_LIBRARY_PATH munging for other configure-time code
+func_munge_path_list sys_lib_dlsearch_path_spec "$LT_SYS_LIBRARY_PATH"
+
+# to be used as default LT_SYS_LIBRARY_PATH value in generated libtool
+configure_time_lt_sys_library_path=$LT_SYS_LIBRARY_PATH
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking how to hardcode library paths into programs" >&5
+$as_echo_n "checking how to hardcode library paths into programs... " >&6; }
+hardcode_action=
+if test -n "$hardcode_libdir_flag_spec" ||
+   test -n "$runpath_var" ||
+   test yes = "$hardcode_automatic"; then
+
+  # We can hardcode non-existent directories.
+  if test no != "$hardcode_direct" &&
+     # If the only mechanism to avoid hardcoding is shlibpath_var, we
+     # have to relink, otherwise we might link with an installed library
+     # when we should be linking with a yet-to-be-installed one
+     ## test no != "$_LT_TAGVAR(hardcode_shlibpath_var, )" &&
+     test no != "$hardcode_minus_L"; then
+    # Linking always hardcodes the temporary library directory.
+    hardcode_action=relink
+  else
+    # We can link without hardcoding, and we can hardcode nonexisting dirs.
+    hardcode_action=immediate
+  fi
+else
+  # We cannot hardcode anything, or else we can only hardcode existing
+  # directories.
+  hardcode_action=unsupported
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $hardcode_action" >&5
+$as_echo "$hardcode_action" >&6; }
+
+if test relink = "$hardcode_action" ||
+   test yes = "$inherit_rpath"; then
+  # Fast installation is not supported
+  enable_fast_install=no
+elif test yes = "$shlibpath_overrides_runpath" ||
+     test no = "$enable_shared"; then
+  # Fast installation is not necessary
+  enable_fast_install=needless
+fi
+
+
+
+
+
+
+  if test yes != "$enable_dlopen"; then
+  enable_dlopen=unknown
+  enable_dlopen_self=unknown
+  enable_dlopen_self_static=unknown
+else
+  lt_cv_dlopen=no
+  lt_cv_dlopen_libs=
+
+  case $host_os in
+  beos*)
+    lt_cv_dlopen=load_add_on
+    lt_cv_dlopen_libs=
+    lt_cv_dlopen_self=yes
+    ;;
+
+  mingw* | pw32* | cegcc*)
+    lt_cv_dlopen=LoadLibrary
+    lt_cv_dlopen_libs=
+    ;;
+
+  cygwin*)
+    lt_cv_dlopen=dlopen
+    lt_cv_dlopen_libs=
+    ;;
+
+  darwin*)
+    # if libdl is installed we need to link against it
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for dlopen in -ldl" >&5
+$as_echo_n "checking for dlopen in -ldl... " >&6; }
+if ${ac_cv_lib_dl_dlopen+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_check_lib_save_LIBS=$LIBS
+LIBS="-ldl  $LIBS"
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+/* Override any GCC internal prototype to avoid an error.
+   Use char because int might match the return type of a GCC
+   builtin and then its argument prototype would still apply.  */
+#ifdef __cplusplus
+extern "C"
+#endif
+char dlopen ();
+int
+main ()
+{
+return dlopen ();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  ac_cv_lib_dl_dlopen=yes
+else
+  ac_cv_lib_dl_dlopen=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+LIBS=$ac_check_lib_save_LIBS
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dl_dlopen" >&5
+$as_echo "$ac_cv_lib_dl_dlopen" >&6; }
+if test "x$ac_cv_lib_dl_dlopen" = xyes; then :
+  lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-ldl
+else
+
+    lt_cv_dlopen=dyld
+    lt_cv_dlopen_libs=
+    lt_cv_dlopen_self=yes
+
+fi
+
+    ;;
+
+  tpf*)
+    # Don't try to run any link tests for TPF.  We know it's impossible
+    # because TPF is a cross-compiler, and we know how we open DSOs.
+    lt_cv_dlopen=dlopen
+    lt_cv_dlopen_libs=
+    lt_cv_dlopen_self=no
+    ;;
+
+  *)
+    ac_fn_c_check_func "$LINENO" "shl_load" "ac_cv_func_shl_load"
+if test "x$ac_cv_func_shl_load" = xyes; then :
+  lt_cv_dlopen=shl_load
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for shl_load in -ldld" >&5
+$as_echo_n "checking for shl_load in -ldld... " >&6; }
+if ${ac_cv_lib_dld_shl_load+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_check_lib_save_LIBS=$LIBS
+LIBS="-ldld  $LIBS"
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+/* Override any GCC internal prototype to avoid an error.
+   Use char because int might match the return type of a GCC
+   builtin and then its argument prototype would still apply.  */
+#ifdef __cplusplus
+extern "C"
+#endif
+char shl_load ();
+int
+main ()
+{
+return shl_load ();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  ac_cv_lib_dld_shl_load=yes
+else
+  ac_cv_lib_dld_shl_load=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+LIBS=$ac_check_lib_save_LIBS
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dld_shl_load" >&5
+$as_echo "$ac_cv_lib_dld_shl_load" >&6; }
+if test "x$ac_cv_lib_dld_shl_load" = xyes; then :
+  lt_cv_dlopen=shl_load lt_cv_dlopen_libs=-ldld
+else
+  ac_fn_c_check_func "$LINENO" "dlopen" "ac_cv_func_dlopen"
+if test "x$ac_cv_func_dlopen" = xyes; then :
+  lt_cv_dlopen=dlopen
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for dlopen in -ldl" >&5
+$as_echo_n "checking for dlopen in -ldl... " >&6; }
+if ${ac_cv_lib_dl_dlopen+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_check_lib_save_LIBS=$LIBS
+LIBS="-ldl  $LIBS"
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+/* Override any GCC internal prototype to avoid an error.
+   Use char because int might match the return type of a GCC
+   builtin and then its argument prototype would still apply.  */
+#ifdef __cplusplus
+extern "C"
+#endif
+char dlopen ();
+int
+main ()
+{
+return dlopen ();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  ac_cv_lib_dl_dlopen=yes
+else
+  ac_cv_lib_dl_dlopen=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+LIBS=$ac_check_lib_save_LIBS
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dl_dlopen" >&5
+$as_echo "$ac_cv_lib_dl_dlopen" >&6; }
+if test "x$ac_cv_lib_dl_dlopen" = xyes; then :
+  lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-ldl
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for dlopen in -lsvld" >&5
+$as_echo_n "checking for dlopen in -lsvld... " >&6; }
+if ${ac_cv_lib_svld_dlopen+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_check_lib_save_LIBS=$LIBS
+LIBS="-lsvld  $LIBS"
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+/* Override any GCC internal prototype to avoid an error.
+   Use char because int might match the return type of a GCC
+   builtin and then its argument prototype would still apply.  */
+#ifdef __cplusplus
+extern "C"
+#endif
+char dlopen ();
+int
+main ()
+{
+return dlopen ();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  ac_cv_lib_svld_dlopen=yes
+else
+  ac_cv_lib_svld_dlopen=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+LIBS=$ac_check_lib_save_LIBS
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_svld_dlopen" >&5
+$as_echo "$ac_cv_lib_svld_dlopen" >&6; }
+if test "x$ac_cv_lib_svld_dlopen" = xyes; then :
+  lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-lsvld
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for dld_link in -ldld" >&5
+$as_echo_n "checking for dld_link in -ldld... " >&6; }
+if ${ac_cv_lib_dld_dld_link+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_check_lib_save_LIBS=$LIBS
+LIBS="-ldld  $LIBS"
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+/* Override any GCC internal prototype to avoid an error.
+   Use char because int might match the return type of a GCC
+   builtin and then its argument prototype would still apply.  */
+#ifdef __cplusplus
+extern "C"
+#endif
+char dld_link ();
+int
+main ()
+{
+return dld_link ();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  ac_cv_lib_dld_dld_link=yes
+else
+  ac_cv_lib_dld_dld_link=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+LIBS=$ac_check_lib_save_LIBS
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dld_dld_link" >&5
+$as_echo "$ac_cv_lib_dld_dld_link" >&6; }
+if test "x$ac_cv_lib_dld_dld_link" = xyes; then :
+  lt_cv_dlopen=dld_link lt_cv_dlopen_libs=-ldld
+fi
+
+
+fi
+
+
+fi
+
+
+fi
+
+
+fi
+
+
+fi
+
+    ;;
+  esac
+
+  if test no = "$lt_cv_dlopen"; then
+    enable_dlopen=no
+  else
+    enable_dlopen=yes
+  fi
+
+  case $lt_cv_dlopen in
+  dlopen)
+    save_CPPFLAGS=$CPPFLAGS
+    test yes = "$ac_cv_header_dlfcn_h" && CPPFLAGS="$CPPFLAGS -DHAVE_DLFCN_H"
+
+    save_LDFLAGS=$LDFLAGS
+    wl=$lt_prog_compiler_wl eval LDFLAGS=\"\$LDFLAGS $export_dynamic_flag_spec\"
+
+    save_LIBS=$LIBS
+    LIBS="$lt_cv_dlopen_libs $LIBS"
+
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether a program can dlopen itself" >&5
+$as_echo_n "checking whether a program can dlopen itself... " >&6; }
+if ${lt_cv_dlopen_self+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+         if test yes = "$cross_compiling"; then :
+  lt_cv_dlopen_self=cross
+else
+  lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2
+  lt_status=$lt_dlunknown
+  cat > conftest.$ac_ext <<_LT_EOF
+#line $LINENO "configure"
+#include "confdefs.h"
+
+#if HAVE_DLFCN_H
+#include <dlfcn.h>
+#endif
+
+#include <stdio.h>
+
+#ifdef RTLD_GLOBAL
+#  define LT_DLGLOBAL          RTLD_GLOBAL
+#else
+#  ifdef DL_GLOBAL
+#    define LT_DLGLOBAL                DL_GLOBAL
+#  else
+#    define LT_DLGLOBAL                0
+#  endif
+#endif
+
+/* We may have to define LT_DLLAZY_OR_NOW in the command line if we
+   find out it does not work in some platform. */
+#ifndef LT_DLLAZY_OR_NOW
+#  ifdef RTLD_LAZY
+#    define LT_DLLAZY_OR_NOW           RTLD_LAZY
+#  else
+#    ifdef DL_LAZY
+#      define LT_DLLAZY_OR_NOW         DL_LAZY
+#    else
+#      ifdef RTLD_NOW
+#        define LT_DLLAZY_OR_NOW       RTLD_NOW
+#      else
+#        ifdef DL_NOW
+#          define LT_DLLAZY_OR_NOW     DL_NOW
+#        else
+#          define LT_DLLAZY_OR_NOW     0
+#        endif
+#      endif
+#    endif
+#  endif
+#endif
+
+/* When -fvisibility=hidden is used, assume the code has been annotated
+   correspondingly for the symbols needed.  */
+#if defined __GNUC__ && (((__GNUC__ == 3) && (__GNUC_MINOR__ >= 3)) || (__GNUC__ > 3))
+int fnord () __attribute__((visibility("default")));
+#endif
+
+int fnord () { return 42; }
+int main ()
+{
+  void *self = dlopen (0, LT_DLGLOBAL|LT_DLLAZY_OR_NOW);
+  int status = $lt_dlunknown;
+
+  if (self)
+    {
+      if (dlsym (self,"fnord"))       status = $lt_dlno_uscore;
+      else
+        {
+         if (dlsym( self,"_fnord"))  status = $lt_dlneed_uscore;
+          else puts (dlerror ());
+       }
+      /* dlclose (self); */
+    }
+  else
+    puts (dlerror ());
+
+  return status;
+}
+_LT_EOF
+  if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5
+  (eval $ac_link) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } && test -s "conftest$ac_exeext" 2>/dev/null; then
+    (./conftest; exit; ) >&5 2>/dev/null
+    lt_status=$?
+    case x$lt_status in
+      x$lt_dlno_uscore) lt_cv_dlopen_self=yes ;;
+      x$lt_dlneed_uscore) lt_cv_dlopen_self=yes ;;
+      x$lt_dlunknown|x*) lt_cv_dlopen_self=no ;;
+    esac
+  else :
+    # compilation failed
+    lt_cv_dlopen_self=no
+  fi
+fi
+rm -fr conftest*
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_dlopen_self" >&5
+$as_echo "$lt_cv_dlopen_self" >&6; }
+
+    if test yes = "$lt_cv_dlopen_self"; then
+      wl=$lt_prog_compiler_wl eval LDFLAGS=\"\$LDFLAGS $lt_prog_compiler_static\"
+      { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether a statically linked program can dlopen itself" >&5
+$as_echo_n "checking whether a statically linked program can dlopen itself... " >&6; }
+if ${lt_cv_dlopen_self_static+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+         if test yes = "$cross_compiling"; then :
+  lt_cv_dlopen_self_static=cross
+else
+  lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2
+  lt_status=$lt_dlunknown
+  cat > conftest.$ac_ext <<_LT_EOF
+#line $LINENO "configure"
+#include "confdefs.h"
+
+#if HAVE_DLFCN_H
+#include <dlfcn.h>
+#endif
+
+#include <stdio.h>
+
+#ifdef RTLD_GLOBAL
+#  define LT_DLGLOBAL          RTLD_GLOBAL
+#else
+#  ifdef DL_GLOBAL
+#    define LT_DLGLOBAL                DL_GLOBAL
+#  else
+#    define LT_DLGLOBAL                0
+#  endif
+#endif
+
+/* We may have to define LT_DLLAZY_OR_NOW in the command line if we
+   find out it does not work in some platform. */
+#ifndef LT_DLLAZY_OR_NOW
+#  ifdef RTLD_LAZY
+#    define LT_DLLAZY_OR_NOW           RTLD_LAZY
+#  else
+#    ifdef DL_LAZY
+#      define LT_DLLAZY_OR_NOW         DL_LAZY
+#    else
+#      ifdef RTLD_NOW
+#        define LT_DLLAZY_OR_NOW       RTLD_NOW
+#      else
+#        ifdef DL_NOW
+#          define LT_DLLAZY_OR_NOW     DL_NOW
+#        else
+#          define LT_DLLAZY_OR_NOW     0
+#        endif
+#      endif
+#    endif
+#  endif
+#endif
+
+/* When -fvisibility=hidden is used, assume the code has been annotated
+   correspondingly for the symbols needed.  */
+#if defined __GNUC__ && (((__GNUC__ == 3) && (__GNUC_MINOR__ >= 3)) || (__GNUC__ > 3))
+int fnord () __attribute__((visibility("default")));
+#endif
+
+int fnord () { return 42; }
+int main ()
+{
+  void *self = dlopen (0, LT_DLGLOBAL|LT_DLLAZY_OR_NOW);
+  int status = $lt_dlunknown;
+
+  if (self)
+    {
+      if (dlsym (self,"fnord"))       status = $lt_dlno_uscore;
+      else
+        {
+         if (dlsym( self,"_fnord"))  status = $lt_dlneed_uscore;
+          else puts (dlerror ());
+       }
+      /* dlclose (self); */
+    }
+  else
+    puts (dlerror ());
+
+  return status;
+}
+_LT_EOF
+  if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5
+  (eval $ac_link) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } && test -s "conftest$ac_exeext" 2>/dev/null; then
+    (./conftest; exit; ) >&5 2>/dev/null
+    lt_status=$?
+    case x$lt_status in
+      x$lt_dlno_uscore) lt_cv_dlopen_self_static=yes ;;
+      x$lt_dlneed_uscore) lt_cv_dlopen_self_static=yes ;;
+      x$lt_dlunknown|x*) lt_cv_dlopen_self_static=no ;;
+    esac
+  else :
+    # compilation failed
+    lt_cv_dlopen_self_static=no
+  fi
+fi
+rm -fr conftest*
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $lt_cv_dlopen_self_static" >&5
+$as_echo "$lt_cv_dlopen_self_static" >&6; }
+    fi
+
+    CPPFLAGS=$save_CPPFLAGS
+    LDFLAGS=$save_LDFLAGS
+    LIBS=$save_LIBS
+    ;;
+  esac
+
+  case $lt_cv_dlopen_self in
+  yes|no) enable_dlopen_self=$lt_cv_dlopen_self ;;
+  *) enable_dlopen_self=unknown ;;
+  esac
+
+  case $lt_cv_dlopen_self_static in
+  yes|no) enable_dlopen_self_static=$lt_cv_dlopen_self_static ;;
+  *) enable_dlopen_self_static=unknown ;;
+  esac
+fi
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+striplib=
+old_striplib=
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stripping libraries is possible" >&5
+$as_echo_n "checking whether stripping libraries is possible... " >&6; }
+if test -n "$STRIP" && $STRIP -V 2>&1 | $GREP "GNU strip" >/dev/null; then
+  test -z "$old_striplib" && old_striplib="$STRIP --strip-debug"
+  test -z "$striplib" && striplib="$STRIP --strip-unneeded"
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5
+$as_echo "yes" >&6; }
+else
+# FIXME - insert some real tests, host_os isn't really good enough
+  case $host_os in
+  darwin*)
+    if test -n "$STRIP"; then
+      striplib="$STRIP -x"
+      old_striplib="$STRIP -S"
+      { $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5
+$as_echo "yes" >&6; }
+    else
+      { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+    fi
+    ;;
+  *)
+    { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+    ;;
+  esac
+fi
+
+
+
+
+
+
+
+
+
+
+
+
+  # Report what library types will actually be built
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking if libtool supports shared libraries" >&5
+$as_echo_n "checking if libtool supports shared libraries... " >&6; }
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $can_build_shared" >&5
+$as_echo "$can_build_shared" >&6; }
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether to build shared libraries" >&5
+$as_echo_n "checking whether to build shared libraries... " >&6; }
+  test no = "$can_build_shared" && enable_shared=no
+
+  # On AIX, shared libraries and static libraries use the same namespace, and
+  # are all built from PIC.
+  case $host_os in
+  aix3*)
+    test yes = "$enable_shared" && enable_static=no
+    if test -n "$RANLIB"; then
+      archive_cmds="$archive_cmds~\$RANLIB \$lib"
+      postinstall_cmds='$RANLIB $lib'
+    fi
+    ;;
+
+  aix[4-9]*)
+    if test ia64 != "$host_cpu"; then
+      case $enable_shared,$with_aix_soname,$aix_use_runtimelinking in
+      yes,aix,yes) ;;                  # shared object as lib.so file only
+      yes,svr4,*) ;;                   # shared object as lib.so archive member only
+      yes,*) enable_static=no ;;       # shared object in lib.a archive as well
+      esac
+    fi
+    ;;
+  esac
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $enable_shared" >&5
+$as_echo "$enable_shared" >&6; }
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether to build static libraries" >&5
+$as_echo_n "checking whether to build static libraries... " >&6; }
+  # Make sure either enable_shared or enable_static is yes.
+  test yes = "$enable_shared" || enable_static=yes
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $enable_static" >&5
+$as_echo "$enable_static" >&6; }
+
+
+
+
+fi
+ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+CC=$lt_save_CC
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+        ac_config_commands="$ac_config_commands libtool"
+
+
+
+
+# Only expand once:
+
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether small structs are returned in registers" >&5
+$as_echo_n "checking whether small structs are returned in registers... " >&6; }
+if ${ffcall_cv_c_struct_return_small+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test "$cross_compiling" = yes; then :
+                          case "$HOST_CPU_C_ABI" in
+          alpha)               ffcall_cv_c_struct_return_small="guessing no" ;;
+          arm | armhf | arm64) ffcall_cv_c_struct_return_small="guessing yes" ;;
+          hppa | hppa64)       ffcall_cv_c_struct_return_small="guessing yes" ;;
+          i386)
+            case "$host_os" in
+              cygwin* | darwin* | mingw*) ffcall_cv_c_struct_return_small="guessing yes" ;;
+              linux* | solaris*)          ffcall_cv_c_struct_return_small="guessing no" ;;
+              *)                          ffcall_cv_c_struct_return_small="guessing no" ;;
+            esac
+            ;;
+          ia64)                ffcall_cv_c_struct_return_small="guessing yes" ;;
+          mips | mipsn32)      ffcall_cv_c_struct_return_small="guessing no" ;;
+          mips64)              ffcall_cv_c_struct_return_small="guessing yes" ;;
+          powerpc | powerpc64) ffcall_cv_c_struct_return_small="guessing no" ;;
+          powerpc64-elfv2)     ffcall_cv_c_struct_return_small="guessing yes" ;;
+          s390 | s390x)        ffcall_cv_c_struct_return_small="guessing no" ;;
+          sparc)               ffcall_cv_c_struct_return_small="guessing no" ;;
+          sparc64)             ffcall_cv_c_struct_return_small="guessing yes" ;;
+          x86_64)              ffcall_cv_c_struct_return_small="guessing yes" ;;
+          *)                   ffcall_cv_c_struct_return_small="guessing no" ;;
+        esac
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <stdlib.h>
+#if defined __MACH__ && defined __APPLE__
+/* Avoid a crash on Mac OS X.  */
+#include <mach/mach.h>
+#include <mach/mach_error.h>
+#include <mach/thread_status.h>
+#include <mach/exception.h>
+#include <mach/task.h>
+#include <pthread.h>
+/* The exception port on which our thread listens.  */
+static mach_port_t our_exception_port;
+/* The main function of the thread listening for exceptions of type
+   EXC_BAD_ACCESS.  */
+static void *
+mach_exception_thread (void *arg)
+{
+  /* Buffer for a message to be received.  */
+  struct {
+    mach_msg_header_t head;
+    mach_msg_body_t msgh_body;
+    char data[1024];
+  } msg;
+  mach_msg_return_t retval;
+  /* Wait for a message on the exception port.  */
+  retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg),
+                     our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
+  if (retval != MACH_MSG_SUCCESS)
+    abort ();
+  exit (1);
+}
+static void
+nocrash_init (void)
+{
+  mach_port_t self = mach_task_self ();
+  /* Allocate a port on which the thread shall listen for exceptions.  */
+  if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port)
+      == KERN_SUCCESS) {
+    /* See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html.  */
+    if (mach_port_insert_right (self, our_exception_port, our_exception_port,
+                                MACH_MSG_TYPE_MAKE_SEND)
+        == KERN_SUCCESS) {
+      /* The exceptions we want to catch.  Only EXC_BAD_ACCESS is interesting
+         for us.  */
+      exception_mask_t mask = EXC_MASK_BAD_ACCESS;
+      /* Create the thread listening on the exception port.  */
+      pthread_attr_t attr;
+      pthread_t thread;
+      if (pthread_attr_init (&attr) == 0
+          && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0
+          && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) {
+        pthread_attr_destroy (&attr);
+        /* Replace the exception port info for these exceptions with our own.
+           Note that we replace the exception port for the entire task, not only
+           for a particular thread.  This has the effect that when our exception
+           port gets the message, the thread specific exception port has already
+           been asked, and we don't need to bother about it.
+           See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html.  */
+        task_set_exception_ports (self, mask, our_exception_port,
+                                  EXCEPTION_DEFAULT, MACHINE_THREAD_STATE);
+      }
+    }
+  }
+}
+#elif defined _WIN32 && ! defined __CYGWIN__
+/* Avoid a crash on native Windows.  */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <winerror.h>
+static LONG WINAPI
+exception_filter (EXCEPTION_POINTERS *ExceptionInfo)
+{
+  switch (ExceptionInfo->ExceptionRecord->ExceptionCode)
+    {
+    case EXCEPTION_ACCESS_VIOLATION:
+    case EXCEPTION_IN_PAGE_ERROR:
+    case EXCEPTION_STACK_OVERFLOW:
+    case EXCEPTION_GUARD_PAGE:
+    case EXCEPTION_PRIV_INSTRUCTION:
+    case EXCEPTION_ILLEGAL_INSTRUCTION:
+    case EXCEPTION_DATATYPE_MISALIGNMENT:
+    case EXCEPTION_ARRAY_BOUNDS_EXCEEDED:
+    case EXCEPTION_NONCONTINUABLE_EXCEPTION:
+      exit (1);
+    }
+  return EXCEPTION_CONTINUE_SEARCH;
+}
+static void
+nocrash_init (void)
+{
+  SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter);
+}
+#else
+/* Avoid a crash on POSIX systems.  */
+#include <signal.h>
+#include <unistd.h>
+/* A POSIX signal handler.  */
+static void
+exception_handler (int sig)
+{
+  _exit (1);
+}
+static void
+nocrash_init (void)
+{
+#ifdef SIGSEGV
+  signal (SIGSEGV, exception_handler);
+#endif
+#ifdef SIGBUS
+  signal (SIGBUS, exception_handler);
+#endif
+}
+#endif
+
+       typedef struct { long x; } foo;
+        long y;
+        foo foofun () { foo f; f.x = y; return f; }
+        long (*fun) () = (long (*) ()) foofun;
+        int main()
+        { nocrash_init();
+          y = 37; if ((*fun)() != 37) return 1;
+          y = 55; if ((*fun)() != 55) return 1;
+          return 0;
+        }
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  ffcall_cv_c_struct_return_small=yes
+else
+  ffcall_cv_c_struct_return_small=no
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_c_struct_return_small" >&5
+$as_echo "$ffcall_cv_c_struct_return_small" >&6; }
+  case "$ffcall_cv_c_struct_return_small" in
+    *yes)
+$as_echo "#define __SMALL_STRUCT_RETURN__ /**/" >>confdefs.h
+ ;;
+    *no) ;;
+  esac
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether floats are returned in integer registers" >&5
+$as_echo_n "checking whether floats are returned in integer registers... " >&6; }
+if ${ffcall_cv_c_float_return_ireg+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test "$cross_compiling" = yes; then :
+                  ffcall_cv_c_float_return_ireg="guessing no"
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <stdlib.h>
+#if defined __MACH__ && defined __APPLE__
+/* Avoid a crash on Mac OS X.  */
+#include <mach/mach.h>
+#include <mach/mach_error.h>
+#include <mach/thread_status.h>
+#include <mach/exception.h>
+#include <mach/task.h>
+#include <pthread.h>
+/* The exception port on which our thread listens.  */
+static mach_port_t our_exception_port;
+/* The main function of the thread listening for exceptions of type
+   EXC_BAD_ACCESS.  */
+static void *
+mach_exception_thread (void *arg)
+{
+  /* Buffer for a message to be received.  */
+  struct {
+    mach_msg_header_t head;
+    mach_msg_body_t msgh_body;
+    char data[1024];
+  } msg;
+  mach_msg_return_t retval;
+  /* Wait for a message on the exception port.  */
+  retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg),
+                     our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
+  if (retval != MACH_MSG_SUCCESS)
+    abort ();
+  exit (1);
+}
+static void
+nocrash_init (void)
+{
+  mach_port_t self = mach_task_self ();
+  /* Allocate a port on which the thread shall listen for exceptions.  */
+  if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port)
+      == KERN_SUCCESS) {
+    /* See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html.  */
+    if (mach_port_insert_right (self, our_exception_port, our_exception_port,
+                                MACH_MSG_TYPE_MAKE_SEND)
+        == KERN_SUCCESS) {
+      /* The exceptions we want to catch.  Only EXC_BAD_ACCESS is interesting
+         for us.  */
+      exception_mask_t mask = EXC_MASK_BAD_ACCESS;
+      /* Create the thread listening on the exception port.  */
+      pthread_attr_t attr;
+      pthread_t thread;
+      if (pthread_attr_init (&attr) == 0
+          && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0
+          && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) {
+        pthread_attr_destroy (&attr);
+        /* Replace the exception port info for these exceptions with our own.
+           Note that we replace the exception port for the entire task, not only
+           for a particular thread.  This has the effect that when our exception
+           port gets the message, the thread specific exception port has already
+           been asked, and we don't need to bother about it.
+           See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html.  */
+        task_set_exception_ports (self, mask, our_exception_port,
+                                  EXCEPTION_DEFAULT, MACHINE_THREAD_STATE);
+      }
+    }
+  }
+}
+#elif defined _WIN32 && ! defined __CYGWIN__
+/* Avoid a crash on native Windows.  */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <winerror.h>
+static LONG WINAPI
+exception_filter (EXCEPTION_POINTERS *ExceptionInfo)
+{
+  switch (ExceptionInfo->ExceptionRecord->ExceptionCode)
+    {
+    case EXCEPTION_ACCESS_VIOLATION:
+    case EXCEPTION_IN_PAGE_ERROR:
+    case EXCEPTION_STACK_OVERFLOW:
+    case EXCEPTION_GUARD_PAGE:
+    case EXCEPTION_PRIV_INSTRUCTION:
+    case EXCEPTION_ILLEGAL_INSTRUCTION:
+    case EXCEPTION_DATATYPE_MISALIGNMENT:
+    case EXCEPTION_ARRAY_BOUNDS_EXCEEDED:
+    case EXCEPTION_NONCONTINUABLE_EXCEPTION:
+      exit (1);
+    }
+  return EXCEPTION_CONTINUE_SEARCH;
+}
+static void
+nocrash_init (void)
+{
+  SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter);
+}
+#else
+/* Avoid a crash on POSIX systems.  */
+#include <signal.h>
+#include <unistd.h>
+/* A POSIX signal handler.  */
+static void
+exception_handler (int sig)
+{
+  _exit (1);
+}
+static void
+nocrash_init (void)
+{
+#ifdef SIGSEGV
+  signal (SIGSEGV, exception_handler);
+#endif
+#ifdef SIGBUS
+  signal (SIGBUS, exception_handler);
+#endif
+}
+#endif
+
+       float x = (float)1.2;
+        float y = (float)1.3;
+        float fun () { return x*y; }
+        int main()
+        { nocrash_init();
+         {int val = (* (int (*) ()) fun) ();
+          return !(val == 0x3FC7AE15 || val == 0x15AEC73F);
+        }}
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  ffcall_cv_c_float_return_ireg=yes
+else
+  ffcall_cv_c_float_return_ireg=no
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_c_float_return_ireg" >&5
+$as_echo "$ffcall_cv_c_float_return_ireg" >&6; }
+  case "$ffcall_cv_c_float_return_ireg" in
+    *yes)
+$as_echo "#define __IREG_FLOAT_RETURN__ /**/" >>confdefs.h
+ ;;
+    *no) ;;
+  esac
+
+
+for ac_header in unistd_h
+do :
+  ac_fn_c_check_header_mongrel "$LINENO" "unistd_h" "ac_cv_header_unistd_h" "$ac_includes_default"
+if test "x$ac_cv_header_unistd_h" = xyes; then :
+  cat >>confdefs.h <<_ACEOF
+#define HAVE_UNISTD_H 1
+_ACEOF
+
+fi
+
+done
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for ANSI C header files" >&5
+$as_echo_n "checking for ANSI C header files... " >&6; }
+if ${ac_cv_header_stdc+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <stdlib.h>
+#include <stdarg.h>
+#include <string.h>
+#include <float.h>
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  ac_cv_header_stdc=yes
+else
+  ac_cv_header_stdc=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+
+if test $ac_cv_header_stdc = yes; then
+  # SunOS 4.x string.h does not declare mem*, contrary to ANSI.
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <string.h>
+
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "memchr" >/dev/null 2>&1; then :
+
+else
+  ac_cv_header_stdc=no
+fi
+rm -f conftest*
+
+fi
+
+if test $ac_cv_header_stdc = yes; then
+  # ISC 2.0.2 stdlib.h does not declare free, contrary to ANSI.
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <stdlib.h>
+
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "free" >/dev/null 2>&1; then :
+
+else
+  ac_cv_header_stdc=no
+fi
+rm -f conftest*
+
+fi
+
+if test $ac_cv_header_stdc = yes; then
+  # /bin/cc in Irix-4.0.5 gets non-ANSI ctype macros unless using -ansi.
+  if test "$cross_compiling" = yes; then :
+  :
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <ctype.h>
+#include <stdlib.h>
+#if ((' ' & 0x0FF) == 0x020)
+# define ISLOWER(c) ('a' <= (c) && (c) <= 'z')
+# define TOUPPER(c) (ISLOWER(c) ? 'A' + ((c) - 'a') : (c))
+#else
+# define ISLOWER(c) \
+                  (('a' <= (c) && (c) <= 'i') \
+                    || ('j' <= (c) && (c) <= 'r') \
+                    || ('s' <= (c) && (c) <= 'z'))
+# define TOUPPER(c) (ISLOWER(c) ? ((c) | 0x40) : (c))
+#endif
+
+#define XOR(e, f) (((e) && !(f)) || (!(e) && (f)))
+int
+main ()
+{
+  int i;
+  for (i = 0; i < 256; i++)
+    if (XOR (islower (i), ISLOWER (i))
+       || toupper (i) != TOUPPER (i))
+      return 2;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+
+else
+  ac_cv_header_stdc=no
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_header_stdc" >&5
+$as_echo "$ac_cv_header_stdc" >&6; }
+if test $ac_cv_header_stdc = yes; then
+
+$as_echo "#define STDC_HEADERS 1" >>confdefs.h
+
+fi
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for getpagesize" >&5
+$as_echo_n "checking for getpagesize... " >&6; }
+if ${cl_cv_func_getpagesize+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#ifdef HAVE_UNISTD_H
+      #include <sys/types.h>
+      #include <unistd.h>
+     #endif
+
+int
+main ()
+{
+getpagesize();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  cl_cv_func_getpagesize=yes
+else
+  cl_cv_func_getpagesize=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $cl_cv_func_getpagesize" >&5
+$as_echo "$cl_cv_func_getpagesize" >&6; }
+  if test $cl_cv_func_getpagesize = yes; then :
+
+
+$as_echo "#define HAVE_GETPAGESIZE /**/" >>confdefs.h
+
+      have_getpagesize=1
+
+fi
+
+
+  if test -n "$have_getpagesize"; then
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for getpagesize declaration" >&5
+$as_echo_n "checking for getpagesize declaration... " >&6; }
+  if ${cl_cv_proto_getpagesize+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <stdlib.h>
+          #ifdef HAVE_UNISTD_H
+           #include <unistd.h>
+          #endif
+
+extern
+#ifdef __cplusplus
+"C"
+#endif
+
+int getpagesize();
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  cl_cv_proto_getpagesize_ret="int"
+else
+  cl_cv_proto_getpagesize_ret="size_t"
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+
+
+    cl_cv_proto_getpagesize="extern $cl_cv_proto_getpagesize_ret getpagesize (void);"
+fi
+
+  cl_cv_proto_getpagesize=`echo "$cl_cv_proto_getpagesize" | tr -s ' ' | sed -e 's/( /(/'`
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: ${ac_t:-
+         }$cl_cv_proto_getpagesize" >&5
+$as_echo "${ac_t:-
+         }$cl_cv_proto_getpagesize" >&6; }
+
+
+cat >>confdefs.h <<_ACEOF
+#define RETGETPAGESIZETYPE $cl_cv_proto_getpagesize_ret
+_ACEOF
+
+  else
+            for ac_header in sys/param.h
+do :
+  ac_fn_c_check_header_mongrel "$LINENO" "sys/param.h" "ac_cv_header_sys_param_h" "$ac_includes_default"
+if test "x$ac_cv_header_sys_param_h" = xyes; then :
+  cat >>confdefs.h <<_ACEOF
+#define HAVE_SYS_PARAM_H 1
+_ACEOF
+
+fi
+
+done
+
+  fi
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for vm_allocate" >&5
+$as_echo_n "checking for vm_allocate... " >&6; }
+if ${cl_cv_func_vm+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+int
+main ()
+{
+vm_allocate(); task_self();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  cl_cv_func_vm=yes
+else
+  cl_cv_func_vm=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $cl_cv_func_vm" >&5
+$as_echo "$cl_cv_func_vm" >&6; }
+  if test $cl_cv_func_vm = yes; then :
+
+$as_echo "#define HAVE_MACH_VM /**/" >>confdefs.h
+
+fi
+
+
+
+
+
+  ac_fn_c_check_header_mongrel "$LINENO" "sys/mman.h" "ac_cv_header_sys_mman_h" "$ac_includes_default"
+if test "x$ac_cv_header_sys_mman_h" = xyes; then :
+
+else
+  no_mmap=1
+fi
+
+
+  if test -z "$no_mmap"; then
+    ac_fn_c_check_func "$LINENO" "mmap" "ac_cv_func_mmap"
+if test "x$ac_cv_func_mmap" = xyes; then :
+
+else
+  no_mmap=1
+fi
+
+    if test -z "$no_mmap"; then
+
+$as_echo "#define HAVE_MMAP /**/" >>confdefs.h
+
+      { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working mmap" >&5
+$as_echo_n "checking for working mmap... " >&6; }
+if ${ffcall_cv_func_mmap_works+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test $cross_compiling = no; then
+           mmap_prog_1='
+             #include <stdlib.h>
+             #ifdef HAVE_UNISTD_H
+              #include <unistd.h>
+             #endif
+             #include <fcntl.h>
+             #include <sys/types.h>
+             #include <sys/mman.h>
+             int main ()
+             {
+           '
+           mmap_prog_2='
+               if (mmap(NULL,0x100000,PROT_READ|PROT_WRITE,flags,fd,0) == (void*)-1)
+                 exit(1);
+               exit(0);
+             }
+           '
+           if test "$cross_compiling" = yes; then :
+                :
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <stdlib.h>
+#if defined __MACH__ && defined __APPLE__
+/* Avoid a crash on Mac OS X.  */
+#include <mach/mach.h>
+#include <mach/mach_error.h>
+#include <mach/thread_status.h>
+#include <mach/exception.h>
+#include <mach/task.h>
+#include <pthread.h>
+/* The exception port on which our thread listens.  */
+static mach_port_t our_exception_port;
+/* The main function of the thread listening for exceptions of type
+   EXC_BAD_ACCESS.  */
+static void *
+mach_exception_thread (void *arg)
+{
+  /* Buffer for a message to be received.  */
+  struct {
+    mach_msg_header_t head;
+    mach_msg_body_t msgh_body;
+    char data[1024];
+  } msg;
+  mach_msg_return_t retval;
+  /* Wait for a message on the exception port.  */
+  retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg),
+                     our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
+  if (retval != MACH_MSG_SUCCESS)
+    abort ();
+  exit (1);
+}
+static void
+nocrash_init (void)
+{
+  mach_port_t self = mach_task_self ();
+  /* Allocate a port on which the thread shall listen for exceptions.  */
+  if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port)
+      == KERN_SUCCESS) {
+    /* See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html.  */
+    if (mach_port_insert_right (self, our_exception_port, our_exception_port,
+                                MACH_MSG_TYPE_MAKE_SEND)
+        == KERN_SUCCESS) {
+      /* The exceptions we want to catch.  Only EXC_BAD_ACCESS is interesting
+         for us.  */
+      exception_mask_t mask = EXC_MASK_BAD_ACCESS;
+      /* Create the thread listening on the exception port.  */
+      pthread_attr_t attr;
+      pthread_t thread;
+      if (pthread_attr_init (&attr) == 0
+          && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0
+          && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) {
+        pthread_attr_destroy (&attr);
+        /* Replace the exception port info for these exceptions with our own.
+           Note that we replace the exception port for the entire task, not only
+           for a particular thread.  This has the effect that when our exception
+           port gets the message, the thread specific exception port has already
+           been asked, and we don't need to bother about it.
+           See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html.  */
+        task_set_exception_ports (self, mask, our_exception_port,
+                                  EXCEPTION_DEFAULT, MACHINE_THREAD_STATE);
+      }
+    }
+  }
+}
+#elif defined _WIN32 && ! defined __CYGWIN__
+/* Avoid a crash on native Windows.  */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <winerror.h>
+static LONG WINAPI
+exception_filter (EXCEPTION_POINTERS *ExceptionInfo)
+{
+  switch (ExceptionInfo->ExceptionRecord->ExceptionCode)
+    {
+    case EXCEPTION_ACCESS_VIOLATION:
+    case EXCEPTION_IN_PAGE_ERROR:
+    case EXCEPTION_STACK_OVERFLOW:
+    case EXCEPTION_GUARD_PAGE:
+    case EXCEPTION_PRIV_INSTRUCTION:
+    case EXCEPTION_ILLEGAL_INSTRUCTION:
+    case EXCEPTION_DATATYPE_MISALIGNMENT:
+    case EXCEPTION_ARRAY_BOUNDS_EXCEEDED:
+    case EXCEPTION_NONCONTINUABLE_EXCEPTION:
+      exit (1);
+    }
+  return EXCEPTION_CONTINUE_SEARCH;
+}
+static void
+nocrash_init (void)
+{
+  SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter);
+}
+#else
+/* Avoid a crash on POSIX systems.  */
+#include <signal.h>
+#include <unistd.h>
+/* A POSIX signal handler.  */
+static void
+exception_handler (int sig)
+{
+  _exit (1);
+}
+static void
+nocrash_init (void)
+{
+#ifdef SIGSEGV
+  signal (SIGSEGV, exception_handler);
+#endif
+#ifdef SIGBUS
+  signal (SIGBUS, exception_handler);
+#endif
+}
+#endif
+
+             $mmap_prog_1
+              int flags = MAP_ANON | MAP_PRIVATE;
+              int fd = -1;
+              nocrash_init();
+              $mmap_prog_2
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  have_mmap_anon=1
+              ffcall_cv_func_mmap_anon=yes
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+           if test "$cross_compiling" = yes; then :
+                :
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <stdlib.h>
+#if defined __MACH__ && defined __APPLE__
+/* Avoid a crash on Mac OS X.  */
+#include <mach/mach.h>
+#include <mach/mach_error.h>
+#include <mach/thread_status.h>
+#include <mach/exception.h>
+#include <mach/task.h>
+#include <pthread.h>
+/* The exception port on which our thread listens.  */
+static mach_port_t our_exception_port;
+/* The main function of the thread listening for exceptions of type
+   EXC_BAD_ACCESS.  */
+static void *
+mach_exception_thread (void *arg)
+{
+  /* Buffer for a message to be received.  */
+  struct {
+    mach_msg_header_t head;
+    mach_msg_body_t msgh_body;
+    char data[1024];
+  } msg;
+  mach_msg_return_t retval;
+  /* Wait for a message on the exception port.  */
+  retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg),
+                     our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
+  if (retval != MACH_MSG_SUCCESS)
+    abort ();
+  exit (1);
+}
+static void
+nocrash_init (void)
+{
+  mach_port_t self = mach_task_self ();
+  /* Allocate a port on which the thread shall listen for exceptions.  */
+  if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port)
+      == KERN_SUCCESS) {
+    /* See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html.  */
+    if (mach_port_insert_right (self, our_exception_port, our_exception_port,
+                                MACH_MSG_TYPE_MAKE_SEND)
+        == KERN_SUCCESS) {
+      /* The exceptions we want to catch.  Only EXC_BAD_ACCESS is interesting
+         for us.  */
+      exception_mask_t mask = EXC_MASK_BAD_ACCESS;
+      /* Create the thread listening on the exception port.  */
+      pthread_attr_t attr;
+      pthread_t thread;
+      if (pthread_attr_init (&attr) == 0
+          && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0
+          && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) {
+        pthread_attr_destroy (&attr);
+        /* Replace the exception port info for these exceptions with our own.
+           Note that we replace the exception port for the entire task, not only
+           for a particular thread.  This has the effect that when our exception
+           port gets the message, the thread specific exception port has already
+           been asked, and we don't need to bother about it.
+           See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html.  */
+        task_set_exception_ports (self, mask, our_exception_port,
+                                  EXCEPTION_DEFAULT, MACHINE_THREAD_STATE);
+      }
+    }
+  }
+}
+#elif defined _WIN32 && ! defined __CYGWIN__
+/* Avoid a crash on native Windows.  */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <winerror.h>
+static LONG WINAPI
+exception_filter (EXCEPTION_POINTERS *ExceptionInfo)
+{
+  switch (ExceptionInfo->ExceptionRecord->ExceptionCode)
+    {
+    case EXCEPTION_ACCESS_VIOLATION:
+    case EXCEPTION_IN_PAGE_ERROR:
+    case EXCEPTION_STACK_OVERFLOW:
+    case EXCEPTION_GUARD_PAGE:
+    case EXCEPTION_PRIV_INSTRUCTION:
+    case EXCEPTION_ILLEGAL_INSTRUCTION:
+    case EXCEPTION_DATATYPE_MISALIGNMENT:
+    case EXCEPTION_ARRAY_BOUNDS_EXCEEDED:
+    case EXCEPTION_NONCONTINUABLE_EXCEPTION:
+      exit (1);
+    }
+  return EXCEPTION_CONTINUE_SEARCH;
+}
+static void
+nocrash_init (void)
+{
+  SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter);
+}
+#else
+/* Avoid a crash on POSIX systems.  */
+#include <signal.h>
+#include <unistd.h>
+/* A POSIX signal handler.  */
+static void
+exception_handler (int sig)
+{
+  _exit (1);
+}
+static void
+nocrash_init (void)
+{
+#ifdef SIGSEGV
+  signal (SIGSEGV, exception_handler);
+#endif
+#ifdef SIGBUS
+  signal (SIGBUS, exception_handler);
+#endif
+}
+#endif
+
+             $mmap_prog_1
+              int flags = MAP_ANONYMOUS | MAP_PRIVATE;
+              int fd = -1;
+              nocrash_init();
+              $mmap_prog_2
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  have_mmap_anon=1
+              ffcall_cv_func_mmap_anonymous=yes
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+           if test "$cross_compiling" = yes; then :
+                :
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <stdlib.h>
+#if defined __MACH__ && defined __APPLE__
+/* Avoid a crash on Mac OS X.  */
+#include <mach/mach.h>
+#include <mach/mach_error.h>
+#include <mach/thread_status.h>
+#include <mach/exception.h>
+#include <mach/task.h>
+#include <pthread.h>
+/* The exception port on which our thread listens.  */
+static mach_port_t our_exception_port;
+/* The main function of the thread listening for exceptions of type
+   EXC_BAD_ACCESS.  */
+static void *
+mach_exception_thread (void *arg)
+{
+  /* Buffer for a message to be received.  */
+  struct {
+    mach_msg_header_t head;
+    mach_msg_body_t msgh_body;
+    char data[1024];
+  } msg;
+  mach_msg_return_t retval;
+  /* Wait for a message on the exception port.  */
+  retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg),
+                     our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
+  if (retval != MACH_MSG_SUCCESS)
+    abort ();
+  exit (1);
+}
+static void
+nocrash_init (void)
+{
+  mach_port_t self = mach_task_self ();
+  /* Allocate a port on which the thread shall listen for exceptions.  */
+  if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port)
+      == KERN_SUCCESS) {
+    /* See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html.  */
+    if (mach_port_insert_right (self, our_exception_port, our_exception_port,
+                                MACH_MSG_TYPE_MAKE_SEND)
+        == KERN_SUCCESS) {
+      /* The exceptions we want to catch.  Only EXC_BAD_ACCESS is interesting
+         for us.  */
+      exception_mask_t mask = EXC_MASK_BAD_ACCESS;
+      /* Create the thread listening on the exception port.  */
+      pthread_attr_t attr;
+      pthread_t thread;
+      if (pthread_attr_init (&attr) == 0
+          && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0
+          && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) {
+        pthread_attr_destroy (&attr);
+        /* Replace the exception port info for these exceptions with our own.
+           Note that we replace the exception port for the entire task, not only
+           for a particular thread.  This has the effect that when our exception
+           port gets the message, the thread specific exception port has already
+           been asked, and we don't need to bother about it.
+           See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html.  */
+        task_set_exception_ports (self, mask, our_exception_port,
+                                  EXCEPTION_DEFAULT, MACHINE_THREAD_STATE);
+      }
+    }
+  }
+}
+#elif defined _WIN32 && ! defined __CYGWIN__
+/* Avoid a crash on native Windows.  */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <winerror.h>
+static LONG WINAPI
+exception_filter (EXCEPTION_POINTERS *ExceptionInfo)
+{
+  switch (ExceptionInfo->ExceptionRecord->ExceptionCode)
+    {
+    case EXCEPTION_ACCESS_VIOLATION:
+    case EXCEPTION_IN_PAGE_ERROR:
+    case EXCEPTION_STACK_OVERFLOW:
+    case EXCEPTION_GUARD_PAGE:
+    case EXCEPTION_PRIV_INSTRUCTION:
+    case EXCEPTION_ILLEGAL_INSTRUCTION:
+    case EXCEPTION_DATATYPE_MISALIGNMENT:
+    case EXCEPTION_ARRAY_BOUNDS_EXCEEDED:
+    case EXCEPTION_NONCONTINUABLE_EXCEPTION:
+      exit (1);
+    }
+  return EXCEPTION_CONTINUE_SEARCH;
+}
+static void
+nocrash_init (void)
+{
+  SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter);
+}
+#else
+/* Avoid a crash on POSIX systems.  */
+#include <signal.h>
+#include <unistd.h>
+/* A POSIX signal handler.  */
+static void
+exception_handler (int sig)
+{
+  _exit (1);
+}
+static void
+nocrash_init (void)
+{
+#ifdef SIGSEGV
+  signal (SIGSEGV, exception_handler);
+#endif
+#ifdef SIGBUS
+  signal (SIGBUS, exception_handler);
+#endif
+}
+#endif
+
+             $mmap_prog_1
+              #ifndef MAP_FILE
+               #define MAP_FILE 0
+              #endif
+              int flags = MAP_FILE | MAP_PRIVATE;
+              int fd = open("/dev/zero",O_RDONLY,0666);
+              if (fd<0)
+                exit(1);
+              nocrash_init();
+              $mmap_prog_2
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  have_mmap_devzero=1
+              ffcall_cv_func_mmap_devzero=yes
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+           if test -n "$have_mmap_anon" -o -n "$have_mmap_devzero"; then
+             ffcall_cv_func_mmap_works=yes
+           else
+             ffcall_cv_func_mmap_works=no
+           fi
+         else
+                                 case "$host_os" in
+             aix* | cygwin* | darwin* | hpux* | irix* | linux* | solaris*)
+               ffcall_cv_func_mmap_works="guessing yes" ;;
+             *)
+               ffcall_cv_func_mmap_works="guessing no" ;;
+           esac
+           case "$host_os" in
+             aix* | cygwin* | darwin* | linux* | solaris*)
+               ffcall_cv_func_mmap_anon="guessing yes" ;;
+             *)
+               ffcall_cv_func_mmap_anon="guessing no" ;;
+           esac
+           case "$host_os" in
+             aix* | cygwin* | hpux* | linux* | solaris*)
+               ffcall_cv_func_mmap_anonymous="guessing yes" ;;
+             *)
+               ffcall_cv_func_mmap_anonymous="guessing no" ;;
+           esac
+           case "$host_os" in
+             aix* | cygwin* | hpux* | irix* | linux* | solaris*)
+               ffcall_cv_func_mmap_devzero="guessing yes" ;;
+             *)
+               ffcall_cv_func_mmap_devzero="guessing no" ;;
+           esac
+         fi
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_func_mmap_works" >&5
+$as_echo "$ffcall_cv_func_mmap_works" >&6; }
+      case "$ffcall_cv_func_mmap_anon" in
+        *yes)
+
+$as_echo "#define HAVE_MMAP_ANON /**/" >>confdefs.h
+
+          ;;
+      esac
+      case "$ffcall_cv_func_mmap_anonymous" in
+        *yes)
+
+$as_echo "#define HAVE_MMAP_ANONYMOUS /**/" >>confdefs.h
+
+          ;;
+      esac
+      case "$ffcall_cv_func_mmap_devzero" in
+        *yes)
+
+$as_echo "#define HAVE_MMAP_DEVZERO /**/" >>confdefs.h
+
+          ;;
+      esac
+    fi
+  fi
+
+
+
+
+
+  for ac_func in mprotect
+do :
+  ac_fn_c_check_func "$LINENO" "mprotect" "ac_cv_func_mprotect"
+if test "x$ac_cv_func_mprotect" = xyes; then :
+  cat >>confdefs.h <<_ACEOF
+#define HAVE_MPROTECT 1
+_ACEOF
+
+fi
+done
+
+  if test $ac_cv_func_mprotect = yes; then
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working mprotect" >&5
+$as_echo_n "checking for working mprotect... " >&6; }
+if ${cl_cv_func_mprotect_works+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test $cross_compiling = no; then
+         mprotect_prog='
+           #include <sys/types.h>
+           /* declare malloc() */
+           #include <stdlib.h>
+           #ifdef HAVE_UNISTD_H
+            #include <unistd.h>
+           #endif
+           /* declare getpagesize() and mprotect() */
+           #include <sys/mman.h>
+           #ifndef HAVE_GETPAGESIZE
+            #include <sys/param.h>
+            #define getpagesize() PAGESIZE
+           #else
+            extern
+#ifdef __cplusplus
+"C"
+#endif
+
+            RETGETPAGESIZETYPE getpagesize (void);
+           #endif
+           char foo;
+           int main ()
+           {
+             unsigned long pagesize = getpagesize();
+           #define page_align(address)  (char*)((unsigned long)(address) & -pagesize)
+         '
+         if test "$cross_compiling" = yes; then :
+              no_mprotect=1
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+$mprotect_prog
+              if ((pagesize-1) & pagesize) exit(1);
+              exit(0);
+            }
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+
+else
+  no_mprotect=1
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+         mprotect_prog="$mprotect_prog"'
+           char* area = (char*) malloc(6*pagesize);
+           char* fault_address = area + pagesize*7/2;
+         '
+         if test -z "$no_mprotect"; then
+           if test "$cross_compiling" = yes; then :
+                :
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <stdlib.h>
+#if defined __MACH__ && defined __APPLE__
+/* Avoid a crash on Mac OS X.  */
+#include <mach/mach.h>
+#include <mach/mach_error.h>
+#include <mach/thread_status.h>
+#include <mach/exception.h>
+#include <mach/task.h>
+#include <pthread.h>
+/* The exception port on which our thread listens.  */
+static mach_port_t our_exception_port;
+/* The main function of the thread listening for exceptions of type
+   EXC_BAD_ACCESS.  */
+static void *
+mach_exception_thread (void *arg)
+{
+  /* Buffer for a message to be received.  */
+  struct {
+    mach_msg_header_t head;
+    mach_msg_body_t msgh_body;
+    char data[1024];
+  } msg;
+  mach_msg_return_t retval;
+  /* Wait for a message on the exception port.  */
+  retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg),
+                     our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
+  if (retval != MACH_MSG_SUCCESS)
+    abort ();
+  exit (1);
+}
+static void
+nocrash_init (void)
+{
+  mach_port_t self = mach_task_self ();
+  /* Allocate a port on which the thread shall listen for exceptions.  */
+  if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port)
+      == KERN_SUCCESS) {
+    /* See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html.  */
+    if (mach_port_insert_right (self, our_exception_port, our_exception_port,
+                                MACH_MSG_TYPE_MAKE_SEND)
+        == KERN_SUCCESS) {
+      /* The exceptions we want to catch.  Only EXC_BAD_ACCESS is interesting
+         for us.  */
+      exception_mask_t mask = EXC_MASK_BAD_ACCESS;
+      /* Create the thread listening on the exception port.  */
+      pthread_attr_t attr;
+      pthread_t thread;
+      if (pthread_attr_init (&attr) == 0
+          && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0
+          && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) {
+        pthread_attr_destroy (&attr);
+        /* Replace the exception port info for these exceptions with our own.
+           Note that we replace the exception port for the entire task, not only
+           for a particular thread.  This has the effect that when our exception
+           port gets the message, the thread specific exception port has already
+           been asked, and we don't need to bother about it.
+           See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html.  */
+        task_set_exception_ports (self, mask, our_exception_port,
+                                  EXCEPTION_DEFAULT, MACHINE_THREAD_STATE);
+      }
+    }
+  }
+}
+#elif defined _WIN32 && ! defined __CYGWIN__
+/* Avoid a crash on native Windows.  */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <winerror.h>
+static LONG WINAPI
+exception_filter (EXCEPTION_POINTERS *ExceptionInfo)
+{
+  switch (ExceptionInfo->ExceptionRecord->ExceptionCode)
+    {
+    case EXCEPTION_ACCESS_VIOLATION:
+    case EXCEPTION_IN_PAGE_ERROR:
+    case EXCEPTION_STACK_OVERFLOW:
+    case EXCEPTION_GUARD_PAGE:
+    case EXCEPTION_PRIV_INSTRUCTION:
+    case EXCEPTION_ILLEGAL_INSTRUCTION:
+    case EXCEPTION_DATATYPE_MISALIGNMENT:
+    case EXCEPTION_ARRAY_BOUNDS_EXCEEDED:
+    case EXCEPTION_NONCONTINUABLE_EXCEPTION:
+      exit (1);
+    }
+  return EXCEPTION_CONTINUE_SEARCH;
+}
+static void
+nocrash_init (void)
+{
+  SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter);
+}
+#else
+/* Avoid a crash on POSIX systems.  */
+#include <signal.h>
+#include <unistd.h>
+/* A POSIX signal handler.  */
+static void
+exception_handler (int sig)
+{
+  _exit (1);
+}
+static void
+nocrash_init (void)
+{
+#ifdef SIGSEGV
+  signal (SIGSEGV, exception_handler);
+#endif
+#ifdef SIGBUS
+  signal (SIGBUS, exception_handler);
+#endif
+}
+#endif
+
+             $mprotect_prog
+                nocrash_init();
+                if (mprotect(page_align(fault_address),pagesize,PROT_NONE) < 0)
+                  exit(0);
+                foo = *fault_address; /* this should cause an exception or signal */
+                exit(0);
+              }
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  no_mprotect=1
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+         fi
+         if test -z "$no_mprotect"; then
+           if test "$cross_compiling" = yes; then :
+                :
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <stdlib.h>
+#if defined __MACH__ && defined __APPLE__
+/* Avoid a crash on Mac OS X.  */
+#include <mach/mach.h>
+#include <mach/mach_error.h>
+#include <mach/thread_status.h>
+#include <mach/exception.h>
+#include <mach/task.h>
+#include <pthread.h>
+/* The exception port on which our thread listens.  */
+static mach_port_t our_exception_port;
+/* The main function of the thread listening for exceptions of type
+   EXC_BAD_ACCESS.  */
+static void *
+mach_exception_thread (void *arg)
+{
+  /* Buffer for a message to be received.  */
+  struct {
+    mach_msg_header_t head;
+    mach_msg_body_t msgh_body;
+    char data[1024];
+  } msg;
+  mach_msg_return_t retval;
+  /* Wait for a message on the exception port.  */
+  retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg),
+                     our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
+  if (retval != MACH_MSG_SUCCESS)
+    abort ();
+  exit (1);
+}
+static void
+nocrash_init (void)
+{
+  mach_port_t self = mach_task_self ();
+  /* Allocate a port on which the thread shall listen for exceptions.  */
+  if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port)
+      == KERN_SUCCESS) {
+    /* See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html.  */
+    if (mach_port_insert_right (self, our_exception_port, our_exception_port,
+                                MACH_MSG_TYPE_MAKE_SEND)
+        == KERN_SUCCESS) {
+      /* The exceptions we want to catch.  Only EXC_BAD_ACCESS is interesting
+         for us.  */
+      exception_mask_t mask = EXC_MASK_BAD_ACCESS;
+      /* Create the thread listening on the exception port.  */
+      pthread_attr_t attr;
+      pthread_t thread;
+      if (pthread_attr_init (&attr) == 0
+          && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0
+          && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) {
+        pthread_attr_destroy (&attr);
+        /* Replace the exception port info for these exceptions with our own.
+           Note that we replace the exception port for the entire task, not only
+           for a particular thread.  This has the effect that when our exception
+           port gets the message, the thread specific exception port has already
+           been asked, and we don't need to bother about it.
+           See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html.  */
+        task_set_exception_ports (self, mask, our_exception_port,
+                                  EXCEPTION_DEFAULT, MACHINE_THREAD_STATE);
+      }
+    }
+  }
+}
+#elif defined _WIN32 && ! defined __CYGWIN__
+/* Avoid a crash on native Windows.  */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <winerror.h>
+static LONG WINAPI
+exception_filter (EXCEPTION_POINTERS *ExceptionInfo)
+{
+  switch (ExceptionInfo->ExceptionRecord->ExceptionCode)
+    {
+    case EXCEPTION_ACCESS_VIOLATION:
+    case EXCEPTION_IN_PAGE_ERROR:
+    case EXCEPTION_STACK_OVERFLOW:
+    case EXCEPTION_GUARD_PAGE:
+    case EXCEPTION_PRIV_INSTRUCTION:
+    case EXCEPTION_ILLEGAL_INSTRUCTION:
+    case EXCEPTION_DATATYPE_MISALIGNMENT:
+    case EXCEPTION_ARRAY_BOUNDS_EXCEEDED:
+    case EXCEPTION_NONCONTINUABLE_EXCEPTION:
+      exit (1);
+    }
+  return EXCEPTION_CONTINUE_SEARCH;
+}
+static void
+nocrash_init (void)
+{
+  SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter);
+}
+#else
+/* Avoid a crash on POSIX systems.  */
+#include <signal.h>
+#include <unistd.h>
+/* A POSIX signal handler.  */
+static void
+exception_handler (int sig)
+{
+  _exit (1);
+}
+static void
+nocrash_init (void)
+{
+#ifdef SIGSEGV
+  signal (SIGSEGV, exception_handler);
+#endif
+#ifdef SIGBUS
+  signal (SIGBUS, exception_handler);
+#endif
+}
+#endif
+
+             $mprotect_prog
+                nocrash_init();
+                if (mprotect(page_align(fault_address),pagesize,PROT_NONE) < 0)
+                  exit(0);
+                *fault_address = 'z'; /* this should cause an exception or signal */
+                exit(0);
+              }
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  no_mprotect=1
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+         fi
+         if test -z "$no_mprotect"; then
+           if test "$cross_compiling" = yes; then :
+                :
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <stdlib.h>
+#if defined __MACH__ && defined __APPLE__
+/* Avoid a crash on Mac OS X.  */
+#include <mach/mach.h>
+#include <mach/mach_error.h>
+#include <mach/thread_status.h>
+#include <mach/exception.h>
+#include <mach/task.h>
+#include <pthread.h>
+/* The exception port on which our thread listens.  */
+static mach_port_t our_exception_port;
+/* The main function of the thread listening for exceptions of type
+   EXC_BAD_ACCESS.  */
+static void *
+mach_exception_thread (void *arg)
+{
+  /* Buffer for a message to be received.  */
+  struct {
+    mach_msg_header_t head;
+    mach_msg_body_t msgh_body;
+    char data[1024];
+  } msg;
+  mach_msg_return_t retval;
+  /* Wait for a message on the exception port.  */
+  retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg),
+                     our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
+  if (retval != MACH_MSG_SUCCESS)
+    abort ();
+  exit (1);
+}
+static void
+nocrash_init (void)
+{
+  mach_port_t self = mach_task_self ();
+  /* Allocate a port on which the thread shall listen for exceptions.  */
+  if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port)
+      == KERN_SUCCESS) {
+    /* See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html.  */
+    if (mach_port_insert_right (self, our_exception_port, our_exception_port,
+                                MACH_MSG_TYPE_MAKE_SEND)
+        == KERN_SUCCESS) {
+      /* The exceptions we want to catch.  Only EXC_BAD_ACCESS is interesting
+         for us.  */
+      exception_mask_t mask = EXC_MASK_BAD_ACCESS;
+      /* Create the thread listening on the exception port.  */
+      pthread_attr_t attr;
+      pthread_t thread;
+      if (pthread_attr_init (&attr) == 0
+          && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0
+          && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) {
+        pthread_attr_destroy (&attr);
+        /* Replace the exception port info for these exceptions with our own.
+           Note that we replace the exception port for the entire task, not only
+           for a particular thread.  This has the effect that when our exception
+           port gets the message, the thread specific exception port has already
+           been asked, and we don't need to bother about it.
+           See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html.  */
+        task_set_exception_ports (self, mask, our_exception_port,
+                                  EXCEPTION_DEFAULT, MACHINE_THREAD_STATE);
+      }
+    }
+  }
+}
+#elif defined _WIN32 && ! defined __CYGWIN__
+/* Avoid a crash on native Windows.  */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <winerror.h>
+static LONG WINAPI
+exception_filter (EXCEPTION_POINTERS *ExceptionInfo)
+{
+  switch (ExceptionInfo->ExceptionRecord->ExceptionCode)
+    {
+    case EXCEPTION_ACCESS_VIOLATION:
+    case EXCEPTION_IN_PAGE_ERROR:
+    case EXCEPTION_STACK_OVERFLOW:
+    case EXCEPTION_GUARD_PAGE:
+    case EXCEPTION_PRIV_INSTRUCTION:
+    case EXCEPTION_ILLEGAL_INSTRUCTION:
+    case EXCEPTION_DATATYPE_MISALIGNMENT:
+    case EXCEPTION_ARRAY_BOUNDS_EXCEEDED:
+    case EXCEPTION_NONCONTINUABLE_EXCEPTION:
+      exit (1);
+    }
+  return EXCEPTION_CONTINUE_SEARCH;
+}
+static void
+nocrash_init (void)
+{
+  SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter);
+}
+#else
+/* Avoid a crash on POSIX systems.  */
+#include <signal.h>
+#include <unistd.h>
+/* A POSIX signal handler.  */
+static void
+exception_handler (int sig)
+{
+  _exit (1);
+}
+static void
+nocrash_init (void)
+{
+#ifdef SIGSEGV
+  signal (SIGSEGV, exception_handler);
+#endif
+#ifdef SIGBUS
+  signal (SIGBUS, exception_handler);
+#endif
+}
+#endif
+
+             $mprotect_prog
+                nocrash_init();
+                if (mprotect(page_align(fault_address),pagesize,PROT_READ) < 0)
+                  exit(0);
+                *fault_address = 'z'; /* this should cause an exception or signal */
+                exit(0);
+              }
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  no_mprotect=1
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+         fi
+         if test -z "$no_mprotect"; then
+           if test "$cross_compiling" = yes; then :
+                :
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <stdlib.h>
+#if defined __MACH__ && defined __APPLE__
+/* Avoid a crash on Mac OS X.  */
+#include <mach/mach.h>
+#include <mach/mach_error.h>
+#include <mach/thread_status.h>
+#include <mach/exception.h>
+#include <mach/task.h>
+#include <pthread.h>
+/* The exception port on which our thread listens.  */
+static mach_port_t our_exception_port;
+/* The main function of the thread listening for exceptions of type
+   EXC_BAD_ACCESS.  */
+static void *
+mach_exception_thread (void *arg)
+{
+  /* Buffer for a message to be received.  */
+  struct {
+    mach_msg_header_t head;
+    mach_msg_body_t msgh_body;
+    char data[1024];
+  } msg;
+  mach_msg_return_t retval;
+  /* Wait for a message on the exception port.  */
+  retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg),
+                     our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
+  if (retval != MACH_MSG_SUCCESS)
+    abort ();
+  exit (1);
+}
+static void
+nocrash_init (void)
+{
+  mach_port_t self = mach_task_self ();
+  /* Allocate a port on which the thread shall listen for exceptions.  */
+  if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port)
+      == KERN_SUCCESS) {
+    /* See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html.  */
+    if (mach_port_insert_right (self, our_exception_port, our_exception_port,
+                                MACH_MSG_TYPE_MAKE_SEND)
+        == KERN_SUCCESS) {
+      /* The exceptions we want to catch.  Only EXC_BAD_ACCESS is interesting
+         for us.  */
+      exception_mask_t mask = EXC_MASK_BAD_ACCESS;
+      /* Create the thread listening on the exception port.  */
+      pthread_attr_t attr;
+      pthread_t thread;
+      if (pthread_attr_init (&attr) == 0
+          && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0
+          && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) {
+        pthread_attr_destroy (&attr);
+        /* Replace the exception port info for these exceptions with our own.
+           Note that we replace the exception port for the entire task, not only
+           for a particular thread.  This has the effect that when our exception
+           port gets the message, the thread specific exception port has already
+           been asked, and we don't need to bother about it.
+           See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html.  */
+        task_set_exception_ports (self, mask, our_exception_port,
+                                  EXCEPTION_DEFAULT, MACHINE_THREAD_STATE);
+      }
+    }
+  }
+}
+#elif defined _WIN32 && ! defined __CYGWIN__
+/* Avoid a crash on native Windows.  */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <winerror.h>
+static LONG WINAPI
+exception_filter (EXCEPTION_POINTERS *ExceptionInfo)
+{
+  switch (ExceptionInfo->ExceptionRecord->ExceptionCode)
+    {
+    case EXCEPTION_ACCESS_VIOLATION:
+    case EXCEPTION_IN_PAGE_ERROR:
+    case EXCEPTION_STACK_OVERFLOW:
+    case EXCEPTION_GUARD_PAGE:
+    case EXCEPTION_PRIV_INSTRUCTION:
+    case EXCEPTION_ILLEGAL_INSTRUCTION:
+    case EXCEPTION_DATATYPE_MISALIGNMENT:
+    case EXCEPTION_ARRAY_BOUNDS_EXCEEDED:
+    case EXCEPTION_NONCONTINUABLE_EXCEPTION:
+      exit (1);
+    }
+  return EXCEPTION_CONTINUE_SEARCH;
+}
+static void
+nocrash_init (void)
+{
+  SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter);
+}
+#else
+/* Avoid a crash on POSIX systems.  */
+#include <signal.h>
+#include <unistd.h>
+/* A POSIX signal handler.  */
+static void
+exception_handler (int sig)
+{
+  _exit (1);
+}
+static void
+nocrash_init (void)
+{
+#ifdef SIGSEGV
+  signal (SIGSEGV, exception_handler);
+#endif
+#ifdef SIGBUS
+  signal (SIGBUS, exception_handler);
+#endif
+}
+#endif
+
+             $mprotect_prog
+                nocrash_init();
+                if (mprotect(page_align(fault_address),pagesize,PROT_READ) < 0)
+                  exit(1);
+                if (mprotect(page_align(fault_address),pagesize,PROT_READ|PROT_WRITE) < 0)
+                  exit(1);
+                *fault_address = 'z'; /* this should not cause an exception or signal */
+                exit(0);
+              }
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+
+else
+  no_mprotect=1
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+         fi
+         if test -z "$no_mprotect"; then
+           cl_cv_func_mprotect_works=yes
+         else
+           cl_cv_func_mprotect_works=no
+         fi
+       else
+                           case "$host_os" in
+           aix* | cygwin* | darwin* | hpux* | irix* | linux* | solaris*)
+             cl_cv_func_mprotect_works="guessing yes" ;;
+           mingw*)
+             cl_cv_func_mprotect_works="guessing no" ;;
+           *)
+             cl_cv_func_mprotect_works="guessing no" ;;
+         esac
+       fi
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $cl_cv_func_mprotect_works" >&5
+$as_echo "$cl_cv_func_mprotect_works" >&6; }
+    case "$cl_cv_func_mprotect_works" in
+      *yes)
+
+$as_echo "#define HAVE_WORKING_MPROTECT /**/" >>confdefs.h
+
+        ;;
+    esac
+  fi
+
+
+
+  for ac_header in sys/shm.h
+do :
+  ac_fn_c_check_header_mongrel "$LINENO" "sys/shm.h" "ac_cv_header_sys_shm_h" "$ac_includes_default"
+if test "x$ac_cv_header_sys_shm_h" = xyes; then :
+  cat >>confdefs.h <<_ACEOF
+#define HAVE_SYS_SHM_H 1
+_ACEOF
+
+fi
+
+done
+
+  if test $ac_cv_header_sys_shm_h = yes; then
+    for ac_header in sys/ipc.h
+do :
+  ac_fn_c_check_header_mongrel "$LINENO" "sys/ipc.h" "ac_cv_header_sys_ipc_h" "$ac_includes_default"
+if test "x$ac_cv_header_sys_ipc_h" = xyes; then :
+  cat >>confdefs.h <<_ACEOF
+#define HAVE_SYS_IPC_H 1
+_ACEOF
+
+fi
+
+done
+
+  fi
+
+
+
+
+
+  if test $ac_cv_header_sys_shm_h = yes -a "$ac_cv_header_sys_ipc_h" = yes; then
+    # This test is from Marcus Daniels
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working shared memory" >&5
+$as_echo_n "checking for working shared memory... " >&6; }
+if ${cl_cv_sys_shm_works+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test "$cross_compiling" = yes; then :
+                      case "$host" in
+            mips*-*-linux*) cl_cv_sys_shm_works="guessing no" ;;
+            *-*-linux*)     cl_cv_sys_shm_works="guessing yes" ;;
+            *-*-solaris*)   cl_cv_sys_shm_works="guessing yes" ;;
+            *-*-irix*)      cl_cv_sys_shm_works="guessing yes" ;;
+            *)              cl_cv_sys_shm_works="guessing no" ;;
+          esac
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <stdlib.h>
+          #include <sys/types.h>
+          #include <sys/ipc.h>
+          #include <sys/shm.h>
+          /* try attaching a single segment to multiple addresses */
+          #define segsize 0x10000
+          #define attaches 128
+          #define base_addr 0x01000000
+          int main ()
+          {
+            int shmid;
+            int i;
+            char* addr;
+            char* result;
+            if ((shmid = shmget(IPC_PRIVATE,segsize,0400)) < 0)
+              exit(1);
+            for (i=0, addr = (char*)0x01000000; i<attaches; i++, addr += segsize)
+              if ((result = (char*)shmat(shmid,addr,SHM_RDONLY)) == (char*)(-1))
+                break;
+            for (i=0, addr = (char*)0x01000000; i<attaches; i++, addr += segsize)
+              shmdt(addr);
+            shmctl(shmid,IPC_RMID,0);
+            exit(result == (char*)(-1));
+          }
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  cl_cv_sys_shm_works=yes
+else
+  cl_cv_sys_shm_works=no
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $cl_cv_sys_shm_works" >&5
+$as_echo "$cl_cv_sys_shm_works" >&6; }
+  fi
+  case "$cl_cv_sys_shm_works" in
+    *yes)
+      have_shm=1
+
+$as_echo "#define HAVE_SHM /**/" >>confdefs.h
+
+      for ac_header in sys/sysmacros.h
+do :
+  ac_fn_c_check_header_mongrel "$LINENO" "sys/sysmacros.h" "ac_cv_header_sys_sysmacros_h" "$ac_includes_default"
+if test "x$ac_cv_header_sys_sysmacros_h" = xyes; then :
+  cat >>confdefs.h <<_ACEOF
+#define HAVE_SYS_SYSMACROS_H 1
+_ACEOF
+
+fi
+
+done
+
+      ;;
+    *) ;;
+  esac
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether code in malloc()ed memory is executable" >&5
+$as_echo_n "checking whether code in malloc()ed memory is executable... " >&6; }
+if ${ffcall_cv_codeexec+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+                                               case "$HOST_CPU_C_ABI--$host_os" in
+       hppa--* | hppa64--* | powerpc--aix* | powerpc64--* | ia64--*)
+                                    ffcall_cv_codeexec="irrelevant"
+         ;;
+       arm64--freebsd*)
+                           ffcall_cv_codeexec=no
+         ;;
+       *)
+         if test "$cross_compiling" = yes; then :
+                          case "$host_os" in
+              cygwin*)
+                case "$HOST_CPU_C_ABI" in
+                  i386)
+                    ffcall_cv_codeexec="guessing yes" ;;
+                  x86_64)
+                    ffcall_cv_codeexec="guessing no" ;;
+                  *)
+                    ffcall_cv_codeexec="guessing no" ;;
+                esac
+                ;;
+              darwin*)
+                case "$HOST_CPU_C_ABI" in
+                  i386 | powerpc)
+                    ffcall_cv_codeexec="guessing yes" ;;
+                  x86_64)
+                    ffcall_cv_codeexec="guessing no" ;;
+                  *)
+                    ffcall_cv_codeexec="guessing no" ;;
+                esac
+                ;;
+              irix*)
+                ffcall_cv_codeexec="guessing no" ;;
+              linux*)
+                case "$HOST_CPU_C_ABI" in
+                  alpha | ia64)
+                    ffcall_cv_codeexec="guessing yes" ;;
+                  arm | armhf | arm64 | i386 | mips* | s390 | s390x | sparc | sparc64 | x86_64*)
+                    ffcall_cv_codeexec="guessing no" ;;
+                  *)
+                    ffcall_cv_codeexec="guessing no" ;;
+                esac
+                ;;
+              solaris*)
+                case "$HOST_CPU_C_ABI" in
+                  i386 | sparc | sparc64)
+                    ffcall_cv_codeexec="guessing yes" ;;
+                  x86_64)
+                    ffcall_cv_codeexec="guessing no" ;;
+                  *)
+                    ffcall_cv_codeexec="guessing no" ;;
+                esac
+                ;;
+              *)
+                ffcall_cv_codeexec="guessing no" ;;
+            esac
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <stdlib.h>
+#if defined __MACH__ && defined __APPLE__
+/* Avoid a crash on Mac OS X.  */
+#include <mach/mach.h>
+#include <mach/mach_error.h>
+#include <mach/thread_status.h>
+#include <mach/exception.h>
+#include <mach/task.h>
+#include <pthread.h>
+/* The exception port on which our thread listens.  */
+static mach_port_t our_exception_port;
+/* The main function of the thread listening for exceptions of type
+   EXC_BAD_ACCESS.  */
+static void *
+mach_exception_thread (void *arg)
+{
+  /* Buffer for a message to be received.  */
+  struct {
+    mach_msg_header_t head;
+    mach_msg_body_t msgh_body;
+    char data[1024];
+  } msg;
+  mach_msg_return_t retval;
+  /* Wait for a message on the exception port.  */
+  retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg),
+                     our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
+  if (retval != MACH_MSG_SUCCESS)
+    abort ();
+  exit (1);
+}
+static void
+nocrash_init (void)
+{
+  mach_port_t self = mach_task_self ();
+  /* Allocate a port on which the thread shall listen for exceptions.  */
+  if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port)
+      == KERN_SUCCESS) {
+    /* See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html.  */
+    if (mach_port_insert_right (self, our_exception_port, our_exception_port,
+                                MACH_MSG_TYPE_MAKE_SEND)
+        == KERN_SUCCESS) {
+      /* The exceptions we want to catch.  Only EXC_BAD_ACCESS is interesting
+         for us.  */
+      exception_mask_t mask = EXC_MASK_BAD_ACCESS;
+      /* Create the thread listening on the exception port.  */
+      pthread_attr_t attr;
+      pthread_t thread;
+      if (pthread_attr_init (&attr) == 0
+          && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0
+          && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) {
+        pthread_attr_destroy (&attr);
+        /* Replace the exception port info for these exceptions with our own.
+           Note that we replace the exception port for the entire task, not only
+           for a particular thread.  This has the effect that when our exception
+           port gets the message, the thread specific exception port has already
+           been asked, and we don't need to bother about it.
+           See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html.  */
+        task_set_exception_ports (self, mask, our_exception_port,
+                                  EXCEPTION_DEFAULT, MACHINE_THREAD_STATE);
+      }
+    }
+  }
+}
+#elif defined _WIN32 && ! defined __CYGWIN__
+/* Avoid a crash on native Windows.  */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <winerror.h>
+static LONG WINAPI
+exception_filter (EXCEPTION_POINTERS *ExceptionInfo)
+{
+  switch (ExceptionInfo->ExceptionRecord->ExceptionCode)
+    {
+    case EXCEPTION_ACCESS_VIOLATION:
+    case EXCEPTION_IN_PAGE_ERROR:
+    case EXCEPTION_STACK_OVERFLOW:
+    case EXCEPTION_GUARD_PAGE:
+    case EXCEPTION_PRIV_INSTRUCTION:
+    case EXCEPTION_ILLEGAL_INSTRUCTION:
+    case EXCEPTION_DATATYPE_MISALIGNMENT:
+    case EXCEPTION_ARRAY_BOUNDS_EXCEEDED:
+    case EXCEPTION_NONCONTINUABLE_EXCEPTION:
+      exit (1);
+    }
+  return EXCEPTION_CONTINUE_SEARCH;
+}
+static void
+nocrash_init (void)
+{
+  SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter);
+}
+#else
+/* Avoid a crash on POSIX systems.  */
+#include <signal.h>
+#include <unistd.h>
+/* A POSIX signal handler.  */
+static void
+exception_handler (int sig)
+{
+  _exit (1);
+}
+static void
+nocrash_init (void)
+{
+#ifdef SIGSEGV
+  signal (SIGSEGV, exception_handler);
+#endif
+#ifdef SIGBUS
+  signal (SIGBUS, exception_handler);
+#endif
+}
+#endif
+
+           #include <sys/types.h>
+            /* declare malloc() */
+            #include <stdlib.h>
+            int fun () { return 31415926; }
+            int main ()
+            { nocrash_init();
+             {long size = (char*)&main - (char*)&fun;
+              char* funcopy = (char*) malloc(size);
+              int i;
+              for (i = 0; i < size; i++) { funcopy[i] = ((char*)&fun)[i]; }
+              return !((*(int(*)())funcopy)() == 31415926);
+            }}
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  ffcall_cv_codeexec=yes
+else
+  ffcall_cv_codeexec=no
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+         ;;
+     esac
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_codeexec" >&5
+$as_echo "$ffcall_cv_codeexec" >&6; }
+  case "$ffcall_cv_codeexec" in
+    *yes | irrelevant)
+$as_echo "#define CODE_EXECUTABLE /**/" >>confdefs.h
+ ;;
+    *no)  ;;
+  esac
+
+
+
+
+
+
+  case "$ffcall_cv_codeexec" in
+    *yes | irrelevant) ;;
+    *)
+      case "$ac_cv_func_mprotect--$cl_cv_func_mprotect_works" in
+        yes--*yes)
+          { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether mprotect can make malloc()ed memory executable" >&5
+$as_echo_n "checking whether mprotect can make malloc()ed memory executable... " >&6; }
+if ${ffcall_cv_malloc_mprotect_can_exec+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+                                                                   if test "$cross_compiling" != yes -a -d /etc/selinux; then
+               ffcall_cv_malloc_mprotect_can_exec='determined by SELinux at runtime'
+             else
+               if test "$cross_compiling" = yes; then :
+  { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
+as_fn_error $? "cannot run test program while cross compiling
+See \`config.log' for more details" "$LINENO" 5; }
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <errno.h>
+                  #include <stdlib.h>
+                  #ifdef HAVE_UNISTD_H
+                   #include <unistd.h>
+                  #endif
+                  #include <fcntl.h>
+                  /* declare getpagesize() and mprotect() */
+                  #include <sys/mman.h>
+                  #ifndef HAVE_GETPAGESIZE
+                   #include <sys/param.h>
+                   #define getpagesize() PAGESIZE
+                  #else
+                   extern
+#ifdef __cplusplus
+"C"
+#endif
+
+                   RETGETPAGESIZETYPE getpagesize (void);
+                  #endif
+                  int
+                  main ()
+                  {
+                    unsigned int pagesize = getpagesize ();
+                    char *p = (char *) malloc (50);
+                    int ret;
+                    if (p == (char*) -1)
+                      /* malloc is not working as expected. */
+                      return 1;
+                    p[5] = 0x77;
+                    ret = mprotect (p - ((unsigned int) p & (pagesize - 1)), pagesize, PROT_READ | PROT_WRITE | PROT_EXEC);
+                    if (ret < 0
+                        && (errno == EACCES || errno == ENOMEM
+                            #ifdef ENOTSUP
+                            || errno == ENOTSUP
+                            #endif
+                       )   )
+                      /* mprotect is forbidden to make malloc()ed pages executable that were writable earlier. */
+                      return 2;
+                    return 0;
+                  }
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  ffcall_cv_malloc_mprotect_can_exec=yes
+else
+                                      case "$host_os" in
+                    linux*)
+                      ffcall_cv_malloc_mprotect_can_exec='determined by SELinux at runtime' ;;
+                    aix* | cygwin* | darwin* | irix* | solaris*)
+                      ffcall_cv_malloc_mprotect_can_exec="guessing yes" ;;
+                    *)
+                      ffcall_cv_malloc_mprotect_can_exec="guessing no" ;;
+                  esac
+
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+             fi
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_malloc_mprotect_can_exec" >&5
+$as_echo "$ffcall_cv_malloc_mprotect_can_exec" >&6; }
+          case "$ffcall_cv_malloc_mprotect_can_exec" in
+            *yes)      MPROTECT_AFTER_MALLOC_CAN_EXEC=1 ;;
+            *no)       MPROTECT_AFTER_MALLOC_CAN_EXEC=0 ;;
+            *runtime*) MPROTECT_AFTER_MALLOC_CAN_EXEC='-1' ;;
+          esac
+
+cat >>confdefs.h <<_ACEOF
+#define HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC $MPROTECT_AFTER_MALLOC_CAN_EXEC
+_ACEOF
+
+          case "$ffcall_cv_malloc_mprotect_can_exec" in
+            *yes) ;;
+            *)
+              { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether mprotect can make mmap()ed memory executable" >&5
+$as_echo_n "checking whether mprotect can make mmap()ed memory executable... " >&6; }
+if ${ffcall_cv_mmap_mprotect_can_exec+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+                                                                                       if test "$cross_compiling" != yes -a -d /etc/selinux; then
+                   ffcall_cv_mmap_mprotect_can_exec='determined by SELinux at runtime'
+                 else
+                   if test "$cross_compiling" = yes; then :
+  { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
+as_fn_error $? "cannot run test program while cross compiling
+See \`config.log' for more details" "$LINENO" 5; }
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <errno.h>
+                      #include <stdlib.h>
+                      #ifdef HAVE_UNISTD_H
+                       #include <unistd.h>
+                      #endif
+                      #include <fcntl.h>
+                      /* declare getpagesize() and mprotect() */
+                      #include <sys/mman.h>
+                      #ifndef HAVE_GETPAGESIZE
+                       #include <sys/param.h>
+                       #define getpagesize() PAGESIZE
+                      #else
+                       extern
+#ifdef __cplusplus
+"C"
+#endif
+
+                       RETGETPAGESIZETYPE getpagesize (void);
+                      #endif
+                      #ifndef MAP_FILE
+                       #define MAP_FILE 0
+                      #endif
+                      #ifndef MAP_VARIABLE
+                       #define MAP_VARIABLE 0
+                      #endif
+                      int
+                      main ()
+                      {
+                        unsigned int pagesize = getpagesize ();
+                        char *p;
+                        int ret;
+                      #if defined HAVE_MMAP_ANON
+                        p = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANON | MAP_VARIABLE, -1, 0);
+                      #elif defined HAVE_MMAP_ANONYMOUS
+                        p = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0);
+                      #elif defined HAVE_MMAP_DEVZERO
+                        int zero_fd = open("/dev/zero", O_RDONLY, 0666);
+                        if (zero_fd < 0)
+                          return 1;
+                        p = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_FILE | MAP_VARIABLE, zero_fd, 0);
+                      #else
+                        ??
+                      #endif
+                        if (p == (char*) -1)
+                          /* mmap is not working as expected. */
+                          return 1;
+                        p[5] = 0x77;
+                        ret = mprotect (p, pagesize, PROT_READ | PROT_WRITE | PROT_EXEC);
+                        if (ret < 0
+                            && (errno == EACCES || errno == ENOMEM
+                                #ifdef ENOTSUP
+                                || errno == ENOTSUP
+                                #endif
+                           )   )
+                          /* mprotect is forbidden to make mmap()ed pages executable that were writable earlier. */
+                          return 2;
+                        return 0;
+                      }
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  ffcall_cv_mmap_mprotect_can_exec=yes
+else
+                                              case "$host_os" in
+                        linux*) ffcall_cv_mmap_mprotect_can_exec='determined by SELinux at runtime' ;;
+                        *)      ffcall_cv_mmap_mprotect_can_exec="guessing no" ;;
+                      esac
+
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+                 fi
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_mmap_mprotect_can_exec" >&5
+$as_echo "$ffcall_cv_mmap_mprotect_can_exec" >&6; }
+              case "$ffcall_cv_mmap_mprotect_can_exec" in
+                *yes)      MPROTECT_AFTER_MMAP_CAN_EXEC=1 ;;
+                *no)       MPROTECT_AFTER_MMAP_CAN_EXEC=0 ;;
+                *runtime*) MPROTECT_AFTER_MMAP_CAN_EXEC='-1' ;;
+              esac
+
+cat >>confdefs.h <<_ACEOF
+#define HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC $MPROTECT_AFTER_MMAP_CAN_EXEC
+_ACEOF
+
+              case "$ffcall_cv_mmap_mprotect_can_exec" in
+                *yes) ;;
+                *)
+                  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether a shared mmap can make memory pages executable" >&5
+$as_echo_n "checking whether a shared mmap can make memory pages executable... " >&6; }
+if ${ffcall_cv_mmap_shared_can_exec+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  filename="/tmp/trampdata$$.data"
+                     if test "$cross_compiling" = yes; then :
+  { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
+as_fn_error $? "cannot run test program while cross compiling
+See \`config.log' for more details" "$LINENO" 5; }
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <fcntl.h>
+                        #include <stdlib.h>
+                        #ifdef HAVE_UNISTD_H
+                         #include <unistd.h>
+                        #endif
+                        /* declare getpagesize() and mmap() */
+                        #include <sys/mman.h>
+                        #ifndef HAVE_GETPAGESIZE
+                         #include <sys/param.h>
+                         #define getpagesize() PAGESIZE
+                        #else
+                         extern
+#ifdef __cplusplus
+"C"
+#endif
+
+                         RETGETPAGESIZETYPE getpagesize (void);
+                        #endif
+                        #ifndef MAP_FILE
+                         #define MAP_FILE 0
+                        #endif
+                        #ifndef MAP_VARIABLE
+                         #define MAP_VARIABLE 0
+                        #endif
+                        int
+                        main ()
+                        {
+                          unsigned int pagesize = getpagesize ();
+                          int fd;
+                          char *pw;
+                          char *px;
+                          fd = open ("$filename", O_CREAT | O_RDWR | O_TRUNC, 0700);
+                          if (fd < 0)
+                            return 1;
+                          if (ftruncate (fd, pagesize) < 0)
+                            return 2;
+                          pw = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_SHARED | MAP_FILE | MAP_VARIABLE, fd, 0);
+                          if (pw == (char*) -1)
+                            return 3;
+                          pw[5] = 0xc3;
+                          px = (char *) mmap (NULL, pagesize, PROT_READ | PROT_EXEC, MAP_SHARED | MAP_FILE | MAP_VARIABLE, fd, 0);
+                          if (px == (char*) -1)
+                            return 4;
+                          if ((char)px[5] != (char)0xc3)
+                            return 5;
+                          /* On i386 and x86_64 this is a 'ret' instruction that we can invoke. */
+                        #if (defined __i386 || defined __i386__ || defined _I386 || defined _M_IX86 || defined _X86_) || (defined __x86_64__ || defined __amd64__)
+                          ((void (*) (void)) (px + 5)) ();
+                        #endif
+                          return 0;
+                        }
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  ffcall_cv_mmap_shared_can_exec=yes
+else
+                                                  ffcall_cv_mmap_shared_can_exec="guessing yes"
+
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+                     rm -f "$filename"
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_mmap_shared_can_exec" >&5
+$as_echo "$ffcall_cv_mmap_shared_can_exec" >&6; }
+                  case "$ffcall_cv_mmap_shared_can_exec" in
+                    *yes)
+
+$as_echo "#define HAVE_MMAP_SHARED_CAN_EXEC /**/" >>confdefs.h
+
+                      ;;
+                  esac
+                  ;;
+              esac
+              ;;
+          esac
+          ;;
+      esac
+      ;;
+  esac
+
+
+CPU_OBJECTS=''
+if test ${HOST_CPU_C_ABI} = hppa -o ${HOST_CPU_C_ABI} = hppa64 -o ${HOST_CPU_C_ABI} = powerpc64 -o ${HOST_CPU_C_ABI} = ia64; then
+  CPU_OBJECTS="$CPU_OBJECTS "'tramp-$(CPU).lo'
+fi
+if test ${HOST_CPU_C_ABI} = powerpc; then
+  case "${host_os}" in
+    aix*) CPU_OBJECTS="$CPU_OBJECTS "'tramp-$(CPU).lo' ;;
+    *) ;;
+  esac
+fi
+if test ${HOST_CPU_C_ABI} = sparc -o ${HOST_CPU_C_ABI} = sparc64 -o ${HOST_CPU_C_ABI} = alpha -o ${HOST_CPU_C_ABI} = hppa -o ${HOST_CPU_C_ABI} = hppa64 -o ${HOST_CPU_C_ABI} = powerpc64-elfv2; then
+  CPU_OBJECTS="$CPU_OBJECTS "'cache-$(CPU).lo'
+fi
+if test ${HOST_CPU_C_ABI} = powerpc; then
+  case "${host_os}" in
+    aix*) ;;
+    *) CPU_OBJECTS="$CPU_OBJECTS "'cache-$(CPU).lo' ;;
+  esac
+fi
+
+case "${HOST_CPU_C_ABI}" in
+  mips* | riscv*)
+    for ac_header in sys/cachectl.h
+do :
+  ac_fn_c_check_header_mongrel "$LINENO" "sys/cachectl.h" "ac_cv_header_sys_cachectl_h" "$ac_includes_default"
+if test "x$ac_cv_header_sys_cachectl_h" = xyes; then :
+  cat >>confdefs.h <<_ACEOF
+#define HAVE_SYS_CACHECTL_H 1
+_ACEOF
+
+fi
+
+done
+
+    ;;
+esac
+
+WORKAROUND_BUG_81653=''
+if test ${HOST_CPU_C_ABI} = sparc && test -n "$GCC"; then
+  gcc_version=`LC_ALL=C ${CC} -v 2>&1 | grep version | sed -n -e '$p' | sed -e 's/.*version //g' -e 's/gcc //'`
+  case "$gcc_version" in
+    2.* | 3.0-3*) ;;
+    *) WORKAROUND_BUG_81653='-fno-pie' ;;
+  esac
+fi
+
+
+if test -n "$GCC"; then
+  DISABLE_TYPE_BASED_ALIASING='-fno-strict-aliasing'
+else
+  case "$host_os" in
+    aix*)       DISABLE_TYPE_BASED_ALIASING='-qalias=noansi'
+      ;;
+    *)
+      cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#ifdef __SUNPRO_C
+           yes
+         #endif
+
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "yes" >/dev/null 2>&1; then :
+           DISABLE_TYPE_BASED_ALIASING='-xalias_level=weak'
+
+else
+  DISABLE_TYPE_BASED_ALIASING=''
+fi
+rm -f conftest*
+
+      ;;
+  esac
+fi
+
+
+
+
+
+
+
+
+          LIBC_FATAL_STDERR_=1
+  export LIBC_FATAL_STDERR_
+
+
+
+
+
+  if test "$CXX_CHOICE" = no; then
+    CXX=no
+  fi
+  if test -z "$CXX"; then
+    if test -n "$CCC"; then
+      CXX="$CCC"
+    else
+      if test -n "$ac_tool_prefix"; then
+  for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl FCC KCC RCC xlC_r xlC
+  do
+    # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args.
+set dummy $ac_tool_prefix$ac_prog; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_CXX+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$CXX"; then
+  ac_cv_prog_CXX="$CXX" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_CXX="$ac_tool_prefix$ac_prog"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+CXX=$ac_cv_prog_CXX
+if test -n "$CXX"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CXX" >&5
+$as_echo "$CXX" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+    test -n "$CXX" && break
+  done
+fi
+if test -z "$CXX"; then
+  ac_ct_CXX=$CXX
+  for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl FCC KCC RCC xlC_r xlC
+do
+  # Extract the first word of "$ac_prog", so it can be a program name with args.
+set dummy $ac_prog; ac_word=$2
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+$as_echo_n "checking for $ac_word... " >&6; }
+if ${ac_cv_prog_ac_ct_CXX+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -n "$ac_ct_CXX"; then
+  ac_cv_prog_ac_ct_CXX="$ac_ct_CXX" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then
+    ac_cv_prog_ac_ct_CXX="$ac_prog"
+    $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+ac_ct_CXX=$ac_cv_prog_ac_ct_CXX
+if test -n "$ac_ct_CXX"; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CXX" >&5
+$as_echo "$ac_ct_CXX" >&6; }
+else
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
+$as_echo "no" >&6; }
+fi
+
+
+  test -n "$ac_ct_CXX" && break
+done
+
+  if test "x$ac_ct_CXX" = x; then
+    CXX=":"
+  else
+    case $cross_compiling:$ac_tool_warned in
+yes:)
+{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
+$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
+ac_tool_warned=yes ;;
+esac
+    CXX=$ac_ct_CXX
+  fi
+fi
+
+    fi
+  fi
+  if test "$CXX" != no; then
+            { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the C++ compiler ($CXX $CXXFLAGS $LDFLAGS) works" >&5
+$as_echo_n "checking whether the C++ compiler ($CXX $CXXFLAGS $LDFLAGS) works... " >&6; }
+    ac_ext=cpp
+ac_cpp='$CXXCPP $CPPFLAGS'
+ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_cxx_compiler_gnu
+
+
+
+    echo 'int main () { return 0; }' > conftest.$ac_ext
+    if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5
+  (eval $ac_link) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } && test -s conftest$ac_exeext; then
+      gl_cv_prog_ansicxx_works=yes
+      if (./conftest; exit) 2>/dev/null; then
+        gl_cv_prog_ansicxx_cross=no
+      else
+        gl_cv_prog_ansicxx_cross=yes
+      fi
+    else
+      gl_cv_prog_ansicxx_works=no
+    fi
+    rm -fr conftest*
+    ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+    { $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_prog_ansicxx_works" >&5
+$as_echo "$gl_cv_prog_ansicxx_works" >&6; }
+    if test $gl_cv_prog_ansicxx_works = no; then
+      CXX=no
+    else
+                  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the C++ compiler supports namespaces" >&5
+$as_echo_n "checking whether the C++ compiler supports namespaces... " >&6; }
+      ac_ext=cpp
+ac_cpp='$CXXCPP $CPPFLAGS'
+ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_cxx_compiler_gnu
+
+      cat <<EOF > conftest.$ac_ext
+#include <iostream>
+namespace test { using namespace std; }
+std::ostream* ptr;
+int main () { return 0; }
+EOF
+      if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5
+  (eval $ac_link) 2>&5
+  ac_status=$?
+  $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
+  test $ac_status = 0; } && test -s conftest$ac_exeext; then
+        gl_cv_prog_ansicxx_namespaces=yes
+      else
+        gl_cv_prog_ansicxx_namespaces=no
+      fi
+      rm -fr conftest*
+      ac_ext=c
+ac_cpp='$CPP $CPPFLAGS'
+ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
+ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
+ac_compiler_gnu=$ac_cv_c_compiler_gnu
+
+      { $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_prog_ansicxx_namespaces" >&5
+$as_echo "$gl_cv_prog_ansicxx_namespaces" >&6; }
+      if test $gl_cv_prog_ansicxx_namespaces = no; then
+        CXX=no
+      fi
+    fi
+  fi
+
+
+
+   if test "$CXX" != no; then
+  ANSICXX_TRUE=
+  ANSICXX_FALSE='#'
+else
+  ANSICXX_TRUE='#'
+  ANSICXX_FALSE=
+fi
+
+
+  if test "$CXX" != no; then
+
+depcc="$CXX"  am_compiler_list=
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking dependency style of $depcc" >&5
+$as_echo_n "checking dependency style of $depcc... " >&6; }
+if ${am_cv_CXX_dependencies_compiler_type+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then
+  # We make a subdir and do the tests there.  Otherwise we can end up
+  # making bogus files that we don't know about and never remove.  For
+  # instance it was reported that on HP-UX the gcc test will end up
+  # making a dummy file named 'D' -- because '-MD' means "put the output
+  # in D".
+  rm -rf conftest.dir
+  mkdir conftest.dir
+  # Copy depcomp to subdir because otherwise we won't find it if we're
+  # using a relative directory.
+  cp "$am_depcomp" conftest.dir
+  cd conftest.dir
+  # We will build objects and dependencies in a subdirectory because
+  # it helps to detect inapplicable dependency modes.  For instance
+  # both Tru64's cc and ICC support -MD to output dependencies as a
+  # side effect of compilation, but ICC will put the dependencies in
+  # the current directory while Tru64 will put them in the object
+  # directory.
+  mkdir sub
+
+  am_cv_CXX_dependencies_compiler_type=none
+  if test "$am_compiler_list" = ""; then
+     am_compiler_list=`sed -n 's/^#*\([a-zA-Z0-9]*\))$/\1/p' < ./depcomp`
+  fi
+  am__universal=false
+  case " $depcc " in #(
+     *\ -arch\ *\ -arch\ *) am__universal=true ;;
+     esac
+
+  for depmode in $am_compiler_list; do
+    # Setup a source with many dependencies, because some compilers
+    # like to wrap large dependency lists on column 80 (with \), and
+    # we should not choose a depcomp mode which is confused by this.
+    #
+    # We need to recreate these files for each test, as the compiler may
+    # overwrite some of them when testing with obscure command lines.
+    # This happens at least with the AIX C compiler.
+    : > sub/conftest.c
+    for i in 1 2 3 4 5 6; do
+      echo '#include "conftst'$i'.h"' >> sub/conftest.c
+      # Using ": > sub/conftst$i.h" creates only sub/conftst1.h with
+      # Solaris 10 /bin/sh.
+      echo '/* dummy */' > sub/conftst$i.h
+    done
+    echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf
+
+    # We check with '-c' and '-o' for the sake of the "dashmstdout"
+    # mode.  It turns out that the SunPro C++ compiler does not properly
+    # handle '-M -o', and we need to detect this.  Also, some Intel
+    # versions had trouble with output in subdirs.
+    am__obj=sub/conftest.${OBJEXT-o}
+    am__minus_obj="-o $am__obj"
+    case $depmode in
+    gcc)
+      # This depmode causes a compiler race in universal mode.
+      test "$am__universal" = false || continue
+      ;;
+    nosideeffect)
+      # After this tag, mechanisms are not by side-effect, so they'll
+      # only be used when explicitly requested.
+      if test "x$enable_dependency_tracking" = xyes; then
+       continue
+      else
+       break
+      fi
+      ;;
+    msvc7 | msvc7msys | msvisualcpp | msvcmsys)
+      # This compiler won't grok '-c -o', but also, the minuso test has
+      # not run yet.  These depmodes are late enough in the game, and
+      # so weak that their functioning should not be impacted.
+      am__obj=conftest.${OBJEXT-o}
+      am__minus_obj=
+      ;;
+    none) break ;;
+    esac
+    if depmode=$depmode \
+       source=sub/conftest.c object=$am__obj \
+       depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \
+       $SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \
+         >/dev/null 2>conftest.err &&
+       grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 &&
+       grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 &&
+       grep $am__obj sub/conftest.Po > /dev/null 2>&1 &&
+       ${MAKE-make} -s -f confmf > /dev/null 2>&1; then
+      # icc doesn't choke on unknown options, it will just issue warnings
+      # or remarks (even with -Werror).  So we grep stderr for any message
+      # that says an option was ignored or not supported.
+      # When given -MP, icc 7.0 and 7.1 complain thusly:
+      #   icc: Command line warning: ignoring option '-M'; no argument required
+      # The diagnosis changed in icc 8.0:
+      #   icc: Command line remark: option '-MP' not supported
+      if (grep 'ignoring option' conftest.err ||
+          grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else
+        am_cv_CXX_dependencies_compiler_type=$depmode
+        break
+      fi
+    fi
+  done
+
+  cd ..
+  rm -rf conftest.dir
+else
+  am_cv_CXX_dependencies_compiler_type=none
+fi
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $am_cv_CXX_dependencies_compiler_type" >&5
+$as_echo "$am_cv_CXX_dependencies_compiler_type" >&6; }
+CXXDEPMODE=depmode=$am_cv_CXX_dependencies_compiler_type
+
+ if
+  test "x$enable_dependency_tracking" != xno \
+  && test "$am_cv_CXX_dependencies_compiler_type" = gcc3; then
+  am__fastdepCXX_TRUE=
+  am__fastdepCXX_FALSE='#'
+else
+  am__fastdepCXX_TRUE='#'
+  am__fastdepCXX_FALSE=
+fi
+
+
+  else
+     if false; then
+  am__fastdepCXX_TRUE=
+  am__fastdepCXX_FALSE='#'
+else
+  am__fastdepCXX_TRUE='#'
+  am__fastdepCXX_FALSE=
+fi
+
+  fi
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the preprocessor supports include_next" >&5
+$as_echo_n "checking whether the preprocessor supports include_next... " >&6; }
+if ${gl_cv_have_include_next+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  rm -rf conftestd1a conftestd1b conftestd2
+     mkdir conftestd1a conftestd1b conftestd2
+                                                  cat <<EOF > conftestd1a/conftest.h
+#define DEFINED_IN_CONFTESTD1
+#include_next <conftest.h>
+#ifdef DEFINED_IN_CONFTESTD2
+int foo;
+#else
+#error "include_next doesn't work"
+#endif
+EOF
+     cat <<EOF > conftestd1b/conftest.h
+#define DEFINED_IN_CONFTESTD1
+#include <stdio.h>
+#include_next <conftest.h>
+#ifdef DEFINED_IN_CONFTESTD2
+int foo;
+#else
+#error "include_next doesn't work"
+#endif
+EOF
+     cat <<EOF > conftestd2/conftest.h
+#ifndef DEFINED_IN_CONFTESTD1
+#error "include_next test doesn't work"
+#endif
+#define DEFINED_IN_CONFTESTD2
+EOF
+     gl_save_CPPFLAGS="$CPPFLAGS"
+     CPPFLAGS="$gl_save_CPPFLAGS -Iconftestd1b -Iconftestd2"
+     cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <conftest.h>
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_have_include_next=yes
+else
+  CPPFLAGS="$gl_save_CPPFLAGS -Iconftestd1a -Iconftestd2"
+        cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <conftest.h>
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_have_include_next=buggy
+else
+  gl_cv_have_include_next=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+     CPPFLAGS="$gl_save_CPPFLAGS"
+     rm -rf conftestd1a conftestd1b conftestd2
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_have_include_next" >&5
+$as_echo "$gl_cv_have_include_next" >&6; }
+  PRAGMA_SYSTEM_HEADER=
+  if test $gl_cv_have_include_next = yes; then
+    INCLUDE_NEXT=include_next
+    INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include_next
+    if test -n "$GCC"; then
+      PRAGMA_SYSTEM_HEADER='#pragma GCC system_header'
+    fi
+  else
+    if test $gl_cv_have_include_next = buggy; then
+      INCLUDE_NEXT=include
+      INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include_next
+    else
+      INCLUDE_NEXT=include
+      INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include
+    fi
+  fi
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether system header files limit the line length" >&5
+$as_echo_n "checking whether system header files limit the line length... " >&6; }
+if ${gl_cv_pragma_columns+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+       cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#ifdef __TANDEM
+choke me
+#endif
+
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "choke me" >/dev/null 2>&1; then :
+  gl_cv_pragma_columns=yes
+else
+  gl_cv_pragma_columns=no
+fi
+rm -f conftest*
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_pragma_columns" >&5
+$as_echo "$gl_cv_pragma_columns" >&6; }
+  if test $gl_cv_pragma_columns = yes; then
+    PRAGMA_COLUMNS="#pragma COLUMNS 10000"
+  else
+    PRAGMA_COLUMNS=
+  fi
+
+
+
+
+
+
+  for ac_header in $gl_header_list
+do :
+  as_ac_Header=`$as_echo "ac_cv_header_$ac_header" | $as_tr_sh`
+ac_fn_c_check_header_mongrel "$LINENO" "$ac_header" "$as_ac_Header" "$ac_includes_default"
+if eval test \"x\$"$as_ac_Header"\" = x"yes"; then :
+  cat >>confdefs.h <<_ACEOF
+#define `$as_echo "HAVE_$ac_header" | $as_tr_cpp` 1
+_ACEOF
+
+fi
+
+done
+
+
+
+
+
+
+
+
+
+
+
+
+  :
+
+
+
+
+
+
+
+
+     if test $gl_cv_have_include_next = yes; then
+       gl_cv_next_limits_h='<'limits.h'>'
+     else
+       { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <limits.h>" >&5
+$as_echo_n "checking absolute name of <limits.h>... " >&6; }
+if ${gl_cv_next_limits_h+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+
+             if test $ac_cv_header_limits_h = yes; then
+
+
+
+
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <limits.h>
+_ACEOF
+                case "$host_os" in
+    aix*) gl_absname_cpp="$ac_cpp -C" ;;
+    *)    gl_absname_cpp="$ac_cpp" ;;
+  esac
+
+  case "$host_os" in
+    mingw*)
+                                          gl_dirsep_regex='[/\\]'
+      ;;
+    *)
+      gl_dirsep_regex='\/'
+      ;;
+  esac
+      gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g'
+  gl_header_literal_regex=`echo 'limits.h' \
+                           | sed -e "$gl_make_literal_regex_sed"`
+  gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{
+      s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/
+      s|^/[^/]|//&|
+      p
+      q
+    }'
+
+        gl_cv_absolute_limits_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 |
+  sed -n "$gl_absolute_header_sed"`
+
+           gl_header=$gl_cv_absolute_limits_h
+           gl_cv_next_limits_h='"'$gl_header'"'
+          else
+               gl_cv_next_limits_h='<'limits.h'>'
+             fi
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_limits_h" >&5
+$as_echo "$gl_cv_next_limits_h" >&6; }
+     fi
+     NEXT_LIMITS_H=$gl_cv_next_limits_h
+
+     if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then
+       # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next'
+       gl_next_as_first_directive='<'limits.h'>'
+     else
+       # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include'
+       gl_next_as_first_directive=$gl_cv_next_limits_h
+     fi
+     NEXT_AS_FIRST_DIRECTIVE_LIMITS_H=$gl_next_as_first_directive
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether limits.h has LLONG_MAX, WORD_BIT, ULLONG_WIDTH etc." >&5
+$as_echo_n "checking whether limits.h has LLONG_MAX, WORD_BIT, ULLONG_WIDTH etc.... " >&6; }
+if ${gl_cv_header_limits_width+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#ifndef __STDC_WANT_IEC_60559_BFP_EXT__
+             #define __STDC_WANT_IEC_60559_BFP_EXT__ 1
+            #endif
+            #include <limits.h>
+            long long llm = LLONG_MAX;
+            int wb = WORD_BIT;
+            int ullw = ULLONG_WIDTH;
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_header_limits_width=yes
+else
+  gl_cv_header_limits_width=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_limits_width" >&5
+$as_echo "$gl_cv_header_limits_width" >&6; }
+  if test "$gl_cv_header_limits_width" = yes; then
+    LIMITS_H=
+  else
+    LIMITS_H=limits.h
+  fi
+
+   if test -n "$LIMITS_H"; then
+  GL_GENERATE_LIMITS_H_TRUE=
+  GL_GENERATE_LIMITS_H_FALSE='#'
+else
+  GL_GENERATE_LIMITS_H_TRUE='#'
+  GL_GENERATE_LIMITS_H_FALSE=
+fi
+
+
+
+
+
+
+
+
+
+  gl_threads_api=none
+  LIBTHREAD=
+  LTLIBTHREAD=
+  LIBMULTITHREAD=
+  LTLIBMULTITHREAD=
+  if test "$gl_use_threads" != no; then
+        { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether imported symbols can be declared weak" >&5
+$as_echo_n "checking whether imported symbols can be declared weak... " >&6; }
+if ${gl_cv_have_weak+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  gl_cv_have_weak=no
+              cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+extern void xyzzy ();
+#pragma weak xyzzy
+int
+main ()
+{
+xyzzy();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  gl_cv_have_weak=maybe
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+       if test $gl_cv_have_weak = maybe; then
+                           if test "$cross_compiling" = yes; then :
+                          cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#ifdef __ELF__
+               Extensible Linking Format
+               #endif
+
+_ACEOF
+if (eval "$ac_cpp conftest.$ac_ext") 2>&5 |
+  $EGREP "Extensible Linking Format" >/dev/null 2>&1; then :
+  gl_cv_have_weak="guessing yes"
+else
+  gl_cv_have_weak="guessing no"
+fi
+rm -f conftest*
+
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <stdio.h>
+#pragma weak fputs
+int main ()
+{
+  return (fputs == NULL);
+}
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  gl_cv_have_weak=yes
+else
+  gl_cv_have_weak=no
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+       fi
+              case " $LDFLAGS " in
+         *" -static "*) gl_cv_have_weak=no ;;
+       esac
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_have_weak" >&5
+$as_echo "$gl_cv_have_weak" >&6; }
+    if case "$gl_cv_have_weak" in *yes) true;; *) false;; esac; then
+
+  :
+
+
+
+
+
+      :
+    fi
+    if test "$gl_use_threads" = yes || test "$gl_use_threads" = posix; then
+      # On OSF/1, the compiler needs the flag -pthread or -D_REENTRANT so that
+      # it groks <pthread.h>. It's added above, in gl_THREADLIB_EARLY_BODY.
+      ac_fn_c_check_header_mongrel "$LINENO" "pthread.h" "ac_cv_header_pthread_h" "$ac_includes_default"
+if test "x$ac_cv_header_pthread_h" = xyes; then :
+  gl_have_pthread_h=yes
+else
+  gl_have_pthread_h=no
+fi
+
+
+      if test "$gl_have_pthread_h" = yes; then
+        # Other possible tests:
+        #   -lpthreads (FSU threads, PCthreads)
+        #   -lgthreads
+        gl_have_pthread=
+        # Test whether both pthread_mutex_lock and pthread_mutexattr_init exist
+        # in libc. IRIX 6.5 has the first one in both libc and libpthread, but
+        # the second one only in libpthread, and lock.c needs it.
+        #
+        # If -pthread works, prefer it to -lpthread, since Ubuntu 14.04
+        # needs -pthread for some reason.  See:
+        # https://lists.gnu.org/r/bug-gnulib/2014-09/msg00023.html
+        save_LIBS=$LIBS
+        for gl_pthread in '' '-pthread'; do
+          LIBS="$LIBS $gl_pthread"
+          cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <pthread.h>
+                 pthread_mutex_t m;
+                 pthread_mutexattr_t ma;
+
+int
+main ()
+{
+pthread_mutex_lock (&m);
+                 pthread_mutexattr_init (&ma);
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  gl_have_pthread=yes
+             LIBTHREAD=$gl_pthread LTLIBTHREAD=$gl_pthread
+             LIBMULTITHREAD=$gl_pthread LTLIBMULTITHREAD=$gl_pthread
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+          LIBS=$save_LIBS
+          test -n "$gl_have_pthread" && break
+        done
+
+        # Test for libpthread by looking for pthread_kill. (Not pthread_self,
+        # since it is defined as a macro on OSF/1.)
+        if test -n "$gl_have_pthread" && test -z "$LIBTHREAD"; then
+          # The program links fine without libpthread. But it may actually
+          # need to link with libpthread in order to create multiple threads.
+          { $as_echo "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lpthread" >&5
+$as_echo_n "checking for pthread_kill in -lpthread... " >&6; }
+if ${ac_cv_lib_pthread_pthread_kill+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_check_lib_save_LIBS=$LIBS
+LIBS="-lpthread  $LIBS"
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+/* Override any GCC internal prototype to avoid an error.
+   Use char because int might match the return type of a GCC
+   builtin and then its argument prototype would still apply.  */
+#ifdef __cplusplus
+extern "C"
+#endif
+char pthread_kill ();
+int
+main ()
+{
+return pthread_kill ();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  ac_cv_lib_pthread_pthread_kill=yes
+else
+  ac_cv_lib_pthread_pthread_kill=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+LIBS=$ac_check_lib_save_LIBS
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthread_pthread_kill" >&5
+$as_echo "$ac_cv_lib_pthread_pthread_kill" >&6; }
+if test "x$ac_cv_lib_pthread_pthread_kill" = xyes; then :
+  LIBMULTITHREAD=-lpthread LTLIBMULTITHREAD=-lpthread
+             # On Solaris and HP-UX, most pthread functions exist also in libc.
+             # Therefore pthread_in_use() needs to actually try to create a
+             # thread: pthread_create from libc will fail, whereas
+             # pthread_create will actually create a thread.
+             # On Solaris 10 or newer, this test is no longer needed, because
+             # libc contains the fully functional pthread functions.
+             case "$host_os" in
+               solaris | solaris2.1-9 | solaris2.1-9.* | hpux*)
+
+$as_echo "#define PTHREAD_IN_USE_DETECTION_HARD 1" >>confdefs.h
+
+             esac
+
+fi
+
+        elif test -z "$gl_have_pthread"; then
+          # Some library is needed. Try libpthread and libc_r.
+          { $as_echo "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lpthread" >&5
+$as_echo_n "checking for pthread_kill in -lpthread... " >&6; }
+if ${ac_cv_lib_pthread_pthread_kill+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_check_lib_save_LIBS=$LIBS
+LIBS="-lpthread  $LIBS"
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+/* Override any GCC internal prototype to avoid an error.
+   Use char because int might match the return type of a GCC
+   builtin and then its argument prototype would still apply.  */
+#ifdef __cplusplus
+extern "C"
+#endif
+char pthread_kill ();
+int
+main ()
+{
+return pthread_kill ();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  ac_cv_lib_pthread_pthread_kill=yes
+else
+  ac_cv_lib_pthread_pthread_kill=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+LIBS=$ac_check_lib_save_LIBS
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthread_pthread_kill" >&5
+$as_echo "$ac_cv_lib_pthread_pthread_kill" >&6; }
+if test "x$ac_cv_lib_pthread_pthread_kill" = xyes; then :
+  gl_have_pthread=yes
+             LIBTHREAD=-lpthread LTLIBTHREAD=-lpthread
+             LIBMULTITHREAD=-lpthread LTLIBMULTITHREAD=-lpthread
+fi
+
+          if test -z "$gl_have_pthread"; then
+            # For FreeBSD 4.
+            { $as_echo "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lc_r" >&5
+$as_echo_n "checking for pthread_kill in -lc_r... " >&6; }
+if ${ac_cv_lib_c_r_pthread_kill+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_check_lib_save_LIBS=$LIBS
+LIBS="-lc_r  $LIBS"
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+/* Override any GCC internal prototype to avoid an error.
+   Use char because int might match the return type of a GCC
+   builtin and then its argument prototype would still apply.  */
+#ifdef __cplusplus
+extern "C"
+#endif
+char pthread_kill ();
+int
+main ()
+{
+return pthread_kill ();
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+  ac_cv_lib_c_r_pthread_kill=yes
+else
+  ac_cv_lib_c_r_pthread_kill=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+LIBS=$ac_check_lib_save_LIBS
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_c_r_pthread_kill" >&5
+$as_echo "$ac_cv_lib_c_r_pthread_kill" >&6; }
+if test "x$ac_cv_lib_c_r_pthread_kill" = xyes; then :
+  gl_have_pthread=yes
+               LIBTHREAD=-lc_r LTLIBTHREAD=-lc_r
+               LIBMULTITHREAD=-lc_r LTLIBMULTITHREAD=-lc_r
+fi
+
+          fi
+        fi
+        if test -n "$gl_have_pthread"; then
+          gl_threads_api=posix
+
+$as_echo "#define USE_POSIX_THREADS 1" >>confdefs.h
+
+          if test -n "$LIBMULTITHREAD" || test -n "$LTLIBMULTITHREAD"; then
+            if case "$gl_cv_have_weak" in *yes) true;; *) false;; esac; then
+
+$as_echo "#define USE_POSIX_THREADS_WEAK 1" >>confdefs.h
+
+              LIBTHREAD=
+              LTLIBTHREAD=
+            fi
+          fi
+        fi
+      fi
+    fi
+    if test -z "$gl_have_pthread"; then
+      case "$gl_use_threads" in
+        yes | windows | win32) # The 'win32' is for backward compatibility.
+          if { case "$host_os" in
+                 mingw*) true;;
+                 *) false;;
+               esac
+             }; then
+            gl_threads_api=windows
+
+$as_echo "#define USE_WINDOWS_THREADS 1" >>confdefs.h
+
+          fi
+          ;;
+      esac
+    fi
+  fi
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for multithread API to use" >&5
+$as_echo_n "checking for multithread API to use... " >&6; }
+  { $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_threads_api" >&5
+$as_echo "$gl_threads_api" >&6; }
+
+
+
+
+
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for unsigned long long int" >&5
+$as_echo_n "checking for unsigned long long int... " >&6; }
+if ${ac_cv_type_unsigned_long_long_int+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_cv_type_unsigned_long_long_int=yes
+     if test "x${ac_cv_prog_cc_c99-no}" = xno; then
+       cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+  /* For now, do not test the preprocessor; as of 2007 there are too many
+         implementations with broken preprocessors.  Perhaps this can
+         be revisited in 2012.  In the meantime, code should not expect
+         #if to work with literals wider than 32 bits.  */
+      /* Test literals.  */
+      long long int ll = 9223372036854775807ll;
+      long long int nll = -9223372036854775807LL;
+      unsigned long long int ull = 18446744073709551615ULL;
+      /* Test constant expressions.   */
+      typedef int a[((-9223372036854775807LL < 0 && 0 < 9223372036854775807ll)
+                     ? 1 : -1)];
+      typedef int b[(18446744073709551615ULL <= (unsigned long long int) -1
+                     ? 1 : -1)];
+      int i = 63;
+int
+main ()
+{
+/* Test availability of runtime routines for shift and division.  */
+      long long int llmax = 9223372036854775807ll;
+      unsigned long long int ullmax = 18446744073709551615ull;
+      return ((ll << 63) | (ll >> 63) | (ll < i) | (ll > i)
+              | (llmax / ll) | (llmax % ll)
+              | (ull << 63) | (ull >> 63) | (ull << i) | (ull >> i)
+              | (ullmax / ull) | (ullmax % ull));
+  ;
+  return 0;
+}
+
+_ACEOF
+if ac_fn_c_try_link "$LINENO"; then :
+
+else
+  ac_cv_type_unsigned_long_long_int=no
+fi
+rm -f core conftest.err conftest.$ac_objext \
+    conftest$ac_exeext conftest.$ac_ext
+     fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_type_unsigned_long_long_int" >&5
+$as_echo "$ac_cv_type_unsigned_long_long_int" >&6; }
+  if test $ac_cv_type_unsigned_long_long_int = yes; then
+
+$as_echo "#define HAVE_UNSIGNED_LONG_LONG_INT 1" >>confdefs.h
+
+  fi
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for long long int" >&5
+$as_echo_n "checking for long long int... " >&6; }
+if ${ac_cv_type_long_long_int+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  ac_cv_type_long_long_int=yes
+      if test "x${ac_cv_prog_cc_c99-no}" = xno; then
+        ac_cv_type_long_long_int=$ac_cv_type_unsigned_long_long_int
+        if test $ac_cv_type_long_long_int = yes; then
+                                        if test "$cross_compiling" = yes; then :
+  :
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <limits.h>
+                 #ifndef LLONG_MAX
+                 # define HALF \
+                          (1LL << (sizeof (long long int) * CHAR_BIT - 2))
+                 # define LLONG_MAX (HALF - 1 + HALF)
+                 #endif
+int
+main ()
+{
+long long int n = 1;
+                 int i;
+                 for (i = 0; ; i++)
+                   {
+                     long long int m = n << i;
+                     if (m >> i != n)
+                       return 1;
+                     if (LLONG_MAX / 2 < m)
+                       break;
+                   }
+                 return 0;
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+
+else
+  ac_cv_type_long_long_int=no
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+        fi
+      fi
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_type_long_long_int" >&5
+$as_echo "$ac_cv_type_long_long_int" >&6; }
+  if test $ac_cv_type_long_long_int = yes; then
+
+$as_echo "#define HAVE_LONG_LONG_INT 1" >>confdefs.h
+
+  fi
+
+
+    gl_cv_c_multiarch=no
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#ifndef __APPLE_CC__
+         not a universal capable compiler
+        #endif
+        typedef int dummy;
+
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+
+               arch=
+     prev=
+     for word in ${CC} ${CFLAGS} ${CPPFLAGS} ${LDFLAGS}; do
+       if test -n "$prev"; then
+         case $word in
+           i?86 | x86_64 | ppc | ppc64)
+             if test -z "$arch" || test "$arch" = "$word"; then
+               arch="$word"
+             else
+               gl_cv_c_multiarch=yes
+             fi
+             ;;
+         esac
+         prev=
+       else
+         if test "x$word" = "x-arch"; then
+           prev=arch
+         fi
+       fi
+     done
+
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+  if test $gl_cv_c_multiarch = yes; then
+    APPLE_UNIVERSAL_BUILD=1
+  else
+    APPLE_UNIVERSAL_BUILD=0
+  fi
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for wint_t" >&5
+$as_echo_n "checking for wint_t... " >&6; }
+if ${gt_cv_c_wint_t+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+/* Tru64 with Desktop Toolkit C has a bug: <stdio.h> must be included before
+   <wchar.h>.
+   BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be included
+   before <wchar.h>.  */
+#include <stddef.h>
+#include <stdio.h>
+#include <time.h>
+#include <wchar.h>
+            wint_t foo = (wchar_t)'\0';
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gt_cv_c_wint_t=yes
+else
+  gt_cv_c_wint_t=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gt_cv_c_wint_t" >&5
+$as_echo "$gt_cv_c_wint_t" >&6; }
+  if test $gt_cv_c_wint_t = yes; then
+
+$as_echo "#define HAVE_WINT_T 1" >>confdefs.h
+
+
+            { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether wint_t is too small" >&5
+$as_echo_n "checking whether wint_t is too small... " >&6; }
+if ${gl_cv_type_wint_t_too_small+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+/* Tru64 with Desktop Toolkit C has a bug: <stdio.h> must be included before
+   <wchar.h>.
+   BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+   included before <wchar.h>.  */
+#if !(defined __GLIBC__ && !defined __UCLIBC__)
+# include <stddef.h>
+# include <stdio.h>
+# include <time.h>
+#endif
+#include <wchar.h>
+              int verify[sizeof (wint_t) < sizeof (int) ? -1 : 1];
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_type_wint_t_too_small=no
+else
+  gl_cv_type_wint_t_too_small=yes
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_type_wint_t_too_small" >&5
+$as_echo "$gl_cv_type_wint_t_too_small" >&6; }
+    if test $gl_cv_type_wint_t_too_small = yes; then
+      GNULIB_OVERRIDES_WINT_T=1
+    else
+      GNULIB_OVERRIDES_WINT_T=0
+    fi
+  else
+    GNULIB_OVERRIDES_WINT_T=0
+  fi
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+  if test $ac_cv_type_long_long_int = yes; then
+    HAVE_LONG_LONG_INT=1
+  else
+    HAVE_LONG_LONG_INT=0
+  fi
+
+
+  if test $ac_cv_type_unsigned_long_long_int = yes; then
+    HAVE_UNSIGNED_LONG_LONG_INT=1
+  else
+    HAVE_UNSIGNED_LONG_LONG_INT=0
+  fi
+
+
+
+  :
+
+
+
+
+
+  if test $ac_cv_header_wchar_h = yes; then
+    HAVE_WCHAR_H=1
+  else
+    HAVE_WCHAR_H=0
+  fi
+
+
+      if test $ac_cv_header_inttypes_h = yes; then
+    HAVE_INTTYPES_H=1
+  else
+    HAVE_INTTYPES_H=0
+  fi
+
+
+      if test $ac_cv_header_sys_types_h = yes; then
+    HAVE_SYS_TYPES_H=1
+  else
+    HAVE_SYS_TYPES_H=0
+  fi
+
+
+
+
+
+
+
+
+  :
+
+
+
+
+
+
+
+
+     if test $gl_cv_have_include_next = yes; then
+       gl_cv_next_stdint_h='<'stdint.h'>'
+     else
+       { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <stdint.h>" >&5
+$as_echo_n "checking absolute name of <stdint.h>... " >&6; }
+if ${gl_cv_next_stdint_h+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+
+             if test $ac_cv_header_stdint_h = yes; then
+
+
+
+
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <stdint.h>
+_ACEOF
+                case "$host_os" in
+    aix*) gl_absname_cpp="$ac_cpp -C" ;;
+    *)    gl_absname_cpp="$ac_cpp" ;;
+  esac
+
+  case "$host_os" in
+    mingw*)
+                                          gl_dirsep_regex='[/\\]'
+      ;;
+    *)
+      gl_dirsep_regex='\/'
+      ;;
+  esac
+      gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g'
+  gl_header_literal_regex=`echo 'stdint.h' \
+                           | sed -e "$gl_make_literal_regex_sed"`
+  gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{
+      s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/
+      s|^/[^/]|//&|
+      p
+      q
+    }'
+
+        gl_cv_absolute_stdint_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 |
+  sed -n "$gl_absolute_header_sed"`
+
+           gl_header=$gl_cv_absolute_stdint_h
+           gl_cv_next_stdint_h='"'$gl_header'"'
+          else
+               gl_cv_next_stdint_h='<'stdint.h'>'
+             fi
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_stdint_h" >&5
+$as_echo "$gl_cv_next_stdint_h" >&6; }
+     fi
+     NEXT_STDINT_H=$gl_cv_next_stdint_h
+
+     if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then
+       # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next'
+       gl_next_as_first_directive='<'stdint.h'>'
+     else
+       # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include'
+       gl_next_as_first_directive=$gl_cv_next_stdint_h
+     fi
+     NEXT_AS_FIRST_DIRECTIVE_STDINT_H=$gl_next_as_first_directive
+
+
+
+
+  if test $ac_cv_header_stdint_h = yes; then
+    HAVE_STDINT_H=1
+  else
+    HAVE_STDINT_H=0
+  fi
+
+
+    if test $ac_cv_header_stdint_h = yes; then
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stdint.h conforms to C99" >&5
+$as_echo_n "checking whether stdint.h conforms to C99... " >&6; }
+if ${gl_cv_header_working_stdint_h+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  gl_cv_header_working_stdint_h=no
+       cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+
+#define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */
+#define __STDC_CONSTANT_MACROS 1
+#define __STDC_LIMIT_MACROS 1
+#include <stdint.h>
+/* Dragonfly defines WCHAR_MIN, WCHAR_MAX only in <wchar.h>.  */
+#if !(defined WCHAR_MIN && defined WCHAR_MAX)
+#error "WCHAR_MIN, WCHAR_MAX not defined in <stdint.h>"
+#endif
+
+
+  /* BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+     included before <wchar.h>.  */
+  #include <stddef.h>
+  #include <signal.h>
+  #if HAVE_WCHAR_H
+  # include <stdio.h>
+  # include <time.h>
+  # include <wchar.h>
+  #endif
+
+
+#ifdef INT8_MAX
+int8_t a1 = INT8_MAX;
+int8_t a1min = INT8_MIN;
+#endif
+#ifdef INT16_MAX
+int16_t a2 = INT16_MAX;
+int16_t a2min = INT16_MIN;
+#endif
+#ifdef INT32_MAX
+int32_t a3 = INT32_MAX;
+int32_t a3min = INT32_MIN;
+#endif
+#ifdef INT64_MAX
+int64_t a4 = INT64_MAX;
+int64_t a4min = INT64_MIN;
+#endif
+#ifdef UINT8_MAX
+uint8_t b1 = UINT8_MAX;
+#else
+typedef int b1[(unsigned char) -1 != 255 ? 1 : -1];
+#endif
+#ifdef UINT16_MAX
+uint16_t b2 = UINT16_MAX;
+#endif
+#ifdef UINT32_MAX
+uint32_t b3 = UINT32_MAX;
+#endif
+#ifdef UINT64_MAX
+uint64_t b4 = UINT64_MAX;
+#endif
+int_least8_t c1 = INT8_C (0x7f);
+int_least8_t c1max = INT_LEAST8_MAX;
+int_least8_t c1min = INT_LEAST8_MIN;
+int_least16_t c2 = INT16_C (0x7fff);
+int_least16_t c2max = INT_LEAST16_MAX;
+int_least16_t c2min = INT_LEAST16_MIN;
+int_least32_t c3 = INT32_C (0x7fffffff);
+int_least32_t c3max = INT_LEAST32_MAX;
+int_least32_t c3min = INT_LEAST32_MIN;
+int_least64_t c4 = INT64_C (0x7fffffffffffffff);
+int_least64_t c4max = INT_LEAST64_MAX;
+int_least64_t c4min = INT_LEAST64_MIN;
+uint_least8_t d1 = UINT8_C (0xff);
+uint_least8_t d1max = UINT_LEAST8_MAX;
+uint_least16_t d2 = UINT16_C (0xffff);
+uint_least16_t d2max = UINT_LEAST16_MAX;
+uint_least32_t d3 = UINT32_C (0xffffffff);
+uint_least32_t d3max = UINT_LEAST32_MAX;
+uint_least64_t d4 = UINT64_C (0xffffffffffffffff);
+uint_least64_t d4max = UINT_LEAST64_MAX;
+int_fast8_t e1 = INT_FAST8_MAX;
+int_fast8_t e1min = INT_FAST8_MIN;
+int_fast16_t e2 = INT_FAST16_MAX;
+int_fast16_t e2min = INT_FAST16_MIN;
+int_fast32_t e3 = INT_FAST32_MAX;
+int_fast32_t e3min = INT_FAST32_MIN;
+int_fast64_t e4 = INT_FAST64_MAX;
+int_fast64_t e4min = INT_FAST64_MIN;
+uint_fast8_t f1 = UINT_FAST8_MAX;
+uint_fast16_t f2 = UINT_FAST16_MAX;
+uint_fast32_t f3 = UINT_FAST32_MAX;
+uint_fast64_t f4 = UINT_FAST64_MAX;
+#ifdef INTPTR_MAX
+intptr_t g = INTPTR_MAX;
+intptr_t gmin = INTPTR_MIN;
+#endif
+#ifdef UINTPTR_MAX
+uintptr_t h = UINTPTR_MAX;
+#endif
+intmax_t i = INTMAX_MAX;
+uintmax_t j = UINTMAX_MAX;
+
+/* Check that SIZE_MAX has the correct type, if possible.  */
+#if 201112 <= __STDC_VERSION__
+int k = _Generic (SIZE_MAX, size_t: 0);
+#elif (2 <= __GNUC__ || defined __IBM__TYPEOF__ \
+       || (0x5110 <= __SUNPRO_C && !__STDC__))
+extern size_t k;
+extern __typeof__ (SIZE_MAX) k;
+#endif
+
+#include <limits.h> /* for CHAR_BIT */
+#define TYPE_MINIMUM(t) \
+  ((t) ((t) 0 < (t) -1 ? (t) 0 : ~ TYPE_MAXIMUM (t)))
+#define TYPE_MAXIMUM(t) \
+  ((t) ((t) 0 < (t) -1 \
+        ? (t) -1 \
+        : ((((t) 1 << (sizeof (t) * CHAR_BIT - 2)) - 1) * 2 + 1)))
+struct s {
+  int check_PTRDIFF:
+      PTRDIFF_MIN == TYPE_MINIMUM (ptrdiff_t)
+      && PTRDIFF_MAX == TYPE_MAXIMUM (ptrdiff_t)
+      ? 1 : -1;
+  /* Detect bug in FreeBSD 6.0 / ia64.  */
+  int check_SIG_ATOMIC:
+      SIG_ATOMIC_MIN == TYPE_MINIMUM (sig_atomic_t)
+      && SIG_ATOMIC_MAX == TYPE_MAXIMUM (sig_atomic_t)
+      ? 1 : -1;
+  int check_SIZE: SIZE_MAX == TYPE_MAXIMUM (size_t) ? 1 : -1;
+  int check_WCHAR:
+      WCHAR_MIN == TYPE_MINIMUM (wchar_t)
+      && WCHAR_MAX == TYPE_MAXIMUM (wchar_t)
+      ? 1 : -1;
+  /* Detect bug in mingw.  */
+  int check_WINT:
+      WINT_MIN == TYPE_MINIMUM (wint_t)
+      && WINT_MAX == TYPE_MAXIMUM (wint_t)
+      ? 1 : -1;
+
+  /* Detect bugs in glibc 2.4 and Solaris 10 stdint.h, among others.  */
+  int check_UINT8_C:
+        (-1 < UINT8_C (0)) == (-1 < (uint_least8_t) 0) ? 1 : -1;
+  int check_UINT16_C:
+        (-1 < UINT16_C (0)) == (-1 < (uint_least16_t) 0) ? 1 : -1;
+
+  /* Detect bugs in OpenBSD 3.9 stdint.h.  */
+#ifdef UINT8_MAX
+  int check_uint8: (uint8_t) -1 == UINT8_MAX ? 1 : -1;
+#endif
+#ifdef UINT16_MAX
+  int check_uint16: (uint16_t) -1 == UINT16_MAX ? 1 : -1;
+#endif
+#ifdef UINT32_MAX
+  int check_uint32: (uint32_t) -1 == UINT32_MAX ? 1 : -1;
+#endif
+#ifdef UINT64_MAX
+  int check_uint64: (uint64_t) -1 == UINT64_MAX ? 1 : -1;
+#endif
+  int check_uint_least8: (uint_least8_t) -1 == UINT_LEAST8_MAX ? 1 : -1;
+  int check_uint_least16: (uint_least16_t) -1 == UINT_LEAST16_MAX ? 1 : -1;
+  int check_uint_least32: (uint_least32_t) -1 == UINT_LEAST32_MAX ? 1 : -1;
+  int check_uint_least64: (uint_least64_t) -1 == UINT_LEAST64_MAX ? 1 : -1;
+  int check_uint_fast8: (uint_fast8_t) -1 == UINT_FAST8_MAX ? 1 : -1;
+  int check_uint_fast16: (uint_fast16_t) -1 == UINT_FAST16_MAX ? 1 : -1;
+  int check_uint_fast32: (uint_fast32_t) -1 == UINT_FAST32_MAX ? 1 : -1;
+  int check_uint_fast64: (uint_fast64_t) -1 == UINT_FAST64_MAX ? 1 : -1;
+  int check_uintptr: (uintptr_t) -1 == UINTPTR_MAX ? 1 : -1;
+  int check_uintmax: (uintmax_t) -1 == UINTMAX_MAX ? 1 : -1;
+  int check_size: (size_t) -1 == SIZE_MAX ? 1 : -1;
+};
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+                                                    if test "$cross_compiling" = yes; then :
+  case "$host_os" in
+                         # Guess yes on native Windows.
+                 mingw*) gl_cv_header_working_stdint_h="guessing yes" ;;
+                         # In general, assume it works.
+                 *)      gl_cv_header_working_stdint_h="guessing yes" ;;
+               esac
+
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+
+#define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */
+#define __STDC_CONSTANT_MACROS 1
+#define __STDC_LIMIT_MACROS 1
+#include <stdint.h>
+
+
+  /* BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+     included before <wchar.h>.  */
+  #include <stddef.h>
+  #include <signal.h>
+  #if HAVE_WCHAR_H
+  # include <stdio.h>
+  # include <time.h>
+  # include <wchar.h>
+  #endif
+
+
+#include <stdio.h>
+#include <string.h>
+#define MVAL(macro) MVAL1(macro)
+#define MVAL1(expression) #expression
+static const char *macro_values[] =
+  {
+#ifdef INT8_MAX
+    MVAL (INT8_MAX),
+#endif
+#ifdef INT16_MAX
+    MVAL (INT16_MAX),
+#endif
+#ifdef INT32_MAX
+    MVAL (INT32_MAX),
+#endif
+#ifdef INT64_MAX
+    MVAL (INT64_MAX),
+#endif
+#ifdef UINT8_MAX
+    MVAL (UINT8_MAX),
+#endif
+#ifdef UINT16_MAX
+    MVAL (UINT16_MAX),
+#endif
+#ifdef UINT32_MAX
+    MVAL (UINT32_MAX),
+#endif
+#ifdef UINT64_MAX
+    MVAL (UINT64_MAX),
+#endif
+    NULL
+  };
+
+int
+main ()
+{
+
+  const char **mv;
+  for (mv = macro_values; *mv != NULL; mv++)
+    {
+      const char *value = *mv;
+      /* Test whether it looks like a cast expression.  */
+      if (strncmp (value, "((unsigned int)"/*)*/, 15) == 0
+          || strncmp (value, "((unsigned short)"/*)*/, 17) == 0
+          || strncmp (value, "((unsigned char)"/*)*/, 16) == 0
+          || strncmp (value, "((int)"/*)*/, 6) == 0
+          || strncmp (value, "((signed short)"/*)*/, 15) == 0
+          || strncmp (value, "((signed char)"/*)*/, 14) == 0)
+        return mv - macro_values + 1;
+    }
+  return 0;
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  gl_cv_header_working_stdint_h=yes
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_working_stdint_h" >&5
+$as_echo "$gl_cv_header_working_stdint_h" >&6; }
+  fi
+
+  HAVE_C99_STDINT_H=0
+  HAVE_SYS_BITYPES_H=0
+  HAVE_SYS_INTTYPES_H=0
+  STDINT_H=stdint.h
+  case "$gl_cv_header_working_stdint_h" in
+    *yes)
+      HAVE_C99_STDINT_H=1
+                  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stdint.h predates C++11" >&5
+$as_echo_n "checking whether stdint.h predates C++11... " >&6; }
+if ${gl_cv_header_stdint_predates_cxx11_h+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  gl_cv_header_stdint_predates_cxx11_h=yes
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+
+#define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */
+#include <stdint.h>
+
+
+  /* BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+     included before <wchar.h>.  */
+  #include <stddef.h>
+  #include <signal.h>
+  #if HAVE_WCHAR_H
+  # include <stdio.h>
+  # include <time.h>
+  # include <wchar.h>
+  #endif
+
+
+intmax_t im = INTMAX_MAX;
+int32_t i32 = INT32_C (0x7fffffff);
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_header_stdint_predates_cxx11_h=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_stdint_predates_cxx11_h" >&5
+$as_echo "$gl_cv_header_stdint_predates_cxx11_h" >&6; }
+
+      if test "$gl_cv_header_stdint_predates_cxx11_h" = yes; then
+
+$as_echo "#define __STDC_CONSTANT_MACROS 1" >>confdefs.h
+
+
+$as_echo "#define __STDC_LIMIT_MACROS 1" >>confdefs.h
+
+      fi
+      { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stdint.h has UINTMAX_WIDTH etc." >&5
+$as_echo_n "checking whether stdint.h has UINTMAX_WIDTH etc.... " >&6; }
+if ${gl_cv_header_stdint_width+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  gl_cv_header_stdint_width=no
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+              /* Work if build is not clean.  */
+              #define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1
+              #ifndef __STDC_WANT_IEC_60559_BFP_EXT__
+               #define __STDC_WANT_IEC_60559_BFP_EXT__ 1
+              #endif
+              #include <stdint.h>
+
+  /* BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+     included before <wchar.h>.  */
+  #include <stddef.h>
+  #include <signal.h>
+  #if HAVE_WCHAR_H
+  # include <stdio.h>
+  # include <time.h>
+  # include <wchar.h>
+  #endif
+
+              int iw = UINTMAX_WIDTH;
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_header_stdint_width=yes
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_stdint_width" >&5
+$as_echo "$gl_cv_header_stdint_width" >&6; }
+      if test "$gl_cv_header_stdint_width" = yes; then
+        STDINT_H=
+      fi
+      ;;
+    *)
+                  for ac_header in sys/inttypes.h sys/bitypes.h
+do :
+  as_ac_Header=`$as_echo "ac_cv_header_$ac_header" | $as_tr_sh`
+ac_fn_c_check_header_mongrel "$LINENO" "$ac_header" "$as_ac_Header" "$ac_includes_default"
+if eval test \"x\$"$as_ac_Header"\" = x"yes"; then :
+  cat >>confdefs.h <<_ACEOF
+#define `$as_echo "HAVE_$ac_header" | $as_tr_cpp` 1
+_ACEOF
+
+fi
+
+done
+
+      if test $ac_cv_header_sys_inttypes_h = yes; then
+        HAVE_SYS_INTTYPES_H=1
+      fi
+      if test $ac_cv_header_sys_bitypes_h = yes; then
+        HAVE_SYS_BITYPES_H=1
+      fi
+
+
+  if test $APPLE_UNIVERSAL_BUILD = 0; then
+
+
+  for gltype in ptrdiff_t size_t ; do
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for bit size of $gltype" >&5
+$as_echo_n "checking for bit size of $gltype... " >&6; }
+if eval \${gl_cv_bitsizeof_${gltype}+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if ac_fn_c_compute_int "$LINENO" "sizeof ($gltype) * CHAR_BIT" "result"        "
+  /* BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+     included before <wchar.h>.  */
+  #include <stddef.h>
+  #include <signal.h>
+  #if HAVE_WCHAR_H
+  # include <stdio.h>
+  # include <time.h>
+  # include <wchar.h>
+  #endif
+
+#include <limits.h>"; then :
+
+else
+  result=unknown
+fi
+
+       eval gl_cv_bitsizeof_${gltype}=\$result
+
+fi
+eval ac_res=\$gl_cv_bitsizeof_${gltype}
+              { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
+$as_echo "$ac_res" >&6; }
+    eval result=\$gl_cv_bitsizeof_${gltype}
+    if test $result = unknown; then
+                                                result=0
+    fi
+    GLTYPE=`echo "$gltype" | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'`
+    cat >>confdefs.h <<_ACEOF
+#define BITSIZEOF_${GLTYPE} $result
+_ACEOF
+
+    eval BITSIZEOF_${GLTYPE}=\$result
+  done
+
+
+  fi
+
+
+  for gltype in sig_atomic_t wchar_t wint_t ; do
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for bit size of $gltype" >&5
+$as_echo_n "checking for bit size of $gltype... " >&6; }
+if eval \${gl_cv_bitsizeof_${gltype}+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  if ac_fn_c_compute_int "$LINENO" "sizeof ($gltype) * CHAR_BIT" "result"        "
+  /* BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+     included before <wchar.h>.  */
+  #include <stddef.h>
+  #include <signal.h>
+  #if HAVE_WCHAR_H
+  # include <stdio.h>
+  # include <time.h>
+  # include <wchar.h>
+  #endif
+
+#include <limits.h>"; then :
+
+else
+  result=unknown
+fi
+
+       eval gl_cv_bitsizeof_${gltype}=\$result
+
+fi
+eval ac_res=\$gl_cv_bitsizeof_${gltype}
+              { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
+$as_echo "$ac_res" >&6; }
+    eval result=\$gl_cv_bitsizeof_${gltype}
+    if test $result = unknown; then
+                                                result=0
+    fi
+    GLTYPE=`echo "$gltype" | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'`
+    cat >>confdefs.h <<_ACEOF
+#define BITSIZEOF_${GLTYPE} $result
+_ACEOF
+
+    eval BITSIZEOF_${GLTYPE}=\$result
+  done
+
+
+
+
+  for gltype in sig_atomic_t wchar_t wint_t ; do
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $gltype is signed" >&5
+$as_echo_n "checking whether $gltype is signed... " >&6; }
+if eval \${gl_cv_type_${gltype}_signed+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+  /* BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+     included before <wchar.h>.  */
+  #include <stddef.h>
+  #include <signal.h>
+  #if HAVE_WCHAR_H
+  # include <stdio.h>
+  # include <time.h>
+  # include <wchar.h>
+  #endif
+
+            int verify[2 * (($gltype) -1 < ($gltype) 0) - 1];
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  result=yes
+else
+  result=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+       eval gl_cv_type_${gltype}_signed=\$result
+
+fi
+eval ac_res=\$gl_cv_type_${gltype}_signed
+              { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
+$as_echo "$ac_res" >&6; }
+    eval result=\$gl_cv_type_${gltype}_signed
+    GLTYPE=`echo $gltype | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'`
+    if test "$result" = yes; then
+      cat >>confdefs.h <<_ACEOF
+#define HAVE_SIGNED_${GLTYPE} 1
+_ACEOF
+
+      eval HAVE_SIGNED_${GLTYPE}=1
+    else
+      eval HAVE_SIGNED_${GLTYPE}=0
+    fi
+  done
+
+
+  gl_cv_type_ptrdiff_t_signed=yes
+  gl_cv_type_size_t_signed=no
+  if test $APPLE_UNIVERSAL_BUILD = 0; then
+
+
+  for gltype in ptrdiff_t size_t ; do
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $gltype integer literal suffix" >&5
+$as_echo_n "checking for $gltype integer literal suffix... " >&6; }
+if eval \${gl_cv_type_${gltype}_suffix+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  eval gl_cv_type_${gltype}_suffix=no
+       eval result=\$gl_cv_type_${gltype}_signed
+       if test "$result" = yes; then
+         glsufu=
+       else
+         glsufu=u
+       fi
+       for glsuf in "$glsufu" ${glsufu}l ${glsufu}ll ${glsufu}i64; do
+         case $glsuf in
+           '')  gltype1='int';;
+           l)   gltype1='long int';;
+           ll)  gltype1='long long int';;
+           i64) gltype1='__int64';;
+           u)   gltype1='unsigned int';;
+           ul)  gltype1='unsigned long int';;
+           ull) gltype1='unsigned long long int';;
+           ui64)gltype1='unsigned __int64';;
+         esac
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+  /* BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+     included before <wchar.h>.  */
+  #include <stddef.h>
+  #include <signal.h>
+  #if HAVE_WCHAR_H
+  # include <stdio.h>
+  # include <time.h>
+  # include <wchar.h>
+  #endif
+
+              extern $gltype foo;
+              extern $gltype1 foo;
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  eval gl_cv_type_${gltype}_suffix=\$glsuf
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         eval result=\$gl_cv_type_${gltype}_suffix
+         test "$result" != no && break
+       done
+fi
+eval ac_res=\$gl_cv_type_${gltype}_suffix
+              { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
+$as_echo "$ac_res" >&6; }
+    GLTYPE=`echo $gltype | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'`
+    eval result=\$gl_cv_type_${gltype}_suffix
+    test "$result" = no && result=
+    eval ${GLTYPE}_SUFFIX=\$result
+    cat >>confdefs.h <<_ACEOF
+#define ${GLTYPE}_SUFFIX $result
+_ACEOF
+
+  done
+
+
+  fi
+
+
+  for gltype in sig_atomic_t wchar_t wint_t ; do
+    { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $gltype integer literal suffix" >&5
+$as_echo_n "checking for $gltype integer literal suffix... " >&6; }
+if eval \${gl_cv_type_${gltype}_suffix+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  eval gl_cv_type_${gltype}_suffix=no
+       eval result=\$gl_cv_type_${gltype}_signed
+       if test "$result" = yes; then
+         glsufu=
+       else
+         glsufu=u
+       fi
+       for glsuf in "$glsufu" ${glsufu}l ${glsufu}ll ${glsufu}i64; do
+         case $glsuf in
+           '')  gltype1='int';;
+           l)   gltype1='long int';;
+           ll)  gltype1='long long int';;
+           i64) gltype1='__int64';;
+           u)   gltype1='unsigned int';;
+           ul)  gltype1='unsigned long int';;
+           ull) gltype1='unsigned long long int';;
+           ui64)gltype1='unsigned __int64';;
+         esac
+         cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+  /* BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+     included before <wchar.h>.  */
+  #include <stddef.h>
+  #include <signal.h>
+  #if HAVE_WCHAR_H
+  # include <stdio.h>
+  # include <time.h>
+  # include <wchar.h>
+  #endif
+
+              extern $gltype foo;
+              extern $gltype1 foo;
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  eval gl_cv_type_${gltype}_suffix=\$glsuf
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+         eval result=\$gl_cv_type_${gltype}_suffix
+         test "$result" != no && break
+       done
+fi
+eval ac_res=\$gl_cv_type_${gltype}_suffix
+              { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
+$as_echo "$ac_res" >&6; }
+    GLTYPE=`echo $gltype | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'`
+    eval result=\$gl_cv_type_${gltype}_suffix
+    test "$result" = no && result=
+    eval ${GLTYPE}_SUFFIX=\$result
+    cat >>confdefs.h <<_ACEOF
+#define ${GLTYPE}_SUFFIX $result
+_ACEOF
+
+  done
+
+
+
+          if test $GNULIB_OVERRIDES_WINT_T = 1; then
+    BITSIZEOF_WINT_T=32
+  fi
+
+      ;;
+  esac
+
+
+
+  LIMITS_H='limits.h'
+   if test -n "$LIMITS_H"; then
+  GL_GENERATE_LIMITS_H_TRUE=
+  GL_GENERATE_LIMITS_H_FALSE='#'
+else
+  GL_GENERATE_LIMITS_H_TRUE='#'
+  GL_GENERATE_LIMITS_H_FALSE=
+fi
+
+
+
+
+
+
+
+   if test -n "$STDINT_H"; then
+  GL_GENERATE_STDINT_H_TRUE=
+  GL_GENERATE_STDINT_H_FALSE='#'
+else
+  GL_GENERATE_STDINT_H_TRUE='#'
+  GL_GENERATE_STDINT_H_FALSE=
+fi
+
+
+
+
+ac_fn_c_check_type "$LINENO" "pid_t" "ac_cv_type_pid_t" "$ac_includes_default"
+if test "x$ac_cv_type_pid_t" = xyes; then :
+
+else
+
+cat >>confdefs.h <<_ACEOF
+#define pid_t int
+_ACEOF
+
+fi
+
+ac_fn_c_check_type "$LINENO" "mode_t" "ac_cv_type_mode_t" "$ac_includes_default"
+if test "x$ac_cv_type_mode_t" = xyes; then :
+
+else
+
+cat >>confdefs.h <<_ACEOF
+#define mode_t int
+_ACEOF
+
+fi
+
+
+
+    WINDOWS_64_BIT_OFF_T=0
+
+
+
+
+
+$as_echo "#define _USE_STD_STAT 1" >>confdefs.h
+
+
+
+
+
+
+
+
+
+
+
+     if test $gl_cv_have_include_next = yes; then
+       gl_cv_next_sys_types_h='<'sys/types.h'>'
+     else
+       { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <sys/types.h>" >&5
+$as_echo_n "checking absolute name of <sys/types.h>... " >&6; }
+if ${gl_cv_next_sys_types_h+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+
+
+
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <sys/types.h>
+_ACEOF
+                case "$host_os" in
+    aix*) gl_absname_cpp="$ac_cpp -C" ;;
+    *)    gl_absname_cpp="$ac_cpp" ;;
+  esac
+
+  case "$host_os" in
+    mingw*)
+                                          gl_dirsep_regex='[/\\]'
+      ;;
+    *)
+      gl_dirsep_regex='\/'
+      ;;
+  esac
+      gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g'
+  gl_header_literal_regex=`echo 'sys/types.h' \
+                           | sed -e "$gl_make_literal_regex_sed"`
+  gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{
+      s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/
+      s|^/[^/]|//&|
+      p
+      q
+    }'
+
+        gl_cv_absolute_sys_types_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 |
+  sed -n "$gl_absolute_header_sed"`
+
+           gl_header=$gl_cv_absolute_sys_types_h
+           gl_cv_next_sys_types_h='"'$gl_header'"'
+
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_sys_types_h" >&5
+$as_echo "$gl_cv_next_sys_types_h" >&6; }
+     fi
+     NEXT_SYS_TYPES_H=$gl_cv_next_sys_types_h
+
+     if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then
+       # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next'
+       gl_next_as_first_directive='<'sys/types.h'>'
+     else
+       # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include'
+       gl_next_as_first_directive=$gl_cv_next_sys_types_h
+     fi
+     NEXT_AS_FIRST_DIRECTIVE_SYS_TYPES_H=$gl_next_as_first_directive
+
+
+
+
+
+
+
+
+
+
+
+
+    WINDOWS_STAT_INODES=0
+
+
+
+
+   if true; then
+  GL_COND_LIBTOOL_TRUE=
+  GL_COND_LIBTOOL_FALSE='#'
+else
+  GL_COND_LIBTOOL_TRUE='#'
+  GL_COND_LIBTOOL_FALSE=
+fi
+
+  gl_cond_libtool=true
+  gl_m4_base='gnulib-m4'
+
+
+
+
+
+
+
+
+
+  gl_source_base='gnulib-lib'
+
+
+
+
+
+  if test "$gl_threads_api" = posix; then
+    # OSF/1 4.0 and Mac OS X 10.1 lack the pthread_rwlock_t type and the
+    # pthread_rwlock_* functions.
+    has_rwlock=false
+    ac_fn_c_check_type "$LINENO" "pthread_rwlock_t" "ac_cv_type_pthread_rwlock_t" "#include <pthread.h>
+"
+if test "x$ac_cv_type_pthread_rwlock_t" = xyes; then :
+  has_rwlock=true
+
+$as_echo "#define HAVE_PTHREAD_RWLOCK 1" >>confdefs.h
+
+fi
+
+    if $has_rwlock; then
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether pthread_rwlock_rdlock prefers a writer to a reader" >&5
+$as_echo_n "checking whether pthread_rwlock_rdlock prefers a writer to a reader... " >&6; }
+if ${gl_cv_pthread_rwlock_rdlock_prefer_writer+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  save_LIBS="$LIBS"
+     LIBS="$LIBS $LIBMULTITHREAD"
+     if test "$cross_compiling" = yes; then :
+  gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing yes"
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+#include <errno.h>
+#include <pthread.h>
+#include <stdlib.h>
+#include <unistd.h>
+
+#define SUCCEED() exit (0)
+#define FAILURE() exit (1)
+#define UNEXPECTED(n) (exit (10 + (n)))
+
+/* The main thread creates the waiting writer and the requesting reader threads
+   in the default way; this guarantees that they have the same priority.
+   We can reuse the main thread as first reader thread.  */
+
+static pthread_rwlock_t lock;
+static pthread_t reader1;
+static pthread_t writer;
+static pthread_t reader2;
+static pthread_t timer;
+/* Used to pass control from writer to reader2 and from reader2 to timer,
+   as in a relay race.
+   Passing control from one running thread to another running thread
+   is most likely faster than to create the second thread.  */
+static pthread_mutex_t baton;
+
+static void *
+timer_func (void *ignored)
+{
+  /* Step 13 (can be before or after step 12):
+     The timer thread takes the baton, then waits a moment to make sure
+     it can tell whether the second reader thread is blocked at step 12.  */
+  if (pthread_mutex_lock (&baton))
+    UNEXPECTED (13);
+  usleep (100000);
+  /* By the time we get here, it's clear that the second reader thread is
+     blocked at step 12.  This is the desired behaviour.  */
+  SUCCEED ();
+}
+
+static void *
+reader2_func (void *ignored)
+{
+  int err;
+
+  /* Step 8 (can be before or after step 7):
+     The second reader thread takes the baton, then waits a moment to make sure
+     the writer thread has reached step 7.  */
+  if (pthread_mutex_lock (&baton))
+    UNEXPECTED (8);
+  usleep (100000);
+  /* Step 9: The second reader thread requests the lock.  */
+  err = pthread_rwlock_tryrdlock (&lock);
+  if (err == 0)
+    FAILURE ();
+  else if (err != EBUSY)
+    UNEXPECTED (9);
+  /* Step 10: Launch a timer, to test whether the next call blocks.  */
+  if (pthread_create (&timer, NULL, timer_func, NULL))
+    UNEXPECTED (10);
+  /* Step 11: Release the baton.  */
+  if (pthread_mutex_unlock (&baton))
+    UNEXPECTED (11);
+  /* Step 12: The second reader thread requests the lock.  */
+  err = pthread_rwlock_rdlock (&lock);
+  if (err == 0)
+    FAILURE ();
+  else
+    UNEXPECTED (12);
+}
+
+static void *
+writer_func (void *ignored)
+{
+  /* Step 4: Take the baton, so that the second reader thread does not go ahead
+     too early.  */
+  if (pthread_mutex_lock (&baton))
+    UNEXPECTED (4);
+  /* Step 5: Create the second reader thread.  */
+  if (pthread_create (&reader2, NULL, reader2_func, NULL))
+    UNEXPECTED (5);
+  /* Step 6: Release the baton.  */
+  if (pthread_mutex_unlock (&baton))
+    UNEXPECTED (6);
+  /* Step 7: The writer thread requests the lock.  */
+  if (pthread_rwlock_wrlock (&lock))
+    UNEXPECTED (7);
+  return NULL;
+}
+
+int
+main ()
+{
+  reader1 = pthread_self ();
+
+  /* Step 1: The main thread initializes the lock and the baton.  */
+  if (pthread_rwlock_init (&lock, NULL))
+    UNEXPECTED (1);
+  if (pthread_mutex_init (&baton, NULL))
+    UNEXPECTED (1);
+  /* Step 2: The main thread acquires the lock as a reader.  */
+  if (pthread_rwlock_rdlock (&lock))
+    UNEXPECTED (2);
+  /* Step 3: Create the writer thread.  */
+  if (pthread_create (&writer, NULL, writer_func, NULL))
+    UNEXPECTED (3);
+  /* Job done.  Go to sleep.  */
+  for (;;)
+    {
+      sleep (1);
+    }
+}
+
+_ACEOF
+if ac_fn_c_try_run "$LINENO"; then :
+  gl_cv_pthread_rwlock_rdlock_prefer_writer=yes
+else
+  gl_cv_pthread_rwlock_rdlock_prefer_writer=no
+fi
+rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \
+  conftest.$ac_objext conftest.beam conftest.$ac_ext
+fi
+
+     LIBS="$save_LIBS"
+
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_pthread_rwlock_rdlock_prefer_writer" >&5
+$as_echo "$gl_cv_pthread_rwlock_rdlock_prefer_writer" >&6; }
+  case "$gl_cv_pthread_rwlock_rdlock_prefer_writer" in
+    *yes)
+
+$as_echo "#define HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER 1" >>confdefs.h
+
+      ;;
+  esac
+
+    fi
+    # glibc defines PTHREAD_MUTEX_RECURSIVE as enum, not as a macro.
+    cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+
+      #include <pthread.h>
+int
+main ()
+{
+
+#if __FreeBSD__ == 4
+error "No, in FreeBSD 4.0 recursive mutexes actually don't work."
+#elif (defined __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ \
+       && __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ < 1070)
+error "No, in Mac OS X < 10.7 recursive mutexes actually don't work."
+#else
+int x = (int)PTHREAD_MUTEX_RECURSIVE;
+return !x;
+#endif
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+
+$as_echo "#define HAVE_PTHREAD_MUTEX_RECURSIVE 1" >>confdefs.h
+
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+  fi
+  :
+
+
+
+cat >>confdefs.h <<_ACEOF
+#define GNULIB_LOCK 1
+_ACEOF
+
+
+
+
+
+
+  { $as_echo "$as_me:${as_lineno-$LINENO}: checking for ssize_t" >&5
+$as_echo_n "checking for ssize_t... " >&6; }
+if ${gt_cv_ssize_t+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <sys/types.h>
+int
+main ()
+{
+int x = sizeof (ssize_t *) + sizeof (ssize_t);
+            return !x;
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gt_cv_ssize_t=yes
+else
+  gt_cv_ssize_t=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gt_cv_ssize_t" >&5
+$as_echo "$gt_cv_ssize_t" >&6; }
+  if test $gt_cv_ssize_t = no; then
+
+$as_echo "#define ssize_t int" >>confdefs.h
+
+  fi
+
+
+
+
+  case "$host_os" in
+    cygwin*)
+                        STDNORETURN_H='stdnoreturn.h'
+      ;;
+    *)
+      { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working stdnoreturn.h" >&5
+$as_echo_n "checking for working stdnoreturn.h... " >&6; }
+if ${gl_cv_header_working_stdnoreturn_h+:} false; then :
+  $as_echo_n "(cached) " >&6
+else
+  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
+/* end confdefs.h.  */
+#include <stdlib.h>
+                #include <stdnoreturn.h>
+                /* Do not check for 'noreturn' after the return type.
+                   C11 allows it, but it's rarely done that way
+                   and circa-2012 bleeding-edge GCC rejects it when given
+                   -Werror=old-style-declaration.  */
+                noreturn void foo1 (void) { exit (0); }
+                _Noreturn void foo2 (void) { exit (0); }
+                int testit (int argc, char **argv)
+                {
+                  if (argc & 1)
+                    return 0;
+                  (argv[0][0] ? foo1 : foo2) ();
+                }
+
+int
+main ()
+{
+
+  ;
+  return 0;
+}
+_ACEOF
+if ac_fn_c_try_compile "$LINENO"; then :
+  gl_cv_header_working_stdnoreturn_h=yes
+else
+  gl_cv_header_working_stdnoreturn_h=no
+fi
+rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
+fi
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_working_stdnoreturn_h" >&5
+$as_echo "$gl_cv_header_working_stdnoreturn_h" >&6; }
+      if test $gl_cv_header_working_stdnoreturn_h = yes; then
+        STDNORETURN_H=''
+      else
+        STDNORETURN_H='stdnoreturn.h'
+      fi
+      ;;
+  esac
+
+   if test -n "$STDNORETURN_H"; then
+  GL_GENERATE_STDNORETURN_H_TRUE=
+  GL_GENERATE_STDNORETURN_H_FALSE='#'
+else
+  GL_GENERATE_STDNORETURN_H_TRUE='#'
+  GL_GENERATE_STDNORETURN_H_FALSE=
+fi
+
+
+
+
+
+
+  case "$host_os" in
+    mingw*)
+
+
+
+
+
+
+
+
+  gl_LIBOBJS="$gl_LIBOBJS windows-mutex.$ac_objext"
+
+      ;;
+  esac
+
+  case "$host_os" in
+    mingw*)
+
+
+
+
+
+
+
+
+  gl_LIBOBJS="$gl_LIBOBJS windows-once.$ac_objext"
+
+      ;;
+  esac
+
+  case "$host_os" in
+    mingw*)
+
+
+
+
+
+
+
+
+  gl_LIBOBJS="$gl_LIBOBJS windows-recmutex.$ac_objext"
+
+      ;;
+  esac
+
+  case "$host_os" in
+    mingw*)
+
+
+
+
+
+
+
+
+  gl_LIBOBJS="$gl_LIBOBJS windows-rwlock.$ac_objext"
+
+      ;;
+  esac
+  # End of code from modules
+
+
+
+
+
+
+
+
+
+  gltests_libdeps=
+  gltests_ltlibdeps=
+
+
+
+
+
+
+
+
+
+  gl_source_base='tests'
+  gltests_WITNESS=IN_`echo "${PACKAGE-$PACKAGE_TARNAME}" | LC_ALL=C tr abcdefghijklmnopqrstuvwxyz ABCDEFGHIJKLMNOPQRSTUVWXYZ | LC_ALL=C sed -e 's/[^A-Z0-9_]/_/g'`_GNULIB_TESTS
+
+  gl_module_indicator_condition=$gltests_WITNESS
+
+
+
+
+
+
+
+
+
+
+
+extrasub="$extrasub"'
+/@subdir@/{
+h
+g
+s/@subdir@/gnulib-lib/g
+p
+g
+s/@subdir@/avcall/g
+p
+g
+s/@subdir@/vacall/g
+p
+g
+s/@subdir@/trampoline/g
+p
+g
+s/@subdir@/callback/g
+p
+d
+}
+'
+extrasub="$extrasub"'
+/@callback_subdir@/{
+h
+g
+s/@callback_subdir@/vacall_r/g
+p
+g
+s/@callback_subdir@/trampoline_r/g
+p
+d
+}
+'
+
+cat >confcache <<\_ACEOF
+# This file is a shell script that caches the results of configure
+# tests run on this system so they can be shared between configure
+# scripts and configure runs, see configure's option --config-cache.
+# It is not useful on other systems.  If it contains results you don't
+# want to keep, you may remove or edit it.
+#
+# config.status only pays attention to the cache file if you give it
+# the --recheck option to rerun configure.
+#
+# `ac_cv_env_foo' variables (set or unset) will be overridden when
+# loading this file, other *unset* `ac_cv_foo' will be assigned the
+# following values.
+
+_ACEOF
+
+# The following way of writing the cache mishandles newlines in values,
+# but we know of no workaround that is simple, portable, and efficient.
+# So, we kill variables containing newlines.
+# Ultrix sh set writes to stderr and can't be redirected directly,
+# and sets the high bit in the cache file unless we assign to the vars.
+(
+  for ac_var in `(set) 2>&1 | sed -n 's/^\([a-zA-Z_][a-zA-Z0-9_]*\)=.*/\1/p'`; do
+    eval ac_val=\$$ac_var
+    case $ac_val in #(
+    *${as_nl}*)
+      case $ac_var in #(
+      *_cv_*) { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: cache variable $ac_var contains a newline" >&5
+$as_echo "$as_me: WARNING: cache variable $ac_var contains a newline" >&2;} ;;
+      esac
+      case $ac_var in #(
+      _ | IFS | as_nl) ;; #(
+      BASH_ARGV | BASH_SOURCE) eval $ac_var= ;; #(
+      *) { eval $ac_var=; unset $ac_var;} ;;
+      esac ;;
+    esac
+  done
+
+  (set) 2>&1 |
+    case $as_nl`(ac_space=' '; set) 2>&1` in #(
+    *${as_nl}ac_space=\ *)
+      # `set' does not quote correctly, so add quotes: double-quote
+      # substitution turns \\\\ into \\, and sed turns \\ into \.
+      sed -n \
+       "s/'/'\\\\''/g;
+         s/^\\([_$as_cr_alnum]*_cv_[_$as_cr_alnum]*\\)=\\(.*\\)/\\1='\\2'/p"
+      ;; #(
+    *)
+      # `set' quotes correctly as required by POSIX, so do not add quotes.
+      sed -n "/^[_$as_cr_alnum]*_cv_[_$as_cr_alnum]*=/p"
+      ;;
+    esac |
+    sort
+) |
+  sed '
+     /^ac_cv_env_/b end
+     t clear
+     :clear
+     s/^\([^=]*\)=\(.*[{}].*\)$/test "${\1+set}" = set || &/
+     t end
+     s/^\([^=]*\)=\(.*\)$/\1=${\1=\2}/
+     :end' >>confcache
+if diff "$cache_file" confcache >/dev/null 2>&1; then :; else
+  if test -w "$cache_file"; then
+    if test "x$cache_file" != "x/dev/null"; then
+      { $as_echo "$as_me:${as_lineno-$LINENO}: updating cache $cache_file" >&5
+$as_echo "$as_me: updating cache $cache_file" >&6;}
+      if test ! -f "$cache_file" || test -h "$cache_file"; then
+       cat confcache >"$cache_file"
+      else
+        case $cache_file in #(
+        */* | ?:*)
+         mv -f confcache "$cache_file"$$ &&
+         mv -f "$cache_file"$$ "$cache_file" ;; #(
+        *)
+         mv -f confcache "$cache_file" ;;
+       esac
+      fi
+    fi
+  else
+    { $as_echo "$as_me:${as_lineno-$LINENO}: not updating unwritable cache $cache_file" >&5
+$as_echo "$as_me: not updating unwritable cache $cache_file" >&6;}
+  fi
+fi
+rm -f confcache
+
+test "x$prefix" = xNONE && prefix=$ac_default_prefix
+# Let make expand exec_prefix.
+test "x$exec_prefix" = xNONE && exec_prefix='${prefix}'
+
+DEFS=-DHAVE_CONFIG_H
+
+ac_libobjs=
+ac_ltlibobjs=
+U=
+for ac_i in : $LIBOBJS; do test "x$ac_i" = x: && continue
+  # 1. Remove the extension, and $U if already installed.
+  ac_script='s/\$U\././;s/\.o$//;s/\.obj$//'
+  ac_i=`$as_echo "$ac_i" | sed "$ac_script"`
+  # 2. Prepend LIBOBJDIR.  When used with automake>=1.10 LIBOBJDIR
+  #    will be set to the directory where LIBOBJS objects are built.
+  as_fn_append ac_libobjs " \${LIBOBJDIR}$ac_i\$U.$ac_objext"
+  as_fn_append ac_ltlibobjs " \${LIBOBJDIR}$ac_i"'$U.lo'
+done
+LIBOBJS=$ac_libobjs
+
+LTLIBOBJS=$ac_ltlibobjs
+
+
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking that generated files are newer than configure" >&5
+$as_echo_n "checking that generated files are newer than configure... " >&6; }
+   if test -n "$am_sleep_pid"; then
+     # Hide warnings about reused PIDs.
+     wait $am_sleep_pid 2>/dev/null
+   fi
+   { $as_echo "$as_me:${as_lineno-$LINENO}: result: done" >&5
+$as_echo "done" >&6; }
+ if test -n "$EXEEXT"; then
+  am__EXEEXT_TRUE=
+  am__EXEEXT_FALSE='#'
+else
+  am__EXEEXT_TRUE='#'
+  am__EXEEXT_FALSE=
+fi
+
+if test -z "${AMDEP_TRUE}" && test -z "${AMDEP_FALSE}"; then
+  as_fn_error $? "conditional \"AMDEP\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${am__fastdepCC_TRUE}" && test -z "${am__fastdepCC_FALSE}"; then
+  as_fn_error $? "conditional \"am__fastdepCC\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${ANSICXX_TRUE}" && test -z "${ANSICXX_FALSE}"; then
+  as_fn_error $? "conditional \"ANSICXX\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${am__fastdepCXX_TRUE}" && test -z "${am__fastdepCXX_FALSE}"; then
+  as_fn_error $? "conditional \"am__fastdepCXX\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${am__fastdepCXX_TRUE}" && test -z "${am__fastdepCXX_FALSE}"; then
+  as_fn_error $? "conditional \"am__fastdepCXX\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${GL_COND_LIBTOOL_TRUE}" && test -z "${GL_COND_LIBTOOL_FALSE}"; then
+  as_fn_error $? "conditional \"GL_COND_LIBTOOL\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${ANSICXX_TRUE}" && test -z "${ANSICXX_FALSE}"; then
+  as_fn_error $? "conditional \"ANSICXX\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${am__fastdepCXX_TRUE}" && test -z "${am__fastdepCXX_FALSE}"; then
+  as_fn_error $? "conditional \"am__fastdepCXX\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${am__fastdepCXX_TRUE}" && test -z "${am__fastdepCXX_FALSE}"; then
+  as_fn_error $? "conditional \"am__fastdepCXX\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${GL_GENERATE_LIMITS_H_TRUE}" && test -z "${GL_GENERATE_LIMITS_H_FALSE}"; then
+  as_fn_error $? "conditional \"GL_GENERATE_LIMITS_H\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${GL_GENERATE_LIMITS_H_TRUE}" && test -z "${GL_GENERATE_LIMITS_H_FALSE}"; then
+  as_fn_error $? "conditional \"GL_GENERATE_LIMITS_H\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${GL_GENERATE_STDINT_H_TRUE}" && test -z "${GL_GENERATE_STDINT_H_FALSE}"; then
+  as_fn_error $? "conditional \"GL_GENERATE_STDINT_H\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+if test -z "${GL_GENERATE_STDNORETURN_H_TRUE}" && test -z "${GL_GENERATE_STDNORETURN_H_FALSE}"; then
+  as_fn_error $? "conditional \"GL_GENERATE_STDNORETURN_H\" was never defined.
+Usually this means the macro was only invoked conditionally." "$LINENO" 5
+fi
+
+    gl_libobjs=
+    gl_ltlibobjs=
+    if test -n "$gl_LIBOBJS"; then
+      # Remove the extension.
+      sed_drop_objext='s/\.o$//;s/\.obj$//'
+      for i in `for i in $gl_LIBOBJS; do echo "$i"; done | sed -e "$sed_drop_objext" | sort | uniq`; do
+        gl_libobjs="$gl_libobjs $i.$ac_objext"
+        gl_ltlibobjs="$gl_ltlibobjs $i.lo"
+      done
+    fi
+    gl_LIBOBJS=$gl_libobjs
+
+    gl_LTLIBOBJS=$gl_ltlibobjs
+
+
+
+    gltests_libobjs=
+    gltests_ltlibobjs=
+    if test -n "$gltests_LIBOBJS"; then
+      # Remove the extension.
+      sed_drop_objext='s/\.o$//;s/\.obj$//'
+      for i in `for i in $gltests_LIBOBJS; do echo "$i"; done | sed -e "$sed_drop_objext" | sort | uniq`; do
+        gltests_libobjs="$gltests_libobjs $i.$ac_objext"
+        gltests_ltlibobjs="$gltests_ltlibobjs $i.lo"
+      done
+    fi
+    gltests_LIBOBJS=$gltests_libobjs
+
+    gltests_LTLIBOBJS=$gltests_ltlibobjs
+
+
+
+: "${CONFIG_STATUS=./config.status}"
+ac_write_fail=0
+ac_clean_files_save=$ac_clean_files
+ac_clean_files="$ac_clean_files $CONFIG_STATUS"
+{ $as_echo "$as_me:${as_lineno-$LINENO}: creating $CONFIG_STATUS" >&5
+$as_echo "$as_me: creating $CONFIG_STATUS" >&6;}
+as_write_fail=0
+cat >$CONFIG_STATUS <<_ASEOF || as_write_fail=1
+#! $SHELL
+# Generated by $as_me.
+# Run this file to recreate the current configuration.
+# Compiler output produced by configure, useful for debugging
+# configure, is in config.log if it exists.
+
+debug=false
+ac_cs_recheck=false
+ac_cs_silent=false
+
+SHELL=\${CONFIG_SHELL-$SHELL}
+export SHELL
+_ASEOF
+cat >>$CONFIG_STATUS <<\_ASEOF || as_write_fail=1
+## -------------------- ##
+## M4sh Initialization. ##
+## -------------------- ##
+
+# Be more Bourne compatible
+DUALCASE=1; export DUALCASE # for MKS sh
+if test -n "${ZSH_VERSION+set}" && (emulate sh) >/dev/null 2>&1; then :
+  emulate sh
+  NULLCMD=:
+  # Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which
+  # is contrary to our usage.  Disable this feature.
+  alias -g '${1+"$@"}'='"$@"'
+  setopt NO_GLOB_SUBST
+else
+  case `(set -o) 2>/dev/null` in #(
+  *posix*) :
+    set -o posix ;; #(
+  *) :
+     ;;
+esac
+fi
+
+
+as_nl='
+'
+export as_nl
+# Printing a long string crashes Solaris 7 /usr/bin/printf.
+as_echo='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\'
+as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo
+as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo$as_echo
+# Prefer a ksh shell builtin over an external printf program on Solaris,
+# but without wasting forks for bash or zsh.
+if test -z "$BASH_VERSION$ZSH_VERSION" \
+    && (test "X`print -r -- $as_echo`" = "X$as_echo") 2>/dev/null; then
+  as_echo='print -r --'
+  as_echo_n='print -rn --'
+elif (test "X`printf %s $as_echo`" = "X$as_echo") 2>/dev/null; then
+  as_echo='printf %s\n'
+  as_echo_n='printf %s'
+else
+  if test "X`(/usr/ucb/echo -n -n $as_echo) 2>/dev/null`" = "X-n $as_echo"; then
+    as_echo_body='eval /usr/ucb/echo -n "$1$as_nl"'
+    as_echo_n='/usr/ucb/echo -n'
+  else
+    as_echo_body='eval expr "X$1" : "X\\(.*\\)"'
+    as_echo_n_body='eval
+      arg=$1;
+      case $arg in #(
+      *"$as_nl"*)
+       expr "X$arg" : "X\\(.*\\)$as_nl";
+       arg=`expr "X$arg" : ".*$as_nl\\(.*\\)"`;;
+      esac;
+      expr "X$arg" : "X\\(.*\\)" | tr -d "$as_nl"
+    '
+    export as_echo_n_body
+    as_echo_n='sh -c $as_echo_n_body as_echo'
+  fi
+  export as_echo_body
+  as_echo='sh -c $as_echo_body as_echo'
+fi
+
+# The user is always right.
+if test "${PATH_SEPARATOR+set}" != set; then
+  PATH_SEPARATOR=:
+  (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && {
+    (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 ||
+      PATH_SEPARATOR=';'
+  }
+fi
+
+
+# IFS
+# We need space, tab and new line, in precisely that order.  Quoting is
+# there to prevent editors from complaining about space-tab.
+# (If _AS_PATH_WALK were called with IFS unset, it would disable word
+# splitting by setting IFS to empty value.)
+IFS=" ""       $as_nl"
+
+# Find who we are.  Look in the path if we contain no directory separator.
+as_myself=
+case $0 in #((
+  *[\\/]* ) as_myself=$0 ;;
+  *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    test -r "$as_dir/$0" && as_myself=$as_dir/$0 && break
+  done
+IFS=$as_save_IFS
+
+     ;;
+esac
+# We did not find ourselves, most probably we were run as `sh COMMAND'
+# in which case we are not to be found in the path.
+if test "x$as_myself" = x; then
+  as_myself=$0
+fi
+if test ! -f "$as_myself"; then
+  $as_echo "$as_myself: error: cannot find myself; rerun with an absolute file name" >&2
+  exit 1
+fi
+
+# Unset variables that we do not need and which cause bugs (e.g. in
+# pre-3.0 UWIN ksh).  But do not cause bugs in bash 2.01; the "|| exit 1"
+# suppresses any "Segmentation fault" message there.  '((' could
+# trigger a bug in pdksh 5.2.14.
+for as_var in BASH_ENV ENV MAIL MAILPATH
+do eval test x\${$as_var+set} = xset \
+  && ( (unset $as_var) || exit 1) >/dev/null 2>&1 && unset $as_var || :
+done
+PS1='$ '
+PS2='> '
+PS4='+ '
+
+# NLS nuisances.
+LC_ALL=C
+export LC_ALL
+LANGUAGE=C
+export LANGUAGE
+
+# CDPATH.
+(unset CDPATH) >/dev/null 2>&1 && unset CDPATH
+
+
+# as_fn_error STATUS ERROR [LINENO LOG_FD]
+# ----------------------------------------
+# Output "`basename $0`: error: ERROR" to stderr. If LINENO and LOG_FD are
+# provided, also output the error to LOG_FD, referencing LINENO. Then exit the
+# script with STATUS, using 1 if that was 0.
+as_fn_error ()
+{
+  as_status=$1; test $as_status -eq 0 && as_status=1
+  if test "$4"; then
+    as_lineno=${as_lineno-"$3"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
+    $as_echo "$as_me:${as_lineno-$LINENO}: error: $2" >&$4
+  fi
+  $as_echo "$as_me: error: $2" >&2
+  as_fn_exit $as_status
+} # as_fn_error
+
+
+# as_fn_set_status STATUS
+# -----------------------
+# Set $? to STATUS, without forking.
+as_fn_set_status ()
+{
+  return $1
+} # as_fn_set_status
+
+# as_fn_exit STATUS
+# -----------------
+# Exit the shell with STATUS, even in a "trap 0" or "set -e" context.
+as_fn_exit ()
+{
+  set +e
+  as_fn_set_status $1
+  exit $1
+} # as_fn_exit
+
+# as_fn_unset VAR
+# ---------------
+# Portably unset VAR.
+as_fn_unset ()
+{
+  { eval $1=; unset $1;}
+}
+as_unset=as_fn_unset
+# as_fn_append VAR VALUE
+# ----------------------
+# Append the text in VALUE to the end of the definition contained in VAR. Take
+# advantage of any shell optimizations that allow amortized linear growth over
+# repeated appends, instead of the typical quadratic growth present in naive
+# implementations.
+if (eval "as_var=1; as_var+=2; test x\$as_var = x12") 2>/dev/null; then :
+  eval 'as_fn_append ()
+  {
+    eval $1+=\$2
+  }'
+else
+  as_fn_append ()
+  {
+    eval $1=\$$1\$2
+  }
+fi # as_fn_append
+
+# as_fn_arith ARG...
+# ------------------
+# Perform arithmetic evaluation on the ARGs, and store the result in the
+# global $as_val. Take advantage of shells that can avoid forks. The arguments
+# must be portable across $(()) and expr.
+if (eval "test \$(( 1 + 1 )) = 2") 2>/dev/null; then :
+  eval 'as_fn_arith ()
+  {
+    as_val=$(( $* ))
+  }'
+else
+  as_fn_arith ()
+  {
+    as_val=`expr "$@" || test $? -eq 1`
+  }
+fi # as_fn_arith
+
+
+if expr a : '\(a\)' >/dev/null 2>&1 &&
+   test "X`expr 00001 : '.*\(...\)'`" = X001; then
+  as_expr=expr
+else
+  as_expr=false
+fi
+
+if (basename -- /) >/dev/null 2>&1 && test "X`basename -- / 2>&1`" = "X/"; then
+  as_basename=basename
+else
+  as_basename=false
+fi
+
+if (as_dir=`dirname -- /` && test "X$as_dir" = X/) >/dev/null 2>&1; then
+  as_dirname=dirname
+else
+  as_dirname=false
+fi
+
+as_me=`$as_basename -- "$0" ||
+$as_expr X/"$0" : '.*/\([^/][^/]*\)/*$' \| \
+        X"$0" : 'X\(//\)$' \| \
+        X"$0" : 'X\(/\)' \| . 2>/dev/null ||
+$as_echo X/"$0" |
+    sed '/^.*\/\([^/][^/]*\)\/*$/{
+           s//\1/
+           q
+         }
+         /^X\/\(\/\/\)$/{
+           s//\1/
+           q
+         }
+         /^X\/\(\/\).*/{
+           s//\1/
+           q
+         }
+         s/.*/./; q'`
+
+# Avoid depending upon Character Ranges.
+as_cr_letters='abcdefghijklmnopqrstuvwxyz'
+as_cr_LETTERS='ABCDEFGHIJKLMNOPQRSTUVWXYZ'
+as_cr_Letters=$as_cr_letters$as_cr_LETTERS
+as_cr_digits='0123456789'
+as_cr_alnum=$as_cr_Letters$as_cr_digits
+
+ECHO_C= ECHO_N= ECHO_T=
+case `echo -n x` in #(((((
+-n*)
+  case `echo 'xy\c'` in
+  *c*) ECHO_T='        ';;     # ECHO_T is single tab character.
+  xy)  ECHO_C='\c';;
+  *)   echo `echo ksh88 bug on AIX 6.1` > /dev/null
+       ECHO_T='        ';;
+  esac;;
+*)
+  ECHO_N='-n';;
+esac
+
+rm -f conf$$ conf$$.exe conf$$.file
+if test -d conf$$.dir; then
+  rm -f conf$$.dir/conf$$.file
+else
+  rm -f conf$$.dir
+  mkdir conf$$.dir 2>/dev/null
+fi
+if (echo >conf$$.file) 2>/dev/null; then
+  if ln -s conf$$.file conf$$ 2>/dev/null; then
+    as_ln_s='ln -s'
+    # ... but there are two gotchas:
+    # 1) On MSYS, both `ln -s file dir' and `ln file dir' fail.
+    # 2) DJGPP < 2.04 has no symlinks; `ln -s' creates a wrapper executable.
+    # In both cases, we have to default to `cp -pR'.
+    ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe ||
+      as_ln_s='cp -pR'
+  elif ln conf$$.file conf$$ 2>/dev/null; then
+    as_ln_s=ln
+  else
+    as_ln_s='cp -pR'
+  fi
+else
+  as_ln_s='cp -pR'
+fi
+rm -f conf$$ conf$$.exe conf$$.dir/conf$$.file conf$$.file
+rmdir conf$$.dir 2>/dev/null
+
+
+# as_fn_mkdir_p
+# -------------
+# Create "$as_dir" as a directory, including parents if necessary.
+as_fn_mkdir_p ()
+{
+
+  case $as_dir in #(
+  -*) as_dir=./$as_dir;;
+  esac
+  test -d "$as_dir" || eval $as_mkdir_p || {
+    as_dirs=
+    while :; do
+      case $as_dir in #(
+      *\'*) as_qdir=`$as_echo "$as_dir" | sed "s/'/'\\\\\\\\''/g"`;; #'(
+      *) as_qdir=$as_dir;;
+      esac
+      as_dirs="'$as_qdir' $as_dirs"
+      as_dir=`$as_dirname -- "$as_dir" ||
+$as_expr X"$as_dir" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
+        X"$as_dir" : 'X\(//\)[^/]' \| \
+        X"$as_dir" : 'X\(//\)$' \| \
+        X"$as_dir" : 'X\(/\)' \| . 2>/dev/null ||
+$as_echo X"$as_dir" |
+    sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)[^/].*/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\).*/{
+           s//\1/
+           q
+         }
+         s/.*/./; q'`
+      test -d "$as_dir" && break
+    done
+    test -z "$as_dirs" || eval "mkdir $as_dirs"
+  } || test -d "$as_dir" || as_fn_error $? "cannot create directory $as_dir"
+
+
+} # as_fn_mkdir_p
+if mkdir -p . 2>/dev/null; then
+  as_mkdir_p='mkdir -p "$as_dir"'
+else
+  test -d ./-p && rmdir ./-p
+  as_mkdir_p=false
+fi
+
+
+# as_fn_executable_p FILE
+# -----------------------
+# Test if FILE is an executable regular file.
+as_fn_executable_p ()
+{
+  test -f "$1" && test -x "$1"
+} # as_fn_executable_p
+as_test_x='test -x'
+as_executable_p=as_fn_executable_p
+
+# Sed expression to map a string onto a valid CPP name.
+as_tr_cpp="eval sed 'y%*$as_cr_letters%P$as_cr_LETTERS%;s%[^_$as_cr_alnum]%_%g'"
+
+# Sed expression to map a string onto a valid variable name.
+as_tr_sh="eval sed 'y%*+%pp%;s%[^_$as_cr_alnum]%_%g'"
+
+
+exec 6>&1
+## ----------------------------------- ##
+## Main body of $CONFIG_STATUS script. ##
+## ----------------------------------- ##
+_ASEOF
+test $as_write_fail = 0 && chmod +x $CONFIG_STATUS || ac_write_fail=1
+
+cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
+# Save the log message, to keep $0 and so on meaningful, and to
+# report actual input values of CONFIG_FILES etc. instead of their
+# values after options handling.
+ac_log="
+This file was extended by GNU libffcall $as_me 2.2, which was
+generated by GNU Autoconf 2.69.  Invocation command line was
+
+  CONFIG_FILES    = $CONFIG_FILES
+  CONFIG_HEADERS  = $CONFIG_HEADERS
+  CONFIG_LINKS    = $CONFIG_LINKS
+  CONFIG_COMMANDS = $CONFIG_COMMANDS
+  $ $0 $@
+
+on `(hostname || uname -n) 2>/dev/null | sed 1q`
+"
+
+_ACEOF
+
+case $ac_config_files in *"
+"*) set x $ac_config_files; shift; ac_config_files=$*;;
+esac
+
+case $ac_config_headers in *"
+"*) set x $ac_config_headers; shift; ac_config_headers=$*;;
+esac
+
+
+cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
+# Files that config.status was made for.
+config_files="$ac_config_files"
+config_headers="$ac_config_headers"
+config_commands="$ac_config_commands"
+
+_ACEOF
+
+cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
+ac_cs_usage="\
+\`$as_me' instantiates files and other configuration actions
+from templates according to the current configuration.  Unless the files
+and actions are specified as TAGs, all are instantiated by default.
+
+Usage: $0 [OPTION]... [TAG]...
+
+  -h, --help       print this help, then exit
+  -V, --version    print version number and configuration settings, then exit
+      --config     print configuration, then exit
+  -q, --quiet, --silent
+                   do not print progress messages
+  -d, --debug      don't remove temporary files
+      --recheck    update $as_me by reconfiguring in the same conditions
+      --file=FILE[:TEMPLATE]
+                   instantiate the configuration file FILE
+      --header=FILE[:TEMPLATE]
+                   instantiate the configuration header FILE
+
+Configuration files:
+$config_files
+
+Configuration headers:
+$config_headers
+
+Configuration commands:
+$config_commands
+
+Report bugs to <https://savannah.gnu.org/projects/libffcall>.
+GNU libffcall home page: <http://www.gnu.org/software/libffcall/>.
+General help using GNU software: <http://www.gnu.org/gethelp/>."
+
+_ACEOF
+cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
+ac_cs_config="`$as_echo "$ac_configure_args" | sed 's/^ //; s/[\\""\`\$]/\\\\&/g'`"
+ac_cs_version="\\
+GNU libffcall config.status 2.2
+configured by $0, generated by GNU Autoconf 2.69,
+  with options \\"\$ac_cs_config\\"
+
+Copyright (C) 2012 Free Software Foundation, Inc.
+This config.status script is free software; the Free Software Foundation
+gives unlimited permission to copy, distribute and modify it."
+
+ac_pwd='$ac_pwd'
+srcdir='$srcdir'
+INSTALL='$INSTALL'
+MKDIR_P='$MKDIR_P'
+AWK='$AWK'
+test -n "\$AWK" || AWK=awk
+_ACEOF
+
+cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
+# The default lists apply if the user does not specify any file.
+ac_need_defaults=:
+while test $# != 0
+do
+  case $1 in
+  --*=?*)
+    ac_option=`expr "X$1" : 'X\([^=]*\)='`
+    ac_optarg=`expr "X$1" : 'X[^=]*=\(.*\)'`
+    ac_shift=:
+    ;;
+  --*=)
+    ac_option=`expr "X$1" : 'X\([^=]*\)='`
+    ac_optarg=
+    ac_shift=:
+    ;;
+  *)
+    ac_option=$1
+    ac_optarg=$2
+    ac_shift=shift
+    ;;
+  esac
+
+  case $ac_option in
+  # Handling of the options.
+  -recheck | --recheck | --rechec | --reche | --rech | --rec | --re | --r)
+    ac_cs_recheck=: ;;
+  --version | --versio | --versi | --vers | --ver | --ve | --v | -V )
+    $as_echo "$ac_cs_version"; exit ;;
+  --config | --confi | --conf | --con | --co | --c )
+    $as_echo "$ac_cs_config"; exit ;;
+  --debug | --debu | --deb | --de | --d | -d )
+    debug=: ;;
+  --file | --fil | --fi | --f )
+    $ac_shift
+    case $ac_optarg in
+    *\'*) ac_optarg=`$as_echo "$ac_optarg" | sed "s/'/'\\\\\\\\''/g"` ;;
+    '') as_fn_error $? "missing file argument" ;;
+    esac
+    as_fn_append CONFIG_FILES " '$ac_optarg'"
+    ac_need_defaults=false;;
+  --header | --heade | --head | --hea )
+    $ac_shift
+    case $ac_optarg in
+    *\'*) ac_optarg=`$as_echo "$ac_optarg" | sed "s/'/'\\\\\\\\''/g"` ;;
+    esac
+    as_fn_append CONFIG_HEADERS " '$ac_optarg'"
+    ac_need_defaults=false;;
+  --he | --h)
+    # Conflict between --help and --header
+    as_fn_error $? "ambiguous option: \`$1'
+Try \`$0 --help' for more information.";;
+  --help | --hel | -h )
+    $as_echo "$ac_cs_usage"; exit ;;
+  -q | -quiet | --quiet | --quie | --qui | --qu | --q \
+  | -silent | --silent | --silen | --sile | --sil | --si | --s)
+    ac_cs_silent=: ;;
+
+  # This is an error.
+  -*) as_fn_error $? "unrecognized option: \`$1'
+Try \`$0 --help' for more information." ;;
+
+  *) as_fn_append ac_config_targets " $1"
+     ac_need_defaults=false ;;
+
+  esac
+  shift
+done
+
+ac_configure_extra_args=
+
+if $ac_cs_silent; then
+  exec 6>/dev/null
+  ac_configure_extra_args="$ac_configure_extra_args --silent"
+fi
+
+_ACEOF
+cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
+if \$ac_cs_recheck; then
+  set X $SHELL '$0' $ac_configure_args \$ac_configure_extra_args --no-create --no-recursion
+  shift
+  \$as_echo "running CONFIG_SHELL=$SHELL \$*" >&6
+  CONFIG_SHELL='$SHELL'
+  export CONFIG_SHELL
+  exec "\$@"
+fi
+
+_ACEOF
+cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
+exec 5>>config.log
+{
+  echo
+  sed 'h;s/./-/g;s/^.../## /;s/...$/ ##/;p;x;p;x' <<_ASBOX
+## Running $as_me. ##
+_ASBOX
+  $as_echo "$ac_log"
+} >&5
+
+_ACEOF
+cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
+#
+# INIT-COMMANDS
+#
+AMDEP_TRUE="$AMDEP_TRUE" ac_aux_dir="$ac_aux_dir"
+
+
+# The HP-UX ksh and POSIX shell print the target directory to stdout
+# if CDPATH is set.
+(unset CDPATH) >/dev/null 2>&1 && unset CDPATH
+
+sed_quote_subst='$sed_quote_subst'
+double_quote_subst='$double_quote_subst'
+delay_variable_subst='$delay_variable_subst'
+macro_version='`$ECHO "$macro_version" | $SED "$delay_single_quote_subst"`'
+macro_revision='`$ECHO "$macro_revision" | $SED "$delay_single_quote_subst"`'
+AS='`$ECHO "$AS" | $SED "$delay_single_quote_subst"`'
+DLLTOOL='`$ECHO "$DLLTOOL" | $SED "$delay_single_quote_subst"`'
+OBJDUMP='`$ECHO "$OBJDUMP" | $SED "$delay_single_quote_subst"`'
+enable_shared='`$ECHO "$enable_shared" | $SED "$delay_single_quote_subst"`'
+enable_static='`$ECHO "$enable_static" | $SED "$delay_single_quote_subst"`'
+pic_mode='`$ECHO "$pic_mode" | $SED "$delay_single_quote_subst"`'
+enable_fast_install='`$ECHO "$enable_fast_install" | $SED "$delay_single_quote_subst"`'
+shared_archive_member_spec='`$ECHO "$shared_archive_member_spec" | $SED "$delay_single_quote_subst"`'
+SHELL='`$ECHO "$SHELL" | $SED "$delay_single_quote_subst"`'
+ECHO='`$ECHO "$ECHO" | $SED "$delay_single_quote_subst"`'
+PATH_SEPARATOR='`$ECHO "$PATH_SEPARATOR" | $SED "$delay_single_quote_subst"`'
+host_alias='`$ECHO "$host_alias" | $SED "$delay_single_quote_subst"`'
+host='`$ECHO "$host" | $SED "$delay_single_quote_subst"`'
+host_os='`$ECHO "$host_os" | $SED "$delay_single_quote_subst"`'
+build_alias='`$ECHO "$build_alias" | $SED "$delay_single_quote_subst"`'
+build='`$ECHO "$build" | $SED "$delay_single_quote_subst"`'
+build_os='`$ECHO "$build_os" | $SED "$delay_single_quote_subst"`'
+SED='`$ECHO "$SED" | $SED "$delay_single_quote_subst"`'
+Xsed='`$ECHO "$Xsed" | $SED "$delay_single_quote_subst"`'
+GREP='`$ECHO "$GREP" | $SED "$delay_single_quote_subst"`'
+EGREP='`$ECHO "$EGREP" | $SED "$delay_single_quote_subst"`'
+FGREP='`$ECHO "$FGREP" | $SED "$delay_single_quote_subst"`'
+LD='`$ECHO "$LD" | $SED "$delay_single_quote_subst"`'
+NM='`$ECHO "$NM" | $SED "$delay_single_quote_subst"`'
+LN_S='`$ECHO "$LN_S" | $SED "$delay_single_quote_subst"`'
+max_cmd_len='`$ECHO "$max_cmd_len" | $SED "$delay_single_quote_subst"`'
+ac_objext='`$ECHO "$ac_objext" | $SED "$delay_single_quote_subst"`'
+exeext='`$ECHO "$exeext" | $SED "$delay_single_quote_subst"`'
+lt_unset='`$ECHO "$lt_unset" | $SED "$delay_single_quote_subst"`'
+lt_SP2NL='`$ECHO "$lt_SP2NL" | $SED "$delay_single_quote_subst"`'
+lt_NL2SP='`$ECHO "$lt_NL2SP" | $SED "$delay_single_quote_subst"`'
+lt_cv_to_host_file_cmd='`$ECHO "$lt_cv_to_host_file_cmd" | $SED "$delay_single_quote_subst"`'
+lt_cv_to_tool_file_cmd='`$ECHO "$lt_cv_to_tool_file_cmd" | $SED "$delay_single_quote_subst"`'
+reload_flag='`$ECHO "$reload_flag" | $SED "$delay_single_quote_subst"`'
+reload_cmds='`$ECHO "$reload_cmds" | $SED "$delay_single_quote_subst"`'
+deplibs_check_method='`$ECHO "$deplibs_check_method" | $SED "$delay_single_quote_subst"`'
+file_magic_cmd='`$ECHO "$file_magic_cmd" | $SED "$delay_single_quote_subst"`'
+file_magic_glob='`$ECHO "$file_magic_glob" | $SED "$delay_single_quote_subst"`'
+want_nocaseglob='`$ECHO "$want_nocaseglob" | $SED "$delay_single_quote_subst"`'
+sharedlib_from_linklib_cmd='`$ECHO "$sharedlib_from_linklib_cmd" | $SED "$delay_single_quote_subst"`'
+AR='`$ECHO "$AR" | $SED "$delay_single_quote_subst"`'
+AR_FLAGS='`$ECHO "$AR_FLAGS" | $SED "$delay_single_quote_subst"`'
+archiver_list_spec='`$ECHO "$archiver_list_spec" | $SED "$delay_single_quote_subst"`'
+STRIP='`$ECHO "$STRIP" | $SED "$delay_single_quote_subst"`'
+RANLIB='`$ECHO "$RANLIB" | $SED "$delay_single_quote_subst"`'
+old_postinstall_cmds='`$ECHO "$old_postinstall_cmds" | $SED "$delay_single_quote_subst"`'
+old_postuninstall_cmds='`$ECHO "$old_postuninstall_cmds" | $SED "$delay_single_quote_subst"`'
+old_archive_cmds='`$ECHO "$old_archive_cmds" | $SED "$delay_single_quote_subst"`'
+lock_old_archive_extraction='`$ECHO "$lock_old_archive_extraction" | $SED "$delay_single_quote_subst"`'
+CC='`$ECHO "$CC" | $SED "$delay_single_quote_subst"`'
+CFLAGS='`$ECHO "$CFLAGS" | $SED "$delay_single_quote_subst"`'
+compiler='`$ECHO "$compiler" | $SED "$delay_single_quote_subst"`'
+GCC='`$ECHO "$GCC" | $SED "$delay_single_quote_subst"`'
+lt_cv_sys_global_symbol_pipe='`$ECHO "$lt_cv_sys_global_symbol_pipe" | $SED "$delay_single_quote_subst"`'
+lt_cv_sys_global_symbol_to_cdecl='`$ECHO "$lt_cv_sys_global_symbol_to_cdecl" | $SED "$delay_single_quote_subst"`'
+lt_cv_sys_global_symbol_to_import='`$ECHO "$lt_cv_sys_global_symbol_to_import" | $SED "$delay_single_quote_subst"`'
+lt_cv_sys_global_symbol_to_c_name_address='`$ECHO "$lt_cv_sys_global_symbol_to_c_name_address" | $SED "$delay_single_quote_subst"`'
+lt_cv_sys_global_symbol_to_c_name_address_lib_prefix='`$ECHO "$lt_cv_sys_global_symbol_to_c_name_address_lib_prefix" | $SED "$delay_single_quote_subst"`'
+lt_cv_nm_interface='`$ECHO "$lt_cv_nm_interface" | $SED "$delay_single_quote_subst"`'
+nm_file_list_spec='`$ECHO "$nm_file_list_spec" | $SED "$delay_single_quote_subst"`'
+lt_sysroot='`$ECHO "$lt_sysroot" | $SED "$delay_single_quote_subst"`'
+lt_cv_truncate_bin='`$ECHO "$lt_cv_truncate_bin" | $SED "$delay_single_quote_subst"`'
+objdir='`$ECHO "$objdir" | $SED "$delay_single_quote_subst"`'
+MAGIC_CMD='`$ECHO "$MAGIC_CMD" | $SED "$delay_single_quote_subst"`'
+lt_prog_compiler_no_builtin_flag='`$ECHO "$lt_prog_compiler_no_builtin_flag" | $SED "$delay_single_quote_subst"`'
+lt_prog_compiler_pic='`$ECHO "$lt_prog_compiler_pic" | $SED "$delay_single_quote_subst"`'
+lt_prog_compiler_wl='`$ECHO "$lt_prog_compiler_wl" | $SED "$delay_single_quote_subst"`'
+lt_prog_compiler_static='`$ECHO "$lt_prog_compiler_static" | $SED "$delay_single_quote_subst"`'
+lt_cv_prog_compiler_c_o='`$ECHO "$lt_cv_prog_compiler_c_o" | $SED "$delay_single_quote_subst"`'
+need_locks='`$ECHO "$need_locks" | $SED "$delay_single_quote_subst"`'
+MANIFEST_TOOL='`$ECHO "$MANIFEST_TOOL" | $SED "$delay_single_quote_subst"`'
+DSYMUTIL='`$ECHO "$DSYMUTIL" | $SED "$delay_single_quote_subst"`'
+NMEDIT='`$ECHO "$NMEDIT" | $SED "$delay_single_quote_subst"`'
+LIPO='`$ECHO "$LIPO" | $SED "$delay_single_quote_subst"`'
+OTOOL='`$ECHO "$OTOOL" | $SED "$delay_single_quote_subst"`'
+OTOOL64='`$ECHO "$OTOOL64" | $SED "$delay_single_quote_subst"`'
+libext='`$ECHO "$libext" | $SED "$delay_single_quote_subst"`'
+shrext_cmds='`$ECHO "$shrext_cmds" | $SED "$delay_single_quote_subst"`'
+extract_expsyms_cmds='`$ECHO "$extract_expsyms_cmds" | $SED "$delay_single_quote_subst"`'
+archive_cmds_need_lc='`$ECHO "$archive_cmds_need_lc" | $SED "$delay_single_quote_subst"`'
+enable_shared_with_static_runtimes='`$ECHO "$enable_shared_with_static_runtimes" | $SED "$delay_single_quote_subst"`'
+export_dynamic_flag_spec='`$ECHO "$export_dynamic_flag_spec" | $SED "$delay_single_quote_subst"`'
+whole_archive_flag_spec='`$ECHO "$whole_archive_flag_spec" | $SED "$delay_single_quote_subst"`'
+compiler_needs_object='`$ECHO "$compiler_needs_object" | $SED "$delay_single_quote_subst"`'
+old_archive_from_new_cmds='`$ECHO "$old_archive_from_new_cmds" | $SED "$delay_single_quote_subst"`'
+old_archive_from_expsyms_cmds='`$ECHO "$old_archive_from_expsyms_cmds" | $SED "$delay_single_quote_subst"`'
+archive_cmds='`$ECHO "$archive_cmds" | $SED "$delay_single_quote_subst"`'
+archive_expsym_cmds='`$ECHO "$archive_expsym_cmds" | $SED "$delay_single_quote_subst"`'
+module_cmds='`$ECHO "$module_cmds" | $SED "$delay_single_quote_subst"`'
+module_expsym_cmds='`$ECHO "$module_expsym_cmds" | $SED "$delay_single_quote_subst"`'
+with_gnu_ld='`$ECHO "$with_gnu_ld" | $SED "$delay_single_quote_subst"`'
+allow_undefined_flag='`$ECHO "$allow_undefined_flag" | $SED "$delay_single_quote_subst"`'
+no_undefined_flag='`$ECHO "$no_undefined_flag" | $SED "$delay_single_quote_subst"`'
+hardcode_libdir_flag_spec='`$ECHO "$hardcode_libdir_flag_spec" | $SED "$delay_single_quote_subst"`'
+hardcode_libdir_separator='`$ECHO "$hardcode_libdir_separator" | $SED "$delay_single_quote_subst"`'
+hardcode_direct='`$ECHO "$hardcode_direct" | $SED "$delay_single_quote_subst"`'
+hardcode_direct_absolute='`$ECHO "$hardcode_direct_absolute" | $SED "$delay_single_quote_subst"`'
+hardcode_minus_L='`$ECHO "$hardcode_minus_L" | $SED "$delay_single_quote_subst"`'
+hardcode_shlibpath_var='`$ECHO "$hardcode_shlibpath_var" | $SED "$delay_single_quote_subst"`'
+hardcode_automatic='`$ECHO "$hardcode_automatic" | $SED "$delay_single_quote_subst"`'
+inherit_rpath='`$ECHO "$inherit_rpath" | $SED "$delay_single_quote_subst"`'
+link_all_deplibs='`$ECHO "$link_all_deplibs" | $SED "$delay_single_quote_subst"`'
+always_export_symbols='`$ECHO "$always_export_symbols" | $SED "$delay_single_quote_subst"`'
+export_symbols_cmds='`$ECHO "$export_symbols_cmds" | $SED "$delay_single_quote_subst"`'
+exclude_expsyms='`$ECHO "$exclude_expsyms" | $SED "$delay_single_quote_subst"`'
+include_expsyms='`$ECHO "$include_expsyms" | $SED "$delay_single_quote_subst"`'
+prelink_cmds='`$ECHO "$prelink_cmds" | $SED "$delay_single_quote_subst"`'
+postlink_cmds='`$ECHO "$postlink_cmds" | $SED "$delay_single_quote_subst"`'
+file_list_spec='`$ECHO "$file_list_spec" | $SED "$delay_single_quote_subst"`'
+variables_saved_for_relink='`$ECHO "$variables_saved_for_relink" | $SED "$delay_single_quote_subst"`'
+need_lib_prefix='`$ECHO "$need_lib_prefix" | $SED "$delay_single_quote_subst"`'
+need_version='`$ECHO "$need_version" | $SED "$delay_single_quote_subst"`'
+version_type='`$ECHO "$version_type" | $SED "$delay_single_quote_subst"`'
+runpath_var='`$ECHO "$runpath_var" | $SED "$delay_single_quote_subst"`'
+shlibpath_var='`$ECHO "$shlibpath_var" | $SED "$delay_single_quote_subst"`'
+shlibpath_overrides_runpath='`$ECHO "$shlibpath_overrides_runpath" | $SED "$delay_single_quote_subst"`'
+libname_spec='`$ECHO "$libname_spec" | $SED "$delay_single_quote_subst"`'
+library_names_spec='`$ECHO "$library_names_spec" | $SED "$delay_single_quote_subst"`'
+soname_spec='`$ECHO "$soname_spec" | $SED "$delay_single_quote_subst"`'
+install_override_mode='`$ECHO "$install_override_mode" | $SED "$delay_single_quote_subst"`'
+postinstall_cmds='`$ECHO "$postinstall_cmds" | $SED "$delay_single_quote_subst"`'
+postuninstall_cmds='`$ECHO "$postuninstall_cmds" | $SED "$delay_single_quote_subst"`'
+finish_cmds='`$ECHO "$finish_cmds" | $SED "$delay_single_quote_subst"`'
+finish_eval='`$ECHO "$finish_eval" | $SED "$delay_single_quote_subst"`'
+hardcode_into_libs='`$ECHO "$hardcode_into_libs" | $SED "$delay_single_quote_subst"`'
+sys_lib_search_path_spec='`$ECHO "$sys_lib_search_path_spec" | $SED "$delay_single_quote_subst"`'
+configure_time_dlsearch_path='`$ECHO "$configure_time_dlsearch_path" | $SED "$delay_single_quote_subst"`'
+configure_time_lt_sys_library_path='`$ECHO "$configure_time_lt_sys_library_path" | $SED "$delay_single_quote_subst"`'
+hardcode_action='`$ECHO "$hardcode_action" | $SED "$delay_single_quote_subst"`'
+enable_dlopen='`$ECHO "$enable_dlopen" | $SED "$delay_single_quote_subst"`'
+enable_dlopen_self='`$ECHO "$enable_dlopen_self" | $SED "$delay_single_quote_subst"`'
+enable_dlopen_self_static='`$ECHO "$enable_dlopen_self_static" | $SED "$delay_single_quote_subst"`'
+old_striplib='`$ECHO "$old_striplib" | $SED "$delay_single_quote_subst"`'
+striplib='`$ECHO "$striplib" | $SED "$delay_single_quote_subst"`'
+
+LTCC='$LTCC'
+LTCFLAGS='$LTCFLAGS'
+compiler='$compiler_DEFAULT'
+
+# A function that is used when there is no print builtin or printf.
+func_fallback_echo ()
+{
+  eval 'cat <<_LTECHO_EOF
+\$1
+_LTECHO_EOF'
+}
+
+# Quote evaled strings.
+for var in AS \
+DLLTOOL \
+OBJDUMP \
+SHELL \
+ECHO \
+PATH_SEPARATOR \
+SED \
+GREP \
+EGREP \
+FGREP \
+LD \
+NM \
+LN_S \
+lt_SP2NL \
+lt_NL2SP \
+reload_flag \
+deplibs_check_method \
+file_magic_cmd \
+file_magic_glob \
+want_nocaseglob \
+sharedlib_from_linklib_cmd \
+AR \
+AR_FLAGS \
+archiver_list_spec \
+STRIP \
+RANLIB \
+CC \
+CFLAGS \
+compiler \
+lt_cv_sys_global_symbol_pipe \
+lt_cv_sys_global_symbol_to_cdecl \
+lt_cv_sys_global_symbol_to_import \
+lt_cv_sys_global_symbol_to_c_name_address \
+lt_cv_sys_global_symbol_to_c_name_address_lib_prefix \
+lt_cv_nm_interface \
+nm_file_list_spec \
+lt_cv_truncate_bin \
+lt_prog_compiler_no_builtin_flag \
+lt_prog_compiler_pic \
+lt_prog_compiler_wl \
+lt_prog_compiler_static \
+lt_cv_prog_compiler_c_o \
+need_locks \
+MANIFEST_TOOL \
+DSYMUTIL \
+NMEDIT \
+LIPO \
+OTOOL \
+OTOOL64 \
+shrext_cmds \
+export_dynamic_flag_spec \
+whole_archive_flag_spec \
+compiler_needs_object \
+with_gnu_ld \
+allow_undefined_flag \
+no_undefined_flag \
+hardcode_libdir_flag_spec \
+hardcode_libdir_separator \
+exclude_expsyms \
+include_expsyms \
+file_list_spec \
+variables_saved_for_relink \
+libname_spec \
+library_names_spec \
+soname_spec \
+install_override_mode \
+finish_eval \
+old_striplib \
+striplib; do
+    case \`eval \\\\\$ECHO \\\\""\\\\\$\$var"\\\\"\` in
+    *[\\\\\\\`\\"\\\$]*)
+      eval "lt_\$var=\\\\\\"\\\`\\\$ECHO \\"\\\$\$var\\" | \\\$SED \\"\\\$sed_quote_subst\\"\\\`\\\\\\"" ## exclude from sc_prohibit_nested_quotes
+      ;;
+    *)
+      eval "lt_\$var=\\\\\\"\\\$\$var\\\\\\""
+      ;;
+    esac
+done
+
+# Double-quote double-evaled strings.
+for var in reload_cmds \
+old_postinstall_cmds \
+old_postuninstall_cmds \
+old_archive_cmds \
+extract_expsyms_cmds \
+old_archive_from_new_cmds \
+old_archive_from_expsyms_cmds \
+archive_cmds \
+archive_expsym_cmds \
+module_cmds \
+module_expsym_cmds \
+export_symbols_cmds \
+prelink_cmds \
+postlink_cmds \
+postinstall_cmds \
+postuninstall_cmds \
+finish_cmds \
+sys_lib_search_path_spec \
+configure_time_dlsearch_path \
+configure_time_lt_sys_library_path; do
+    case \`eval \\\\\$ECHO \\\\""\\\\\$\$var"\\\\"\` in
+    *[\\\\\\\`\\"\\\$]*)
+      eval "lt_\$var=\\\\\\"\\\`\\\$ECHO \\"\\\$\$var\\" | \\\$SED -e \\"\\\$double_quote_subst\\" -e \\"\\\$sed_quote_subst\\" -e \\"\\\$delay_variable_subst\\"\\\`\\\\\\"" ## exclude from sc_prohibit_nested_quotes
+      ;;
+    *)
+      eval "lt_\$var=\\\\\\"\\\$\$var\\\\\\""
+      ;;
+    esac
+done
+
+ac_aux_dir='$ac_aux_dir'
+
+# See if we are running on zsh, and set the options that allow our
+# commands through without removal of \ escapes INIT.
+if test -n "\${ZSH_VERSION+set}"; then
+   setopt NO_GLOB_SUBST
+fi
+
+
+    PACKAGE='$PACKAGE'
+    VERSION='$VERSION'
+    RM='$RM'
+    ofile='$ofile'
+
+
+
+
+_ACEOF
+
+cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
+
+# Handling of arguments.
+for ac_config_target in $ac_config_targets
+do
+  case $ac_config_target in
+    "config.h") CONFIG_HEADERS="$CONFIG_HEADERS config.h" ;;
+    "ffcall-version.h") CONFIG_HEADERS="$CONFIG_HEADERS ffcall-version.h:ffcall-version.in.h" ;;
+    "Makefile") CONFIG_FILES="$CONFIG_FILES Makefile" ;;
+    "gnulib-lib/Makefile") CONFIG_FILES="$CONFIG_FILES gnulib-lib/Makefile" ;;
+    "avcall/Makefile") CONFIG_FILES="$CONFIG_FILES avcall/Makefile" ;;
+    "vacall/Makefile") CONFIG_FILES="$CONFIG_FILES vacall/Makefile" ;;
+    "trampoline/Makefile") CONFIG_FILES="$CONFIG_FILES trampoline/Makefile" ;;
+    "callback/Makefile") CONFIG_FILES="$CONFIG_FILES callback/Makefile" ;;
+    "callback/vacall_r/Makefile") CONFIG_FILES="$CONFIG_FILES callback/vacall_r/Makefile" ;;
+    "callback/trampoline_r/Makefile") CONFIG_FILES="$CONFIG_FILES callback/trampoline_r/Makefile" ;;
+    "depfiles") CONFIG_COMMANDS="$CONFIG_COMMANDS depfiles" ;;
+    "libtool") CONFIG_COMMANDS="$CONFIG_COMMANDS libtool" ;;
+
+  *) as_fn_error $? "invalid argument: \`$ac_config_target'" "$LINENO" 5;;
+  esac
+done
+
+
+# If the user did not use the arguments to specify the items to instantiate,
+# then the envvar interface is used.  Set only those that are not.
+# We use the long form for the default assignment because of an extremely
+# bizarre bug on SunOS 4.1.3.
+if $ac_need_defaults; then
+  test "${CONFIG_FILES+set}" = set || CONFIG_FILES=$config_files
+  test "${CONFIG_HEADERS+set}" = set || CONFIG_HEADERS=$config_headers
+  test "${CONFIG_COMMANDS+set}" = set || CONFIG_COMMANDS=$config_commands
+fi
+
+# Have a temporary directory for convenience.  Make it in the build tree
+# simply because there is no reason against having it here, and in addition,
+# creating and moving files from /tmp can sometimes cause problems.
+# Hook for its removal unless debugging.
+# Note that there is a small window in which the directory will not be cleaned:
+# after its creation but before its name has been assigned to `$tmp'.
+$debug ||
+{
+  tmp= ac_tmp=
+  trap 'exit_status=$?
+  : "${ac_tmp:=$tmp}"
+  { test ! -d "$ac_tmp" || rm -fr "$ac_tmp"; } && exit $exit_status
+' 0
+  trap 'as_fn_exit 1' 1 2 13 15
+}
+# Create a (secure) tmp directory for tmp files.
+
+{
+  tmp=`(umask 077 && mktemp -d "./confXXXXXX") 2>/dev/null` &&
+  test -d "$tmp"
+}  ||
+{
+  tmp=./conf$$-$RANDOM
+  (umask 077 && mkdir "$tmp")
+} || as_fn_error $? "cannot create a temporary directory in ." "$LINENO" 5
+ac_tmp=$tmp
+
+# Set up the scripts for CONFIG_FILES section.
+# No need to generate them if there are no CONFIG_FILES.
+# This happens for instance with `./config.status config.h'.
+if test -n "$CONFIG_FILES"; then
+
+
+ac_cr=`echo X | tr X '\015'`
+# On cygwin, bash can eat \r inside `` if the user requested igncr.
+# But we know of no other shell where ac_cr would be empty at this
+# point, so we can use a bashism as a fallback.
+if test "x$ac_cr" = x; then
+  eval ac_cr=\$\'\\r\'
+fi
+ac_cs_awk_cr=`$AWK 'BEGIN { print "a\rb" }' </dev/null 2>/dev/null`
+if test "$ac_cs_awk_cr" = "a${ac_cr}b"; then
+  ac_cs_awk_cr='\\r'
+else
+  ac_cs_awk_cr=$ac_cr
+fi
+
+echo 'BEGIN {' >"$ac_tmp/subs1.awk" &&
+_ACEOF
+
+
+{
+  echo "cat >conf$$subs.awk <<_ACEOF" &&
+  echo "$ac_subst_vars" | sed 's/.*/&!$&$ac_delim/' &&
+  echo "_ACEOF"
+} >conf$$subs.sh ||
+  as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5
+ac_delim_num=`echo "$ac_subst_vars" | grep -c '^'`
+ac_delim='%!_!# '
+for ac_last_try in false false false false false :; do
+  . ./conf$$subs.sh ||
+    as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5
+
+  ac_delim_n=`sed -n "s/.*$ac_delim\$/X/p" conf$$subs.awk | grep -c X`
+  if test $ac_delim_n = $ac_delim_num; then
+    break
+  elif $ac_last_try; then
+    as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5
+  else
+    ac_delim="$ac_delim!$ac_delim _$ac_delim!! "
+  fi
+done
+rm -f conf$$subs.sh
+
+cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
+cat >>"\$ac_tmp/subs1.awk" <<\\_ACAWK &&
+_ACEOF
+sed -n '
+h
+s/^/S["/; s/!.*/"]=/
+p
+g
+s/^[^!]*!//
+:repl
+t repl
+s/'"$ac_delim"'$//
+t delim
+:nl
+h
+s/\(.\{148\}\)..*/\1/
+t more1
+s/["\\]/\\&/g; s/^/"/; s/$/\\n"\\/
+p
+n
+b repl
+:more1
+s/["\\]/\\&/g; s/^/"/; s/$/"\\/
+p
+g
+s/.\{148\}//
+t nl
+:delim
+h
+s/\(.\{148\}\)..*/\1/
+t more2
+s/["\\]/\\&/g; s/^/"/; s/$/"/
+p
+b
+:more2
+s/["\\]/\\&/g; s/^/"/; s/$/"\\/
+p
+g
+s/.\{148\}//
+t delim
+' <conf$$subs.awk | sed '
+/^[^""]/{
+  N
+  s/\n//
+}
+' >>$CONFIG_STATUS || ac_write_fail=1
+rm -f conf$$subs.awk
+cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
+_ACAWK
+cat >>"\$ac_tmp/subs1.awk" <<_ACAWK &&
+  for (key in S) S_is_set[key] = 1
+  FS = "\a"
+
+}
+{
+  line = $ 0
+  nfields = split(line, field, "@")
+  substed = 0
+  len = length(field[1])
+  for (i = 2; i < nfields; i++) {
+    key = field[i]
+    keylen = length(key)
+    if (S_is_set[key]) {
+      value = S[key]
+      line = substr(line, 1, len) "" value "" substr(line, len + keylen + 3)
+      len += length(value) + length(field[++i])
+      substed = 1
+    } else
+      len += 1 + keylen
+  }
+
+  print line
+}
+
+_ACAWK
+_ACEOF
+cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
+if sed "s/$ac_cr//" < /dev/null > /dev/null 2>&1; then
+  sed "s/$ac_cr\$//; s/$ac_cr/$ac_cs_awk_cr/g"
+else
+  cat
+fi < "$ac_tmp/subs1.awk" > "$ac_tmp/subs.awk" \
+  || as_fn_error $? "could not setup config files machinery" "$LINENO" 5
+_ACEOF
+
+# VPATH may cause trouble with some makes, so we remove sole $(srcdir),
+# ${srcdir} and @srcdir@ entries from VPATH if srcdir is ".", strip leading and
+# trailing colons and then remove the whole line if VPATH becomes empty
+# (actually we leave an empty line to preserve line numbers).
+if test "x$srcdir" = x.; then
+  ac_vpsub='/^[         ]*VPATH[        ]*=[    ]*/{
+h
+s///
+s/^/:/
+s/[     ]*$/:/
+s/:\$(srcdir):/:/g
+s/:\${srcdir}:/:/g
+s/:@srcdir@:/:/g
+s/^:*//
+s/:*$//
+x
+s/\(=[  ]*\).*/\1/
+G
+s/\n//
+s/^[^=]*=[      ]*$//
+}'
+fi
+
+cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
+fi # test -n "$CONFIG_FILES"
+
+# Set up the scripts for CONFIG_HEADERS section.
+# No need to generate them if there are no CONFIG_HEADERS.
+# This happens for instance with `./config.status Makefile'.
+if test -n "$CONFIG_HEADERS"; then
+cat >"$ac_tmp/defines.awk" <<\_ACAWK ||
+BEGIN {
+_ACEOF
+
+# Transform confdefs.h into an awk script `defines.awk', embedded as
+# here-document in config.status, that substitutes the proper values into
+# config.h.in to produce config.h.
+
+# Create a delimiter string that does not exist in confdefs.h, to ease
+# handling of long lines.
+ac_delim='%!_!# '
+for ac_last_try in false false :; do
+  ac_tt=`sed -n "/$ac_delim/p" confdefs.h`
+  if test -z "$ac_tt"; then
+    break
+  elif $ac_last_try; then
+    as_fn_error $? "could not make $CONFIG_HEADERS" "$LINENO" 5
+  else
+    ac_delim="$ac_delim!$ac_delim _$ac_delim!! "
+  fi
+done
+
+# For the awk script, D is an array of macro values keyed by name,
+# likewise P contains macro parameters if any.  Preserve backslash
+# newline sequences.
+
+ac_word_re=[_$as_cr_Letters][_$as_cr_alnum]*
+sed -n '
+s/.\{148\}/&'"$ac_delim"'/g
+t rset
+:rset
+s/^[    ]*#[    ]*define[       ][      ]*/ /
+t def
+d
+:def
+s/\\$//
+t bsnl
+s/["\\]/\\&/g
+s/^ \('"$ac_word_re"'\)\(([^()]*)\)[    ]*\(.*\)/P["\1"]="\2"\
+D["\1"]=" \3"/p
+s/^ \('"$ac_word_re"'\)[        ]*\(.*\)/D["\1"]=" \2"/p
+d
+:bsnl
+s/["\\]/\\&/g
+s/^ \('"$ac_word_re"'\)\(([^()]*)\)[    ]*\(.*\)/P["\1"]="\2"\
+D["\1"]=" \3\\\\\\n"\\/p
+t cont
+s/^ \('"$ac_word_re"'\)[        ]*\(.*\)/D["\1"]=" \2\\\\\\n"\\/p
+t cont
+d
+:cont
+n
+s/.\{148\}/&'"$ac_delim"'/g
+t clear
+:clear
+s/\\$//
+t bsnlc
+s/["\\]/\\&/g; s/^/"/; s/$/"/p
+d
+:bsnlc
+s/["\\]/\\&/g; s/^/"/; s/$/\\\\\\n"\\/p
+b cont
+' <confdefs.h | sed '
+s/'"$ac_delim"'/"\\\
+"/g' >>$CONFIG_STATUS || ac_write_fail=1
+
+cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
+  for (key in D) D_is_set[key] = 1
+  FS = "\a"
+}
+/^[\t ]*#[\t ]*(define|undef)[\t ]+$ac_word_re([\t (]|\$)/ {
+  line = \$ 0
+  split(line, arg, " ")
+  if (arg[1] == "#") {
+    defundef = arg[2]
+    mac1 = arg[3]
+  } else {
+    defundef = substr(arg[1], 2)
+    mac1 = arg[2]
+  }
+  split(mac1, mac2, "(") #)
+  macro = mac2[1]
+  prefix = substr(line, 1, index(line, defundef) - 1)
+  if (D_is_set[macro]) {
+    # Preserve the white space surrounding the "#".
+    print prefix "define", macro P[macro] D[macro]
+    next
+  } else {
+    # Replace #undef with comments.  This is necessary, for example,
+    # in the case of _POSIX_SOURCE, which is predefined and required
+    # on some systems where configure will not decide to define it.
+    if (defundef == "undef") {
+      print "/*", prefix defundef, macro, "*/"
+      next
+    }
+  }
+}
+{ print }
+_ACAWK
+_ACEOF
+cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
+  as_fn_error $? "could not setup config headers machinery" "$LINENO" 5
+fi # test -n "$CONFIG_HEADERS"
+
+
+eval set X "  :F $CONFIG_FILES  :H $CONFIG_HEADERS    :C $CONFIG_COMMANDS"
+shift
+for ac_tag
+do
+  case $ac_tag in
+  :[FHLC]) ac_mode=$ac_tag; continue;;
+  esac
+  case $ac_mode$ac_tag in
+  :[FHL]*:*);;
+  :L* | :C*:*) as_fn_error $? "invalid tag \`$ac_tag'" "$LINENO" 5;;
+  :[FH]-) ac_tag=-:-;;
+  :[FH]*) ac_tag=$ac_tag:$ac_tag.in;;
+  esac
+  ac_save_IFS=$IFS
+  IFS=:
+  set x $ac_tag
+  IFS=$ac_save_IFS
+  shift
+  ac_file=$1
+  shift
+
+  case $ac_mode in
+  :L) ac_source=$1;;
+  :[FH])
+    ac_file_inputs=
+    for ac_f
+    do
+      case $ac_f in
+      -) ac_f="$ac_tmp/stdin";;
+      *) # Look for the file first in the build tree, then in the source tree
+        # (if the path is not absolute).  The absolute path cannot be DOS-style,
+        # because $ac_f cannot contain `:'.
+        test -f "$ac_f" ||
+          case $ac_f in
+          [\\/$]*) false;;
+          *) test -f "$srcdir/$ac_f" && ac_f="$srcdir/$ac_f";;
+          esac ||
+          as_fn_error 1 "cannot find input file: \`$ac_f'" "$LINENO" 5;;
+      esac
+      case $ac_f in *\'*) ac_f=`$as_echo "$ac_f" | sed "s/'/'\\\\\\\\''/g"`;; esac
+      as_fn_append ac_file_inputs " '$ac_f'"
+    done
+
+    # Let's still pretend it is `configure' which instantiates (i.e., don't
+    # use $as_me), people would be surprised to read:
+    #    /* config.h.  Generated by config.status.  */
+    configure_input='Generated from '`
+         $as_echo "$*" | sed 's|^[^:]*/||;s|:[^:]*/|, |g'
+       `' by configure.'
+    if test x"$ac_file" != x-; then
+      configure_input="$ac_file.  $configure_input"
+      { $as_echo "$as_me:${as_lineno-$LINENO}: creating $ac_file" >&5
+$as_echo "$as_me: creating $ac_file" >&6;}
+    fi
+    # Neutralize special characters interpreted by sed in replacement strings.
+    case $configure_input in #(
+    *\&* | *\|* | *\\* )
+       ac_sed_conf_input=`$as_echo "$configure_input" |
+       sed 's/[\\\\&|]/\\\\&/g'`;; #(
+    *) ac_sed_conf_input=$configure_input;;
+    esac
+
+    case $ac_tag in
+    *:-:* | *:-) cat >"$ac_tmp/stdin" \
+      || as_fn_error $? "could not create $ac_file" "$LINENO" 5 ;;
+    esac
+    ;;
+  esac
+
+  ac_dir=`$as_dirname -- "$ac_file" ||
+$as_expr X"$ac_file" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
+        X"$ac_file" : 'X\(//\)[^/]' \| \
+        X"$ac_file" : 'X\(//\)$' \| \
+        X"$ac_file" : 'X\(/\)' \| . 2>/dev/null ||
+$as_echo X"$ac_file" |
+    sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)[^/].*/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\).*/{
+           s//\1/
+           q
+         }
+         s/.*/./; q'`
+  as_dir="$ac_dir"; as_fn_mkdir_p
+  ac_builddir=.
+
+case "$ac_dir" in
+.) ac_dir_suffix= ac_top_builddir_sub=. ac_top_build_prefix= ;;
+*)
+  ac_dir_suffix=/`$as_echo "$ac_dir" | sed 's|^\.[\\/]||'`
+  # A ".." for each directory in $ac_dir_suffix.
+  ac_top_builddir_sub=`$as_echo "$ac_dir_suffix" | sed 's|/[^\\/]*|/..|g;s|/||'`
+  case $ac_top_builddir_sub in
+  "") ac_top_builddir_sub=. ac_top_build_prefix= ;;
+  *)  ac_top_build_prefix=$ac_top_builddir_sub/ ;;
+  esac ;;
+esac
+ac_abs_top_builddir=$ac_pwd
+ac_abs_builddir=$ac_pwd$ac_dir_suffix
+# for backward compatibility:
+ac_top_builddir=$ac_top_build_prefix
+
+case $srcdir in
+  .)  # We are building in place.
+    ac_srcdir=.
+    ac_top_srcdir=$ac_top_builddir_sub
+    ac_abs_top_srcdir=$ac_pwd ;;
+  [\\/]* | ?:[\\/]* )  # Absolute name.
+    ac_srcdir=$srcdir$ac_dir_suffix;
+    ac_top_srcdir=$srcdir
+    ac_abs_top_srcdir=$srcdir ;;
+  *) # Relative name.
+    ac_srcdir=$ac_top_build_prefix$srcdir$ac_dir_suffix
+    ac_top_srcdir=$ac_top_build_prefix$srcdir
+    ac_abs_top_srcdir=$ac_pwd/$srcdir ;;
+esac
+ac_abs_srcdir=$ac_abs_top_srcdir$ac_dir_suffix
+
+
+  case $ac_mode in
+  :F)
+  #
+  # CONFIG_FILE
+  #
+
+  case $INSTALL in
+  [\\/$]* | ?:[\\/]* ) ac_INSTALL=$INSTALL ;;
+  *) ac_INSTALL=$ac_top_build_prefix$INSTALL ;;
+  esac
+  ac_MKDIR_P=$MKDIR_P
+  case $MKDIR_P in
+  [\\/$]* | ?:[\\/]* ) ;;
+  */*) ac_MKDIR_P=$ac_top_build_prefix$MKDIR_P ;;
+  esac
+_ACEOF
+
+cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
+# If the template does not know about datarootdir, expand it.
+# FIXME: This hack should be removed a few years after 2.60.
+ac_datarootdir_hack=; ac_datarootdir_seen=
+ac_sed_dataroot='
+/datarootdir/ {
+  p
+  q
+}
+/@datadir@/p
+/@docdir@/p
+/@infodir@/p
+/@localedir@/p
+/@mandir@/p'
+case `eval "sed -n \"\$ac_sed_dataroot\" $ac_file_inputs"` in
+*datarootdir*) ac_datarootdir_seen=yes;;
+*@datadir@*|*@docdir@*|*@infodir@*|*@localedir@*|*@mandir@*)
+  { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $ac_file_inputs seems to ignore the --datarootdir setting" >&5
+$as_echo "$as_me: WARNING: $ac_file_inputs seems to ignore the --datarootdir setting" >&2;}
+_ACEOF
+cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
+  ac_datarootdir_hack='
+  s&@datadir@&$datadir&g
+  s&@docdir@&$docdir&g
+  s&@infodir@&$infodir&g
+  s&@localedir@&$localedir&g
+  s&@mandir@&$mandir&g
+  s&\\\${datarootdir}&$datarootdir&g' ;;
+esac
+_ACEOF
+
+# Neutralize VPATH when `$srcdir' = `.'.
+# Shell code in configure.ac might set extrasub.
+# FIXME: do we really want to maintain this feature?
+cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
+ac_sed_extra="$ac_vpsub
+$extrasub
+_ACEOF
+cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
+:t
+/@[a-zA-Z_][a-zA-Z_0-9]*@/!b
+s|@configure_input@|$ac_sed_conf_input|;t t
+s&@top_builddir@&$ac_top_builddir_sub&;t t
+s&@top_build_prefix@&$ac_top_build_prefix&;t t
+s&@srcdir@&$ac_srcdir&;t t
+s&@abs_srcdir@&$ac_abs_srcdir&;t t
+s&@top_srcdir@&$ac_top_srcdir&;t t
+s&@abs_top_srcdir@&$ac_abs_top_srcdir&;t t
+s&@builddir@&$ac_builddir&;t t
+s&@abs_builddir@&$ac_abs_builddir&;t t
+s&@abs_top_builddir@&$ac_abs_top_builddir&;t t
+s&@INSTALL@&$ac_INSTALL&;t t
+s&@MKDIR_P@&$ac_MKDIR_P&;t t
+$ac_datarootdir_hack
+"
+eval sed \"\$ac_sed_extra\" "$ac_file_inputs" | $AWK -f "$ac_tmp/subs.awk" \
+  >$ac_tmp/out || as_fn_error $? "could not create $ac_file" "$LINENO" 5
+
+test -z "$ac_datarootdir_hack$ac_datarootdir_seen" &&
+  { ac_out=`sed -n '/\${datarootdir}/p' "$ac_tmp/out"`; test -n "$ac_out"; } &&
+  { ac_out=`sed -n '/^[         ]*datarootdir[  ]*:*=/p' \
+      "$ac_tmp/out"`; test -z "$ac_out"; } &&
+  { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $ac_file contains a reference to the variable \`datarootdir'
+which seems to be undefined.  Please make sure it is defined" >&5
+$as_echo "$as_me: WARNING: $ac_file contains a reference to the variable \`datarootdir'
+which seems to be undefined.  Please make sure it is defined" >&2;}
+
+  rm -f "$ac_tmp/stdin"
+  case $ac_file in
+  -) cat "$ac_tmp/out" && rm -f "$ac_tmp/out";;
+  *) rm -f "$ac_file" && mv "$ac_tmp/out" "$ac_file";;
+  esac \
+  || as_fn_error $? "could not create $ac_file" "$LINENO" 5
+ ;;
+  :H)
+  #
+  # CONFIG_HEADER
+  #
+  if test x"$ac_file" != x-; then
+    {
+      $as_echo "/* $configure_input  */" \
+      && eval '$AWK -f "$ac_tmp/defines.awk"' "$ac_file_inputs"
+    } >"$ac_tmp/config.h" \
+      || as_fn_error $? "could not create $ac_file" "$LINENO" 5
+    if diff "$ac_file" "$ac_tmp/config.h" >/dev/null 2>&1; then
+      { $as_echo "$as_me:${as_lineno-$LINENO}: $ac_file is unchanged" >&5
+$as_echo "$as_me: $ac_file is unchanged" >&6;}
+    else
+      rm -f "$ac_file"
+      mv "$ac_tmp/config.h" "$ac_file" \
+       || as_fn_error $? "could not create $ac_file" "$LINENO" 5
+    fi
+  else
+    $as_echo "/* $configure_input  */" \
+      && eval '$AWK -f "$ac_tmp/defines.awk"' "$ac_file_inputs" \
+      || as_fn_error $? "could not create -" "$LINENO" 5
+  fi
+# Compute "$ac_file"'s index in $config_headers.
+_am_arg="$ac_file"
+_am_stamp_count=1
+for _am_header in $config_headers :; do
+  case $_am_header in
+    $_am_arg | $_am_arg:* )
+      break ;;
+    * )
+      _am_stamp_count=`expr $_am_stamp_count + 1` ;;
+  esac
+done
+echo "timestamp for $_am_arg" >`$as_dirname -- "$_am_arg" ||
+$as_expr X"$_am_arg" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
+        X"$_am_arg" : 'X\(//\)[^/]' \| \
+        X"$_am_arg" : 'X\(//\)$' \| \
+        X"$_am_arg" : 'X\(/\)' \| . 2>/dev/null ||
+$as_echo X"$_am_arg" |
+    sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)[^/].*/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\).*/{
+           s//\1/
+           q
+         }
+         s/.*/./; q'`/stamp-h$_am_stamp_count
+ ;;
+
+  :C)  { $as_echo "$as_me:${as_lineno-$LINENO}: executing $ac_file commands" >&5
+$as_echo "$as_me: executing $ac_file commands" >&6;}
+ ;;
+  esac
+
+
+  case $ac_file$ac_mode in
+    "depfiles":C) test x"$AMDEP_TRUE" != x"" || {
+  # Older Autoconf quotes --file arguments for eval, but not when files
+  # are listed without --file.  Let's play safe and only enable the eval
+  # if we detect the quoting.
+  case $CONFIG_FILES in
+  *\'*) eval set x "$CONFIG_FILES" ;;
+  *)   set x $CONFIG_FILES ;;
+  esac
+  shift
+  for mf
+  do
+    # Strip MF so we end up with the name of the file.
+    mf=`echo "$mf" | sed -e 's/:.*$//'`
+    # Check whether this is an Automake generated Makefile or not.
+    # We used to match only the files named 'Makefile.in', but
+    # some people rename them; so instead we look at the file content.
+    # Grep'ing the first line is not enough: some people post-process
+    # each Makefile.in and add a new line on top of each file to say so.
+    # Grep'ing the whole file is not good either: AIX grep has a line
+    # limit of 2048, but all sed's we know have understand at least 4000.
+    if sed -n 's,^#.*generated by automake.*,X,p' "$mf" | grep X >/dev/null 2>&1; then
+      dirpart=`$as_dirname -- "$mf" ||
+$as_expr X"$mf" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
+        X"$mf" : 'X\(//\)[^/]' \| \
+        X"$mf" : 'X\(//\)$' \| \
+        X"$mf" : 'X\(/\)' \| . 2>/dev/null ||
+$as_echo X"$mf" |
+    sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)[^/].*/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\).*/{
+           s//\1/
+           q
+         }
+         s/.*/./; q'`
+    else
+      continue
+    fi
+    # Extract the definition of DEPDIR, am__include, and am__quote
+    # from the Makefile without running 'make'.
+    DEPDIR=`sed -n 's/^DEPDIR = //p' < "$mf"`
+    test -z "$DEPDIR" && continue
+    am__include=`sed -n 's/^am__include = //p' < "$mf"`
+    test -z "$am__include" && continue
+    am__quote=`sed -n 's/^am__quote = //p' < "$mf"`
+    # Find all dependency output files, they are included files with
+    # $(DEPDIR) in their names.  We invoke sed twice because it is the
+    # simplest approach to changing $(DEPDIR) to its actual value in the
+    # expansion.
+    for file in `sed -n "
+      s/^$am__include $am__quote\(.*(DEPDIR).*\)$am__quote"'$/\1/p' <"$mf" | \
+        sed -e 's/\$(DEPDIR)/'"$DEPDIR"'/g'`; do
+      # Make sure the directory exists.
+      test -f "$dirpart/$file" && continue
+      fdir=`$as_dirname -- "$file" ||
+$as_expr X"$file" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
+        X"$file" : 'X\(//\)[^/]' \| \
+        X"$file" : 'X\(//\)$' \| \
+        X"$file" : 'X\(/\)' \| . 2>/dev/null ||
+$as_echo X"$file" |
+    sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)[^/].*/{
+           s//\1/
+           q
+         }
+         /^X\(\/\/\)$/{
+           s//\1/
+           q
+         }
+         /^X\(\/\).*/{
+           s//\1/
+           q
+         }
+         s/.*/./; q'`
+      as_dir=$dirpart/$fdir; as_fn_mkdir_p
+      # echo "creating $dirpart/$file"
+      echo '# dummy' > "$dirpart/$file"
+    done
+  done
+}
+ ;;
+    "libtool":C)
+
+    # See if we are running on zsh, and set the options that allow our
+    # commands through without removal of \ escapes.
+    if test -n "${ZSH_VERSION+set}"; then
+      setopt NO_GLOB_SUBST
+    fi
+
+    cfgfile=${ofile}T
+    trap "$RM \"$cfgfile\"; exit 1" 1 2 15
+    $RM "$cfgfile"
+
+    cat <<_LT_EOF >> "$cfgfile"
+#! $SHELL
+# Generated automatically by $as_me ($PACKAGE) $VERSION
+# Libtool was configured on host `(hostname || uname -n) 2>/dev/null | sed 1q`:
+# NOTE: Changes made to this file will be lost: look at ltmain.sh.
+
+# Provide generalized library-building support services.
+# Written by Gordon Matzigkeit, 1996
+
+# Copyright (C) 2014 Free Software Foundation, Inc.
+# This is free software; see the source for copying conditions.  There is NO
+# warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+# GNU Libtool is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of of the License, or
+# (at your option) any later version.
+#
+# As a special exception to the GNU General Public License, if you
+# distribute this file as part of a program or library that is built
+# using GNU Libtool, you may include this file under the  same
+# distribution terms that you use for the rest of that program.
+#
+# GNU Libtool is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+
+# The names of the tagged configurations supported by this script.
+available_tags=''
+
+# Configured defaults for sys_lib_dlsearch_path munging.
+: \${LT_SYS_LIBRARY_PATH="$configure_time_lt_sys_library_path"}
+
+# ### BEGIN LIBTOOL CONFIG
+
+# Which release of libtool.m4 was used?
+macro_version=$macro_version
+macro_revision=$macro_revision
+
+# Assembler program.
+AS=$lt_AS
+
+# DLL creation program.
+DLLTOOL=$lt_DLLTOOL
+
+# Object dumper program.
+OBJDUMP=$lt_OBJDUMP
+
+# Whether or not to build shared libraries.
+build_libtool_libs=$enable_shared
+
+# Whether or not to build static libraries.
+build_old_libs=$enable_static
+
+# What type of objects to build.
+pic_mode=$pic_mode
+
+# Whether or not to optimize for fast installation.
+fast_install=$enable_fast_install
+
+# Shared archive member basename,for filename based shared library versioning on AIX.
+shared_archive_member_spec=$shared_archive_member_spec
+
+# Shell to use when invoking shell scripts.
+SHELL=$lt_SHELL
+
+# An echo program that protects backslashes.
+ECHO=$lt_ECHO
+
+# The PATH separator for the build system.
+PATH_SEPARATOR=$lt_PATH_SEPARATOR
+
+# The host system.
+host_alias=$host_alias
+host=$host
+host_os=$host_os
+
+# The build system.
+build_alias=$build_alias
+build=$build
+build_os=$build_os
+
+# A sed program that does not truncate output.
+SED=$lt_SED
+
+# Sed that helps us avoid accidentally triggering echo(1) options like -n.
+Xsed="\$SED -e 1s/^X//"
+
+# A grep program that handles long lines.
+GREP=$lt_GREP
+
+# An ERE matcher.
+EGREP=$lt_EGREP
+
+# A literal string matcher.
+FGREP=$lt_FGREP
+
+# A BSD- or MS-compatible name lister.
+NM=$lt_NM
+
+# Whether we need soft or hard links.
+LN_S=$lt_LN_S
+
+# What is the maximum length of a command?
+max_cmd_len=$max_cmd_len
+
+# Object file suffix (normally "o").
+objext=$ac_objext
+
+# Executable file suffix (normally "").
+exeext=$exeext
+
+# whether the shell understands "unset".
+lt_unset=$lt_unset
+
+# turn spaces into newlines.
+SP2NL=$lt_lt_SP2NL
+
+# turn newlines into spaces.
+NL2SP=$lt_lt_NL2SP
+
+# convert \$build file names to \$host format.
+to_host_file_cmd=$lt_cv_to_host_file_cmd
+
+# convert \$build files to toolchain format.
+to_tool_file_cmd=$lt_cv_to_tool_file_cmd
+
+# Method to check whether dependent libraries are shared objects.
+deplibs_check_method=$lt_deplibs_check_method
+
+# Command to use when deplibs_check_method = "file_magic".
+file_magic_cmd=$lt_file_magic_cmd
+
+# How to find potential files when deplibs_check_method = "file_magic".
+file_magic_glob=$lt_file_magic_glob
+
+# Find potential files using nocaseglob when deplibs_check_method = "file_magic".
+want_nocaseglob=$lt_want_nocaseglob
+
+# Command to associate shared and link libraries.
+sharedlib_from_linklib_cmd=$lt_sharedlib_from_linklib_cmd
+
+# The archiver.
+AR=$lt_AR
+
+# Flags to create an archive.
+AR_FLAGS=$lt_AR_FLAGS
+
+# How to feed a file listing to the archiver.
+archiver_list_spec=$lt_archiver_list_spec
+
+# A symbol stripping program.
+STRIP=$lt_STRIP
+
+# Commands used to install an old-style archive.
+RANLIB=$lt_RANLIB
+old_postinstall_cmds=$lt_old_postinstall_cmds
+old_postuninstall_cmds=$lt_old_postuninstall_cmds
+
+# Whether to use a lock for old archive extraction.
+lock_old_archive_extraction=$lock_old_archive_extraction
+
+# A C compiler.
+LTCC=$lt_CC
+
+# LTCC compiler flags.
+LTCFLAGS=$lt_CFLAGS
+
+# Take the output of nm and produce a listing of raw symbols and C names.
+global_symbol_pipe=$lt_lt_cv_sys_global_symbol_pipe
+
+# Transform the output of nm in a proper C declaration.
+global_symbol_to_cdecl=$lt_lt_cv_sys_global_symbol_to_cdecl
+
+# Transform the output of nm into a list of symbols to manually relocate.
+global_symbol_to_import=$lt_lt_cv_sys_global_symbol_to_import
+
+# Transform the output of nm in a C name address pair.
+global_symbol_to_c_name_address=$lt_lt_cv_sys_global_symbol_to_c_name_address
+
+# Transform the output of nm in a C name address pair when lib prefix is needed.
+global_symbol_to_c_name_address_lib_prefix=$lt_lt_cv_sys_global_symbol_to_c_name_address_lib_prefix
+
+# The name lister interface.
+nm_interface=$lt_lt_cv_nm_interface
+
+# Specify filename containing input files for \$NM.
+nm_file_list_spec=$lt_nm_file_list_spec
+
+# The root where to search for dependent libraries,and where our libraries should be installed.
+lt_sysroot=$lt_sysroot
+
+# Command to truncate a binary pipe.
+lt_truncate_bin=$lt_lt_cv_truncate_bin
+
+# The name of the directory that contains temporary libtool files.
+objdir=$objdir
+
+# Used to examine libraries when file_magic_cmd begins with "file".
+MAGIC_CMD=$MAGIC_CMD
+
+# Must we lock files when doing compilation?
+need_locks=$lt_need_locks
+
+# Manifest tool.
+MANIFEST_TOOL=$lt_MANIFEST_TOOL
+
+# Tool to manipulate archived DWARF debug symbol files on Mac OS X.
+DSYMUTIL=$lt_DSYMUTIL
+
+# Tool to change global to local symbols on Mac OS X.
+NMEDIT=$lt_NMEDIT
+
+# Tool to manipulate fat objects and archives on Mac OS X.
+LIPO=$lt_LIPO
+
+# ldd/readelf like tool for Mach-O binaries on Mac OS X.
+OTOOL=$lt_OTOOL
+
+# ldd/readelf like tool for 64 bit Mach-O binaries on Mac OS X 10.4.
+OTOOL64=$lt_OTOOL64
+
+# Old archive suffix (normally "a").
+libext=$libext
+
+# Shared library suffix (normally ".so").
+shrext_cmds=$lt_shrext_cmds
+
+# The commands to extract the exported symbol list from a shared archive.
+extract_expsyms_cmds=$lt_extract_expsyms_cmds
+
+# Variables whose values should be saved in libtool wrapper scripts and
+# restored at link time.
+variables_saved_for_relink=$lt_variables_saved_for_relink
+
+# Do we need the "lib" prefix for modules?
+need_lib_prefix=$need_lib_prefix
+
+# Do we need a version for libraries?
+need_version=$need_version
+
+# Library versioning type.
+version_type=$version_type
+
+# Shared library runtime path variable.
+runpath_var=$runpath_var
+
+# Shared library path variable.
+shlibpath_var=$shlibpath_var
+
+# Is shlibpath searched before the hard-coded library search path?
+shlibpath_overrides_runpath=$shlibpath_overrides_runpath
+
+# Format of library name prefix.
+libname_spec=$lt_libname_spec
+
+# List of archive names.  First name is the real one, the rest are links.
+# The last name is the one that the linker finds with -lNAME
+library_names_spec=$lt_library_names_spec
+
+# The coded name of the library, if different from the real name.
+soname_spec=$lt_soname_spec
+
+# Permission mode override for installation of shared libraries.
+install_override_mode=$lt_install_override_mode
+
+# Command to use after installation of a shared archive.
+postinstall_cmds=$lt_postinstall_cmds
+
+# Command to use after uninstallation of a shared archive.
+postuninstall_cmds=$lt_postuninstall_cmds
+
+# Commands used to finish a libtool library installation in a directory.
+finish_cmds=$lt_finish_cmds
+
+# As "finish_cmds", except a single script fragment to be evaled but
+# not shown.
+finish_eval=$lt_finish_eval
+
+# Whether we should hardcode library paths into libraries.
+hardcode_into_libs=$hardcode_into_libs
+
+# Compile-time system search path for libraries.
+sys_lib_search_path_spec=$lt_sys_lib_search_path_spec
+
+# Detected run-time system search path for libraries.
+sys_lib_dlsearch_path_spec=$lt_configure_time_dlsearch_path
+
+# Explicit LT_SYS_LIBRARY_PATH set during ./configure time.
+configure_time_lt_sys_library_path=$lt_configure_time_lt_sys_library_path
+
+# Whether dlopen is supported.
+dlopen_support=$enable_dlopen
+
+# Whether dlopen of programs is supported.
+dlopen_self=$enable_dlopen_self
+
+# Whether dlopen of statically linked programs is supported.
+dlopen_self_static=$enable_dlopen_self_static
+
+# Commands to strip libraries.
+old_striplib=$lt_old_striplib
+striplib=$lt_striplib
+
+
+# The linker used to build libraries.
+LD=$lt_LD
+
+# How to create reloadable object files.
+reload_flag=$lt_reload_flag
+reload_cmds=$lt_reload_cmds
+
+# Commands used to build an old-style archive.
+old_archive_cmds=$lt_old_archive_cmds
+
+# A language specific compiler.
+CC=$lt_compiler
+
+# Is the compiler the GNU compiler?
+with_gcc=$GCC
+
+# Compiler flag to turn off builtin functions.
+no_builtin_flag=$lt_lt_prog_compiler_no_builtin_flag
+
+# Additional compiler flags for building library objects.
+pic_flag=$lt_lt_prog_compiler_pic
+
+# How to pass a linker flag through the compiler.
+wl=$lt_lt_prog_compiler_wl
+
+# Compiler flag to prevent dynamic linking.
+link_static_flag=$lt_lt_prog_compiler_static
+
+# Does compiler simultaneously support -c and -o options?
+compiler_c_o=$lt_lt_cv_prog_compiler_c_o
+
+# Whether or not to add -lc for building shared libraries.
+build_libtool_need_lc=$archive_cmds_need_lc
+
+# Whether or not to disallow shared libs when runtime libs are static.
+allow_libtool_libs_with_static_runtimes=$enable_shared_with_static_runtimes
+
+# Compiler flag to allow reflexive dlopens.
+export_dynamic_flag_spec=$lt_export_dynamic_flag_spec
+
+# Compiler flag to generate shared objects directly from archives.
+whole_archive_flag_spec=$lt_whole_archive_flag_spec
+
+# Whether the compiler copes with passing no objects directly.
+compiler_needs_object=$lt_compiler_needs_object
+
+# Create an old-style archive from a shared archive.
+old_archive_from_new_cmds=$lt_old_archive_from_new_cmds
+
+# Create a temporary old-style archive to link instead of a shared archive.
+old_archive_from_expsyms_cmds=$lt_old_archive_from_expsyms_cmds
+
+# Commands used to build a shared archive.
+archive_cmds=$lt_archive_cmds
+archive_expsym_cmds=$lt_archive_expsym_cmds
+
+# Commands used to build a loadable module if different from building
+# a shared archive.
+module_cmds=$lt_module_cmds
+module_expsym_cmds=$lt_module_expsym_cmds
+
+# Whether we are building with GNU ld or not.
+with_gnu_ld=$lt_with_gnu_ld
+
+# Flag that allows shared libraries with undefined symbols to be built.
+allow_undefined_flag=$lt_allow_undefined_flag
+
+# Flag that enforces no undefined symbols.
+no_undefined_flag=$lt_no_undefined_flag
+
+# Flag to hardcode \$libdir into a binary during linking.
+# This must work even if \$libdir does not exist
+hardcode_libdir_flag_spec=$lt_hardcode_libdir_flag_spec
+
+# Whether we need a single "-rpath" flag with a separated argument.
+hardcode_libdir_separator=$lt_hardcode_libdir_separator
+
+# Set to "yes" if using DIR/libNAME\$shared_ext during linking hardcodes
+# DIR into the resulting binary.
+hardcode_direct=$hardcode_direct
+
+# Set to "yes" if using DIR/libNAME\$shared_ext during linking hardcodes
+# DIR into the resulting binary and the resulting library dependency is
+# "absolute",i.e impossible to change by setting \$shlibpath_var if the
+# library is relocated.
+hardcode_direct_absolute=$hardcode_direct_absolute
+
+# Set to "yes" if using the -LDIR flag during linking hardcodes DIR
+# into the resulting binary.
+hardcode_minus_L=$hardcode_minus_L
+
+# Set to "yes" if using SHLIBPATH_VAR=DIR during linking hardcodes DIR
+# into the resulting binary.
+hardcode_shlibpath_var=$hardcode_shlibpath_var
+
+# Set to "yes" if building a shared library automatically hardcodes DIR
+# into the library and all subsequent libraries and executables linked
+# against it.
+hardcode_automatic=$hardcode_automatic
+
+# Set to yes if linker adds runtime paths of dependent libraries
+# to runtime path list.
+inherit_rpath=$inherit_rpath
+
+# Whether libtool must link a program against all its dependency libraries.
+link_all_deplibs=$link_all_deplibs
+
+# Set to "yes" if exported symbols are required.
+always_export_symbols=$always_export_symbols
+
+# The commands to list exported symbols.
+export_symbols_cmds=$lt_export_symbols_cmds
+
+# Symbols that should not be listed in the preloaded symbols.
+exclude_expsyms=$lt_exclude_expsyms
+
+# Symbols that must always be exported.
+include_expsyms=$lt_include_expsyms
+
+# Commands necessary for linking programs (against libraries) with templates.
+prelink_cmds=$lt_prelink_cmds
+
+# Commands necessary for finishing linking programs.
+postlink_cmds=$lt_postlink_cmds
+
+# Specify filename containing input files.
+file_list_spec=$lt_file_list_spec
+
+# How to hardcode a shared library path into an executable.
+hardcode_action=$hardcode_action
+
+# ### END LIBTOOL CONFIG
+
+_LT_EOF
+
+    cat <<'_LT_EOF' >> "$cfgfile"
+
+# ### BEGIN FUNCTIONS SHARED WITH CONFIGURE
+
+# func_munge_path_list VARIABLE PATH
+# -----------------------------------
+# VARIABLE is name of variable containing _space_ separated list of
+# directories to be munged by the contents of PATH, which is string
+# having a format:
+# "DIR[:DIR]:"
+#       string "DIR[ DIR]" will be prepended to VARIABLE
+# ":DIR[:DIR]"
+#       string "DIR[ DIR]" will be appended to VARIABLE
+# "DIRP[:DIRP]::[DIRA:]DIRA"
+#       string "DIRP[ DIRP]" will be prepended to VARIABLE and string
+#       "DIRA[ DIRA]" will be appended to VARIABLE
+# "DIR[:DIR]"
+#       VARIABLE will be replaced by "DIR[ DIR]"
+func_munge_path_list ()
+{
+    case x$2 in
+    x)
+        ;;
+    *:)
+        eval $1=\"`$ECHO $2 | $SED 's/:/ /g'` \$$1\"
+        ;;
+    x:*)
+        eval $1=\"\$$1 `$ECHO $2 | $SED 's/:/ /g'`\"
+        ;;
+    *::*)
+        eval $1=\"\$$1\ `$ECHO $2 | $SED -e 's/.*:://' -e 's/:/ /g'`\"
+        eval $1=\"`$ECHO $2 | $SED -e 's/::.*//' -e 's/:/ /g'`\ \$$1\"
+        ;;
+    *)
+        eval $1=\"`$ECHO $2 | $SED 's/:/ /g'`\"
+        ;;
+    esac
+}
+
+
+# Calculate cc_basename.  Skip known compiler wrappers and cross-prefix.
+func_cc_basename ()
+{
+    for cc_temp in $*""; do
+      case $cc_temp in
+        compile | *[\\/]compile | ccache | *[\\/]ccache ) ;;
+        distcc | *[\\/]distcc | purify | *[\\/]purify ) ;;
+        \-*) ;;
+        *) break;;
+      esac
+    done
+    func_cc_basename_result=`$ECHO "$cc_temp" | $SED "s%.*/%%; s%^$host_alias-%%"`
+}
+
+
+# ### END FUNCTIONS SHARED WITH CONFIGURE
+
+_LT_EOF
+
+  case $host_os in
+  aix3*)
+    cat <<\_LT_EOF >> "$cfgfile"
+# AIX sometimes has problems with the GCC collect2 program.  For some
+# reason, if we set the COLLECT_NAMES environment variable, the problems
+# vanish in a puff of smoke.
+if test set != "${COLLECT_NAMES+set}"; then
+  COLLECT_NAMES=
+  export COLLECT_NAMES
+fi
+_LT_EOF
+    ;;
+  esac
+
+
+ltmain=$ac_aux_dir/ltmain.sh
+
+
+  # We use sed instead of cat because bash on DJGPP gets confused if
+  # if finds mixed CR/LF and LF-only lines.  Since sed operates in
+  # text mode, it properly converts lines to CR/LF.  This bash problem
+  # is reportedly fixed, but why not run on old versions too?
+  sed '$q' "$ltmain" >> "$cfgfile" \
+     || (rm -f "$cfgfile"; exit 1)
+
+   mv -f "$cfgfile" "$ofile" ||
+    (rm -f "$ofile" && cp "$cfgfile" "$ofile" && rm -f "$cfgfile")
+  chmod +x "$ofile"
+
+ ;;
+
+  esac
+done # for ac_tag
+
+
+as_fn_exit 0
+_ACEOF
+ac_clean_files=$ac_clean_files_save
+
+test $ac_write_fail = 0 ||
+  as_fn_error $? "write failure creating $CONFIG_STATUS" "$LINENO" 5
+
+
+# configure is writing to config.log, and then calls config.status.
+# config.status does its own redirection, appending to config.log.
+# Unfortunately, on DOS this fails, as config.log is still kept open
+# by configure, so config.status won't be able to write to it; its
+# output is simply discarded.  So we exec the FD to /dev/null,
+# effectively closing config.log, so it can be properly (re)opened and
+# appended to by config.status.  When coming back to configure, we
+# need to make the FD available again.
+if test "$no_create" != yes; then
+  ac_cs_success=:
+  ac_config_status_args=
+  test "$silent" = yes &&
+    ac_config_status_args="$ac_config_status_args --quiet"
+  exec 5>/dev/null
+  $SHELL $CONFIG_STATUS $ac_config_status_args || ac_cs_success=false
+  exec 5>>config.log
+  # Use ||, not &&, to avoid exiting from the if with $? = 1, which
+  # would make configure fail if this is the last instruction.
+  $ac_cs_success || as_fn_exit 1
+fi
+if test -n "$ac_unrecognized_opts" && test "$enable_option_checking" != no; then
+  { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: unrecognized options: $ac_unrecognized_opts" >&5
+$as_echo "$as_me: WARNING: unrecognized options: $ac_unrecognized_opts" >&2;}
+fi
+
diff --git a/configure.ac b/configure.ac
new file mode 100644 (file)
index 0000000..dc10be1
--- /dev/null
@@ -0,0 +1,229 @@
+dnl AUTOCONF configuration for LIBFFCALL
+dnl Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+dnl Copyright 2003-2010 Sam Steingold <sds@gnu.org>
+dnl
+dnl This program is free software: you can redistribute it and/or modify
+dnl it under the terms of the GNU General Public License as published by
+dnl the Free Software Foundation; either version 2 of the License, or
+dnl (at your option) any later version.
+dnl
+dnl This program is distributed in the hope that it will be useful,
+dnl but WITHOUT ANY WARRANTY; without even the implied warranty of
+dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+dnl GNU General Public License for more details.
+dnl
+dnl You should have received a copy of the GNU General Public License
+dnl along with this program.  If not, see <https://www.gnu.org/licenses/>.
+dnl
+
+AC_INIT([GNU libffcall],m4_normalize(m4_esyscmd([cat VERSION])),[https://savannah.gnu.org/projects/libffcall],[libffcall])
+AC_CONFIG_AUX_DIR([build-aux])
+AM_INIT_AUTOMAKE([])
+
+AC_CONFIG_SRCDIR([trampoline/trampoline.h])
+
+AC_CONFIG_HEADERS([config.h])
+AC_CONFIG_HEADERS([ffcall-version.h:ffcall-version.in.h])
+
+AC_CONFIG_FILES([Makefile])
+AC_CONFIG_FILES([gnulib-lib/Makefile])
+AC_CONFIG_FILES([avcall/Makefile])
+AC_CONFIG_FILES([vacall/Makefile])
+AC_CONFIG_FILES([trampoline/Makefile])
+AC_CONFIG_FILES([callback/Makefile])
+AC_CONFIG_FILES([callback/vacall_r/Makefile])
+AC_CONFIG_FILES([callback/trampoline_r/Makefile])
+
+dnl Substitutable version number.
+changequote(,)
+sed_extract_major='/^[0-9]/{s/^\([0-9]*\).*/\1/p;q;}
+i\
+0
+q
+'
+sed_extract_minor='/^[0-9][0-9]*[.][0-9]/{s/^[0-9]*[.]\([0-9]*\).*/\1/p;q;}
+i\
+0
+q
+'
+changequote([,])
+version_major=`echo "${PACKAGE_VERSION}" | sed -n -e "$sed_extract_major"`
+version_minor=`echo "${PACKAGE_VERSION}" | sed -n -e "$sed_extract_minor"`
+HEXVERSION=`printf '0x%02X%02X' $version_major $version_minor`
+AC_DEFINE_UNQUOTED([LIBFFCALL_VERSION], [$HEXVERSION], [Version number: (major<<8) + minor])
+
+AC_PROG_MAKE_SET
+
+dnl The libraries are built in C.
+AC_PROG_CC
+AC_PROG_CPP
+AC_PROG_GCC_TRADITIONAL
+CL_CC_GCC
+CL_AS_UNDERSCORE
+dnl But some tests use C++.
+gl_PROG_ANSI_CXX([CXX], [ANSICXX])
+if test "$CXX" != no; then
+  IF_CXX=''
+else
+  IF_CXX='# '
+fi
+AC_SUBST([IF_CXX])
+
+dnl For a 64-bit build on AIX, AC_PROG_RANLIB is not sufficient.
+gl_PROG_AR_RANLIB
+
+dnl The Makefiles have a few special rules for MSVC.
+AC_EGREP_CPP([MicrosoftCompiler],
+  [
+#ifdef _MSC_VER
+MicrosoftCompiler
+#endif
+  ],
+  [IF_MSVC=''
+   IFNOT_MSVC='# '
+  ],
+  [IF_MSVC='# '
+   IFNOT_MSVC=''
+  ])
+AC_SUBST([IF_MSVC])
+AC_SUBST([IFNOT_MSVC])
+
+AC_PROG_INSTALL
+CL_PROG_LN
+
+gl_EARLY
+
+gl_HOST_CPU_C_ABI
+FFCALL_ENDIANNESS
+
+PACKAGE=libffcall
+LT_INIT([win32-dll])
+
+dnl Checks for avcall, vacall, vacall_r.
+FFCALL_SMALL_STRUCT_RETURN
+FFCALL_IREG_FLOAT_RETURN
+
+dnl Checks for trampoline, trampoline_r.
+AC_CHECK_HEADERS([unistd_h])
+AC_HEADER_STDC
+CL_GETPAGESIZE
+CL_MACH_VM
+FFCALL_MMAP
+FFCALL_MPROTECT
+CL_SHM_H
+CL_SHM
+FFCALL_CODEEXEC
+FFCALL_CODEEXEC_PAX
+
+dnl List of object files for trampoline, trampoline_r.
+CPU_OBJECTS=''
+if test ${HOST_CPU_C_ABI} = hppa -o ${HOST_CPU_C_ABI} = hppa64 -o ${HOST_CPU_C_ABI} = powerpc64 -o ${HOST_CPU_C_ABI} = ia64; then
+  CPU_OBJECTS="$CPU_OBJECTS "'tramp-$(CPU).lo'
+fi
+if test ${HOST_CPU_C_ABI} = powerpc; then
+  case "${host_os}" in
+    aix*) CPU_OBJECTS="$CPU_OBJECTS "'tramp-$(CPU).lo' ;;
+    *) ;;
+  esac
+fi
+if test ${HOST_CPU_C_ABI} = sparc -o ${HOST_CPU_C_ABI} = sparc64 -o ${HOST_CPU_C_ABI} = alpha -o ${HOST_CPU_C_ABI} = hppa -o ${HOST_CPU_C_ABI} = hppa64 -o ${HOST_CPU_C_ABI} = powerpc64-elfv2; then
+  CPU_OBJECTS="$CPU_OBJECTS "'cache-$(CPU).lo'
+fi
+if test ${HOST_CPU_C_ABI} = powerpc; then
+  case "${host_os}" in
+    aix*) ;;
+    *) CPU_OBJECTS="$CPU_OBJECTS "'cache-$(CPU).lo' ;;
+  esac
+fi
+AC_SUBST([CPU_OBJECTS])
+case "${HOST_CPU_C_ABI}" in
+  mips* | riscv*)
+    AC_CHECK_HEADERS([sys/cachectl.h])
+    ;;
+esac
+
+dnl Work around GCC bug <https://gcc.gnu.org/bugzilla/show_bug.cgi?id=81653>:
+dnl GCC, configured with --enable-default-pie on SPARC, miscompiles hand-written
+dnl .s files that happen to access global variables. The recommended workaround
+dnl is to use '#ifdef __PIC__' in the .s file; this works fine on 64-bit SPARC.
+dnl On 32-bit SPARC, however, the resulting executable is still broken. The
+dnl workaround here is to use -fno-pie. This option is available in gcc >= 3.4.
+WORKAROUND_BUG_81653=''
+if test ${HOST_CPU_C_ABI} = sparc && test -n "$GCC"; then
+  gcc_version=`LC_ALL=C ${CC} -v 2>&1 | grep version | sed -n -e '$p' | sed -e 's/.*version //g' -e 's/gcc //'`
+  case "$gcc_version" in
+    2.* | 3.[0-3]*) ;;
+    *) WORKAROUND_BUG_81653='-fno-pie' ;;
+  esac
+fi
+AC_SUBST([WORKAROUND_BUG_81653])
+
+dnl Some parts of avcall and vacall need to interpret memory words as 'float'
+dnl or 'double' entities. This violates the strict type-based aliasing rules
+dnl of C. In other words, we still use C as a portable assembler, but now the
+dnl compilers want to outsmart us. There are two ways to tell them not to do
+dnl this: to use union types, or specific compiler options. I prefer to do it
+dnl through compiler options, because union types produce trouble with
+dnl alignments.
+if test -n "$GCC"; then
+  DISABLE_TYPE_BASED_ALIASING='-fno-strict-aliasing'
+else
+  case "$host_os" in
+    aix*) dnl for xlc
+      DISABLE_TYPE_BASED_ALIASING='-qalias=noansi'
+      ;;
+    *)
+      AC_EGREP_CPP([yes],
+        [#ifdef __SUNPRO_C
+           yes
+         #endif
+        ],
+        [dnl for SUNWspro cc
+         DISABLE_TYPE_BASED_ALIASING='-xalias_level=weak'
+        ],
+        [DISABLE_TYPE_BASED_ALIASING=''])
+      ;;
+  esac
+fi
+AC_SUBST([DISABLE_TYPE_BASED_ALIASING])
+
+gl_INIT
+
+dnl This piece of sed script replaces every line containing '@subdir@'
+dnl by several consecutive lines, each referencing one subdir.
+extrasub="$extrasub"'
+/@subdir@/{
+h
+g
+s/@subdir@/gnulib-lib/g
+p
+g
+s/@subdir@/avcall/g
+p
+g
+s/@subdir@/vacall/g
+p
+g
+s/@subdir@/trampoline/g
+p
+g
+s/@subdir@/callback/g
+p
+d
+}
+'
+dnl Likewise for the callback subdirectory.
+extrasub="$extrasub"'
+/@callback_subdir@/{
+h
+g
+s/@callback_subdir@/vacall_r/g
+p
+g
+s/@callback_subdir@/trampoline_r/g
+p
+d
+}
+'
+
+AC_OUTPUT
diff --git a/dummy/ffcall-version.h b/dummy/ffcall-version.h
new file mode 100644 (file)
index 0000000..1635283
--- /dev/null
@@ -0,0 +1 @@
+/* This file is intentionally empty. */
diff --git a/ffcall-abi.h b/ffcall-abi.h
new file mode 100644 (file)
index 0000000..117fd65
--- /dev/null
@@ -0,0 +1,251 @@
+/*
+ * Copyright 2017-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/* Define some canonical CPU and ABI indicators.
+   References:
+     - host-cpu-c-abi.m4 from gnulib
+     - https://sourceforge.net/p/predef/wiki/Architectures/
+     - GCC source code: definitions of macro TARGET_CPU_CPP_BUILTINS
+     - clang source code: defineMacro invocations in Basic/Targets.cpp,
+       especially in getTargetDefines methods.
+   Limitation: Unlike host-cpu-c-abi.m4, this preprocessor-based approach
+   can not reliably distinguish __arm__ and __armhf__.
+ */
+
+#ifndef __i386__
+#if defined(__i386__) /* GCC, clang */ || defined(__i386) /* Sun C */ || defined(_M_IX86) /* MSVC */
+#define __i386__ 1
+#endif
+#endif
+
+#ifndef __m68k__
+#if defined(__m68k__) /* GCC */
+#define __m68k__ 1
+#endif
+#endif
+
+/* On mips, there are three ABIs:
+   - 32 or o32: It defines _MIPS_SIM == _ABIO32 and _MIPS_SZLONG == 32.
+   - n32: It defines _MIPS_SIM == _ABIN32 and _MIPS_SZLONG == 32.
+   - 64: It defines _MIPS_SZLONG == 64.
+ */
+/* Note: When __mipsn32__ or __mips64__ is defined, __mips__ may or may not be
+   defined as well. To test for the MIPS o32 ABI, use
+     #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)
+ */
+/* To distinguish little-endian and big-endian arm, use the preprocessor
+   defines _MIPSEB vs. _MIPSEL. */
+#ifndef __mips__
+#if defined(__mips) /* GCC, clang, IRIX cc */ /* Note: GCC, clang also define __mips__. */
+#define __mips__ 1
+#endif
+#endif
+#ifndef __mipsn32__
+#if defined(__mips__) && (_MIPS_SIM == _ABIN32)
+#define __mipsn32__ 1
+#endif
+#endif
+#ifndef __mips64__
+#if defined(__mips__) && defined(_MIPS_SZLONG) && (_MIPS_SZLONG == 64)
+#define __mips64__ 1
+#endif
+#endif
+
+/* Note: When __sparc64__ is defined, __sparc__ may or may not be defined as
+   well. To test for the SPARC 32-bit ABI, use
+     #if defined(__sparc__) && !defined(__sparc64__)
+ */
+#ifndef __sparc__
+#if defined(__sparc) /* GCC, clang, Sun C */ /* Note: GCC, clang also define __sparc__. */
+#define __sparc__ 1
+#endif
+#endif
+#ifndef __sparc64__
+#if defined(__sparcv9) /* GCC/Solaris, Sun C */ || defined(__arch64__) /* GCC/Linux */
+#define __sparc64__ 1
+#endif
+#endif
+
+#ifndef __alpha__
+#if defined(__alpha) /* GCC, DEC C */ /* Note: GCC also defines __alpha__. */
+#define __alpha__ 1
+#endif
+#endif
+
+/* On hppa, the C compiler may be generating 32-bit code or 64-bit code.
+   In the latter case, it defines _LP64 and __LP64__.
+ */
+/* Note: When __hppa64__ is defined, __hppa__ may or may not be defined as well.
+   To test for the HP-PA 32-bit ABI, use
+     #if defined(__hppa__) && !defined(__hppa64__)
+ */
+#ifndef __hppa__
+#if defined(__hppa) /* GCC, HP C */ /* Note: GCC also defines __hppa__. */
+#define __hppa__ 1
+#endif
+#endif
+#ifndef __hppa64__
+#if defined(__hppa__) && defined(__LP64__)
+#define __hppa64__ 1
+#endif
+#endif
+
+/* Distinguish arm which passes floating-point arguments and return values
+   in integer registers (r0, r1, ...) - this is gcc -mfloat-abi=soft or
+   gcc -mfloat-abi=softfp - from arm which passes them in float registers
+   (s0, s1, ...) and double registers (d0, d1, ...) - this is
+   gcc -mfloat-abi=hard. GCC 4.6 or newer sets the preprocessor defines
+   __ARM_PCS (for the first case) and __ARM_PCS_VFP (for the second case),
+   but older GCC does not. */
+/* Note: When __armhf__ is defined, __arm__ may or may not be defined as well.
+   To test for the ARM ABI that does not use floating-point registers for
+   parameter passing, use
+     #if defined(__arm__) && !defined(__armhf__)
+ */
+/* To distinguish little-endian and big-endian arm, use the preprocessor
+   defines __ARMEL__ vs. __ARMEB__. */
+#ifndef __arm__
+#if defined(__arm__) /* GCC, clang */ || defined(_M_ARM) /* MSVC */
+#define __arm__ 1
+#endif
+#endif
+#ifndef __armhf__
+#if defined(__arm__) && defined(__ARM_PCS_VFP) /* GCC */
+#define __armhf__ 1
+#endif
+#endif
+
+/* On arm64 systems, the C compiler may be generating code in one of these ABIs:
+   - aarch64 instruction set, 64-bit pointers, 64-bit 'long': arm64.
+   - aarch64 instruction set, 32-bit pointers, 32-bit 'long': arm64-ilp32.
+   - 32-bit instruction set, 32-bit pointers, 32-bit 'long': arm or armhf
+     (see above).
+ */
+/* Note: When __arm64_ilp32__ is defined, __arm64__ may or may not be defined as
+   well. To test for the arm64 64-bit ABI, use
+     #if defined(__arm64__) && !defined(__arm64_ilp32__)
+ */
+/* To distinguish little-endian and big-endian arm64, use the preprocessor
+   defines __AARCH64EL__ vs. __AARCH64EB__. */
+#ifndef __arm64__
+#if defined(__aarch64__) /* GCC, clang */ || defined(_M_ARM64) /* MSVC */
+#define __arm64__ 1
+#endif
+#endif
+#ifndef __arm64_ilp32__
+#if defined(__arm64__) && (defined(__ILP32__) || defined (_ILP32))
+#define __arm64_ilp32__ 1
+#endif
+#endif
+
+/* On powerpc and powerpc64, different ABIs are in use on AIX vs. Mac OS X vs.
+   Linux,*BSD. To distinguish them, use the OS dependent defines
+     #if defined(_AIX)
+     #if (defined(__MACH__) && defined(__APPLE__))
+     #if !(defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)))
+ */
+/* On powerpc64, there are two ABIs on Linux: The AIX compatible one and the
+   ELFv2 one. The latter defines _CALL_ELF=2.
+ */
+/* Note: When __powerpc64__ is defined, __powerpc__ may or may not be defined as
+   well. To test for the SPARC 32-bit ABI, use
+     #if defined(__powerpc__) && !defined(__powerpc64__)
+   Note: When __powerpc64_elfv2__ is defined, __powerpc64__ may or may not be
+   defined as well. To test for the SPARC 32-bit ABI, use
+     #if defined(__powerpc64__) && !defined(__powerpc64_elfv2__)
+ */
+#ifndef __powerpc__
+#if defined(_ARCH_PPC) /* GCC, XLC */ /* Note: On AIX, Linux also __powerpc__ is defined; whereas on Mac OS X also __ppc__ is defined. On AIX also _IBMR2 is defined. */
+#define __powerpc__ 1
+#endif
+#endif
+#ifndef __powerpc64__
+#if defined(_ARCH_PPC64) /* GCC, XLC */ /* Note: On Linux, also __powerpc64__ is defined. */
+#define __powerpc64__ 1
+#endif
+#endif
+#ifndef __powerpc64_elfv2__
+#if defined(__powerpc64__) && defined(_CALL_ELF) && _CALL_ELF == 2
+#define __powerpc64_elfv2__ 1
+#endif
+#endif
+
+/* On ia64 on HP-UX, the C compiler may be generating 64-bit code or 32-bit
+   code. In the latter case, it defines _ILP32.
+ */
+/* Note: When __ia64_ilp32__ is defined, __ia64__ may or may not be defined as
+   well. To test for the ia64 64-bit ABI, use
+     #if defined(__ia64__) && !defined(__ia64_ilp32__)
+ */
+#ifndef __ia64__
+#if defined(__ia64__) /* GCC, HP C */ /* Note: GCC, HP C also define __ia64. */
+#define __ia64__ 1
+#endif
+#endif
+#ifndef __ia64_ilp32__
+#if defined(__ia64__) && defined(_ILP32)
+#define __ia64_ilp32__ 1
+#endif
+#endif
+
+/* On x86_64 systems, the C compiler may be generating code in one of these ABIs:
+   - 64-bit instruction set, 64-bit pointers, 64-bit 'long': x86_64.
+   - 64-bit instruction set, 64-bit pointers, 32-bit 'long': x86_64
+     with native Windows (mingw, MSVC).
+   - 64-bit instruction set, 32-bit pointers, 32-bit 'long': x86_64-x32.
+   - 32-bit instruction set, 32-bit pointers, 32-bit 'long': i386 (see above). */
+/* Note: When __x86_64_x32__ is defined, __x86_64__ may or may not be defined as
+   well. To test for the x86_64 64-bit ABI, use
+     #if defined(__x86_64__) && !defined(__x86_64_x32__)
+ */
+#ifndef __x86_64__
+#if (defined(__x86_64__) || defined(__amd64__)) /* GCC, clang, Sun C */ || (defined(_M_X64) || defined(_M_AMD64)) /* MSVC */
+#define __x86_64__ 1
+#endif
+#endif
+#ifndef __x86_64_x32__
+#if defined(__x86_64__) && (defined(__ILP32__) || defined(_ILP32))
+#define __x86_64_x32__ 1
+#endif
+#endif
+
+/* Note: When __s390x__ is defined, __s390__ may or may not be defined as well.
+   To test for the S/390 31-bit ABI, use
+     #if defined(__s390__) && !defined(__s390x__)
+ */
+#ifndef __s390__
+#if defined(__s390__) /* GCC, clang */
+#define __s390__ 1
+#endif
+#endif
+#ifndef __s390x__
+#if defined(__s390x__) /* GCC, clang */
+#define __s390x__ 1
+#endif
+#endif
+
+#ifndef __riscv32__
+#if defined(__riscv) && __riscv_xlen == 32 && !defined(__LP64__) /* GCC */
+#define __riscv32__ 1
+#endif
+#endif
+
+#ifndef __riscv64__
+#if defined(__riscv) && __riscv_xlen == 64 && defined(__LP64__) /* GCC */
+#define __riscv64__ 1
+#endif
+#endif
diff --git a/ffcall-stdint.h b/ffcall-stdint.h
new file mode 100644 (file)
index 0000000..125815c
--- /dev/null
@@ -0,0 +1,40 @@
+/*
+ * Copyright 2017-2018 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/* Replacement for a subset of <stdint.h>.
+   We cannot use gnulib's portable <stdint.h> replacement, because when
+   cross-compiling the various avcall-$(CPU).c and vacall-$(CPU).c files,
+   gnulib-generated files are not available. And the cross-compilers of
+   GCC version < 4.5 don't provide <stdint.h>. */
+
+/* Define integer types that are as large as a pointer, */
+
+#if defined(__x86_64__) && defined(_WIN32) && !defined(__CYGWIN__)
+/* An LLP64 platform. */
+typedef long long ff_intptr_t;
+typedef unsigned long long ff_uintptr_t;
+#else
+/* An ILP32 or LP64 platform. */
+typedef long ff_intptr_t;
+typedef unsigned long ff_uintptr_t;
+#endif
+#define intptr_t ff_intptr_t
+#define uintptr_t ff_uintptr_t
+
+/* Verify at compile time that sizeof([u]intptr_t) == sizeof(void*). */
+typedef int intptr_verify[2*(sizeof(intptr_t) == sizeof(void*))-1];
+typedef int uintptr_verify[2*(sizeof(uintptr_t) == sizeof(void*))-1];
diff --git a/ffcall-version.c b/ffcall-version.c
new file mode 100644 (file)
index 0000000..97484be
--- /dev/null
@@ -0,0 +1,26 @@
+/*
+ * Copyright 2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "config.h"
+
+/* Specification.  */
+#include "ffcall-version.h"
+
+int ffcall_get_version (void)
+{
+  return LIBFFCALL_VERSION;
+}
diff --git a/ffcall-version.in.h b/ffcall-version.in.h
new file mode 100644 (file)
index 0000000..494ec15
--- /dev/null
@@ -0,0 +1,34 @@
+/*
+ * Copyright 2009-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#if !defined(FFCALL_VERSION_H)
+
+/* Version number of libffcall (include files): (major<<8) + minor. */
+#define LIBFFCALL_VERSION 0
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+/* Version number of libffcall (library): (major<<8) + minor. */
+extern int ffcall_get_version (void);
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* FFCALL_VERSION_H */
diff --git a/gnulib-lib/Makefile.am b/gnulib-lib/Makefile.am
new file mode 100644 (file)
index 0000000..2ecab06
--- /dev/null
@@ -0,0 +1,287 @@
+## DO NOT EDIT! GENERATED AUTOMATICALLY!
+## Process this file with automake to produce Makefile.in.
+# Copyright (C) 2002-2019 Free Software Foundation, Inc.
+#
+# This file is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# This file is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this file.  If not, see <https://www.gnu.org/licenses/>.
+#
+# As a special exception to the GNU General Public License,
+# this file may be distributed as part of a program that
+# contains a configuration script generated by Autoconf, under
+# the same distribution terms as the rest of that program.
+#
+# Generated by gnulib-tool.
+# Reproduce by:
+# gnulib-tool --import \
+#  --lib=libgnu \
+#  --source-base=gnulib-lib \
+#  --m4-base=gnulib-m4 \
+#  --doc-base=doc \
+#  --tests-base=tests \
+#  --aux-dir=build-aux \
+#  --no-conditional-dependencies \
+#  --libtool \
+#  --macro-prefix=gl \
+#  ansi-c++-opt \
+#  host-cpu-c-abi \
+#  lock \
+#  longlong \
+#  nocrash \
+#  stdint \
+#  stdnoreturn
+
+AUTOMAKE_OPTIONS = 1.11 gnits subdir-objects
+
+SUBDIRS =
+noinst_HEADERS =
+noinst_LIBRARIES =
+noinst_LTLIBRARIES =
+EXTRA_DIST =
+BUILT_SOURCES =
+SUFFIXES =
+MOSTLYCLEANFILES = core *.stackdump
+MOSTLYCLEANDIRS =
+CLEANFILES =
+DISTCLEANFILES =
+MAINTAINERCLEANFILES =
+# No GNU Make output.
+
+AM_CPPFLAGS =
+AM_CFLAGS =
+
+noinst_LTLIBRARIES += libgnu.la
+
+libgnu_la_SOURCES =
+libgnu_la_LIBADD = $(gl_LTLIBOBJS)
+libgnu_la_DEPENDENCIES = $(gl_LTLIBOBJS)
+EXTRA_libgnu_la_SOURCES =
+libgnu_la_LDFLAGS = $(AM_LDFLAGS)
+libgnu_la_LDFLAGS += -no-undefined
+libgnu_la_LDFLAGS += $(LTLIBTHREAD)
+
+## begin gnulib module absolute-header
+
+# Use this preprocessor expression to decide whether #include_next works.
+# Do not rely on a 'configure'-time test for this, since the expression
+# might appear in an installed header, which is used by some other compiler.
+HAVE_INCLUDE_NEXT = (__GNUC__ || 60000000 <= __DECC_VER)
+
+## end   gnulib module absolute-header
+
+## begin gnulib module havelib
+
+
+EXTRA_DIST += $(top_srcdir)/build-aux/config.rpath
+
+## end   gnulib module havelib
+
+## begin gnulib module limits-h
+
+BUILT_SOURCES += $(LIMITS_H)
+
+# We need the following in order to create <limits.h> when the system
+# doesn't have one that is compatible with GNU.
+if GL_GENERATE_LIMITS_H
+limits.h: limits.in.h $(top_builddir)/config.status
+       $(AM_V_GEN)rm -f $@-t $@ && \
+       { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */' && \
+         sed -e 's|@''GUARD_PREFIX''@|GL|g' \
+             -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \
+             -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \
+             -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \
+             -e 's|@''NEXT_LIMITS_H''@|$(NEXT_LIMITS_H)|g' \
+             < $(srcdir)/limits.in.h; \
+       } > $@-t && \
+       mv $@-t $@
+else
+limits.h: $(top_builddir)/config.status
+       rm -f $@
+endif
+MOSTLYCLEANFILES += limits.h limits.h-t
+
+EXTRA_DIST += limits.in.h
+
+## end   gnulib module limits-h
+
+## begin gnulib module lock
+
+libgnu_la_SOURCES += glthread/lock.h glthread/lock.c
+
+## end   gnulib module lock
+
+## begin gnulib module snippet/_Noreturn
+
+# Because this Makefile snippet defines a variable used by other
+# gnulib Makefile snippets, it must be present in all makefiles that
+# need it. This is ensured by the applicability 'all' defined above.
+
+_NORETURN_H=$(srcdir)/_Noreturn.h
+
+EXTRA_DIST += _Noreturn.h
+
+## end   gnulib module snippet/_Noreturn
+
+## begin gnulib module stdint
+
+BUILT_SOURCES += $(STDINT_H)
+
+# We need the following in order to create <stdint.h> when the system
+# doesn't have one that works with the given compiler.
+if GL_GENERATE_STDINT_H
+stdint.h: stdint.in.h $(top_builddir)/config.status
+       $(AM_V_GEN)rm -f $@-t $@ && \
+       { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \
+         sed -e 's|@''GUARD_PREFIX''@|GL|g' \
+             -e 's/@''HAVE_STDINT_H''@/$(HAVE_STDINT_H)/g' \
+             -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \
+             -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \
+             -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \
+             -e 's|@''NEXT_STDINT_H''@|$(NEXT_STDINT_H)|g' \
+             -e 's/@''HAVE_C99_STDINT_H''@/$(HAVE_C99_STDINT_H)/g' \
+             -e 's/@''HAVE_SYS_TYPES_H''@/$(HAVE_SYS_TYPES_H)/g' \
+             -e 's/@''HAVE_INTTYPES_H''@/$(HAVE_INTTYPES_H)/g' \
+             -e 's/@''HAVE_SYS_INTTYPES_H''@/$(HAVE_SYS_INTTYPES_H)/g' \
+             -e 's/@''HAVE_SYS_BITYPES_H''@/$(HAVE_SYS_BITYPES_H)/g' \
+             -e 's/@''HAVE_WCHAR_H''@/$(HAVE_WCHAR_H)/g' \
+             -e 's/@''HAVE_LONG_LONG_INT''@/$(HAVE_LONG_LONG_INT)/g' \
+             -e 's/@''HAVE_UNSIGNED_LONG_LONG_INT''@/$(HAVE_UNSIGNED_LONG_LONG_INT)/g' \
+             -e 's/@''APPLE_UNIVERSAL_BUILD''@/$(APPLE_UNIVERSAL_BUILD)/g' \
+             -e 's/@''BITSIZEOF_PTRDIFF_T''@/$(BITSIZEOF_PTRDIFF_T)/g' \
+             -e 's/@''PTRDIFF_T_SUFFIX''@/$(PTRDIFF_T_SUFFIX)/g' \
+             -e 's/@''BITSIZEOF_SIG_ATOMIC_T''@/$(BITSIZEOF_SIG_ATOMIC_T)/g' \
+             -e 's/@''HAVE_SIGNED_SIG_ATOMIC_T''@/$(HAVE_SIGNED_SIG_ATOMIC_T)/g' \
+             -e 's/@''SIG_ATOMIC_T_SUFFIX''@/$(SIG_ATOMIC_T_SUFFIX)/g' \
+             -e 's/@''BITSIZEOF_SIZE_T''@/$(BITSIZEOF_SIZE_T)/g' \
+             -e 's/@''SIZE_T_SUFFIX''@/$(SIZE_T_SUFFIX)/g' \
+             -e 's/@''BITSIZEOF_WCHAR_T''@/$(BITSIZEOF_WCHAR_T)/g' \
+             -e 's/@''HAVE_SIGNED_WCHAR_T''@/$(HAVE_SIGNED_WCHAR_T)/g' \
+             -e 's/@''WCHAR_T_SUFFIX''@/$(WCHAR_T_SUFFIX)/g' \
+             -e 's/@''BITSIZEOF_WINT_T''@/$(BITSIZEOF_WINT_T)/g' \
+             -e 's/@''HAVE_SIGNED_WINT_T''@/$(HAVE_SIGNED_WINT_T)/g' \
+             -e 's/@''WINT_T_SUFFIX''@/$(WINT_T_SUFFIX)/g' \
+             -e 's/@''GNULIB_OVERRIDES_WINT_T''@/$(GNULIB_OVERRIDES_WINT_T)/g' \
+             < $(srcdir)/stdint.in.h; \
+       } > $@-t && \
+       mv $@-t $@
+else
+stdint.h: $(top_builddir)/config.status
+       rm -f $@
+endif
+MOSTLYCLEANFILES += stdint.h stdint.h-t
+
+EXTRA_DIST += stdint.in.h
+
+## end   gnulib module stdint
+
+## begin gnulib module stdnoreturn
+
+BUILT_SOURCES += $(STDNORETURN_H)
+
+# We need the following in order to create <stdnoreturn.h> when the system
+# doesn't have one that works.
+if GL_GENERATE_STDNORETURN_H
+stdnoreturn.h: stdnoreturn.in.h $(top_builddir)/config.status $(_NORETURN_H)
+       $(AM_V_GEN)rm -f $@-t $@ && \
+       { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */' && \
+         sed -e '/definition of _Noreturn/r $(_NORETURN_H)' \
+              < $(srcdir)/stdnoreturn.in.h; \
+       } > $@-t && \
+       mv $@-t $@
+else
+stdnoreturn.h: $(top_builddir)/config.status
+       rm -f $@
+endif
+MOSTLYCLEANFILES += stdnoreturn.h stdnoreturn.h-t
+
+EXTRA_DIST += stdnoreturn.in.h
+
+## end   gnulib module stdnoreturn
+
+## begin gnulib module sys_types
+
+BUILT_SOURCES += sys/types.h
+
+# We need the following in order to create <sys/types.h> when the system
+# doesn't have one that works with the given compiler.
+sys/types.h: sys_types.in.h $(top_builddir)/config.status
+       $(AM_V_at)$(MKDIR_P) sys
+       $(AM_V_GEN)rm -f $@-t $@ && \
+       { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \
+         sed -e 's|@''GUARD_PREFIX''@|GL|g' \
+             -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \
+             -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \
+             -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \
+             -e 's|@''NEXT_SYS_TYPES_H''@|$(NEXT_SYS_TYPES_H)|g' \
+             -e 's|@''WINDOWS_64_BIT_OFF_T''@|$(WINDOWS_64_BIT_OFF_T)|g' \
+             -e 's|@''WINDOWS_STAT_INODES''@|$(WINDOWS_STAT_INODES)|g' \
+             < $(srcdir)/sys_types.in.h; \
+       } > $@-t && \
+       mv $@-t $@
+MOSTLYCLEANFILES += sys/types.h sys/types.h-t
+
+EXTRA_DIST += sys_types.in.h
+
+## end   gnulib module sys_types
+
+## begin gnulib module threadlib
+
+libgnu_la_SOURCES += glthread/threadlib.c
+
+EXTRA_DIST += $(top_srcdir)/build-aux/config.rpath
+
+## end   gnulib module threadlib
+
+## begin gnulib module windows-mutex
+
+
+EXTRA_DIST += windows-initguard.h windows-mutex.c windows-mutex.h
+
+EXTRA_libgnu_la_SOURCES += windows-mutex.c
+
+## end   gnulib module windows-mutex
+
+## begin gnulib module windows-once
+
+
+EXTRA_DIST += windows-once.c windows-once.h
+
+EXTRA_libgnu_la_SOURCES += windows-once.c
+
+## end   gnulib module windows-once
+
+## begin gnulib module windows-recmutex
+
+
+EXTRA_DIST += windows-initguard.h windows-recmutex.c windows-recmutex.h
+
+EXTRA_libgnu_la_SOURCES += windows-recmutex.c
+
+## end   gnulib module windows-recmutex
+
+## begin gnulib module windows-rwlock
+
+
+EXTRA_DIST += windows-initguard.h windows-rwlock.c windows-rwlock.h
+
+EXTRA_libgnu_la_SOURCES += windows-rwlock.c
+
+## end   gnulib module windows-rwlock
+
+
+mostlyclean-local: mostlyclean-generic
+       @for dir in '' $(MOSTLYCLEANDIRS); do \
+         if test -n "$$dir" && test -d $$dir; then \
+           echo "rmdir $$dir"; rmdir $$dir; \
+         fi; \
+       done; \
+       :
diff --git a/gnulib-lib/Makefile.in b/gnulib-lib/Makefile.in
new file mode 100644 (file)
index 0000000..6482e98
--- /dev/null
@@ -0,0 +1,1013 @@
+# Makefile.in generated by automake 1.15.1 from Makefile.am.
+# @configure_input@
+
+# Copyright (C) 1994-2017 Free Software Foundation, Inc.
+
+# This Makefile.in is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
+# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
+# PARTICULAR PURPOSE.
+
+@SET_MAKE@
+
+# Copyright (C) 2002-2019 Free Software Foundation, Inc.
+#
+# This file is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# This file is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this file.  If not, see <https://www.gnu.org/licenses/>.
+#
+# As a special exception to the GNU General Public License,
+# this file may be distributed as part of a program that
+# contains a configuration script generated by Autoconf, under
+# the same distribution terms as the rest of that program.
+#
+# Generated by gnulib-tool.
+# Reproduce by:
+# gnulib-tool --import \
+#  --lib=libgnu \
+#  --source-base=gnulib-lib \
+#  --m4-base=gnulib-m4 \
+#  --doc-base=doc \
+#  --tests-base=tests \
+#  --aux-dir=build-aux \
+#  --no-conditional-dependencies \
+#  --libtool \
+#  --macro-prefix=gl \
+#  ansi-c++-opt \
+#  host-cpu-c-abi \
+#  lock \
+#  longlong \
+#  nocrash \
+#  stdint \
+#  stdnoreturn
+
+
+
+VPATH = @srcdir@
+am__is_gnu_make = { \
+  if test -z '$(MAKELEVEL)'; then \
+    false; \
+  elif test -n '$(MAKE_HOST)'; then \
+    true; \
+  elif test -n '$(MAKE_VERSION)' && test -n '$(CURDIR)'; then \
+    true; \
+  else \
+    false; \
+  fi; \
+}
+am__make_running_with_option = \
+  case $${target_option-} in \
+      ?) ;; \
+      *) echo "am__make_running_with_option: internal error: invalid" \
+              "target option '$${target_option-}' specified" >&2; \
+         exit 1;; \
+  esac; \
+  has_opt=no; \
+  sane_makeflags=$$MAKEFLAGS; \
+  if $(am__is_gnu_make); then \
+    sane_makeflags=$$MFLAGS; \
+  else \
+    case $$MAKEFLAGS in \
+      *\\[\ \  ]*) \
+        bs=\\; \
+        sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \
+          | sed "s/$$bs$$bs[$$bs $$bs  ]*//g"`;; \
+    esac; \
+  fi; \
+  skip_next=no; \
+  strip_trailopt () \
+  { \
+    flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \
+  }; \
+  for flg in $$sane_makeflags; do \
+    test $$skip_next = yes && { skip_next=no; continue; }; \
+    case $$flg in \
+      *=*|--*) continue;; \
+        -*I) strip_trailopt 'I'; skip_next=yes;; \
+      -*I?*) strip_trailopt 'I';; \
+        -*O) strip_trailopt 'O'; skip_next=yes;; \
+      -*O?*) strip_trailopt 'O';; \
+        -*l) strip_trailopt 'l'; skip_next=yes;; \
+      -*l?*) strip_trailopt 'l';; \
+      -[dEDm]) skip_next=yes;; \
+      -[JT]) skip_next=yes;; \
+    esac; \
+    case $$flg in \
+      *$$target_option*) has_opt=yes; break;; \
+    esac; \
+  done; \
+  test $$has_opt = yes
+am__make_dryrun = (target_option=n; $(am__make_running_with_option))
+am__make_keepgoing = (target_option=k; $(am__make_running_with_option))
+pkgdatadir = $(datadir)/@PACKAGE@
+pkgincludedir = $(includedir)/@PACKAGE@
+pkglibdir = $(libdir)/@PACKAGE@
+pkglibexecdir = $(libexecdir)/@PACKAGE@
+am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd
+install_sh_DATA = $(install_sh) -c -m 644
+install_sh_PROGRAM = $(install_sh) -c
+install_sh_SCRIPT = $(install_sh) -c
+INSTALL_HEADER = $(INSTALL_DATA)
+transform = $(program_transform_name)
+NORMAL_INSTALL = :
+PRE_INSTALL = :
+POST_INSTALL = :
+NORMAL_UNINSTALL = :
+PRE_UNINSTALL = :
+POST_UNINSTALL = :
+build_triplet = @build@
+host_triplet = @host@
+subdir = gnulib-lib
+ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
+am__aclocal_m4_deps = $(top_srcdir)/gnulib-m4/00gnulib.m4 \
+       $(top_srcdir)/gnulib-m4/absolute-header.m4 \
+       $(top_srcdir)/gnulib-m4/ansi-c++.m4 \
+       $(top_srcdir)/gnulib-m4/asm-underscore.m4 \
+       $(top_srcdir)/gnulib-m4/extensions.m4 \
+       $(top_srcdir)/gnulib-m4/gnulib-common.m4 \
+       $(top_srcdir)/gnulib-m4/gnulib-comp.m4 \
+       $(top_srcdir)/gnulib-m4/host-cpu-c-abi.m4 \
+       $(top_srcdir)/gnulib-m4/include_next.m4 \
+       $(top_srcdir)/gnulib-m4/limits-h.m4 \
+       $(top_srcdir)/gnulib-m4/lock.m4 \
+       $(top_srcdir)/gnulib-m4/longlong.m4 \
+       $(top_srcdir)/gnulib-m4/multiarch.m4 \
+       $(top_srcdir)/gnulib-m4/nocrash.m4 \
+       $(top_srcdir)/gnulib-m4/off_t.m4 \
+       $(top_srcdir)/gnulib-m4/onceonly.m4 \
+       $(top_srcdir)/gnulib-m4/pthread_rwlock_rdlock.m4 \
+       $(top_srcdir)/gnulib-m4/ssize_t.m4 \
+       $(top_srcdir)/gnulib-m4/stdint.m4 \
+       $(top_srcdir)/gnulib-m4/stdnoreturn.m4 \
+       $(top_srcdir)/gnulib-m4/sys_types_h.m4 \
+       $(top_srcdir)/gnulib-m4/threadlib.m4 \
+       $(top_srcdir)/gnulib-m4/wint_t.m4 \
+       $(top_srcdir)/m4/as-underscore.m4 $(top_srcdir)/m4/cc-gcc.m4 \
+       $(top_srcdir)/m4/codeexec.m4 $(top_srcdir)/m4/endianness.m4 \
+       $(top_srcdir)/m4/general.m4 $(top_srcdir)/m4/getpagesize.m4 \
+       $(top_srcdir)/m4/ireg.m4 $(top_srcdir)/m4/libtool.m4 \
+       $(top_srcdir)/m4/ln.m4 $(top_srcdir)/m4/ltoptions.m4 \
+       $(top_srcdir)/m4/ltsugar.m4 $(top_srcdir)/m4/ltversion.m4 \
+       $(top_srcdir)/m4/lt~obsolete.m4 $(top_srcdir)/m4/mach-vm.m4 \
+       $(top_srcdir)/m4/mmap.m4 $(top_srcdir)/m4/mprotect.m4 \
+       $(top_srcdir)/m4/proto.m4 $(top_srcdir)/m4/shm.m4 \
+       $(top_srcdir)/m4/smallstruct.m4 $(top_srcdir)/configure.ac
+am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
+       $(ACLOCAL_M4)
+DIST_COMMON = $(srcdir)/Makefile.am $(noinst_HEADERS) \
+       $(am__DIST_COMMON)
+mkinstalldirs = $(install_sh) -d
+CONFIG_HEADER = $(top_builddir)/config.h \
+       $(top_builddir)/ffcall-version.h
+CONFIG_CLEAN_FILES =
+CONFIG_CLEAN_VPATH_FILES =
+LIBRARIES = $(noinst_LIBRARIES)
+LTLIBRARIES = $(noinst_LTLIBRARIES)
+am__DEPENDENCIES_1 =
+am__dirstamp = $(am__leading_dot)dirstamp
+am_libgnu_la_OBJECTS = glthread/lock.lo glthread/threadlib.lo
+libgnu_la_OBJECTS = $(am_libgnu_la_OBJECTS)
+AM_V_lt = $(am__v_lt_@AM_V@)
+am__v_lt_ = $(am__v_lt_@AM_DEFAULT_V@)
+am__v_lt_0 = --silent
+am__v_lt_1 = 
+libgnu_la_LINK = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \
+       $(LIBTOOLFLAGS) --mode=link $(CCLD) $(AM_CFLAGS) $(CFLAGS) \
+       $(libgnu_la_LDFLAGS) $(LDFLAGS) -o $@
+AM_V_P = $(am__v_P_@AM_V@)
+am__v_P_ = $(am__v_P_@AM_DEFAULT_V@)
+am__v_P_0 = false
+am__v_P_1 = :
+AM_V_GEN = $(am__v_GEN_@AM_V@)
+am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@)
+am__v_GEN_0 = @echo "  GEN     " $@;
+am__v_GEN_1 = 
+AM_V_at = $(am__v_at_@AM_V@)
+am__v_at_ = $(am__v_at_@AM_DEFAULT_V@)
+am__v_at_0 = @
+am__v_at_1 = 
+DEFAULT_INCLUDES = -I.@am__isrc@ -I$(top_builddir)
+depcomp = $(SHELL) $(top_srcdir)/build-aux/depcomp
+am__depfiles_maybe = depfiles
+am__mv = mv -f
+COMPILE = $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) \
+       $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS)
+LTCOMPILE = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \
+       $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) \
+       $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) \
+       $(AM_CFLAGS) $(CFLAGS)
+AM_V_CC = $(am__v_CC_@AM_V@)
+am__v_CC_ = $(am__v_CC_@AM_DEFAULT_V@)
+am__v_CC_0 = @echo "  CC      " $@;
+am__v_CC_1 = 
+CCLD = $(CC)
+LINK = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \
+       $(LIBTOOLFLAGS) --mode=link $(CCLD) $(AM_CFLAGS) $(CFLAGS) \
+       $(AM_LDFLAGS) $(LDFLAGS) -o $@
+AM_V_CCLD = $(am__v_CCLD_@AM_V@)
+am__v_CCLD_ = $(am__v_CCLD_@AM_DEFAULT_V@)
+am__v_CCLD_0 = @echo "  CCLD    " $@;
+am__v_CCLD_1 = 
+SOURCES = $(libgnu_la_SOURCES) $(EXTRA_libgnu_la_SOURCES)
+DIST_SOURCES = $(libgnu_la_SOURCES) $(EXTRA_libgnu_la_SOURCES)
+RECURSIVE_TARGETS = all-recursive check-recursive cscopelist-recursive \
+       ctags-recursive dvi-recursive html-recursive info-recursive \
+       install-data-recursive install-dvi-recursive \
+       install-exec-recursive install-html-recursive \
+       install-info-recursive install-pdf-recursive \
+       install-ps-recursive install-recursive installcheck-recursive \
+       installdirs-recursive pdf-recursive ps-recursive \
+       tags-recursive uninstall-recursive
+am__can_run_installinfo = \
+  case $$AM_UPDATE_INFO_DIR in \
+    n|no|NO) false;; \
+    *) (install-info --version) >/dev/null 2>&1;; \
+  esac
+HEADERS = $(noinst_HEADERS)
+RECURSIVE_CLEAN_TARGETS = mostlyclean-recursive clean-recursive        \
+  distclean-recursive maintainer-clean-recursive
+am__recursive_targets = \
+  $(RECURSIVE_TARGETS) \
+  $(RECURSIVE_CLEAN_TARGETS) \
+  $(am__extra_recursive_targets)
+AM_RECURSIVE_TARGETS = $(am__recursive_targets:-recursive=) TAGS CTAGS \
+       distdir
+am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP)
+# Read a list of newline-separated strings from the standard input,
+# and print each of them once, without duplicates.  Input order is
+# *not* preserved.
+am__uniquify_input = $(AWK) '\
+  BEGIN { nonempty = 0; } \
+  { items[$$0] = 1; nonempty = 1; } \
+  END { if (nonempty) { for (i in items) print i; }; } \
+'
+# Make sure the list of sources is unique.  This is necessary because,
+# e.g., the same source file might be shared among _SOURCES variables
+# for different programs/libraries.
+am__define_uniq_tagged_files = \
+  list='$(am__tagged_files)'; \
+  unique=`for i in $$list; do \
+    if test -f "$$i"; then echo $$i; else echo $(srcdir)/$$i; fi; \
+  done | $(am__uniquify_input)`
+ETAGS = etags
+CTAGS = ctags
+DIST_SUBDIRS = $(SUBDIRS)
+am__DIST_COMMON = $(srcdir)/Makefile.in \
+       $(top_srcdir)/build-aux/depcomp
+DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST)
+am__relativize = \
+  dir0=`pwd`; \
+  sed_first='s,^\([^/]*\)/.*$$,\1,'; \
+  sed_rest='s,^[^/]*/*,,'; \
+  sed_last='s,^.*/\([^/]*\)$$,\1,'; \
+  sed_butlast='s,/*[^/]*$$,,'; \
+  while test -n "$$dir1"; do \
+    first=`echo "$$dir1" | sed -e "$$sed_first"`; \
+    if test "$$first" != "."; then \
+      if test "$$first" = ".."; then \
+        dir2=`echo "$$dir0" | sed -e "$$sed_last"`/"$$dir2"; \
+        dir0=`echo "$$dir0" | sed -e "$$sed_butlast"`; \
+      else \
+        first2=`echo "$$dir2" | sed -e "$$sed_first"`; \
+        if test "$$first2" = "$$first"; then \
+          dir2=`echo "$$dir2" | sed -e "$$sed_rest"`; \
+        else \
+          dir2="../$$dir2"; \
+        fi; \
+        dir0="$$dir0"/"$$first"; \
+      fi; \
+    fi; \
+    dir1=`echo "$$dir1" | sed -e "$$sed_rest"`; \
+  done; \
+  reldir="$$dir2"
+ACLOCAL = @ACLOCAL@
+AMTAR = @AMTAR@
+AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@
+APPLE_UNIVERSAL_BUILD = @APPLE_UNIVERSAL_BUILD@
+AR = @AR@
+ARFLAGS = @ARFLAGS@
+AS = @AS@
+ASM_SYMBOL_PREFIX = @ASM_SYMBOL_PREFIX@
+AS_UNDERSCORE = @AS_UNDERSCORE@
+AUTOCONF = @AUTOCONF@
+AUTOHEADER = @AUTOHEADER@
+AUTOMAKE = @AUTOMAKE@
+AWK = @AWK@
+BITSIZEOF_PTRDIFF_T = @BITSIZEOF_PTRDIFF_T@
+BITSIZEOF_SIG_ATOMIC_T = @BITSIZEOF_SIG_ATOMIC_T@
+BITSIZEOF_SIZE_T = @BITSIZEOF_SIZE_T@
+BITSIZEOF_WCHAR_T = @BITSIZEOF_WCHAR_T@
+BITSIZEOF_WINT_T = @BITSIZEOF_WINT_T@
+CC = @CC@
+CCDEPMODE = @CCDEPMODE@
+CC_GCC = @CC_GCC@
+CFLAGS = @CFLAGS@
+CPP = @CPP@
+CPPFLAGS = @CPPFLAGS@
+CPU_OBJECTS = @CPU_OBJECTS@
+CXX = @CXX@
+CXXDEPMODE = @CXXDEPMODE@
+CXXFLAGS = @CXXFLAGS@
+CXX_CHOICE = @CXX_CHOICE@
+CYGPATH_W = @CYGPATH_W@
+DEFS = @DEFS@
+DEPDIR = @DEPDIR@
+DISABLE_TYPE_BASED_ALIASING = @DISABLE_TYPE_BASED_ALIASING@
+DLLTOOL = @DLLTOOL@
+DSYMUTIL = @DSYMUTIL@
+DUMPBIN = @DUMPBIN@
+ECHO_C = @ECHO_C@
+ECHO_N = @ECHO_N@
+ECHO_T = @ECHO_T@
+EGREP = @EGREP@
+ENDIANNESS = @ENDIANNESS@
+EXEEXT = @EXEEXT@
+FGREP = @FGREP@
+GCC_X_NONE = @GCC_X_NONE@
+GNULIB_OVERRIDES_WINT_T = @GNULIB_OVERRIDES_WINT_T@
+GREP = @GREP@
+HAVE_C99_STDINT_H = @HAVE_C99_STDINT_H@
+HAVE_INTTYPES_H = @HAVE_INTTYPES_H@
+HAVE_LONG_LONG_INT = @HAVE_LONG_LONG_INT@
+HAVE_SIGNED_SIG_ATOMIC_T = @HAVE_SIGNED_SIG_ATOMIC_T@
+HAVE_SIGNED_WCHAR_T = @HAVE_SIGNED_WCHAR_T@
+HAVE_SIGNED_WINT_T = @HAVE_SIGNED_WINT_T@
+HAVE_STDINT_H = @HAVE_STDINT_H@
+HAVE_SYS_BITYPES_H = @HAVE_SYS_BITYPES_H@
+HAVE_SYS_INTTYPES_H = @HAVE_SYS_INTTYPES_H@
+HAVE_SYS_TYPES_H = @HAVE_SYS_TYPES_H@
+HAVE_UNSIGNED_LONG_LONG_INT = @HAVE_UNSIGNED_LONG_LONG_INT@
+HAVE_WCHAR_H = @HAVE_WCHAR_H@
+HOST_CPU = @HOST_CPU@
+HOST_CPU_C_ABI = @HOST_CPU_C_ABI@
+IFNOT_MSVC = @IFNOT_MSVC@
+IF_CXX = @IF_CXX@
+IF_MSVC = @IF_MSVC@
+INCLUDE_NEXT = @INCLUDE_NEXT@
+INCLUDE_NEXT_AS_FIRST_DIRECTIVE = @INCLUDE_NEXT_AS_FIRST_DIRECTIVE@
+INSTALL = @INSTALL@
+INSTALL_DATA = @INSTALL_DATA@
+INSTALL_PROGRAM = @INSTALL_PROGRAM@
+INSTALL_SCRIPT = @INSTALL_SCRIPT@
+INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@
+LD = @LD@
+LDFLAGS = @LDFLAGS@
+LIBMULTITHREAD = @LIBMULTITHREAD@
+LIBOBJS = @LIBOBJS@
+LIBS = @LIBS@
+LIBTHREAD = @LIBTHREAD@
+LIBTOOL = @LIBTOOL@
+LIMITS_H = @LIMITS_H@
+LIPO = @LIPO@
+LN = @LN@
+LN_S = @LN_S@
+LTLIBMULTITHREAD = @LTLIBMULTITHREAD@
+LTLIBOBJS = @LTLIBOBJS@
+LTLIBTHREAD = @LTLIBTHREAD@
+LT_SYS_LIBRARY_PATH = @LT_SYS_LIBRARY_PATH@
+MAKEINFO = @MAKEINFO@
+MANIFEST_TOOL = @MANIFEST_TOOL@
+MKDIR_P = @MKDIR_P@
+NEXT_AS_FIRST_DIRECTIVE_LIMITS_H = @NEXT_AS_FIRST_DIRECTIVE_LIMITS_H@
+NEXT_AS_FIRST_DIRECTIVE_STDINT_H = @NEXT_AS_FIRST_DIRECTIVE_STDINT_H@
+NEXT_AS_FIRST_DIRECTIVE_SYS_TYPES_H = @NEXT_AS_FIRST_DIRECTIVE_SYS_TYPES_H@
+NEXT_LIMITS_H = @NEXT_LIMITS_H@
+NEXT_STDINT_H = @NEXT_STDINT_H@
+NEXT_SYS_TYPES_H = @NEXT_SYS_TYPES_H@
+NM = @NM@
+NMEDIT = @NMEDIT@
+OBJDUMP = @OBJDUMP@
+OBJEXT = @OBJEXT@
+OTOOL = @OTOOL@
+OTOOL64 = @OTOOL64@
+PACKAGE = @PACKAGE@
+PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@
+PACKAGE_NAME = @PACKAGE_NAME@
+PACKAGE_STRING = @PACKAGE_STRING@
+PACKAGE_TARNAME = @PACKAGE_TARNAME@
+PACKAGE_URL = @PACKAGE_URL@
+PACKAGE_VERSION = @PACKAGE_VERSION@
+PATH_SEPARATOR = @PATH_SEPARATOR@
+PRAGMA_COLUMNS = @PRAGMA_COLUMNS@
+PRAGMA_SYSTEM_HEADER = @PRAGMA_SYSTEM_HEADER@
+PTRDIFF_T_SUFFIX = @PTRDIFF_T_SUFFIX@
+RANLIB = @RANLIB@
+SED = @SED@
+SET_MAKE = @SET_MAKE@
+SHELL = @SHELL@
+SIG_ATOMIC_T_SUFFIX = @SIG_ATOMIC_T_SUFFIX@
+SIZE_T_SUFFIX = @SIZE_T_SUFFIX@
+STDINT_H = @STDINT_H@
+STDNORETURN_H = @STDNORETURN_H@
+STRIP = @STRIP@
+VERSION = @VERSION@
+WCHAR_T_SUFFIX = @WCHAR_T_SUFFIX@
+WINDOWS_64_BIT_OFF_T = @WINDOWS_64_BIT_OFF_T@
+WINDOWS_STAT_INODES = @WINDOWS_STAT_INODES@
+WINT_T_SUFFIX = @WINT_T_SUFFIX@
+WORKAROUND_BUG_81653 = @WORKAROUND_BUG_81653@
+abs_builddir = @abs_builddir@
+abs_srcdir = @abs_srcdir@
+abs_top_builddir = @abs_top_builddir@
+abs_top_srcdir = @abs_top_srcdir@
+ac_ct_AR = @ac_ct_AR@
+ac_ct_CC = @ac_ct_CC@
+ac_ct_CXX = @ac_ct_CXX@
+ac_ct_DUMPBIN = @ac_ct_DUMPBIN@
+am__include = @am__include@
+am__leading_dot = @am__leading_dot@
+am__quote = @am__quote@
+am__tar = @am__tar@
+am__untar = @am__untar@
+bindir = @bindir@
+build = @build@
+build_alias = @build_alias@
+build_cpu = @build_cpu@
+build_os = @build_os@
+build_vendor = @build_vendor@
+builddir = @builddir@
+datadir = @datadir@
+datarootdir = @datarootdir@
+docdir = @docdir@
+dvidir = @dvidir@
+exec_prefix = @exec_prefix@
+gl_LIBOBJS = @gl_LIBOBJS@
+gl_LTLIBOBJS = @gl_LTLIBOBJS@
+gltests_LIBOBJS = @gltests_LIBOBJS@
+gltests_LTLIBOBJS = @gltests_LTLIBOBJS@
+gltests_WITNESS = @gltests_WITNESS@
+host = @host@
+host_alias = @host_alias@
+host_cpu = @host_cpu@
+host_os = @host_os@
+host_vendor = @host_vendor@
+htmldir = @htmldir@
+includedir = @includedir@
+infodir = @infodir@
+install_sh = @install_sh@
+libdir = @libdir@
+libexecdir = @libexecdir@
+localedir = @localedir@
+localstatedir = @localstatedir@
+mandir = @mandir@
+mkdir_p = @mkdir_p@
+oldincludedir = @oldincludedir@
+pdfdir = @pdfdir@
+prefix = @prefix@
+program_transform_name = @program_transform_name@
+psdir = @psdir@
+sbindir = @sbindir@
+sharedstatedir = @sharedstatedir@
+srcdir = @srcdir@
+sysconfdir = @sysconfdir@
+target_alias = @target_alias@
+top_build_prefix = @top_build_prefix@
+top_builddir = @top_builddir@
+top_srcdir = @top_srcdir@
+AUTOMAKE_OPTIONS = 1.11 gnits subdir-objects
+SUBDIRS = 
+noinst_HEADERS = 
+noinst_LIBRARIES = 
+noinst_LTLIBRARIES = libgnu.la
+EXTRA_DIST = $(top_srcdir)/build-aux/config.rpath limits.in.h \
+       _Noreturn.h stdint.in.h stdnoreturn.in.h sys_types.in.h \
+       $(top_srcdir)/build-aux/config.rpath windows-initguard.h \
+       windows-mutex.c windows-mutex.h windows-once.c windows-once.h \
+       windows-initguard.h windows-recmutex.c windows-recmutex.h \
+       windows-initguard.h windows-rwlock.c windows-rwlock.h
+BUILT_SOURCES = $(LIMITS_H) $(STDINT_H) $(STDNORETURN_H) sys/types.h
+SUFFIXES = 
+MOSTLYCLEANFILES = core *.stackdump limits.h limits.h-t stdint.h \
+       stdint.h-t stdnoreturn.h stdnoreturn.h-t sys/types.h \
+       sys/types.h-t
+MOSTLYCLEANDIRS = 
+CLEANFILES = 
+DISTCLEANFILES = 
+MAINTAINERCLEANFILES = 
+# No GNU Make output.
+AM_CPPFLAGS = 
+AM_CFLAGS = 
+libgnu_la_SOURCES = glthread/lock.h glthread/lock.c \
+       glthread/threadlib.c
+libgnu_la_LIBADD = $(gl_LTLIBOBJS)
+libgnu_la_DEPENDENCIES = $(gl_LTLIBOBJS)
+EXTRA_libgnu_la_SOURCES = windows-mutex.c windows-once.c \
+       windows-recmutex.c windows-rwlock.c
+libgnu_la_LDFLAGS = $(AM_LDFLAGS) -no-undefined $(LTLIBTHREAD)
+
+# Use this preprocessor expression to decide whether #include_next works.
+# Do not rely on a 'configure'-time test for this, since the expression
+# might appear in an installed header, which is used by some other compiler.
+HAVE_INCLUDE_NEXT = (__GNUC__ || 60000000 <= __DECC_VER)
+
+# Because this Makefile snippet defines a variable used by other
+# gnulib Makefile snippets, it must be present in all makefiles that
+# need it. This is ensured by the applicability 'all' defined above.
+_NORETURN_H = $(srcdir)/_Noreturn.h
+all: $(BUILT_SOURCES)
+       $(MAKE) $(AM_MAKEFLAGS) all-recursive
+
+.SUFFIXES:
+.SUFFIXES: .c .lo .o .obj
+$(srcdir)/Makefile.in:  $(srcdir)/Makefile.am  $(am__configure_deps)
+       @for dep in $?; do \
+         case '$(am__configure_deps)' in \
+           *$$dep*) \
+             ( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \
+               && { if test -f $@; then exit 0; else break; fi; }; \
+             exit 1;; \
+         esac; \
+       done; \
+       echo ' cd $(top_srcdir) && $(AUTOMAKE) --gnits gnulib-lib/Makefile'; \
+       $(am__cd) $(top_srcdir) && \
+         $(AUTOMAKE) --gnits gnulib-lib/Makefile
+Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status
+       @case '$?' in \
+         *config.status*) \
+           cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \
+         *) \
+           echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe)'; \
+           cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe);; \
+       esac;
+
+$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES)
+       cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
+
+$(top_srcdir)/configure:  $(am__configure_deps)
+       cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
+$(ACLOCAL_M4):  $(am__aclocal_m4_deps)
+       cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
+$(am__aclocal_m4_deps):
+
+clean-noinstLIBRARIES:
+       -test -z "$(noinst_LIBRARIES)" || rm -f $(noinst_LIBRARIES)
+
+clean-noinstLTLIBRARIES:
+       -test -z "$(noinst_LTLIBRARIES)" || rm -f $(noinst_LTLIBRARIES)
+       @list='$(noinst_LTLIBRARIES)'; \
+       locs=`for p in $$list; do echo $$p; done | \
+             sed 's|^[^/]*$$|.|; s|/[^/]*$$||; s|$$|/so_locations|' | \
+             sort -u`; \
+       test -z "$$locs" || { \
+         echo rm -f $${locs}; \
+         rm -f $${locs}; \
+       }
+glthread/$(am__dirstamp):
+       @$(MKDIR_P) glthread
+       @: > glthread/$(am__dirstamp)
+glthread/$(DEPDIR)/$(am__dirstamp):
+       @$(MKDIR_P) glthread/$(DEPDIR)
+       @: > glthread/$(DEPDIR)/$(am__dirstamp)
+glthread/lock.lo: glthread/$(am__dirstamp) \
+       glthread/$(DEPDIR)/$(am__dirstamp)
+glthread/threadlib.lo: glthread/$(am__dirstamp) \
+       glthread/$(DEPDIR)/$(am__dirstamp)
+
+libgnu.la: $(libgnu_la_OBJECTS) $(libgnu_la_DEPENDENCIES) $(EXTRA_libgnu_la_DEPENDENCIES) 
+       $(AM_V_CCLD)$(libgnu_la_LINK)  $(libgnu_la_OBJECTS) $(libgnu_la_LIBADD) $(LIBS)
+
+mostlyclean-compile:
+       -rm -f *.$(OBJEXT)
+       -rm -f glthread/*.$(OBJEXT)
+       -rm -f glthread/*.lo
+
+distclean-compile:
+       -rm -f *.tab.c
+
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/windows-mutex.Plo@am__quote@
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/windows-once.Plo@am__quote@
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/windows-recmutex.Plo@am__quote@
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/windows-rwlock.Plo@am__quote@
+@AMDEP_TRUE@@am__include@ @am__quote@glthread/$(DEPDIR)/lock.Plo@am__quote@
+@AMDEP_TRUE@@am__include@ @am__quote@glthread/$(DEPDIR)/threadlib.Plo@am__quote@
+
+.c.o:
+@am__fastdepCC_TRUE@   $(AM_V_CC)depbase=`echo $@ | sed 's|[^/]*$$|$(DEPDIR)/&|;s|\.o$$||'`;\
+@am__fastdepCC_TRUE@   $(COMPILE) -MT $@ -MD -MP -MF $$depbase.Tpo -c -o $@ $< &&\
+@am__fastdepCC_TRUE@   $(am__mv) $$depbase.Tpo $$depbase.Po
+@AMDEP_TRUE@@am__fastdepCC_FALSE@      $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@
+@AMDEP_TRUE@@am__fastdepCC_FALSE@      DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
+@am__fastdepCC_FALSE@  $(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ $<
+
+.c.obj:
+@am__fastdepCC_TRUE@   $(AM_V_CC)depbase=`echo $@ | sed 's|[^/]*$$|$(DEPDIR)/&|;s|\.obj$$||'`;\
+@am__fastdepCC_TRUE@   $(COMPILE) -MT $@ -MD -MP -MF $$depbase.Tpo -c -o $@ `$(CYGPATH_W) '$<'` &&\
+@am__fastdepCC_TRUE@   $(am__mv) $$depbase.Tpo $$depbase.Po
+@AMDEP_TRUE@@am__fastdepCC_FALSE@      $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@
+@AMDEP_TRUE@@am__fastdepCC_FALSE@      DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
+@am__fastdepCC_FALSE@  $(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ `$(CYGPATH_W) '$<'`
+
+.c.lo:
+@am__fastdepCC_TRUE@   $(AM_V_CC)depbase=`echo $@ | sed 's|[^/]*$$|$(DEPDIR)/&|;s|\.lo$$||'`;\
+@am__fastdepCC_TRUE@   $(LTCOMPILE) -MT $@ -MD -MP -MF $$depbase.Tpo -c -o $@ $< &&\
+@am__fastdepCC_TRUE@   $(am__mv) $$depbase.Tpo $$depbase.Plo
+@AMDEP_TRUE@@am__fastdepCC_FALSE@      $(AM_V_CC)source='$<' object='$@' libtool=yes @AMDEPBACKSLASH@
+@AMDEP_TRUE@@am__fastdepCC_FALSE@      DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
+@am__fastdepCC_FALSE@  $(AM_V_CC@am__nodep@)$(LTCOMPILE) -c -o $@ $<
+
+mostlyclean-libtool:
+       -rm -f *.lo
+
+clean-libtool:
+       -rm -rf .libs _libs
+       -rm -rf glthread/.libs glthread/_libs
+
+# This directory's subdirectories are mostly independent; you can cd
+# into them and run 'make' without going through this Makefile.
+# To change the values of 'make' variables: instead of editing Makefiles,
+# (1) if the variable is set in 'config.status', edit 'config.status'
+#     (which will cause the Makefiles to be regenerated when you run 'make');
+# (2) otherwise, pass the desired values on the 'make' command line.
+$(am__recursive_targets):
+       @fail=; \
+       if $(am__make_keepgoing); then \
+         failcom='fail=yes'; \
+       else \
+         failcom='exit 1'; \
+       fi; \
+       dot_seen=no; \
+       target=`echo $@ | sed s/-recursive//`; \
+       case "$@" in \
+         distclean-* | maintainer-clean-*) list='$(DIST_SUBDIRS)' ;; \
+         *) list='$(SUBDIRS)' ;; \
+       esac; \
+       for subdir in $$list; do \
+         echo "Making $$target in $$subdir"; \
+         if test "$$subdir" = "."; then \
+           dot_seen=yes; \
+           local_target="$$target-am"; \
+         else \
+           local_target="$$target"; \
+         fi; \
+         ($(am__cd) $$subdir && $(MAKE) $(AM_MAKEFLAGS) $$local_target) \
+         || eval $$failcom; \
+       done; \
+       if test "$$dot_seen" = "no"; then \
+         $(MAKE) $(AM_MAKEFLAGS) "$$target-am" || exit 1; \
+       fi; test -z "$$fail"
+
+ID: $(am__tagged_files)
+       $(am__define_uniq_tagged_files); mkid -fID $$unique
+tags: tags-recursive
+TAGS: tags
+
+tags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files)
+       set x; \
+       here=`pwd`; \
+       if ($(ETAGS) --etags-include --version) >/dev/null 2>&1; then \
+         include_option=--etags-include; \
+         empty_fix=.; \
+       else \
+         include_option=--include; \
+         empty_fix=; \
+       fi; \
+       list='$(SUBDIRS)'; for subdir in $$list; do \
+         if test "$$subdir" = .; then :; else \
+           test ! -f $$subdir/TAGS || \
+             set "$$@" "$$include_option=$$here/$$subdir/TAGS"; \
+         fi; \
+       done; \
+       $(am__define_uniq_tagged_files); \
+       shift; \
+       if test -z "$(ETAGS_ARGS)$$*$$unique"; then :; else \
+         test -n "$$unique" || unique=$$empty_fix; \
+         if test $$# -gt 0; then \
+           $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \
+             "$$@" $$unique; \
+         else \
+           $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \
+             $$unique; \
+         fi; \
+       fi
+ctags: ctags-recursive
+
+CTAGS: ctags
+ctags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files)
+       $(am__define_uniq_tagged_files); \
+       test -z "$(CTAGS_ARGS)$$unique" \
+         || $(CTAGS) $(CTAGSFLAGS) $(AM_CTAGSFLAGS) $(CTAGS_ARGS) \
+            $$unique
+
+GTAGS:
+       here=`$(am__cd) $(top_builddir) && pwd` \
+         && $(am__cd) $(top_srcdir) \
+         && gtags -i $(GTAGS_ARGS) "$$here"
+cscopelist: cscopelist-recursive
+
+cscopelist-am: $(am__tagged_files)
+       list='$(am__tagged_files)'; \
+       case "$(srcdir)" in \
+         [\\/]* | ?:[\\/]*) sdir="$(srcdir)" ;; \
+         *) sdir=$(subdir)/$(srcdir) ;; \
+       esac; \
+       for i in $$list; do \
+         if test -f "$$i"; then \
+           echo "$(subdir)/$$i"; \
+         else \
+           echo "$$sdir/$$i"; \
+         fi; \
+       done >> $(top_builddir)/cscope.files
+
+distclean-tags:
+       -rm -f TAGS ID GTAGS GRTAGS GSYMS GPATH tags
+
+distdir: $(DISTFILES)
+       @srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
+       topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
+       list='$(DISTFILES)'; \
+         dist_files=`for file in $$list; do echo $$file; done | \
+         sed -e "s|^$$srcdirstrip/||;t" \
+             -e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \
+       case $$dist_files in \
+         */*) $(MKDIR_P) `echo "$$dist_files" | \
+                          sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \
+                          sort -u` ;; \
+       esac; \
+       for file in $$dist_files; do \
+         if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \
+         if test -d $$d/$$file; then \
+           dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \
+           if test -d "$(distdir)/$$file"; then \
+             find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
+           fi; \
+           if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \
+             cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \
+             find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
+           fi; \
+           cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \
+         else \
+           test -f "$(distdir)/$$file" \
+           || cp -p $$d/$$file "$(distdir)/$$file" \
+           || exit 1; \
+         fi; \
+       done
+       @list='$(DIST_SUBDIRS)'; for subdir in $$list; do \
+         if test "$$subdir" = .; then :; else \
+           $(am__make_dryrun) \
+             || test -d "$(distdir)/$$subdir" \
+             || $(MKDIR_P) "$(distdir)/$$subdir" \
+             || exit 1; \
+           dir1=$$subdir; dir2="$(distdir)/$$subdir"; \
+           $(am__relativize); \
+           new_distdir=$$reldir; \
+           dir1=$$subdir; dir2="$(top_distdir)"; \
+           $(am__relativize); \
+           new_top_distdir=$$reldir; \
+           echo " (cd $$subdir && $(MAKE) $(AM_MAKEFLAGS) top_distdir="$$new_top_distdir" distdir="$$new_distdir" \\"; \
+           echo "     am__remove_distdir=: am__skip_length_check=: am__skip_mode_fix=: distdir)"; \
+           ($(am__cd) $$subdir && \
+             $(MAKE) $(AM_MAKEFLAGS) \
+               top_distdir="$$new_top_distdir" \
+               distdir="$$new_distdir" \
+               am__remove_distdir=: \
+               am__skip_length_check=: \
+               am__skip_mode_fix=: \
+               distdir) \
+             || exit 1; \
+         fi; \
+       done
+check-am: all-am
+check: $(BUILT_SOURCES)
+       $(MAKE) $(AM_MAKEFLAGS) check-recursive
+all-am: Makefile $(LIBRARIES) $(LTLIBRARIES) $(HEADERS)
+installdirs: installdirs-recursive
+installdirs-am:
+install: $(BUILT_SOURCES)
+       $(MAKE) $(AM_MAKEFLAGS) install-recursive
+install-exec: install-exec-recursive
+install-data: install-data-recursive
+uninstall: uninstall-recursive
+
+install-am: all-am
+       @$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am
+
+installcheck: installcheck-recursive
+install-strip:
+       if test -z '$(STRIP)'; then \
+         $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
+           install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
+             install; \
+       else \
+         $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
+           install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
+           "INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \
+       fi
+mostlyclean-generic:
+       -test -z "$(MOSTLYCLEANFILES)" || rm -f $(MOSTLYCLEANFILES)
+
+clean-generic:
+       -test -z "$(CLEANFILES)" || rm -f $(CLEANFILES)
+
+distclean-generic:
+       -test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES)
+       -test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES)
+       -rm -f glthread/$(DEPDIR)/$(am__dirstamp)
+       -rm -f glthread/$(am__dirstamp)
+       -test -z "$(DISTCLEANFILES)" || rm -f $(DISTCLEANFILES)
+
+maintainer-clean-generic:
+       @echo "This command is intended for maintainers to use"
+       @echo "it deletes files that may require special tools to rebuild."
+       -test -z "$(BUILT_SOURCES)" || rm -f $(BUILT_SOURCES)
+       -test -z "$(MAINTAINERCLEANFILES)" || rm -f $(MAINTAINERCLEANFILES)
+clean: clean-recursive
+
+clean-am: clean-generic clean-libtool clean-noinstLIBRARIES \
+       clean-noinstLTLIBRARIES mostlyclean-am
+
+distclean: distclean-recursive
+       -rm -rf ./$(DEPDIR) glthread/$(DEPDIR)
+       -rm -f Makefile
+distclean-am: clean-am distclean-compile distclean-generic \
+       distclean-tags
+
+dvi: dvi-recursive
+
+dvi-am:
+
+html: html-recursive
+
+html-am:
+
+info: info-recursive
+
+info-am:
+
+install-data-am:
+
+install-dvi: install-dvi-recursive
+
+install-dvi-am:
+
+install-exec-am:
+
+install-html: install-html-recursive
+
+install-html-am:
+
+install-info: install-info-recursive
+
+install-info-am:
+
+install-man:
+
+install-pdf: install-pdf-recursive
+
+install-pdf-am:
+
+install-ps: install-ps-recursive
+
+install-ps-am:
+
+installcheck-am:
+
+maintainer-clean: maintainer-clean-recursive
+       -rm -rf ./$(DEPDIR) glthread/$(DEPDIR)
+       -rm -f Makefile
+maintainer-clean-am: distclean-am maintainer-clean-generic
+
+mostlyclean: mostlyclean-recursive
+
+mostlyclean-am: mostlyclean-compile mostlyclean-generic \
+       mostlyclean-libtool mostlyclean-local
+
+pdf: pdf-recursive
+
+pdf-am:
+
+ps: ps-recursive
+
+ps-am:
+
+uninstall-am:
+
+.MAKE: $(am__recursive_targets) all check install install-am \
+       install-strip
+
+.PHONY: $(am__recursive_targets) CTAGS GTAGS TAGS all all-am check \
+       check-am clean clean-generic clean-libtool \
+       clean-noinstLIBRARIES clean-noinstLTLIBRARIES cscopelist-am \
+       ctags ctags-am distclean distclean-compile distclean-generic \
+       distclean-libtool distclean-tags distdir dvi dvi-am html \
+       html-am info info-am install install-am install-data \
+       install-data-am install-dvi install-dvi-am install-exec \
+       install-exec-am install-html install-html-am install-info \
+       install-info-am install-man install-pdf install-pdf-am \
+       install-ps install-ps-am install-strip installcheck \
+       installcheck-am installdirs installdirs-am maintainer-clean \
+       maintainer-clean-generic mostlyclean mostlyclean-compile \
+       mostlyclean-generic mostlyclean-libtool mostlyclean-local pdf \
+       pdf-am ps ps-am tags tags-am uninstall uninstall-am
+
+.PRECIOUS: Makefile
+
+
+# We need the following in order to create <limits.h> when the system
+# doesn't have one that is compatible with GNU.
+@GL_GENERATE_LIMITS_H_TRUE@limits.h: limits.in.h $(top_builddir)/config.status
+@GL_GENERATE_LIMITS_H_TRUE@    $(AM_V_GEN)rm -f $@-t $@ && \
+@GL_GENERATE_LIMITS_H_TRUE@    { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */' && \
+@GL_GENERATE_LIMITS_H_TRUE@      sed -e 's|@''GUARD_PREFIX''@|GL|g' \
+@GL_GENERATE_LIMITS_H_TRUE@          -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \
+@GL_GENERATE_LIMITS_H_TRUE@          -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \
+@GL_GENERATE_LIMITS_H_TRUE@          -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \
+@GL_GENERATE_LIMITS_H_TRUE@          -e 's|@''NEXT_LIMITS_H''@|$(NEXT_LIMITS_H)|g' \
+@GL_GENERATE_LIMITS_H_TRUE@          < $(srcdir)/limits.in.h; \
+@GL_GENERATE_LIMITS_H_TRUE@    } > $@-t && \
+@GL_GENERATE_LIMITS_H_TRUE@    mv $@-t $@
+@GL_GENERATE_LIMITS_H_FALSE@limits.h: $(top_builddir)/config.status
+@GL_GENERATE_LIMITS_H_FALSE@   rm -f $@
+
+# We need the following in order to create <stdint.h> when the system
+# doesn't have one that works with the given compiler.
+@GL_GENERATE_STDINT_H_TRUE@stdint.h: stdint.in.h $(top_builddir)/config.status
+@GL_GENERATE_STDINT_H_TRUE@    $(AM_V_GEN)rm -f $@-t $@ && \
+@GL_GENERATE_STDINT_H_TRUE@    { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \
+@GL_GENERATE_STDINT_H_TRUE@      sed -e 's|@''GUARD_PREFIX''@|GL|g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_STDINT_H''@/$(HAVE_STDINT_H)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's|@''NEXT_STDINT_H''@|$(NEXT_STDINT_H)|g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_C99_STDINT_H''@/$(HAVE_C99_STDINT_H)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_SYS_TYPES_H''@/$(HAVE_SYS_TYPES_H)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_INTTYPES_H''@/$(HAVE_INTTYPES_H)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_SYS_INTTYPES_H''@/$(HAVE_SYS_INTTYPES_H)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_SYS_BITYPES_H''@/$(HAVE_SYS_BITYPES_H)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_WCHAR_H''@/$(HAVE_WCHAR_H)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_LONG_LONG_INT''@/$(HAVE_LONG_LONG_INT)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_UNSIGNED_LONG_LONG_INT''@/$(HAVE_UNSIGNED_LONG_LONG_INT)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''APPLE_UNIVERSAL_BUILD''@/$(APPLE_UNIVERSAL_BUILD)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''BITSIZEOF_PTRDIFF_T''@/$(BITSIZEOF_PTRDIFF_T)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''PTRDIFF_T_SUFFIX''@/$(PTRDIFF_T_SUFFIX)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''BITSIZEOF_SIG_ATOMIC_T''@/$(BITSIZEOF_SIG_ATOMIC_T)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_SIGNED_SIG_ATOMIC_T''@/$(HAVE_SIGNED_SIG_ATOMIC_T)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''SIG_ATOMIC_T_SUFFIX''@/$(SIG_ATOMIC_T_SUFFIX)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''BITSIZEOF_SIZE_T''@/$(BITSIZEOF_SIZE_T)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''SIZE_T_SUFFIX''@/$(SIZE_T_SUFFIX)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''BITSIZEOF_WCHAR_T''@/$(BITSIZEOF_WCHAR_T)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_SIGNED_WCHAR_T''@/$(HAVE_SIGNED_WCHAR_T)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''WCHAR_T_SUFFIX''@/$(WCHAR_T_SUFFIX)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''BITSIZEOF_WINT_T''@/$(BITSIZEOF_WINT_T)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''HAVE_SIGNED_WINT_T''@/$(HAVE_SIGNED_WINT_T)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''WINT_T_SUFFIX''@/$(WINT_T_SUFFIX)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          -e 's/@''GNULIB_OVERRIDES_WINT_T''@/$(GNULIB_OVERRIDES_WINT_T)/g' \
+@GL_GENERATE_STDINT_H_TRUE@          < $(srcdir)/stdint.in.h; \
+@GL_GENERATE_STDINT_H_TRUE@    } > $@-t && \
+@GL_GENERATE_STDINT_H_TRUE@    mv $@-t $@
+@GL_GENERATE_STDINT_H_FALSE@stdint.h: $(top_builddir)/config.status
+@GL_GENERATE_STDINT_H_FALSE@   rm -f $@
+
+# We need the following in order to create <stdnoreturn.h> when the system
+# doesn't have one that works.
+@GL_GENERATE_STDNORETURN_H_TRUE@stdnoreturn.h: stdnoreturn.in.h $(top_builddir)/config.status $(_NORETURN_H)
+@GL_GENERATE_STDNORETURN_H_TRUE@       $(AM_V_GEN)rm -f $@-t $@ && \
+@GL_GENERATE_STDNORETURN_H_TRUE@       { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */' && \
+@GL_GENERATE_STDNORETURN_H_TRUE@         sed -e '/definition of _Noreturn/r $(_NORETURN_H)' \
+@GL_GENERATE_STDNORETURN_H_TRUE@              < $(srcdir)/stdnoreturn.in.h; \
+@GL_GENERATE_STDNORETURN_H_TRUE@       } > $@-t && \
+@GL_GENERATE_STDNORETURN_H_TRUE@       mv $@-t $@
+@GL_GENERATE_STDNORETURN_H_FALSE@stdnoreturn.h: $(top_builddir)/config.status
+@GL_GENERATE_STDNORETURN_H_FALSE@      rm -f $@
+
+# We need the following in order to create <sys/types.h> when the system
+# doesn't have one that works with the given compiler.
+sys/types.h: sys_types.in.h $(top_builddir)/config.status
+       $(AM_V_at)$(MKDIR_P) sys
+       $(AM_V_GEN)rm -f $@-t $@ && \
+       { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \
+         sed -e 's|@''GUARD_PREFIX''@|GL|g' \
+             -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \
+             -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \
+             -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \
+             -e 's|@''NEXT_SYS_TYPES_H''@|$(NEXT_SYS_TYPES_H)|g' \
+             -e 's|@''WINDOWS_64_BIT_OFF_T''@|$(WINDOWS_64_BIT_OFF_T)|g' \
+             -e 's|@''WINDOWS_STAT_INODES''@|$(WINDOWS_STAT_INODES)|g' \
+             < $(srcdir)/sys_types.in.h; \
+       } > $@-t && \
+       mv $@-t $@
+
+mostlyclean-local: mostlyclean-generic
+       @for dir in '' $(MOSTLYCLEANDIRS); do \
+         if test -n "$$dir" && test -d $$dir; then \
+           echo "rmdir $$dir"; rmdir $$dir; \
+         fi; \
+       done; \
+       :
+
+# Tell versions [3.59,3.63) of GNU make to not export all variables.
+# Otherwise a system limit (for SysV at least) may be exceeded.
+.NOEXPORT:
diff --git a/gnulib-lib/_Noreturn.h b/gnulib-lib/_Noreturn.h
new file mode 100644 (file)
index 0000000..db9b455
--- /dev/null
@@ -0,0 +1,33 @@
+/* A C macro for declaring that a function does not return.
+   Copyright (C) 2011-2019 Free Software Foundation, Inc.
+
+   This program is free software: you can redistribute it and/or modify it
+   under the terms of the GNU General Public License as published
+   by the Free Software Foundation; either version 3 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
+
+#ifndef _Noreturn
+# if (defined __cplusplus \
+      && ((201103 <= __cplusplus && !(__GNUC__ == 4 && __GNUC_MINOR__ == 7)) \
+          || (defined _MSC_VER && 1900 <= _MSC_VER)))
+#  define _Noreturn [[noreturn]]
+# elif ((!defined __cplusplus || defined __clang__)                     \
+        && (201112 <= (defined __STDC_VERSION__ ? __STDC_VERSION__ : 0)  \
+            || 4 < __GNUC__ + (7 <= __GNUC_MINOR__)))
+   /* _Noreturn works as-is.  */
+# elif 2 < __GNUC__ + (8 <= __GNUC_MINOR__) || 0x5110 <= __SUNPRO_C
+#  define _Noreturn __attribute__ ((__noreturn__))
+# elif 1200 <= (defined _MSC_VER ? _MSC_VER : 0)
+#  define _Noreturn __declspec (noreturn)
+# else
+#  define _Noreturn
+# endif
+#endif
diff --git a/gnulib-lib/glthread/lock.c b/gnulib-lib/glthread/lock.c
new file mode 100644 (file)
index 0000000..fefcd59
--- /dev/null
@@ -0,0 +1,506 @@
+/* Locking in multithreaded situations.
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.
+   Based on GCC's gthr-posix.h, gthr-posix95.h.  */
+
+#include <config.h>
+
+#include "glthread/lock.h"
+
+/* ========================================================================= */
+
+#if USE_POSIX_THREADS
+
+/* -------------------------- gl_lock_t datatype -------------------------- */
+
+/* ------------------------- gl_rwlock_t datatype ------------------------- */
+
+# if HAVE_PTHREAD_RWLOCK && (HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER || (defined PTHREAD_RWLOCK_WRITER_NONRECURSIVE_INITIALIZER_NP && (__GNU_LIBRARY__ > 1)))
+
+#  ifdef PTHREAD_RWLOCK_INITIALIZER
+
+#   if !HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER
+     /* glibc with bug https://sourceware.org/bugzilla/show_bug.cgi?id=13701 */
+
+int
+glthread_rwlock_init_for_glibc (pthread_rwlock_t *lock)
+{
+  pthread_rwlockattr_t attributes;
+  int err;
+
+  err = pthread_rwlockattr_init (&attributes);
+  if (err != 0)
+    return err;
+  /* Note: PTHREAD_RWLOCK_PREFER_WRITER_NONRECURSIVE_NP is the only value that
+     causes the writer to be preferred. PTHREAD_RWLOCK_PREFER_WRITER_NP does not
+     do this; see
+     http://man7.org/linux/man-pages/man3/pthread_rwlockattr_setkind_np.3.html */
+  err = pthread_rwlockattr_setkind_np (&attributes,
+                                       PTHREAD_RWLOCK_PREFER_WRITER_NONRECURSIVE_NP);
+  if (err == 0)
+    err = pthread_rwlock_init(lock, &attributes);
+  /* pthread_rwlockattr_destroy always returns 0.  It cannot influence the
+     return value.  */
+  pthread_rwlockattr_destroy (&attributes);
+  return err;
+}
+
+#   endif
+#  else
+
+int
+glthread_rwlock_init_multithreaded (gl_rwlock_t *lock)
+{
+  int err;
+
+  err = pthread_rwlock_init (&lock->rwlock, NULL);
+  if (err != 0)
+    return err;
+  lock->initialized = 1;
+  return 0;
+}
+
+int
+glthread_rwlock_rdlock_multithreaded (gl_rwlock_t *lock)
+{
+  if (!lock->initialized)
+    {
+      int err;
+
+      err = pthread_mutex_lock (&lock->guard);
+      if (err != 0)
+        return err;
+      if (!lock->initialized)
+        {
+          err = glthread_rwlock_init_multithreaded (lock);
+          if (err != 0)
+            {
+              pthread_mutex_unlock (&lock->guard);
+              return err;
+            }
+        }
+      err = pthread_mutex_unlock (&lock->guard);
+      if (err != 0)
+        return err;
+    }
+  return pthread_rwlock_rdlock (&lock->rwlock);
+}
+
+int
+glthread_rwlock_wrlock_multithreaded (gl_rwlock_t *lock)
+{
+  if (!lock->initialized)
+    {
+      int err;
+
+      err = pthread_mutex_lock (&lock->guard);
+      if (err != 0)
+        return err;
+      if (!lock->initialized)
+        {
+          err = glthread_rwlock_init_multithreaded (lock);
+          if (err != 0)
+            {
+              pthread_mutex_unlock (&lock->guard);
+              return err;
+            }
+        }
+      err = pthread_mutex_unlock (&lock->guard);
+      if (err != 0)
+        return err;
+    }
+  return pthread_rwlock_wrlock (&lock->rwlock);
+}
+
+int
+glthread_rwlock_unlock_multithreaded (gl_rwlock_t *lock)
+{
+  if (!lock->initialized)
+    return EINVAL;
+  return pthread_rwlock_unlock (&lock->rwlock);
+}
+
+int
+glthread_rwlock_destroy_multithreaded (gl_rwlock_t *lock)
+{
+  int err;
+
+  if (!lock->initialized)
+    return EINVAL;
+  err = pthread_rwlock_destroy (&lock->rwlock);
+  if (err != 0)
+    return err;
+  lock->initialized = 0;
+  return 0;
+}
+
+#  endif
+
+# else
+
+int
+glthread_rwlock_init_multithreaded (gl_rwlock_t *lock)
+{
+  int err;
+
+  err = pthread_mutex_init (&lock->lock, NULL);
+  if (err != 0)
+    return err;
+  err = pthread_cond_init (&lock->waiting_readers, NULL);
+  if (err != 0)
+    return err;
+  err = pthread_cond_init (&lock->waiting_writers, NULL);
+  if (err != 0)
+    return err;
+  lock->waiting_writers_count = 0;
+  lock->runcount = 0;
+  return 0;
+}
+
+int
+glthread_rwlock_rdlock_multithreaded (gl_rwlock_t *lock)
+{
+  int err;
+
+  err = pthread_mutex_lock (&lock->lock);
+  if (err != 0)
+    return err;
+  /* Test whether only readers are currently running, and whether the runcount
+     field will not overflow, and whether no writer is waiting.  The latter
+     condition is because POSIX recommends that "write locks shall take
+     precedence over read locks", to avoid "writer starvation".  */
+  while (!(lock->runcount + 1 > 0 && lock->waiting_writers_count == 0))
+    {
+      /* This thread has to wait for a while.  Enqueue it among the
+         waiting_readers.  */
+      err = pthread_cond_wait (&lock->waiting_readers, &lock->lock);
+      if (err != 0)
+        {
+          pthread_mutex_unlock (&lock->lock);
+          return err;
+        }
+    }
+  lock->runcount++;
+  return pthread_mutex_unlock (&lock->lock);
+}
+
+int
+glthread_rwlock_wrlock_multithreaded (gl_rwlock_t *lock)
+{
+  int err;
+
+  err = pthread_mutex_lock (&lock->lock);
+  if (err != 0)
+    return err;
+  /* Test whether no readers or writers are currently running.  */
+  while (!(lock->runcount == 0))
+    {
+      /* This thread has to wait for a while.  Enqueue it among the
+         waiting_writers.  */
+      lock->waiting_writers_count++;
+      err = pthread_cond_wait (&lock->waiting_writers, &lock->lock);
+      if (err != 0)
+        {
+          lock->waiting_writers_count--;
+          pthread_mutex_unlock (&lock->lock);
+          return err;
+        }
+      lock->waiting_writers_count--;
+    }
+  lock->runcount--; /* runcount becomes -1 */
+  return pthread_mutex_unlock (&lock->lock);
+}
+
+int
+glthread_rwlock_unlock_multithreaded (gl_rwlock_t *lock)
+{
+  int err;
+
+  err = pthread_mutex_lock (&lock->lock);
+  if (err != 0)
+    return err;
+  if (lock->runcount < 0)
+    {
+      /* Drop a writer lock.  */
+      if (!(lock->runcount == -1))
+        {
+          pthread_mutex_unlock (&lock->lock);
+          return EINVAL;
+        }
+      lock->runcount = 0;
+    }
+  else
+    {
+      /* Drop a reader lock.  */
+      if (!(lock->runcount > 0))
+        {
+          pthread_mutex_unlock (&lock->lock);
+          return EINVAL;
+        }
+      lock->runcount--;
+    }
+  if (lock->runcount == 0)
+    {
+      /* POSIX recommends that "write locks shall take precedence over read
+         locks", to avoid "writer starvation".  */
+      if (lock->waiting_writers_count > 0)
+        {
+          /* Wake up one of the waiting writers.  */
+          err = pthread_cond_signal (&lock->waiting_writers);
+          if (err != 0)
+            {
+              pthread_mutex_unlock (&lock->lock);
+              return err;
+            }
+        }
+      else
+        {
+          /* Wake up all waiting readers.  */
+          err = pthread_cond_broadcast (&lock->waiting_readers);
+          if (err != 0)
+            {
+              pthread_mutex_unlock (&lock->lock);
+              return err;
+            }
+        }
+    }
+  return pthread_mutex_unlock (&lock->lock);
+}
+
+int
+glthread_rwlock_destroy_multithreaded (gl_rwlock_t *lock)
+{
+  int err;
+
+  err = pthread_mutex_destroy (&lock->lock);
+  if (err != 0)
+    return err;
+  err = pthread_cond_destroy (&lock->waiting_readers);
+  if (err != 0)
+    return err;
+  err = pthread_cond_destroy (&lock->waiting_writers);
+  if (err != 0)
+    return err;
+  return 0;
+}
+
+# endif
+
+/* --------------------- gl_recursive_lock_t datatype --------------------- */
+
+# if HAVE_PTHREAD_MUTEX_RECURSIVE
+
+#  if defined PTHREAD_RECURSIVE_MUTEX_INITIALIZER || defined PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP
+
+int
+glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock)
+{
+  pthread_mutexattr_t attributes;
+  int err;
+
+  err = pthread_mutexattr_init (&attributes);
+  if (err != 0)
+    return err;
+  err = pthread_mutexattr_settype (&attributes, PTHREAD_MUTEX_RECURSIVE);
+  if (err != 0)
+    {
+      pthread_mutexattr_destroy (&attributes);
+      return err;
+    }
+  err = pthread_mutex_init (lock, &attributes);
+  if (err != 0)
+    {
+      pthread_mutexattr_destroy (&attributes);
+      return err;
+    }
+  err = pthread_mutexattr_destroy (&attributes);
+  if (err != 0)
+    return err;
+  return 0;
+}
+
+#  else
+
+int
+glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock)
+{
+  pthread_mutexattr_t attributes;
+  int err;
+
+  err = pthread_mutexattr_init (&attributes);
+  if (err != 0)
+    return err;
+  err = pthread_mutexattr_settype (&attributes, PTHREAD_MUTEX_RECURSIVE);
+  if (err != 0)
+    {
+      pthread_mutexattr_destroy (&attributes);
+      return err;
+    }
+  err = pthread_mutex_init (&lock->recmutex, &attributes);
+  if (err != 0)
+    {
+      pthread_mutexattr_destroy (&attributes);
+      return err;
+    }
+  err = pthread_mutexattr_destroy (&attributes);
+  if (err != 0)
+    return err;
+  lock->initialized = 1;
+  return 0;
+}
+
+int
+glthread_recursive_lock_lock_multithreaded (gl_recursive_lock_t *lock)
+{
+  if (!lock->initialized)
+    {
+      int err;
+
+      err = pthread_mutex_lock (&lock->guard);
+      if (err != 0)
+        return err;
+      if (!lock->initialized)
+        {
+          err = glthread_recursive_lock_init_multithreaded (lock);
+          if (err != 0)
+            {
+              pthread_mutex_unlock (&lock->guard);
+              return err;
+            }
+        }
+      err = pthread_mutex_unlock (&lock->guard);
+      if (err != 0)
+        return err;
+    }
+  return pthread_mutex_lock (&lock->recmutex);
+}
+
+int
+glthread_recursive_lock_unlock_multithreaded (gl_recursive_lock_t *lock)
+{
+  if (!lock->initialized)
+    return EINVAL;
+  return pthread_mutex_unlock (&lock->recmutex);
+}
+
+int
+glthread_recursive_lock_destroy_multithreaded (gl_recursive_lock_t *lock)
+{
+  int err;
+
+  if (!lock->initialized)
+    return EINVAL;
+  err = pthread_mutex_destroy (&lock->recmutex);
+  if (err != 0)
+    return err;
+  lock->initialized = 0;
+  return 0;
+}
+
+#  endif
+
+# else
+
+int
+glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock)
+{
+  int err;
+
+  err = pthread_mutex_init (&lock->mutex, NULL);
+  if (err != 0)
+    return err;
+  lock->owner = (pthread_t) 0;
+  lock->depth = 0;
+  return 0;
+}
+
+int
+glthread_recursive_lock_lock_multithreaded (gl_recursive_lock_t *lock)
+{
+  pthread_t self = pthread_self ();
+  if (lock->owner != self)
+    {
+      int err;
+
+      err = pthread_mutex_lock (&lock->mutex);
+      if (err != 0)
+        return err;
+      lock->owner = self;
+    }
+  if (++(lock->depth) == 0) /* wraparound? */
+    {
+      lock->depth--;
+      return EAGAIN;
+    }
+  return 0;
+}
+
+int
+glthread_recursive_lock_unlock_multithreaded (gl_recursive_lock_t *lock)
+{
+  if (lock->owner != pthread_self ())
+    return EPERM;
+  if (lock->depth == 0)
+    return EINVAL;
+  if (--(lock->depth) == 0)
+    {
+      lock->owner = (pthread_t) 0;
+      return pthread_mutex_unlock (&lock->mutex);
+    }
+  else
+    return 0;
+}
+
+int
+glthread_recursive_lock_destroy_multithreaded (gl_recursive_lock_t *lock)
+{
+  if (lock->owner != (pthread_t) 0)
+    return EBUSY;
+  return pthread_mutex_destroy (&lock->mutex);
+}
+
+# endif
+
+/* -------------------------- gl_once_t datatype -------------------------- */
+
+static const pthread_once_t fresh_once = PTHREAD_ONCE_INIT;
+
+int
+glthread_once_singlethreaded (pthread_once_t *once_control)
+{
+  /* We don't know whether pthread_once_t is an integer type, a floating-point
+     type, a pointer type, or a structure type.  */
+  char *firstbyte = (char *)once_control;
+  if (*firstbyte == *(const char *)&fresh_once)
+    {
+      /* First time use of once_control.  Invert the first byte.  */
+      *firstbyte = ~ *(const char *)&fresh_once;
+      return 1;
+    }
+  else
+    return 0;
+}
+
+#endif
+
+/* ========================================================================= */
+
+#if USE_WINDOWS_THREADS
+
+#endif
+
+/* ========================================================================= */
diff --git a/gnulib-lib/glthread/lock.h b/gnulib-lib/glthread/lock.h
new file mode 100644 (file)
index 0000000..a92c2a8
--- /dev/null
@@ -0,0 +1,666 @@
+/* Locking in multithreaded situations.
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.
+   Based on GCC's gthr-posix.h, gthr-posix95.h, gthr-win32.h.  */
+
+/* This file contains locking primitives for use with a given thread library.
+   It does not contain primitives for creating threads or for other
+   synchronization primitives.
+
+   Normal (non-recursive) locks:
+     Type:                gl_lock_t
+     Declaration:         gl_lock_define(extern, name)
+     Initializer:         gl_lock_define_initialized(, name)
+     Initialization:      gl_lock_init (name);
+     Taking the lock:     gl_lock_lock (name);
+     Releasing the lock:  gl_lock_unlock (name);
+     De-initialization:   gl_lock_destroy (name);
+   Equivalent functions with control of error handling:
+     Initialization:      err = glthread_lock_init (&name);
+     Taking the lock:     err = glthread_lock_lock (&name);
+     Releasing the lock:  err = glthread_lock_unlock (&name);
+     De-initialization:   err = glthread_lock_destroy (&name);
+
+   Read-Write (non-recursive) locks:
+     Type:                gl_rwlock_t
+     Declaration:         gl_rwlock_define(extern, name)
+     Initializer:         gl_rwlock_define_initialized(, name)
+     Initialization:      gl_rwlock_init (name);
+     Taking the lock:     gl_rwlock_rdlock (name);
+                          gl_rwlock_wrlock (name);
+     Releasing the lock:  gl_rwlock_unlock (name);
+     De-initialization:   gl_rwlock_destroy (name);
+   Equivalent functions with control of error handling:
+     Initialization:      err = glthread_rwlock_init (&name);
+     Taking the lock:     err = glthread_rwlock_rdlock (&name);
+                          err = glthread_rwlock_wrlock (&name);
+     Releasing the lock:  err = glthread_rwlock_unlock (&name);
+     De-initialization:   err = glthread_rwlock_destroy (&name);
+
+   Recursive locks:
+     Type:                gl_recursive_lock_t
+     Declaration:         gl_recursive_lock_define(extern, name)
+     Initializer:         gl_recursive_lock_define_initialized(, name)
+     Initialization:      gl_recursive_lock_init (name);
+     Taking the lock:     gl_recursive_lock_lock (name);
+     Releasing the lock:  gl_recursive_lock_unlock (name);
+     De-initialization:   gl_recursive_lock_destroy (name);
+   Equivalent functions with control of error handling:
+     Initialization:      err = glthread_recursive_lock_init (&name);
+     Taking the lock:     err = glthread_recursive_lock_lock (&name);
+     Releasing the lock:  err = glthread_recursive_lock_unlock (&name);
+     De-initialization:   err = glthread_recursive_lock_destroy (&name);
+
+  Once-only execution:
+     Type:                gl_once_t
+     Initializer:         gl_once_define(extern, name)
+     Execution:           gl_once (name, initfunction);
+   Equivalent functions with control of error handling:
+     Execution:           err = glthread_once (&name, initfunction);
+*/
+
+
+#ifndef _LOCK_H
+#define _LOCK_H
+
+#include <errno.h>
+#include <stdlib.h>
+
+#if !defined c11_threads_in_use
+# if HAVE_THREADS_H && USE_POSIX_THREADS_WEAK
+#  include <threads.h>
+#  pragma weak thrd_exit
+#  define c11_threads_in_use() (thrd_exit != NULL)
+# else
+#  define c11_threads_in_use() 0
+# endif
+#endif
+
+/* ========================================================================= */
+
+#if USE_POSIX_THREADS
+
+/* Use the POSIX threads library.  */
+
+# include <pthread.h>
+
+# ifdef __cplusplus
+extern "C" {
+# endif
+
+# if PTHREAD_IN_USE_DETECTION_HARD
+
+/* The pthread_in_use() detection needs to be done at runtime.  */
+#  define pthread_in_use() \
+     glthread_in_use ()
+extern int glthread_in_use (void);
+
+# endif
+
+# if USE_POSIX_THREADS_WEAK
+
+/* Use weak references to the POSIX threads library.  */
+
+/* Weak references avoid dragging in external libraries if the other parts
+   of the program don't use them.  Here we use them, because we don't want
+   every program that uses libintl to depend on libpthread.  This assumes
+   that libpthread would not be loaded after libintl; i.e. if libintl is
+   loaded first, by an executable that does not depend on libpthread, and
+   then a module is dynamically loaded that depends on libpthread, libintl
+   will not be multithread-safe.  */
+
+/* The way to test at runtime whether libpthread is present is to test
+   whether a function pointer's value, such as &pthread_mutex_init, is
+   non-NULL.  However, some versions of GCC have a bug through which, in
+   PIC mode, &foo != NULL always evaluates to true if there is a direct
+   call to foo(...) in the same function.  To avoid this, we test the
+   address of a function in libpthread that we don't use.  */
+
+#  pragma weak pthread_mutex_init
+#  pragma weak pthread_mutex_lock
+#  pragma weak pthread_mutex_unlock
+#  pragma weak pthread_mutex_destroy
+#  pragma weak pthread_rwlock_init
+#  pragma weak pthread_rwlock_rdlock
+#  pragma weak pthread_rwlock_wrlock
+#  pragma weak pthread_rwlock_unlock
+#  pragma weak pthread_rwlock_destroy
+#  pragma weak pthread_once
+#  pragma weak pthread_cond_init
+#  pragma weak pthread_cond_wait
+#  pragma weak pthread_cond_signal
+#  pragma weak pthread_cond_broadcast
+#  pragma weak pthread_cond_destroy
+#  pragma weak pthread_mutexattr_init
+#  pragma weak pthread_mutexattr_settype
+#  pragma weak pthread_mutexattr_destroy
+#  pragma weak pthread_rwlockattr_init
+#  if __GNU_LIBRARY__ > 1
+#   pragma weak pthread_rwlockattr_setkind_np
+#  endif
+#  pragma weak pthread_rwlockattr_destroy
+#  ifndef pthread_self
+#   pragma weak pthread_self
+#  endif
+
+#  if !PTHREAD_IN_USE_DETECTION_HARD
+    /* Considering all platforms with USE_POSIX_THREADS_WEAK, only few symbols
+       can be used to determine whether libpthread is in use.  These are:
+         pthread_mutexattr_gettype
+         pthread_rwlockattr_destroy
+         pthread_rwlockattr_init
+     */
+#   pragma weak pthread_mutexattr_gettype
+#   define pthread_in_use() \
+      (pthread_mutexattr_gettype != NULL || c11_threads_in_use ())
+#  endif
+
+# else
+
+#  if !PTHREAD_IN_USE_DETECTION_HARD
+#   define pthread_in_use() 1
+#  endif
+
+# endif
+
+/* -------------------------- gl_lock_t datatype -------------------------- */
+
+typedef pthread_mutex_t gl_lock_t;
+# define gl_lock_define(STORAGECLASS, NAME) \
+    STORAGECLASS pthread_mutex_t NAME;
+# define gl_lock_define_initialized(STORAGECLASS, NAME) \
+    STORAGECLASS pthread_mutex_t NAME = gl_lock_initializer;
+# define gl_lock_initializer \
+    PTHREAD_MUTEX_INITIALIZER
+# define glthread_lock_init(LOCK) \
+    (pthread_in_use () ? pthread_mutex_init (LOCK, NULL) : 0)
+# define glthread_lock_lock(LOCK) \
+    (pthread_in_use () ? pthread_mutex_lock (LOCK) : 0)
+# define glthread_lock_unlock(LOCK) \
+    (pthread_in_use () ? pthread_mutex_unlock (LOCK) : 0)
+# define glthread_lock_destroy(LOCK) \
+    (pthread_in_use () ? pthread_mutex_destroy (LOCK) : 0)
+
+/* ------------------------- gl_rwlock_t datatype ------------------------- */
+
+# if HAVE_PTHREAD_RWLOCK && (HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER || (defined PTHREAD_RWLOCK_WRITER_NONRECURSIVE_INITIALIZER_NP && (__GNU_LIBRARY__ > 1)))
+
+#  ifdef PTHREAD_RWLOCK_INITIALIZER
+
+typedef pthread_rwlock_t gl_rwlock_t;
+#   define gl_rwlock_define(STORAGECLASS, NAME) \
+      STORAGECLASS pthread_rwlock_t NAME;
+#   define gl_rwlock_define_initialized(STORAGECLASS, NAME) \
+      STORAGECLASS pthread_rwlock_t NAME = gl_rwlock_initializer;
+#   if HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER
+#    define gl_rwlock_initializer \
+       PTHREAD_RWLOCK_INITIALIZER
+#    define glthread_rwlock_init(LOCK) \
+       (pthread_in_use () ? pthread_rwlock_init (LOCK, NULL) : 0)
+#   else /* glibc with bug https://sourceware.org/bugzilla/show_bug.cgi?id=13701 */
+#    define gl_rwlock_initializer \
+       PTHREAD_RWLOCK_WRITER_NONRECURSIVE_INITIALIZER_NP
+#    define glthread_rwlock_init(LOCK) \
+       (pthread_in_use () ? glthread_rwlock_init_for_glibc (LOCK) : 0)
+extern int glthread_rwlock_init_for_glibc (pthread_rwlock_t *lock);
+#   endif
+#   define glthread_rwlock_rdlock(LOCK) \
+      (pthread_in_use () ? pthread_rwlock_rdlock (LOCK) : 0)
+#   define glthread_rwlock_wrlock(LOCK) \
+      (pthread_in_use () ? pthread_rwlock_wrlock (LOCK) : 0)
+#   define glthread_rwlock_unlock(LOCK) \
+      (pthread_in_use () ? pthread_rwlock_unlock (LOCK) : 0)
+#   define glthread_rwlock_destroy(LOCK) \
+      (pthread_in_use () ? pthread_rwlock_destroy (LOCK) : 0)
+
+#  else
+
+typedef struct
+        {
+          int initialized;
+          pthread_mutex_t guard;   /* protects the initialization */
+          pthread_rwlock_t rwlock; /* read-write lock */
+        }
+        gl_rwlock_t;
+#   define gl_rwlock_define(STORAGECLASS, NAME) \
+      STORAGECLASS gl_rwlock_t NAME;
+#   define gl_rwlock_define_initialized(STORAGECLASS, NAME) \
+      STORAGECLASS gl_rwlock_t NAME = gl_rwlock_initializer;
+#   define gl_rwlock_initializer \
+      { 0, PTHREAD_MUTEX_INITIALIZER }
+#   define glthread_rwlock_init(LOCK) \
+      (pthread_in_use () ? glthread_rwlock_init_multithreaded (LOCK) : 0)
+#   define glthread_rwlock_rdlock(LOCK) \
+      (pthread_in_use () ? glthread_rwlock_rdlock_multithreaded (LOCK) : 0)
+#   define glthread_rwlock_wrlock(LOCK) \
+      (pthread_in_use () ? glthread_rwlock_wrlock_multithreaded (LOCK) : 0)
+#   define glthread_rwlock_unlock(LOCK) \
+      (pthread_in_use () ? glthread_rwlock_unlock_multithreaded (LOCK) : 0)
+#   define glthread_rwlock_destroy(LOCK) \
+      (pthread_in_use () ? glthread_rwlock_destroy_multithreaded (LOCK) : 0)
+extern int glthread_rwlock_init_multithreaded (gl_rwlock_t *lock);
+extern int glthread_rwlock_rdlock_multithreaded (gl_rwlock_t *lock);
+extern int glthread_rwlock_wrlock_multithreaded (gl_rwlock_t *lock);
+extern int glthread_rwlock_unlock_multithreaded (gl_rwlock_t *lock);
+extern int glthread_rwlock_destroy_multithreaded (gl_rwlock_t *lock);
+
+#  endif
+
+# else
+
+typedef struct
+        {
+          pthread_mutex_t lock; /* protects the remaining fields */
+          pthread_cond_t waiting_readers; /* waiting readers */
+          pthread_cond_t waiting_writers; /* waiting writers */
+          unsigned int waiting_writers_count; /* number of waiting writers */
+          int runcount; /* number of readers running, or -1 when a writer runs */
+        }
+        gl_rwlock_t;
+# define gl_rwlock_define(STORAGECLASS, NAME) \
+    STORAGECLASS gl_rwlock_t NAME;
+# define gl_rwlock_define_initialized(STORAGECLASS, NAME) \
+    STORAGECLASS gl_rwlock_t NAME = gl_rwlock_initializer;
+# define gl_rwlock_initializer \
+    { PTHREAD_MUTEX_INITIALIZER, PTHREAD_COND_INITIALIZER, PTHREAD_COND_INITIALIZER, 0, 0 }
+# define glthread_rwlock_init(LOCK) \
+    (pthread_in_use () ? glthread_rwlock_init_multithreaded (LOCK) : 0)
+# define glthread_rwlock_rdlock(LOCK) \
+    (pthread_in_use () ? glthread_rwlock_rdlock_multithreaded (LOCK) : 0)
+# define glthread_rwlock_wrlock(LOCK) \
+    (pthread_in_use () ? glthread_rwlock_wrlock_multithreaded (LOCK) : 0)
+# define glthread_rwlock_unlock(LOCK) \
+    (pthread_in_use () ? glthread_rwlock_unlock_multithreaded (LOCK) : 0)
+# define glthread_rwlock_destroy(LOCK) \
+    (pthread_in_use () ? glthread_rwlock_destroy_multithreaded (LOCK) : 0)
+extern int glthread_rwlock_init_multithreaded (gl_rwlock_t *lock);
+extern int glthread_rwlock_rdlock_multithreaded (gl_rwlock_t *lock);
+extern int glthread_rwlock_wrlock_multithreaded (gl_rwlock_t *lock);
+extern int glthread_rwlock_unlock_multithreaded (gl_rwlock_t *lock);
+extern int glthread_rwlock_destroy_multithreaded (gl_rwlock_t *lock);
+
+# endif
+
+/* --------------------- gl_recursive_lock_t datatype --------------------- */
+
+# if HAVE_PTHREAD_MUTEX_RECURSIVE
+
+#  if defined PTHREAD_RECURSIVE_MUTEX_INITIALIZER || defined PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP
+
+typedef pthread_mutex_t gl_recursive_lock_t;
+#   define gl_recursive_lock_define(STORAGECLASS, NAME) \
+      STORAGECLASS pthread_mutex_t NAME;
+#   define gl_recursive_lock_define_initialized(STORAGECLASS, NAME) \
+      STORAGECLASS pthread_mutex_t NAME = gl_recursive_lock_initializer;
+#   ifdef PTHREAD_RECURSIVE_MUTEX_INITIALIZER
+#    define gl_recursive_lock_initializer \
+       PTHREAD_RECURSIVE_MUTEX_INITIALIZER
+#   else
+#    define gl_recursive_lock_initializer \
+       PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP
+#   endif
+#   define glthread_recursive_lock_init(LOCK) \
+      (pthread_in_use () ? glthread_recursive_lock_init_multithreaded (LOCK) : 0)
+#   define glthread_recursive_lock_lock(LOCK) \
+      (pthread_in_use () ? pthread_mutex_lock (LOCK) : 0)
+#   define glthread_recursive_lock_unlock(LOCK) \
+      (pthread_in_use () ? pthread_mutex_unlock (LOCK) : 0)
+#   define glthread_recursive_lock_destroy(LOCK) \
+      (pthread_in_use () ? pthread_mutex_destroy (LOCK) : 0)
+extern int glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock);
+
+#  else
+
+typedef struct
+        {
+          pthread_mutex_t recmutex; /* recursive mutex */
+          pthread_mutex_t guard;    /* protects the initialization */
+          int initialized;
+        }
+        gl_recursive_lock_t;
+#   define gl_recursive_lock_define(STORAGECLASS, NAME) \
+      STORAGECLASS gl_recursive_lock_t NAME;
+#   define gl_recursive_lock_define_initialized(STORAGECLASS, NAME) \
+      STORAGECLASS gl_recursive_lock_t NAME = gl_recursive_lock_initializer;
+#   define gl_recursive_lock_initializer \
+      { PTHREAD_MUTEX_INITIALIZER, PTHREAD_MUTEX_INITIALIZER, 0 }
+#   define glthread_recursive_lock_init(LOCK) \
+      (pthread_in_use () ? glthread_recursive_lock_init_multithreaded (LOCK) : 0)
+#   define glthread_recursive_lock_lock(LOCK) \
+      (pthread_in_use () ? glthread_recursive_lock_lock_multithreaded (LOCK) : 0)
+#   define glthread_recursive_lock_unlock(LOCK) \
+      (pthread_in_use () ? glthread_recursive_lock_unlock_multithreaded (LOCK) : 0)
+#   define glthread_recursive_lock_destroy(LOCK) \
+      (pthread_in_use () ? glthread_recursive_lock_destroy_multithreaded (LOCK) : 0)
+extern int glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock);
+extern int glthread_recursive_lock_lock_multithreaded (gl_recursive_lock_t *lock);
+extern int glthread_recursive_lock_unlock_multithreaded (gl_recursive_lock_t *lock);
+extern int glthread_recursive_lock_destroy_multithreaded (gl_recursive_lock_t *lock);
+
+#  endif
+
+# else
+
+/* Old versions of POSIX threads on Solaris did not have recursive locks.
+   We have to implement them ourselves.  */
+
+typedef struct
+        {
+          pthread_mutex_t mutex;
+          pthread_t owner;
+          unsigned long depth;
+        }
+        gl_recursive_lock_t;
+#  define gl_recursive_lock_define(STORAGECLASS, NAME) \
+     STORAGECLASS gl_recursive_lock_t NAME;
+#  define gl_recursive_lock_define_initialized(STORAGECLASS, NAME) \
+     STORAGECLASS gl_recursive_lock_t NAME = gl_recursive_lock_initializer;
+#  define gl_recursive_lock_initializer \
+     { PTHREAD_MUTEX_INITIALIZER, (pthread_t) 0, 0 }
+#  define glthread_recursive_lock_init(LOCK) \
+     (pthread_in_use () ? glthread_recursive_lock_init_multithreaded (LOCK) : 0)
+#  define glthread_recursive_lock_lock(LOCK) \
+     (pthread_in_use () ? glthread_recursive_lock_lock_multithreaded (LOCK) : 0)
+#  define glthread_recursive_lock_unlock(LOCK) \
+     (pthread_in_use () ? glthread_recursive_lock_unlock_multithreaded (LOCK) : 0)
+#  define glthread_recursive_lock_destroy(LOCK) \
+     (pthread_in_use () ? glthread_recursive_lock_destroy_multithreaded (LOCK) : 0)
+extern int glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock);
+extern int glthread_recursive_lock_lock_multithreaded (gl_recursive_lock_t *lock);
+extern int glthread_recursive_lock_unlock_multithreaded (gl_recursive_lock_t *lock);
+extern int glthread_recursive_lock_destroy_multithreaded (gl_recursive_lock_t *lock);
+
+# endif
+
+/* -------------------------- gl_once_t datatype -------------------------- */
+
+typedef pthread_once_t gl_once_t;
+# define gl_once_define(STORAGECLASS, NAME) \
+    STORAGECLASS pthread_once_t NAME = PTHREAD_ONCE_INIT;
+# define glthread_once(ONCE_CONTROL, INITFUNCTION) \
+    (pthread_in_use ()                                                         \
+     ? pthread_once (ONCE_CONTROL, INITFUNCTION)                               \
+     : (glthread_once_singlethreaded (ONCE_CONTROL) ? (INITFUNCTION (), 0) : 0))
+extern int glthread_once_singlethreaded (pthread_once_t *once_control);
+
+# ifdef __cplusplus
+}
+# endif
+
+#endif
+
+/* ========================================================================= */
+
+#if USE_WINDOWS_THREADS
+
+# define WIN32_LEAN_AND_MEAN  /* avoid including junk */
+# include <windows.h>
+
+# include "windows-mutex.h"
+# include "windows-rwlock.h"
+# include "windows-recmutex.h"
+# include "windows-once.h"
+
+# ifdef __cplusplus
+extern "C" {
+# endif
+
+/* We can use CRITICAL_SECTION directly, rather than the native Windows Event,
+   Mutex, Semaphore types, because
+     - we need only to synchronize inside a single process (address space),
+       not inter-process locking,
+     - we don't need to support trylock operations.  (TryEnterCriticalSection
+       does not work on Windows 95/98/ME.  Packages that need trylock usually
+       define their own mutex type.)  */
+
+/* There is no way to statically initialize a CRITICAL_SECTION.  It needs
+   to be done lazily, once only.  For this we need spinlocks.  */
+
+/* -------------------------- gl_lock_t datatype -------------------------- */
+
+typedef glwthread_mutex_t gl_lock_t;
+# define gl_lock_define(STORAGECLASS, NAME) \
+    STORAGECLASS gl_lock_t NAME;
+# define gl_lock_define_initialized(STORAGECLASS, NAME) \
+    STORAGECLASS gl_lock_t NAME = gl_lock_initializer;
+# define gl_lock_initializer \
+    GLWTHREAD_MUTEX_INIT
+# define glthread_lock_init(LOCK) \
+    (glwthread_mutex_init (LOCK), 0)
+# define glthread_lock_lock(LOCK) \
+    glwthread_mutex_lock (LOCK)
+# define glthread_lock_unlock(LOCK) \
+    glwthread_mutex_unlock (LOCK)
+# define glthread_lock_destroy(LOCK) \
+    glwthread_mutex_destroy (LOCK)
+
+/* ------------------------- gl_rwlock_t datatype ------------------------- */
+
+typedef glwthread_rwlock_t gl_rwlock_t;
+# define gl_rwlock_define(STORAGECLASS, NAME) \
+    STORAGECLASS gl_rwlock_t NAME;
+# define gl_rwlock_define_initialized(STORAGECLASS, NAME) \
+    STORAGECLASS gl_rwlock_t NAME = gl_rwlock_initializer;
+# define gl_rwlock_initializer \
+    GLWTHREAD_RWLOCK_INIT
+# define glthread_rwlock_init(LOCK) \
+    (glwthread_rwlock_init (LOCK), 0)
+# define glthread_rwlock_rdlock(LOCK) \
+    glwthread_rwlock_rdlock (LOCK)
+# define glthread_rwlock_wrlock(LOCK) \
+    glwthread_rwlock_wrlock (LOCK)
+# define glthread_rwlock_unlock(LOCK) \
+    glwthread_rwlock_unlock (LOCK)
+# define glthread_rwlock_destroy(LOCK) \
+    glwthread_rwlock_destroy (LOCK)
+
+/* --------------------- gl_recursive_lock_t datatype --------------------- */
+
+typedef glwthread_recmutex_t gl_recursive_lock_t;
+# define gl_recursive_lock_define(STORAGECLASS, NAME) \
+    STORAGECLASS gl_recursive_lock_t NAME;
+# define gl_recursive_lock_define_initialized(STORAGECLASS, NAME) \
+    STORAGECLASS gl_recursive_lock_t NAME = gl_recursive_lock_initializer;
+# define gl_recursive_lock_initializer \
+    GLWTHREAD_RECMUTEX_INIT
+# define glthread_recursive_lock_init(LOCK) \
+    (glwthread_recmutex_init (LOCK), 0)
+# define glthread_recursive_lock_lock(LOCK) \
+    glwthread_recmutex_lock (LOCK)
+# define glthread_recursive_lock_unlock(LOCK) \
+    glwthread_recmutex_unlock (LOCK)
+# define glthread_recursive_lock_destroy(LOCK) \
+    glwthread_recmutex_destroy (LOCK)
+
+/* -------------------------- gl_once_t datatype -------------------------- */
+
+typedef glwthread_once_t gl_once_t;
+# define gl_once_define(STORAGECLASS, NAME) \
+    STORAGECLASS gl_once_t NAME = GLWTHREAD_ONCE_INIT;
+# define glthread_once(ONCE_CONTROL, INITFUNCTION) \
+    (glwthread_once (ONCE_CONTROL, INITFUNCTION), 0)
+
+# ifdef __cplusplus
+}
+# endif
+
+#endif
+
+/* ========================================================================= */
+
+#if !(USE_POSIX_THREADS || USE_WINDOWS_THREADS)
+
+/* Provide dummy implementation if threads are not supported.  */
+
+/* -------------------------- gl_lock_t datatype -------------------------- */
+
+typedef int gl_lock_t;
+# define gl_lock_define(STORAGECLASS, NAME)
+# define gl_lock_define_initialized(STORAGECLASS, NAME)
+# define glthread_lock_init(NAME) 0
+# define glthread_lock_lock(NAME) 0
+# define glthread_lock_unlock(NAME) 0
+# define glthread_lock_destroy(NAME) 0
+
+/* ------------------------- gl_rwlock_t datatype ------------------------- */
+
+typedef int gl_rwlock_t;
+# define gl_rwlock_define(STORAGECLASS, NAME)
+# define gl_rwlock_define_initialized(STORAGECLASS, NAME)
+# define glthread_rwlock_init(NAME) 0
+# define glthread_rwlock_rdlock(NAME) 0
+# define glthread_rwlock_wrlock(NAME) 0
+# define glthread_rwlock_unlock(NAME) 0
+# define glthread_rwlock_destroy(NAME) 0
+
+/* --------------------- gl_recursive_lock_t datatype --------------------- */
+
+typedef int gl_recursive_lock_t;
+# define gl_recursive_lock_define(STORAGECLASS, NAME)
+# define gl_recursive_lock_define_initialized(STORAGECLASS, NAME)
+# define glthread_recursive_lock_init(NAME) 0
+# define glthread_recursive_lock_lock(NAME) 0
+# define glthread_recursive_lock_unlock(NAME) 0
+# define glthread_recursive_lock_destroy(NAME) 0
+
+/* -------------------------- gl_once_t datatype -------------------------- */
+
+typedef int gl_once_t;
+# define gl_once_define(STORAGECLASS, NAME) \
+    STORAGECLASS gl_once_t NAME = 0;
+# define glthread_once(ONCE_CONTROL, INITFUNCTION) \
+    (*(ONCE_CONTROL) == 0 ? (*(ONCE_CONTROL) = ~ 0, INITFUNCTION (), 0) : 0)
+
+#endif
+
+/* ========================================================================= */
+
+/* Macros with built-in error handling.  */
+
+/* -------------------------- gl_lock_t datatype -------------------------- */
+
+#define gl_lock_init(NAME) \
+   do                                  \
+     {                                 \
+       if (glthread_lock_init (&NAME)) \
+         abort ();                     \
+     }                                 \
+   while (0)
+#define gl_lock_lock(NAME) \
+   do                                  \
+     {                                 \
+       if (glthread_lock_lock (&NAME)) \
+         abort ();                     \
+     }                                 \
+   while (0)
+#define gl_lock_unlock(NAME) \
+   do                                    \
+     {                                   \
+       if (glthread_lock_unlock (&NAME)) \
+         abort ();                       \
+     }                                   \
+   while (0)
+#define gl_lock_destroy(NAME) \
+   do                                     \
+     {                                    \
+       if (glthread_lock_destroy (&NAME)) \
+         abort ();                        \
+     }                                    \
+   while (0)
+
+/* ------------------------- gl_rwlock_t datatype ------------------------- */
+
+#define gl_rwlock_init(NAME) \
+   do                                    \
+     {                                   \
+       if (glthread_rwlock_init (&NAME)) \
+         abort ();                       \
+     }                                   \
+   while (0)
+#define gl_rwlock_rdlock(NAME) \
+   do                                      \
+     {                                     \
+       if (glthread_rwlock_rdlock (&NAME)) \
+         abort ();                         \
+     }                                     \
+   while (0)
+#define gl_rwlock_wrlock(NAME) \
+   do                                      \
+     {                                     \
+       if (glthread_rwlock_wrlock (&NAME)) \
+         abort ();                         \
+     }                                     \
+   while (0)
+#define gl_rwlock_unlock(NAME) \
+   do                                      \
+     {                                     \
+       if (glthread_rwlock_unlock (&NAME)) \
+         abort ();                         \
+     }                                     \
+   while (0)
+#define gl_rwlock_destroy(NAME) \
+   do                                       \
+     {                                      \
+       if (glthread_rwlock_destroy (&NAME)) \
+         abort ();                          \
+     }                                      \
+   while (0)
+
+/* --------------------- gl_recursive_lock_t datatype --------------------- */
+
+#define gl_recursive_lock_init(NAME) \
+   do                                            \
+     {                                           \
+       if (glthread_recursive_lock_init (&NAME)) \
+         abort ();                               \
+     }                                           \
+   while (0)
+#define gl_recursive_lock_lock(NAME) \
+   do                                            \
+     {                                           \
+       if (glthread_recursive_lock_lock (&NAME)) \
+         abort ();                               \
+     }                                           \
+   while (0)
+#define gl_recursive_lock_unlock(NAME) \
+   do                                              \
+     {                                             \
+       if (glthread_recursive_lock_unlock (&NAME)) \
+         abort ();                                 \
+     }                                             \
+   while (0)
+#define gl_recursive_lock_destroy(NAME) \
+   do                                               \
+     {                                              \
+       if (glthread_recursive_lock_destroy (&NAME)) \
+         abort ();                                  \
+     }                                              \
+   while (0)
+
+/* -------------------------- gl_once_t datatype -------------------------- */
+
+#define gl_once(NAME, INITFUNCTION) \
+   do                                           \
+     {                                          \
+       if (glthread_once (&NAME, INITFUNCTION)) \
+         abort ();                              \
+     }                                          \
+   while (0)
+
+/* ========================================================================= */
+
+#endif /* _LOCK_H */
diff --git a/gnulib-lib/glthread/threadlib.c b/gnulib-lib/glthread/threadlib.c
new file mode 100644 (file)
index 0000000..a5ebd9b
--- /dev/null
@@ -0,0 +1,73 @@
+/* Multithreading primitives.
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.  */
+
+#include <config.h>
+
+/* ========================================================================= */
+
+#if USE_POSIX_THREADS
+
+/* Use the POSIX threads library.  */
+
+# include <pthread.h>
+# include <stdlib.h>
+
+# if PTHREAD_IN_USE_DETECTION_HARD
+
+/* The function to be executed by a dummy thread.  */
+static void *
+dummy_thread_func (void *arg)
+{
+  return arg;
+}
+
+int
+glthread_in_use (void)
+{
+  static int tested;
+  static int result; /* 1: linked with -lpthread, 0: only with libc */
+
+  if (!tested)
+    {
+      pthread_t thread;
+
+      if (pthread_create (&thread, NULL, dummy_thread_func, NULL) != 0)
+        /* Thread creation failed.  */
+        result = 0;
+      else
+        {
+          /* Thread creation works.  */
+          void *retval;
+          if (pthread_join (thread, &retval) != 0)
+            abort ();
+          result = 1;
+        }
+      tested = 1;
+    }
+  return result;
+}
+
+# endif
+
+#endif
+
+/* ========================================================================= */
+
+/* This declaration is solely to ensure that after preprocessing
+   this file is never empty.  */
+typedef int dummy;
diff --git a/gnulib-lib/limits.in.h b/gnulib-lib/limits.in.h
new file mode 100644 (file)
index 0000000..39750b3
--- /dev/null
@@ -0,0 +1,104 @@
+/* A GNU-like <limits.h>.
+
+   Copyright 2016-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or
+   modify it under the terms of the GNU General Public License
+   as published by the Free Software Foundation; either version 3, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+#ifndef _@GUARD_PREFIX@_LIMITS_H
+
+#if __GNUC__ >= 3
+@PRAGMA_SYSTEM_HEADER@
+#endif
+@PRAGMA_COLUMNS@
+
+/* The include_next requires a split double-inclusion guard.  */
+#@INCLUDE_NEXT@ @NEXT_LIMITS_H@
+
+#ifndef _@GUARD_PREFIX@_LIMITS_H
+#define _@GUARD_PREFIX@_LIMITS_H
+
+#ifndef LLONG_MIN
+# if defined LONG_LONG_MIN /* HP-UX 11.31 */
+#  define LLONG_MIN LONG_LONG_MIN
+# elif defined LONGLONG_MIN /* IRIX 6.5 */
+#  define LLONG_MIN LONGLONG_MIN
+# elif defined __GNUC__
+#  define LLONG_MIN (- __LONG_LONG_MAX__ - 1LL)
+# endif
+#endif
+#ifndef LLONG_MAX
+# if defined LONG_LONG_MAX /* HP-UX 11.31 */
+#  define LLONG_MAX LONG_LONG_MAX
+# elif defined LONGLONG_MAX /* IRIX 6.5 */
+#  define LLONG_MAX LONGLONG_MAX
+# elif defined __GNUC__
+#  define LLONG_MAX __LONG_LONG_MAX__
+# endif
+#endif
+#ifndef ULLONG_MAX
+# if defined ULONG_LONG_MAX /* HP-UX 11.31 */
+#  define ULLONG_MAX ULONG_LONG_MAX
+# elif defined ULONGLONG_MAX /* IRIX 6.5 */
+#  define ULLONG_MAX ULONGLONG_MAX
+# elif defined __GNUC__
+#  define ULLONG_MAX (__LONG_LONG_MAX__ * 2ULL + 1ULL)
+# endif
+#endif
+
+/* The number of usable bits in an unsigned or signed integer type
+   with minimum value MIN and maximum value MAX, as an int expression
+   suitable in #if.  Cover all known practical hosts.  This
+   implementation exploits the fact that MAX is 1 less than a power of
+   2, and merely counts the number of 1 bits in MAX; "COBn" means
+   "count the number of 1 bits in the low-order n bits").  */
+#define _GL_INTEGER_WIDTH(min, max) (((min) < 0) + _GL_COB128 (max))
+#define _GL_COB128(n) (_GL_COB64 ((n) >> 31 >> 31 >> 2) + _GL_COB64 (n))
+#define _GL_COB64(n) (_GL_COB32 ((n) >> 31 >> 1) + _GL_COB32 (n))
+#define _GL_COB32(n) (_GL_COB16 ((n) >> 16) + _GL_COB16 (n))
+#define _GL_COB16(n) (_GL_COB8 ((n) >> 8) + _GL_COB8 (n))
+#define _GL_COB8(n) (_GL_COB4 ((n) >> 4) + _GL_COB4 (n))
+#define _GL_COB4(n) (!!((n) & 8) + !!((n) & 4) + !!((n) & 2) + !!((n) & 1))
+
+#ifndef WORD_BIT
+/* Assume 'int' is 32 bits wide.  */
+# define WORD_BIT 32
+#endif
+#ifndef LONG_BIT
+/* Assume 'long' is 32 or 64 bits wide.  */
+# if LONG_MAX == INT_MAX
+#  define LONG_BIT 32
+# else
+#  define LONG_BIT 64
+# endif
+#endif
+
+/* Macros specified by ISO/IEC TS 18661-1:2014.  */
+
+#if (! defined ULLONG_WIDTH                                             \
+     && (defined _GNU_SOURCE || defined __STDC_WANT_IEC_60559_BFP_EXT__))
+# define CHAR_WIDTH _GL_INTEGER_WIDTH (CHAR_MIN, CHAR_MAX)
+# define SCHAR_WIDTH _GL_INTEGER_WIDTH (SCHAR_MIN, SCHAR_MAX)
+# define UCHAR_WIDTH _GL_INTEGER_WIDTH (0, UCHAR_MAX)
+# define SHRT_WIDTH _GL_INTEGER_WIDTH (SHRT_MIN, SHRT_MAX)
+# define USHRT_WIDTH _GL_INTEGER_WIDTH (0, USHRT_MAX)
+# define INT_WIDTH _GL_INTEGER_WIDTH (INT_MIN, INT_MAX)
+# define UINT_WIDTH _GL_INTEGER_WIDTH (0, UINT_MAX)
+# define LONG_WIDTH _GL_INTEGER_WIDTH (LONG_MIN, LONG_MAX)
+# define ULONG_WIDTH _GL_INTEGER_WIDTH (0, ULONG_MAX)
+# define LLONG_WIDTH _GL_INTEGER_WIDTH (LLONG_MIN, LLONG_MAX)
+# define ULLONG_WIDTH _GL_INTEGER_WIDTH (0, ULLONG_MAX)
+#endif /* !ULLONG_WIDTH && (_GNU_SOURCE || __STDC_WANT_IEC_60559_BFP_EXT__) */
+
+#endif /* _@GUARD_PREFIX@_LIMITS_H */
+#endif /* _@GUARD_PREFIX@_LIMITS_H */
diff --git a/gnulib-lib/stdint.in.h b/gnulib-lib/stdint.in.h
new file mode 100644 (file)
index 0000000..21dd8d2
--- /dev/null
@@ -0,0 +1,726 @@
+/* Copyright (C) 2001-2002, 2004-2019 Free Software Foundation, Inc.
+   Written by Paul Eggert, Bruno Haible, Sam Steingold, Peter Burwood.
+   This file is part of gnulib.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/*
+ * ISO C 99 <stdint.h> for platforms that lack it.
+ * <http://www.opengroup.org/susv3xbd/stdint.h.html>
+ */
+
+#ifndef _@GUARD_PREFIX@_STDINT_H
+
+#if __GNUC__ >= 3
+@PRAGMA_SYSTEM_HEADER@
+#endif
+@PRAGMA_COLUMNS@
+
+/* When including a system file that in turn includes <inttypes.h>,
+   use the system <inttypes.h>, not our substitute.  This avoids
+   problems with (for example) VMS, whose <sys/bitypes.h> includes
+   <inttypes.h>.  */
+#define _GL_JUST_INCLUDE_SYSTEM_INTTYPES_H
+
+/* On Android (Bionic libc), <sys/types.h> includes this file before
+   having defined 'time_t'.  Therefore in this case avoid including
+   other system header files; just include the system's <stdint.h>.
+   Ideally we should test __BIONIC__ here, but it is only defined after
+   <sys/cdefs.h> has been included; hence test __ANDROID__ instead.  */
+#if defined __ANDROID__ && defined _GL_INCLUDING_SYS_TYPES_H
+# @INCLUDE_NEXT@ @NEXT_STDINT_H@
+#else
+
+/* Get those types that are already defined in other system include
+   files, so that we can "#define int8_t signed char" below without
+   worrying about a later system include file containing a "typedef
+   signed char int8_t;" that will get messed up by our macro.  Our
+   macros should all be consistent with the system versions, except
+   for the "fast" types and macros, which we recommend against using
+   in public interfaces due to compiler differences.  */
+
+#if @HAVE_STDINT_H@
+# if defined __sgi && ! defined __c99
+   /* Bypass IRIX's <stdint.h> if in C89 mode, since it merely annoys users
+      with "This header file is to be used only for c99 mode compilations"
+      diagnostics.  */
+#  define __STDINT_H__
+# endif
+
+  /* Some pre-C++11 <stdint.h> implementations need this.  */
+# ifdef __cplusplus
+#  ifndef __STDC_CONSTANT_MACROS
+#   define __STDC_CONSTANT_MACROS 1
+#  endif
+#  ifndef __STDC_LIMIT_MACROS
+#   define __STDC_LIMIT_MACROS 1
+#  endif
+# endif
+
+  /* Other systems may have an incomplete or buggy <stdint.h>.
+     Include it before <inttypes.h>, since any "#include <stdint.h>"
+     in <inttypes.h> would reinclude us, skipping our contents because
+     _@GUARD_PREFIX@_STDINT_H is defined.
+     The include_next requires a split double-inclusion guard.  */
+# @INCLUDE_NEXT@ @NEXT_STDINT_H@
+#endif
+
+#if ! defined _@GUARD_PREFIX@_STDINT_H && ! defined _GL_JUST_INCLUDE_SYSTEM_STDINT_H
+#define _@GUARD_PREFIX@_STDINT_H
+
+/* Get SCHAR_MIN, SCHAR_MAX, UCHAR_MAX, INT_MIN, INT_MAX,
+   LONG_MIN, LONG_MAX, ULONG_MAX, _GL_INTEGER_WIDTH.  */
+#include <limits.h>
+
+/* Override WINT_MIN and WINT_MAX if gnulib's <wchar.h> or <wctype.h> overrides
+   wint_t.  */
+#if @GNULIB_OVERRIDES_WINT_T@
+# undef WINT_MIN
+# undef WINT_MAX
+# define WINT_MIN 0x0U
+# define WINT_MAX 0xffffffffU
+#endif
+
+#if ! @HAVE_C99_STDINT_H@
+
+/* <sys/types.h> defines some of the stdint.h types as well, on glibc,
+   IRIX 6.5, and OpenBSD 3.8 (via <machine/types.h>).
+   AIX 5.2 <sys/types.h> isn't needed and causes troubles.
+   Mac OS X 10.4.6 <sys/types.h> includes <stdint.h> (which is us), but
+   relies on the system <stdint.h> definitions, so include
+   <sys/types.h> after @NEXT_STDINT_H@.  */
+# if @HAVE_SYS_TYPES_H@ && ! defined _AIX
+#  include <sys/types.h>
+# endif
+
+# if @HAVE_INTTYPES_H@
+  /* In OpenBSD 3.8, <inttypes.h> includes <machine/types.h>, which defines
+     int{8,16,32,64}_t, uint{8,16,32,64}_t and __BIT_TYPES_DEFINED__.
+     <inttypes.h> also defines intptr_t and uintptr_t.  */
+#  include <inttypes.h>
+# elif @HAVE_SYS_INTTYPES_H@
+  /* Solaris 7 <sys/inttypes.h> has the types except the *_fast*_t types, and
+     the macros except for *_FAST*_*, INTPTR_MIN, PTRDIFF_MIN, PTRDIFF_MAX.  */
+#  include <sys/inttypes.h>
+# endif
+
+# if @HAVE_SYS_BITYPES_H@ && ! defined __BIT_TYPES_DEFINED__
+  /* Linux libc4 >= 4.6.7 and libc5 have a <sys/bitypes.h> that defines
+     int{8,16,32,64}_t and __BIT_TYPES_DEFINED__.  In libc5 >= 5.2.2 it is
+     included by <sys/types.h>.  */
+#  include <sys/bitypes.h>
+# endif
+
+# undef _GL_JUST_INCLUDE_SYSTEM_INTTYPES_H
+
+/* Minimum and maximum values for an integer type under the usual assumption.
+   Return an unspecified value if BITS == 0, adding a check to pacify
+   picky compilers.  */
+
+/* These are separate macros, because if you try to merge these macros into
+   a single one, HP-UX cc rejects the resulting expression in constant
+   expressions.  */
+# define _STDINT_UNSIGNED_MIN(bits, zero) \
+    (zero)
+# define _STDINT_SIGNED_MIN(bits, zero) \
+    (~ _STDINT_MAX (1, bits, zero))
+
+# define _STDINT_MAX(signed, bits, zero) \
+    (((((zero) + 1) << ((bits) ? (bits) - 1 - (signed) : 0)) - 1) * 2 + 1)
+
+#if !GNULIB_defined_stdint_types
+
+/* 7.18.1.1. Exact-width integer types */
+
+/* Here we assume a standard architecture where the hardware integer
+   types have 8, 16, 32, optionally 64 bits.  */
+
+# undef int8_t
+# undef uint8_t
+typedef signed char gl_int8_t;
+typedef unsigned char gl_uint8_t;
+# define int8_t gl_int8_t
+# define uint8_t gl_uint8_t
+
+# undef int16_t
+# undef uint16_t
+typedef short int gl_int16_t;
+typedef unsigned short int gl_uint16_t;
+# define int16_t gl_int16_t
+# define uint16_t gl_uint16_t
+
+# undef int32_t
+# undef uint32_t
+typedef int gl_int32_t;
+typedef unsigned int gl_uint32_t;
+# define int32_t gl_int32_t
+# define uint32_t gl_uint32_t
+
+/* If the system defines INT64_MAX, assume int64_t works.  That way,
+   if the underlying platform defines int64_t to be a 64-bit long long
+   int, the code below won't mistakenly define it to be a 64-bit long
+   int, which would mess up C++ name mangling.  We must use #ifdef
+   rather than #if, to avoid an error with HP-UX 10.20 cc.  */
+
+# ifdef INT64_MAX
+#  define GL_INT64_T
+# else
+/* Do not undefine int64_t if gnulib is not being used with 64-bit
+   types, since otherwise it breaks platforms like Tandem/NSK.  */
+#  if LONG_MAX >> 31 >> 31 == 1
+#   undef int64_t
+typedef long int gl_int64_t;
+#   define int64_t gl_int64_t
+#   define GL_INT64_T
+#  elif defined _MSC_VER
+#   undef int64_t
+typedef __int64 gl_int64_t;
+#   define int64_t gl_int64_t
+#   define GL_INT64_T
+#  elif @HAVE_LONG_LONG_INT@
+#   undef int64_t
+typedef long long int gl_int64_t;
+#   define int64_t gl_int64_t
+#   define GL_INT64_T
+#  endif
+# endif
+
+# ifdef UINT64_MAX
+#  define GL_UINT64_T
+# else
+#  if ULONG_MAX >> 31 >> 31 >> 1 == 1
+#   undef uint64_t
+typedef unsigned long int gl_uint64_t;
+#   define uint64_t gl_uint64_t
+#   define GL_UINT64_T
+#  elif defined _MSC_VER
+#   undef uint64_t
+typedef unsigned __int64 gl_uint64_t;
+#   define uint64_t gl_uint64_t
+#   define GL_UINT64_T
+#  elif @HAVE_UNSIGNED_LONG_LONG_INT@
+#   undef uint64_t
+typedef unsigned long long int gl_uint64_t;
+#   define uint64_t gl_uint64_t
+#   define GL_UINT64_T
+#  endif
+# endif
+
+/* Avoid collision with Solaris 2.5.1 <pthread.h> etc.  */
+# define _UINT8_T
+# define _UINT32_T
+# define _UINT64_T
+
+
+/* 7.18.1.2. Minimum-width integer types */
+
+/* Here we assume a standard architecture where the hardware integer
+   types have 8, 16, 32, optionally 64 bits. Therefore the leastN_t types
+   are the same as the corresponding N_t types.  */
+
+# undef int_least8_t
+# undef uint_least8_t
+# undef int_least16_t
+# undef uint_least16_t
+# undef int_least32_t
+# undef uint_least32_t
+# undef int_least64_t
+# undef uint_least64_t
+# define int_least8_t int8_t
+# define uint_least8_t uint8_t
+# define int_least16_t int16_t
+# define uint_least16_t uint16_t
+# define int_least32_t int32_t
+# define uint_least32_t uint32_t
+# ifdef GL_INT64_T
+#  define int_least64_t int64_t
+# endif
+# ifdef GL_UINT64_T
+#  define uint_least64_t uint64_t
+# endif
+
+/* 7.18.1.3. Fastest minimum-width integer types */
+
+/* Note: Other <stdint.h> substitutes may define these types differently.
+   It is not recommended to use these types in public header files. */
+
+/* Here we assume a standard architecture where the hardware integer
+   types have 8, 16, 32, optionally 64 bits. Therefore the fastN_t types
+   are taken from the same list of types.  The following code normally
+   uses types consistent with glibc, as that lessens the chance of
+   incompatibility with older GNU hosts.  */
+
+# undef int_fast8_t
+# undef uint_fast8_t
+# undef int_fast16_t
+# undef uint_fast16_t
+# undef int_fast32_t
+# undef uint_fast32_t
+# undef int_fast64_t
+# undef uint_fast64_t
+typedef signed char gl_int_fast8_t;
+typedef unsigned char gl_uint_fast8_t;
+
+# ifdef __sun
+/* Define types compatible with SunOS 5.10, so that code compiled under
+   earlier SunOS versions works with code compiled under SunOS 5.10.  */
+typedef int gl_int_fast32_t;
+typedef unsigned int gl_uint_fast32_t;
+# else
+typedef long int gl_int_fast32_t;
+typedef unsigned long int gl_uint_fast32_t;
+# endif
+typedef gl_int_fast32_t gl_int_fast16_t;
+typedef gl_uint_fast32_t gl_uint_fast16_t;
+
+# define int_fast8_t gl_int_fast8_t
+# define uint_fast8_t gl_uint_fast8_t
+# define int_fast16_t gl_int_fast16_t
+# define uint_fast16_t gl_uint_fast16_t
+# define int_fast32_t gl_int_fast32_t
+# define uint_fast32_t gl_uint_fast32_t
+# ifdef GL_INT64_T
+#  define int_fast64_t int64_t
+# endif
+# ifdef GL_UINT64_T
+#  define uint_fast64_t uint64_t
+# endif
+
+/* 7.18.1.4. Integer types capable of holding object pointers */
+
+/* kLIBC's stdint.h defines _INTPTR_T_DECLARED and needs its own
+   definitions of intptr_t and uintptr_t (which use int and unsigned)
+   to avoid clashes with declarations of system functions like sbrk.  */
+# ifndef _INTPTR_T_DECLARED
+# undef intptr_t
+# undef uintptr_t
+typedef long int gl_intptr_t;
+typedef unsigned long int gl_uintptr_t;
+# define intptr_t gl_intptr_t
+# define uintptr_t gl_uintptr_t
+# endif
+
+/* 7.18.1.5. Greatest-width integer types */
+
+/* Note: These types are compiler dependent. It may be unwise to use them in
+   public header files. */
+
+/* If the system defines INTMAX_MAX, assume that intmax_t works, and
+   similarly for UINTMAX_MAX and uintmax_t.  This avoids problems with
+   assuming one type where another is used by the system.  */
+
+# ifndef INTMAX_MAX
+#  undef INTMAX_C
+#  undef intmax_t
+#  if @HAVE_LONG_LONG_INT@ && LONG_MAX >> 30 == 1
+typedef long long int gl_intmax_t;
+#   define intmax_t gl_intmax_t
+#  elif defined GL_INT64_T
+#   define intmax_t int64_t
+#  else
+typedef long int gl_intmax_t;
+#   define intmax_t gl_intmax_t
+#  endif
+# endif
+
+# ifndef UINTMAX_MAX
+#  undef UINTMAX_C
+#  undef uintmax_t
+#  if @HAVE_UNSIGNED_LONG_LONG_INT@ && ULONG_MAX >> 31 == 1
+typedef unsigned long long int gl_uintmax_t;
+#   define uintmax_t gl_uintmax_t
+#  elif defined GL_UINT64_T
+#   define uintmax_t uint64_t
+#  else
+typedef unsigned long int gl_uintmax_t;
+#   define uintmax_t gl_uintmax_t
+#  endif
+# endif
+
+/* Verify that intmax_t and uintmax_t have the same size.  Too much code
+   breaks if this is not the case.  If this check fails, the reason is likely
+   to be found in the autoconf macros.  */
+typedef int _verify_intmax_size[sizeof (intmax_t) == sizeof (uintmax_t)
+                                ? 1 : -1];
+
+# define GNULIB_defined_stdint_types 1
+# endif /* !GNULIB_defined_stdint_types */
+
+/* 7.18.2. Limits of specified-width integer types */
+
+/* 7.18.2.1. Limits of exact-width integer types */
+
+/* Here we assume a standard architecture where the hardware integer
+   types have 8, 16, 32, optionally 64 bits.  */
+
+# undef INT8_MIN
+# undef INT8_MAX
+# undef UINT8_MAX
+# define INT8_MIN  (~ INT8_MAX)
+# define INT8_MAX  127
+# define UINT8_MAX  255
+
+# undef INT16_MIN
+# undef INT16_MAX
+# undef UINT16_MAX
+# define INT16_MIN  (~ INT16_MAX)
+# define INT16_MAX  32767
+# define UINT16_MAX  65535
+
+# undef INT32_MIN
+# undef INT32_MAX
+# undef UINT32_MAX
+# define INT32_MIN  (~ INT32_MAX)
+# define INT32_MAX  2147483647
+# define UINT32_MAX  4294967295U
+
+# if defined GL_INT64_T && ! defined INT64_MAX
+/* Prefer (- INTMAX_C (1) << 63) over (~ INT64_MAX) because SunPRO C 5.0
+   evaluates the latter incorrectly in preprocessor expressions.  */
+#  define INT64_MIN  (- INTMAX_C (1) << 63)
+#  define INT64_MAX  INTMAX_C (9223372036854775807)
+# endif
+
+# if defined GL_UINT64_T && ! defined UINT64_MAX
+#  define UINT64_MAX  UINTMAX_C (18446744073709551615)
+# endif
+
+/* 7.18.2.2. Limits of minimum-width integer types */
+
+/* Here we assume a standard architecture where the hardware integer
+   types have 8, 16, 32, optionally 64 bits. Therefore the leastN_t types
+   are the same as the corresponding N_t types.  */
+
+# undef INT_LEAST8_MIN
+# undef INT_LEAST8_MAX
+# undef UINT_LEAST8_MAX
+# define INT_LEAST8_MIN  INT8_MIN
+# define INT_LEAST8_MAX  INT8_MAX
+# define UINT_LEAST8_MAX  UINT8_MAX
+
+# undef INT_LEAST16_MIN
+# undef INT_LEAST16_MAX
+# undef UINT_LEAST16_MAX
+# define INT_LEAST16_MIN  INT16_MIN
+# define INT_LEAST16_MAX  INT16_MAX
+# define UINT_LEAST16_MAX  UINT16_MAX
+
+# undef INT_LEAST32_MIN
+# undef INT_LEAST32_MAX
+# undef UINT_LEAST32_MAX
+# define INT_LEAST32_MIN  INT32_MIN
+# define INT_LEAST32_MAX  INT32_MAX
+# define UINT_LEAST32_MAX  UINT32_MAX
+
+# undef INT_LEAST64_MIN
+# undef INT_LEAST64_MAX
+# ifdef GL_INT64_T
+#  define INT_LEAST64_MIN  INT64_MIN
+#  define INT_LEAST64_MAX  INT64_MAX
+# endif
+
+# undef UINT_LEAST64_MAX
+# ifdef GL_UINT64_T
+#  define UINT_LEAST64_MAX  UINT64_MAX
+# endif
+
+/* 7.18.2.3. Limits of fastest minimum-width integer types */
+
+/* Here we assume a standard architecture where the hardware integer
+   types have 8, 16, 32, optionally 64 bits. Therefore the fastN_t types
+   are taken from the same list of types.  */
+
+# undef INT_FAST8_MIN
+# undef INT_FAST8_MAX
+# undef UINT_FAST8_MAX
+# define INT_FAST8_MIN  SCHAR_MIN
+# define INT_FAST8_MAX  SCHAR_MAX
+# define UINT_FAST8_MAX  UCHAR_MAX
+
+# undef INT_FAST16_MIN
+# undef INT_FAST16_MAX
+# undef UINT_FAST16_MAX
+# define INT_FAST16_MIN  INT_FAST32_MIN
+# define INT_FAST16_MAX  INT_FAST32_MAX
+# define UINT_FAST16_MAX  UINT_FAST32_MAX
+
+# undef INT_FAST32_MIN
+# undef INT_FAST32_MAX
+# undef UINT_FAST32_MAX
+# ifdef __sun
+#  define INT_FAST32_MIN  INT_MIN
+#  define INT_FAST32_MAX  INT_MAX
+#  define UINT_FAST32_MAX  UINT_MAX
+# else
+#  define INT_FAST32_MIN  LONG_MIN
+#  define INT_FAST32_MAX  LONG_MAX
+#  define UINT_FAST32_MAX  ULONG_MAX
+# endif
+
+# undef INT_FAST64_MIN
+# undef INT_FAST64_MAX
+# ifdef GL_INT64_T
+#  define INT_FAST64_MIN  INT64_MIN
+#  define INT_FAST64_MAX  INT64_MAX
+# endif
+
+# undef UINT_FAST64_MAX
+# ifdef GL_UINT64_T
+#  define UINT_FAST64_MAX  UINT64_MAX
+# endif
+
+/* 7.18.2.4. Limits of integer types capable of holding object pointers */
+
+# undef INTPTR_MIN
+# undef INTPTR_MAX
+# undef UINTPTR_MAX
+# define INTPTR_MIN  LONG_MIN
+# define INTPTR_MAX  LONG_MAX
+# define UINTPTR_MAX  ULONG_MAX
+
+/* 7.18.2.5. Limits of greatest-width integer types */
+
+# ifndef INTMAX_MAX
+#  undef INTMAX_MIN
+#  ifdef INT64_MAX
+#   define INTMAX_MIN  INT64_MIN
+#   define INTMAX_MAX  INT64_MAX
+#  else
+#   define INTMAX_MIN  INT32_MIN
+#   define INTMAX_MAX  INT32_MAX
+#  endif
+# endif
+
+# ifndef UINTMAX_MAX
+#  ifdef UINT64_MAX
+#   define UINTMAX_MAX  UINT64_MAX
+#  else
+#   define UINTMAX_MAX  UINT32_MAX
+#  endif
+# endif
+
+/* 7.18.3. Limits of other integer types */
+
+/* ptrdiff_t limits */
+# undef PTRDIFF_MIN
+# undef PTRDIFF_MAX
+# if @APPLE_UNIVERSAL_BUILD@
+#  ifdef _LP64
+#   define PTRDIFF_MIN  _STDINT_SIGNED_MIN (64, 0l)
+#   define PTRDIFF_MAX  _STDINT_MAX (1, 64, 0l)
+#  else
+#   define PTRDIFF_MIN  _STDINT_SIGNED_MIN (32, 0)
+#   define PTRDIFF_MAX  _STDINT_MAX (1, 32, 0)
+#  endif
+# else
+#  define PTRDIFF_MIN  \
+    _STDINT_SIGNED_MIN (@BITSIZEOF_PTRDIFF_T@, 0@PTRDIFF_T_SUFFIX@)
+#  define PTRDIFF_MAX  \
+    _STDINT_MAX (1, @BITSIZEOF_PTRDIFF_T@, 0@PTRDIFF_T_SUFFIX@)
+# endif
+
+/* sig_atomic_t limits */
+# undef SIG_ATOMIC_MIN
+# undef SIG_ATOMIC_MAX
+# if @HAVE_SIGNED_SIG_ATOMIC_T@
+#  define SIG_ATOMIC_MIN  \
+    _STDINT_SIGNED_MIN (@BITSIZEOF_SIG_ATOMIC_T@, 0@SIG_ATOMIC_T_SUFFIX@)
+# else
+#  define SIG_ATOMIC_MIN  \
+    _STDINT_UNSIGNED_MIN (@BITSIZEOF_SIG_ATOMIC_T@, 0@SIG_ATOMIC_T_SUFFIX@)
+# endif
+# define SIG_ATOMIC_MAX  \
+   _STDINT_MAX (@HAVE_SIGNED_SIG_ATOMIC_T@, @BITSIZEOF_SIG_ATOMIC_T@, \
+                0@SIG_ATOMIC_T_SUFFIX@)
+
+
+/* size_t limit */
+# undef SIZE_MAX
+# if @APPLE_UNIVERSAL_BUILD@
+#  ifdef _LP64
+#   define SIZE_MAX  _STDINT_MAX (0, 64, 0ul)
+#  else
+#   define SIZE_MAX  _STDINT_MAX (0, 32, 0ul)
+#  endif
+# else
+#  define SIZE_MAX  _STDINT_MAX (0, @BITSIZEOF_SIZE_T@, 0@SIZE_T_SUFFIX@)
+# endif
+
+/* wchar_t limits */
+/* Get WCHAR_MIN, WCHAR_MAX.
+   This include is not on the top, above, because on OSF/1 4.0 we have a
+   sequence of nested includes
+   <wchar.h> -> <stdio.h> -> <getopt.h> -> <stdlib.h>, and the latter includes
+   <stdint.h> and assumes its types are already defined.  */
+# if @HAVE_WCHAR_H@ && ! (defined WCHAR_MIN && defined WCHAR_MAX)
+  /* BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+     included before <wchar.h>.  */
+#  include <stddef.h>
+#  include <stdio.h>
+#  include <time.h>
+#  define _GL_JUST_INCLUDE_SYSTEM_WCHAR_H
+#  include <wchar.h>
+#  undef _GL_JUST_INCLUDE_SYSTEM_WCHAR_H
+# endif
+# undef WCHAR_MIN
+# undef WCHAR_MAX
+# if @HAVE_SIGNED_WCHAR_T@
+#  define WCHAR_MIN  \
+    _STDINT_SIGNED_MIN (@BITSIZEOF_WCHAR_T@, 0@WCHAR_T_SUFFIX@)
+# else
+#  define WCHAR_MIN  \
+    _STDINT_UNSIGNED_MIN (@BITSIZEOF_WCHAR_T@, 0@WCHAR_T_SUFFIX@)
+# endif
+# define WCHAR_MAX  \
+   _STDINT_MAX (@HAVE_SIGNED_WCHAR_T@, @BITSIZEOF_WCHAR_T@, 0@WCHAR_T_SUFFIX@)
+
+/* wint_t limits */
+# undef WINT_MIN
+# undef WINT_MAX
+# if @HAVE_SIGNED_WINT_T@
+#  define WINT_MIN  \
+    _STDINT_SIGNED_MIN (@BITSIZEOF_WINT_T@, 0@WINT_T_SUFFIX@)
+# else
+#  define WINT_MIN  \
+    _STDINT_UNSIGNED_MIN (@BITSIZEOF_WINT_T@, 0@WINT_T_SUFFIX@)
+# endif
+# define WINT_MAX  \
+   _STDINT_MAX (@HAVE_SIGNED_WINT_T@, @BITSIZEOF_WINT_T@, 0@WINT_T_SUFFIX@)
+
+/* 7.18.4. Macros for integer constants */
+
+/* 7.18.4.1. Macros for minimum-width integer constants */
+/* According to ISO C 99 Technical Corrigendum 1 */
+
+/* Here we assume a standard architecture where the hardware integer
+   types have 8, 16, 32, optionally 64 bits, and int is 32 bits.  */
+
+# undef INT8_C
+# undef UINT8_C
+# define INT8_C(x) x
+# define UINT8_C(x) x
+
+# undef INT16_C
+# undef UINT16_C
+# define INT16_C(x) x
+# define UINT16_C(x) x
+
+# undef INT32_C
+# undef UINT32_C
+# define INT32_C(x) x
+# define UINT32_C(x) x ## U
+
+# undef INT64_C
+# undef UINT64_C
+# if LONG_MAX >> 31 >> 31 == 1
+#  define INT64_C(x) x##L
+# elif defined _MSC_VER
+#  define INT64_C(x) x##i64
+# elif @HAVE_LONG_LONG_INT@
+#  define INT64_C(x) x##LL
+# endif
+# if ULONG_MAX >> 31 >> 31 >> 1 == 1
+#  define UINT64_C(x) x##UL
+# elif defined _MSC_VER
+#  define UINT64_C(x) x##ui64
+# elif @HAVE_UNSIGNED_LONG_LONG_INT@
+#  define UINT64_C(x) x##ULL
+# endif
+
+/* 7.18.4.2. Macros for greatest-width integer constants */
+
+# ifndef INTMAX_C
+#  if @HAVE_LONG_LONG_INT@ && LONG_MAX >> 30 == 1
+#   define INTMAX_C(x)   x##LL
+#  elif defined GL_INT64_T
+#   define INTMAX_C(x)   INT64_C(x)
+#  else
+#   define INTMAX_C(x)   x##L
+#  endif
+# endif
+
+# ifndef UINTMAX_C
+#  if @HAVE_UNSIGNED_LONG_LONG_INT@ && ULONG_MAX >> 31 == 1
+#   define UINTMAX_C(x)  x##ULL
+#  elif defined GL_UINT64_T
+#   define UINTMAX_C(x)  UINT64_C(x)
+#  else
+#   define UINTMAX_C(x)  x##UL
+#  endif
+# endif
+
+#endif /* !@HAVE_C99_STDINT_H@ */
+
+/* Macros specified by ISO/IEC TS 18661-1:2014.  */
+
+#if (!defined UINTMAX_WIDTH \
+     && (defined _GNU_SOURCE || defined __STDC_WANT_IEC_60559_BFP_EXT__))
+# ifdef INT8_MAX
+#  define INT8_WIDTH _GL_INTEGER_WIDTH (INT8_MIN, INT8_MAX)
+# endif
+# ifdef UINT8_MAX
+#  define UINT8_WIDTH _GL_INTEGER_WIDTH (0, UINT8_MAX)
+# endif
+# ifdef INT16_MAX
+#  define INT16_WIDTH _GL_INTEGER_WIDTH (INT16_MIN, INT16_MAX)
+# endif
+# ifdef UINT16_MAX
+#  define UINT16_WIDTH _GL_INTEGER_WIDTH (0, UINT16_MAX)
+# endif
+# ifdef INT32_MAX
+#  define INT32_WIDTH _GL_INTEGER_WIDTH (INT32_MIN, INT32_MAX)
+# endif
+# ifdef UINT32_MAX
+#  define UINT32_WIDTH _GL_INTEGER_WIDTH (0, UINT32_MAX)
+# endif
+# ifdef INT64_MAX
+#  define INT64_WIDTH _GL_INTEGER_WIDTH (INT64_MIN, INT64_MAX)
+# endif
+# ifdef UINT64_MAX
+#  define UINT64_WIDTH _GL_INTEGER_WIDTH (0, UINT64_MAX)
+# endif
+# define INT_LEAST8_WIDTH _GL_INTEGER_WIDTH (INT_LEAST8_MIN, INT_LEAST8_MAX)
+# define UINT_LEAST8_WIDTH _GL_INTEGER_WIDTH (0, UINT_LEAST8_MAX)
+# define INT_LEAST16_WIDTH _GL_INTEGER_WIDTH (INT_LEAST16_MIN, INT_LEAST16_MAX)
+# define UINT_LEAST16_WIDTH _GL_INTEGER_WIDTH (0, UINT_LEAST16_MAX)
+# define INT_LEAST32_WIDTH _GL_INTEGER_WIDTH (INT_LEAST32_MIN, INT_LEAST32_MAX)
+# define UINT_LEAST32_WIDTH _GL_INTEGER_WIDTH (0, UINT_LEAST32_MAX)
+# define INT_LEAST64_WIDTH _GL_INTEGER_WIDTH (INT_LEAST64_MIN, INT_LEAST64_MAX)
+# define UINT_LEAST64_WIDTH _GL_INTEGER_WIDTH (0, UINT_LEAST64_MAX)
+# define INT_FAST8_WIDTH _GL_INTEGER_WIDTH (INT_FAST8_MIN, INT_FAST8_MAX)
+# define UINT_FAST8_WIDTH _GL_INTEGER_WIDTH (0, UINT_FAST8_MAX)
+# define INT_FAST16_WIDTH _GL_INTEGER_WIDTH (INT_FAST16_MIN, INT_FAST16_MAX)
+# define UINT_FAST16_WIDTH _GL_INTEGER_WIDTH (0, UINT_FAST16_MAX)
+# define INT_FAST32_WIDTH _GL_INTEGER_WIDTH (INT_FAST32_MIN, INT_FAST32_MAX)
+# define UINT_FAST32_WIDTH _GL_INTEGER_WIDTH (0, UINT_FAST32_MAX)
+# define INT_FAST64_WIDTH _GL_INTEGER_WIDTH (INT_FAST64_MIN, INT_FAST64_MAX)
+# define UINT_FAST64_WIDTH _GL_INTEGER_WIDTH (0, UINT_FAST64_MAX)
+# define INTPTR_WIDTH _GL_INTEGER_WIDTH (INTPTR_MIN, INTPTR_MAX)
+# define UINTPTR_WIDTH _GL_INTEGER_WIDTH (0, UINTPTR_MAX)
+# define INTMAX_WIDTH _GL_INTEGER_WIDTH (INTMAX_MIN, INTMAX_MAX)
+# define UINTMAX_WIDTH _GL_INTEGER_WIDTH (0, UINTMAX_MAX)
+# define PTRDIFF_WIDTH _GL_INTEGER_WIDTH (PTRDIFF_MIN, PTRDIFF_MAX)
+# define SIZE_WIDTH _GL_INTEGER_WIDTH (0, SIZE_MAX)
+# define WCHAR_WIDTH _GL_INTEGER_WIDTH (WCHAR_MIN, WCHAR_MAX)
+# ifdef WINT_MAX
+#  define WINT_WIDTH _GL_INTEGER_WIDTH (WINT_MIN, WINT_MAX)
+# endif
+# ifdef SIG_ATOMIC_MAX
+#  define SIG_ATOMIC_WIDTH _GL_INTEGER_WIDTH (SIG_ATOMIC_MIN, SIG_ATOMIC_MAX)
+# endif
+#endif /* !WINT_WIDTH && (_GNU_SOURCE || __STDC_WANT_IEC_60559_BFP_EXT__) */
+
+#endif /* _@GUARD_PREFIX@_STDINT_H */
+#endif /* !(defined __ANDROID__ && ...) */
+#endif /* !defined _@GUARD_PREFIX@_STDINT_H && !defined _GL_JUST_INCLUDE_SYSTEM_STDINT_H */
diff --git a/gnulib-lib/stdnoreturn.in.h b/gnulib-lib/stdnoreturn.in.h
new file mode 100644 (file)
index 0000000..dc77e3e
--- /dev/null
@@ -0,0 +1,60 @@
+/* A substitute for ISO C11 <stdnoreturn.h>.
+
+   Copyright 2012-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Paul Eggert.  */
+
+#ifndef noreturn
+
+/* ISO C11 <stdnoreturn.h> for platforms that lack it.
+
+   References:
+   ISO C11 (latest free draft
+   <http://www.open-std.org/jtc1/sc22/wg14/www/docs/n1570.pdf>)
+   section 7.23 */
+
+/* The definition of _Noreturn is copied here.  */
+
+#if 1200 <= _MSC_VER || defined __CYGWIN__
+/* On MSVC, standard include files contain declarations like
+     __declspec (noreturn) void abort (void);
+   "#define noreturn _Noreturn" would cause this declaration to be rewritten
+   to the invalid
+     __declspec (__declspec (noreturn)) void abort (void);
+
+   Similarly, on Cygwin, standard include files contain declarations like
+     void __cdecl abort (void) __attribute__ ((noreturn));
+   "#define noreturn _Noreturn" would cause this declaration to be rewritten
+   to the invalid
+     void __cdecl abort (void) __attribute__ ((__attribute__ ((__noreturn__))));
+
+   Instead, define noreturn to empty, so that such declarations are rewritten to
+     __declspec () void abort (void);
+   or
+     void __cdecl abort (void) __attribute__ (());
+   respectively.  This gives up on noreturn's advice to the compiler but at
+   least it is valid code.  */
+# define noreturn /*empty*/
+#else
+# define noreturn _Noreturn
+#endif
+
+/* Did he ever return?
+   No he never returned
+   And his fate is still unlearn'd ...
+     -- Steiner J, Hawes BL.  M.T.A. (1949)  */
+
+#endif /* noreturn */
diff --git a/gnulib-lib/sys_types.in.h b/gnulib-lib/sys_types.in.h
new file mode 100644 (file)
index 0000000..237e206
--- /dev/null
@@ -0,0 +1,106 @@
+/* Provide a more complete sys/types.h.
+
+   Copyright (C) 2011-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+#if __GNUC__ >= 3
+@PRAGMA_SYSTEM_HEADER@
+#endif
+@PRAGMA_COLUMNS@
+
+#if defined _WIN32 && !defined __CYGWIN__ \
+    && (defined __need_off_t || defined __need___off64_t \
+        || defined __need_ssize_t || defined __need_time_t)
+
+/* Special invocation convention inside mingw header files.  */
+
+#@INCLUDE_NEXT@ @NEXT_SYS_TYPES_H@
+
+#else
+/* Normal invocation convention.  */
+
+#ifndef _@GUARD_PREFIX@_SYS_TYPES_H
+
+/* The include_next requires a split double-inclusion guard.  */
+# define _GL_INCLUDING_SYS_TYPES_H
+#@INCLUDE_NEXT@ @NEXT_SYS_TYPES_H@
+# undef _GL_INCLUDING_SYS_TYPES_H
+
+#ifndef _@GUARD_PREFIX@_SYS_TYPES_H
+#define _@GUARD_PREFIX@_SYS_TYPES_H
+
+/* Override off_t if Large File Support is requested on native Windows.  */
+#if @WINDOWS_64_BIT_OFF_T@
+/* Same as int64_t in <stdint.h>.  */
+# if defined _MSC_VER
+#  define off_t __int64
+# else
+#  define off_t long long int
+# endif
+/* Indicator, for gnulib internal purposes.  */
+# define _GL_WINDOWS_64_BIT_OFF_T 1
+#endif
+
+/* Override dev_t and ino_t if distinguishable inodes support is requested
+   on native Windows.  */
+#if @WINDOWS_STAT_INODES@
+
+# if @WINDOWS_STAT_INODES@ == 2
+/* Experimental, not useful in Windows 10.  */
+
+/* Define dev_t to a 64-bit type.  */
+#  if !defined GNULIB_defined_dev_t
+typedef unsigned long long int rpl_dev_t;
+#   undef dev_t
+#   define dev_t rpl_dev_t
+#   define GNULIB_defined_dev_t 1
+#  endif
+
+/* Define ino_t to a 128-bit type.  */
+#  if !defined GNULIB_defined_ino_t
+/* MSVC does not have a 128-bit integer type.
+   GCC has a 128-bit integer type __int128, but only on 64-bit targets.  */
+typedef struct { unsigned long long int _gl_ino[2]; } rpl_ino_t;
+#   undef ino_t
+#   define ino_t rpl_ino_t
+#   define GNULIB_defined_ino_t 1
+#  endif
+
+# else /* @WINDOWS_STAT_INODES@ == 1 */
+
+/* Define ino_t to a 64-bit type.  */
+#  if !defined GNULIB_defined_ino_t
+typedef unsigned long long int rpl_ino_t;
+#   undef ino_t
+#   define ino_t rpl_ino_t
+#   define GNULIB_defined_ino_t 1
+#  endif
+
+# endif
+
+/* Indicator, for gnulib internal purposes.  */
+# define _GL_WINDOWS_STAT_INODES @WINDOWS_STAT_INODES@
+
+#endif
+
+/* MSVC 9 defines size_t in <stddef.h>, not in <sys/types.h>.  */
+/* But avoid namespace pollution on glibc systems.  */
+#if (defined _WIN32 && ! defined __CYGWIN__) && ! defined __GLIBC__
+# include <stddef.h>
+#endif
+
+#endif /* _@GUARD_PREFIX@_SYS_TYPES_H */
+#endif /* _@GUARD_PREFIX@_SYS_TYPES_H */
+#endif /* __need_XXX */
diff --git a/gnulib-lib/windows-initguard.h b/gnulib-lib/windows-initguard.h
new file mode 100644 (file)
index 0000000..8aefd0b
--- /dev/null
@@ -0,0 +1,35 @@
+/* Init guards, somewhat like spinlocks (native Windows implementation).
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.
+   Based on GCC's gthr-win32.h.  */
+
+#ifndef _WINDOWS_INITGUARD_H
+#define _WINDOWS_INITGUARD_H
+
+#define WIN32_LEAN_AND_MEAN  /* avoid including junk */
+#include <windows.h>
+
+typedef struct
+        {
+          volatile int done;
+          volatile LONG started;
+        }
+        glwthread_initguard_t;
+
+#define GLWTHREAD_INITGUARD_INIT { 0, -1 }
+
+#endif /* _WINDOWS_INITGUARD_H */
diff --git a/gnulib-lib/windows-mutex.c b/gnulib-lib/windows-mutex.c
new file mode 100644 (file)
index 0000000..9433881
--- /dev/null
@@ -0,0 +1,95 @@
+/* Plain mutexes (native Windows implementation).
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.
+   Based on GCC's gthr-win32.h.  */
+
+#include <config.h>
+
+/* Specification.  */
+#include "windows-mutex.h"
+
+#include <errno.h>
+
+void
+glwthread_mutex_init (glwthread_mutex_t *mutex)
+{
+  InitializeCriticalSection (&mutex->lock);
+  mutex->guard.done = 1;
+}
+
+int
+glwthread_mutex_lock (glwthread_mutex_t *mutex)
+{
+  if (!mutex->guard.done)
+    {
+      if (InterlockedIncrement (&mutex->guard.started) == 0)
+        /* This thread is the first one to need this mutex.  Initialize it.  */
+        glwthread_mutex_init (mutex);
+      else
+        {
+          /* Don't let mutex->guard.started grow and wrap around.  */
+          InterlockedDecrement (&mutex->guard.started);
+          /* Yield the CPU while waiting for another thread to finish
+             initializing this mutex.  */
+          while (!mutex->guard.done)
+            Sleep (0);
+        }
+    }
+  EnterCriticalSection (&mutex->lock);
+  return 0;
+}
+
+int
+glwthread_mutex_trylock (glwthread_mutex_t *mutex)
+{
+  if (!mutex->guard.done)
+    {
+      if (InterlockedIncrement (&mutex->guard.started) == 0)
+        /* This thread is the first one to need this mutex.  Initialize it.  */
+        glwthread_mutex_init (mutex);
+      else
+        {
+          /* Don't let mutex->guard.started grow and wrap around.  */
+          InterlockedDecrement (&mutex->guard.started);
+          /* Let another thread finish initializing this mutex, and let it also
+             lock this mutex.  */
+          return EBUSY;
+        }
+    }
+  if (!TryEnterCriticalSection (&mutex->lock))
+    return EBUSY;
+  return 0;
+}
+
+int
+glwthread_mutex_unlock (glwthread_mutex_t *mutex)
+{
+  if (!mutex->guard.done)
+    return EINVAL;
+  LeaveCriticalSection (&mutex->lock);
+  return 0;
+}
+
+int
+glwthread_mutex_destroy (glwthread_mutex_t *mutex)
+{
+  if (!mutex->guard.done)
+    return EINVAL;
+  DeleteCriticalSection (&mutex->lock);
+  mutex->guard.done = 0;
+  return 0;
+}
diff --git a/gnulib-lib/windows-mutex.h b/gnulib-lib/windows-mutex.h
new file mode 100644 (file)
index 0000000..5364f92
--- /dev/null
@@ -0,0 +1,51 @@
+/* Plain mutexes (native Windows implementation).
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.
+   Based on GCC's gthr-win32.h.  */
+
+#ifndef _WINDOWS_MUTEX_H
+#define _WINDOWS_MUTEX_H
+
+#define WIN32_LEAN_AND_MEAN  /* avoid including junk */
+#include <windows.h>
+
+#include "windows-initguard.h"
+
+typedef struct
+        {
+          glwthread_initguard_t guard; /* protects the initialization */
+          CRITICAL_SECTION lock;
+        }
+        glwthread_mutex_t;
+
+#define GLWTHREAD_MUTEX_INIT { GLWTHREAD_INITGUARD_INIT }
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+extern void glwthread_mutex_init (glwthread_mutex_t *mutex);
+extern int glwthread_mutex_lock (glwthread_mutex_t *mutex);
+extern int glwthread_mutex_trylock (glwthread_mutex_t *mutex);
+extern int glwthread_mutex_unlock (glwthread_mutex_t *mutex);
+extern int glwthread_mutex_destroy (glwthread_mutex_t *mutex);
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* _WINDOWS_MUTEX_H */
diff --git a/gnulib-lib/windows-once.c b/gnulib-lib/windows-once.c
new file mode 100644 (file)
index 0000000..455c50e
--- /dev/null
@@ -0,0 +1,62 @@
+/* Once-only control (native Windows implementation).
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.
+   Based on GCC's gthr-win32.h.  */
+
+#include <config.h>
+
+/* Specification.  */
+#include "windows-once.h"
+
+#include <stdlib.h>
+
+void
+glwthread_once (glwthread_once_t *once_control, void (*initfunction) (void))
+{
+  if (once_control->inited <= 0)
+    {
+      if (InterlockedIncrement (&once_control->started) == 0)
+        {
+          /* This thread is the first one to come to this once_control.  */
+          InitializeCriticalSection (&once_control->lock);
+          EnterCriticalSection (&once_control->lock);
+          once_control->inited = 0;
+          initfunction ();
+          once_control->inited = 1;
+          LeaveCriticalSection (&once_control->lock);
+        }
+      else
+        {
+          /* Don't let once_control->started grow and wrap around.  */
+          InterlockedDecrement (&once_control->started);
+          /* Some other thread has already started the initialization.
+             Yield the CPU while waiting for the other thread to finish
+             initializing and taking the lock.  */
+          while (once_control->inited < 0)
+            Sleep (0);
+          if (once_control->inited <= 0)
+            {
+              /* Take the lock.  This blocks until the other thread has
+                 finished calling the initfunction.  */
+              EnterCriticalSection (&once_control->lock);
+              LeaveCriticalSection (&once_control->lock);
+              if (!(once_control->inited > 0))
+                abort ();
+            }
+        }
+    }
+}
diff --git a/gnulib-lib/windows-once.h b/gnulib-lib/windows-once.h
new file mode 100644 (file)
index 0000000..1599983
--- /dev/null
@@ -0,0 +1,47 @@
+/* Once-only control (native Windows implementation).
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.
+   Based on GCC's gthr-win32.h.  */
+
+#ifndef _WINDOWS_ONCE_H
+#define _WINDOWS_ONCE_H
+
+#define WIN32_LEAN_AND_MEAN  /* avoid including junk */
+#include <windows.h>
+
+typedef struct
+        {
+          volatile int inited;
+          volatile LONG started;
+          CRITICAL_SECTION lock;
+        }
+        glwthread_once_t;
+
+#define GLWTHREAD_ONCE_INIT { -1, -1 }
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+extern void glwthread_once (glwthread_once_t *once_control,
+                            void (*initfunction) (void));
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* _WINDOWS_ONCE_H */
diff --git a/gnulib-lib/windows-recmutex.c b/gnulib-lib/windows-recmutex.c
new file mode 100644 (file)
index 0000000..7e6e446
--- /dev/null
@@ -0,0 +1,127 @@
+/* Plain recursive mutexes (native Windows implementation).
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.
+   Based on GCC's gthr-win32.h.  */
+
+#include <config.h>
+
+/* Specification.  */
+#include "windows-recmutex.h"
+
+#include <errno.h>
+
+void
+glwthread_recmutex_init (glwthread_recmutex_t *mutex)
+{
+  mutex->owner = 0;
+  mutex->depth = 0;
+  InitializeCriticalSection (&mutex->lock);
+  mutex->guard.done = 1;
+}
+
+int
+glwthread_recmutex_lock (glwthread_recmutex_t *mutex)
+{
+  if (!mutex->guard.done)
+    {
+      if (InterlockedIncrement (&mutex->guard.started) == 0)
+        /* This thread is the first one to need this mutex.  Initialize it.  */
+        glwthread_recmutex_init (mutex);
+      else
+        {
+          /* Don't let mutex->guard.started grow and wrap around.  */
+          InterlockedDecrement (&mutex->guard.started);
+          /* Yield the CPU while waiting for another thread to finish
+             initializing this mutex.  */
+          while (!mutex->guard.done)
+            Sleep (0);
+        }
+    }
+  {
+    DWORD self = GetCurrentThreadId ();
+    if (mutex->owner != self)
+      {
+        EnterCriticalSection (&mutex->lock);
+        mutex->owner = self;
+      }
+    if (++(mutex->depth) == 0) /* wraparound? */
+      {
+        mutex->depth--;
+        return EAGAIN;
+      }
+  }
+  return 0;
+}
+
+int
+glwthread_recmutex_trylock (glwthread_recmutex_t *mutex)
+{
+  if (!mutex->guard.done)
+    {
+      if (InterlockedIncrement (&mutex->guard.started) == 0)
+        /* This thread is the first one to need this mutex.  Initialize it.  */
+        glwthread_recmutex_init (mutex);
+      else
+        {
+          /* Don't let mutex->guard.started grow and wrap around.  */
+          InterlockedDecrement (&mutex->guard.started);
+          /* Let another thread finish initializing this mutex, and let it also
+             lock this mutex.  */
+          return EBUSY;
+        }
+    }
+  {
+    DWORD self = GetCurrentThreadId ();
+    if (mutex->owner != self)
+      {
+        if (!TryEnterCriticalSection (&mutex->lock))
+          return EBUSY;
+        mutex->owner = self;
+      }
+    if (++(mutex->depth) == 0) /* wraparound? */
+      {
+        mutex->depth--;
+        return EAGAIN;
+      }
+  }
+  return 0;
+}
+
+int
+glwthread_recmutex_unlock (glwthread_recmutex_t *mutex)
+{
+  if (mutex->owner != GetCurrentThreadId ())
+    return EPERM;
+  if (mutex->depth == 0)
+    return EINVAL;
+  if (--(mutex->depth) == 0)
+    {
+      mutex->owner = 0;
+      LeaveCriticalSection (&mutex->lock);
+    }
+  return 0;
+}
+
+int
+glwthread_recmutex_destroy (glwthread_recmutex_t *mutex)
+{
+  if (mutex->owner != 0)
+    return EBUSY;
+  DeleteCriticalSection (&mutex->lock);
+  mutex->guard.done = 0;
+  return 0;
+}
diff --git a/gnulib-lib/windows-recmutex.h b/gnulib-lib/windows-recmutex.h
new file mode 100644 (file)
index 0000000..d143108
--- /dev/null
@@ -0,0 +1,57 @@
+/* Plain recursive mutexes (native Windows implementation).
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.
+   Based on GCC's gthr-win32.h.  */
+
+#ifndef _WINDOWS_RECMUTEX_H
+#define _WINDOWS_RECMUTEX_H
+
+#define WIN32_LEAN_AND_MEAN  /* avoid including junk */
+#include <windows.h>
+
+#include "windows-initguard.h"
+
+/* The native Windows documentation says that CRITICAL_SECTION already
+   implements a recursive lock.  But we need not rely on it: It's easy to
+   implement a recursive lock without this assumption.  */
+
+typedef struct
+        {
+          glwthread_initguard_t guard; /* protects the initialization */
+          DWORD owner;
+          unsigned long depth;
+          CRITICAL_SECTION lock;
+        }
+        glwthread_recmutex_t;
+
+#define GLWTHREAD_RECMUTEX_INIT { GLWTHREAD_INITGUARD_INIT, 0, 0 }
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+extern void glwthread_recmutex_init (glwthread_recmutex_t *mutex);
+extern int glwthread_recmutex_lock (glwthread_recmutex_t *mutex);
+extern int glwthread_recmutex_trylock (glwthread_recmutex_t *mutex);
+extern int glwthread_recmutex_unlock (glwthread_recmutex_t *mutex);
+extern int glwthread_recmutex_destroy (glwthread_recmutex_t *mutex);
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* _WINDOWS_RECMUTEX_H */
diff --git a/gnulib-lib/windows-rwlock.c b/gnulib-lib/windows-rwlock.c
new file mode 100644 (file)
index 0000000..9207d1b
--- /dev/null
@@ -0,0 +1,373 @@
+/* Read-write locks (native Windows implementation).
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.
+   Based on GCC's gthr-win32.h.  */
+
+#include <config.h>
+
+/* Specification.  */
+#include "windows-rwlock.h"
+
+#include <errno.h>
+#include <stdlib.h>
+
+/* In this file, the waitqueues are implemented as circular arrays.  */
+#define glwthread_waitqueue_t glwthread_carray_waitqueue_t
+
+static void
+glwthread_waitqueue_init (glwthread_waitqueue_t *wq)
+{
+  wq->array = NULL;
+  wq->count = 0;
+  wq->alloc = 0;
+  wq->offset = 0;
+}
+
+/* Enqueues the current thread, represented by an event, in a wait queue.
+   Returns INVALID_HANDLE_VALUE if an allocation failure occurs.  */
+static HANDLE
+glwthread_waitqueue_add (glwthread_waitqueue_t *wq)
+{
+  HANDLE event;
+  unsigned int index;
+
+  if (wq->count == wq->alloc)
+    {
+      unsigned int new_alloc = 2 * wq->alloc + 1;
+      HANDLE *new_array =
+        (HANDLE *) realloc (wq->array, new_alloc * sizeof (HANDLE));
+      if (new_array == NULL)
+        /* No more memory.  */
+        return INVALID_HANDLE_VALUE;
+      /* Now is a good opportunity to rotate the array so that its contents
+         starts at offset 0.  */
+      if (wq->offset > 0)
+        {
+          unsigned int old_count = wq->count;
+          unsigned int old_alloc = wq->alloc;
+          unsigned int old_offset = wq->offset;
+          unsigned int i;
+          if (old_offset + old_count > old_alloc)
+            {
+              unsigned int limit = old_offset + old_count - old_alloc;
+              for (i = 0; i < limit; i++)
+                new_array[old_alloc + i] = new_array[i];
+            }
+          for (i = 0; i < old_count; i++)
+            new_array[i] = new_array[old_offset + i];
+          wq->offset = 0;
+        }
+      wq->array = new_array;
+      wq->alloc = new_alloc;
+    }
+  /* Whether the created event is a manual-reset one or an auto-reset one,
+     does not matter, since we will wait on it only once.  */
+  event = CreateEvent (NULL, TRUE, FALSE, NULL);
+  if (event == INVALID_HANDLE_VALUE)
+    /* No way to allocate an event.  */
+    return INVALID_HANDLE_VALUE;
+  index = wq->offset + wq->count;
+  if (index >= wq->alloc)
+    index -= wq->alloc;
+  wq->array[index] = event;
+  wq->count++;
+  return event;
+}
+
+/* Notifies the first thread from a wait queue and dequeues it.  */
+static void
+glwthread_waitqueue_notify_first (glwthread_waitqueue_t *wq)
+{
+  SetEvent (wq->array[wq->offset + 0]);
+  wq->offset++;
+  wq->count--;
+  if (wq->count == 0 || wq->offset == wq->alloc)
+    wq->offset = 0;
+}
+
+/* Notifies all threads from a wait queue and dequeues them all.  */
+static void
+glwthread_waitqueue_notify_all (glwthread_waitqueue_t *wq)
+{
+  unsigned int i;
+
+  for (i = 0; i < wq->count; i++)
+    {
+      unsigned int index = wq->offset + i;
+      if (index >= wq->alloc)
+        index -= wq->alloc;
+      SetEvent (wq->array[index]);
+    }
+  wq->count = 0;
+  wq->offset = 0;
+}
+
+void
+glwthread_rwlock_init (glwthread_rwlock_t *lock)
+{
+  InitializeCriticalSection (&lock->lock);
+  glwthread_waitqueue_init (&lock->waiting_readers);
+  glwthread_waitqueue_init (&lock->waiting_writers);
+  lock->runcount = 0;
+  lock->guard.done = 1;
+}
+
+int
+glwthread_rwlock_rdlock (glwthread_rwlock_t *lock)
+{
+  if (!lock->guard.done)
+    {
+      if (InterlockedIncrement (&lock->guard.started) == 0)
+        /* This thread is the first one to need this lock.  Initialize it.  */
+        glwthread_rwlock_init (lock);
+      else
+        {
+          /* Don't let lock->guard.started grow and wrap around.  */
+          InterlockedDecrement (&lock->guard.started);
+          /* Yield the CPU while waiting for another thread to finish
+             initializing this lock.  */
+          while (!lock->guard.done)
+            Sleep (0);
+        }
+    }
+  EnterCriticalSection (&lock->lock);
+  /* Test whether only readers are currently running, and whether the runcount
+     field will not overflow, and whether no writer is waiting.  The latter
+     condition is because POSIX recommends that "write locks shall take
+     precedence over read locks", to avoid "writer starvation".  */
+  if (!(lock->runcount + 1 > 0 && lock->waiting_writers.count == 0))
+    {
+      /* This thread has to wait for a while.  Enqueue it among the
+         waiting_readers.  */
+      HANDLE event = glwthread_waitqueue_add (&lock->waiting_readers);
+      if (event != INVALID_HANDLE_VALUE)
+        {
+          DWORD result;
+          LeaveCriticalSection (&lock->lock);
+          /* Wait until another thread signals this event.  */
+          result = WaitForSingleObject (event, INFINITE);
+          if (result == WAIT_FAILED || result == WAIT_TIMEOUT)
+            abort ();
+          CloseHandle (event);
+          /* The thread which signalled the event already did the bookkeeping:
+             removed us from the waiting_readers, incremented lock->runcount.  */
+          if (!(lock->runcount > 0))
+            abort ();
+          return 0;
+        }
+      else
+        {
+          /* Allocation failure.  Weird.  */
+          do
+            {
+              LeaveCriticalSection (&lock->lock);
+              Sleep (1);
+              EnterCriticalSection (&lock->lock);
+            }
+          while (!(lock->runcount + 1 > 0));
+        }
+    }
+  lock->runcount++;
+  LeaveCriticalSection (&lock->lock);
+  return 0;
+}
+
+int
+glwthread_rwlock_wrlock (glwthread_rwlock_t *lock)
+{
+  if (!lock->guard.done)
+    {
+      if (InterlockedIncrement (&lock->guard.started) == 0)
+        /* This thread is the first one to need this lock.  Initialize it.  */
+        glwthread_rwlock_init (lock);
+      else
+        {
+          /* Don't let lock->guard.started grow and wrap around.  */
+          InterlockedDecrement (&lock->guard.started);
+          /* Yield the CPU while waiting for another thread to finish
+             initializing this lock.  */
+          while (!lock->guard.done)
+            Sleep (0);
+        }
+    }
+  EnterCriticalSection (&lock->lock);
+  /* Test whether no readers or writers are currently running.  */
+  if (!(lock->runcount == 0))
+    {
+      /* This thread has to wait for a while.  Enqueue it among the
+         waiting_writers.  */
+      HANDLE event = glwthread_waitqueue_add (&lock->waiting_writers);
+      if (event != INVALID_HANDLE_VALUE)
+        {
+          DWORD result;
+          LeaveCriticalSection (&lock->lock);
+          /* Wait until another thread signals this event.  */
+          result = WaitForSingleObject (event, INFINITE);
+          if (result == WAIT_FAILED || result == WAIT_TIMEOUT)
+            abort ();
+          CloseHandle (event);
+          /* The thread which signalled the event already did the bookkeeping:
+             removed us from the waiting_writers, set lock->runcount = -1.  */
+          if (!(lock->runcount == -1))
+            abort ();
+          return 0;
+        }
+      else
+        {
+          /* Allocation failure.  Weird.  */
+          do
+            {
+              LeaveCriticalSection (&lock->lock);
+              Sleep (1);
+              EnterCriticalSection (&lock->lock);
+            }
+          while (!(lock->runcount == 0));
+        }
+    }
+  lock->runcount--; /* runcount becomes -1 */
+  LeaveCriticalSection (&lock->lock);
+  return 0;
+}
+
+int
+glwthread_rwlock_tryrdlock (glwthread_rwlock_t *lock)
+{
+  if (!lock->guard.done)
+    {
+      if (InterlockedIncrement (&lock->guard.started) == 0)
+        /* This thread is the first one to need this lock.  Initialize it.  */
+        glwthread_rwlock_init (lock);
+      else
+        {
+          /* Don't let lock->guard.started grow and wrap around.  */
+          InterlockedDecrement (&lock->guard.started);
+          /* Yield the CPU while waiting for another thread to finish
+             initializing this lock.  */
+          while (!lock->guard.done)
+            Sleep (0);
+        }
+    }
+  /* It's OK to wait for this critical section, because it is never taken for a
+     long time.  */
+  EnterCriticalSection (&lock->lock);
+  /* Test whether only readers are currently running, and whether the runcount
+     field will not overflow, and whether no writer is waiting.  The latter
+     condition is because POSIX recommends that "write locks shall take
+     precedence over read locks", to avoid "writer starvation".  */
+  if (!(lock->runcount + 1 > 0 && lock->waiting_writers.count == 0))
+    {
+      /* This thread would have to wait for a while.  Return instead.  */
+      LeaveCriticalSection (&lock->lock);
+      return EBUSY;
+    }
+  lock->runcount++;
+  LeaveCriticalSection (&lock->lock);
+  return 0;
+}
+
+int
+glwthread_rwlock_trywrlock (glwthread_rwlock_t *lock)
+{
+  if (!lock->guard.done)
+    {
+      if (InterlockedIncrement (&lock->guard.started) == 0)
+        /* This thread is the first one to need this lock.  Initialize it.  */
+        glwthread_rwlock_init (lock);
+      else
+        {
+          /* Don't let lock->guard.started grow and wrap around.  */
+          InterlockedDecrement (&lock->guard.started);
+          /* Yield the CPU while waiting for another thread to finish
+             initializing this lock.  */
+          while (!lock->guard.done)
+            Sleep (0);
+        }
+    }
+  /* It's OK to wait for this critical section, because it is never taken for a
+     long time.  */
+  EnterCriticalSection (&lock->lock);
+  /* Test whether no readers or writers are currently running.  */
+  if (!(lock->runcount == 0))
+    {
+      /* This thread would have to wait for a while.  Return instead.  */
+      LeaveCriticalSection (&lock->lock);
+      return EBUSY;
+    }
+  lock->runcount--; /* runcount becomes -1 */
+  LeaveCriticalSection (&lock->lock);
+  return 0;
+}
+
+int
+glwthread_rwlock_unlock (glwthread_rwlock_t *lock)
+{
+  if (!lock->guard.done)
+    return EINVAL;
+  EnterCriticalSection (&lock->lock);
+  if (lock->runcount < 0)
+    {
+      /* Drop a writer lock.  */
+      if (!(lock->runcount == -1))
+        abort ();
+      lock->runcount = 0;
+    }
+  else
+    {
+      /* Drop a reader lock.  */
+      if (!(lock->runcount > 0))
+        {
+          LeaveCriticalSection (&lock->lock);
+          return EPERM;
+        }
+      lock->runcount--;
+    }
+  if (lock->runcount == 0)
+    {
+      /* POSIX recommends that "write locks shall take precedence over read
+         locks", to avoid "writer starvation".  */
+      if (lock->waiting_writers.count > 0)
+        {
+          /* Wake up one of the waiting writers.  */
+          lock->runcount--;
+          glwthread_waitqueue_notify_first (&lock->waiting_writers);
+        }
+      else
+        {
+          /* Wake up all waiting readers.  */
+          lock->runcount += lock->waiting_readers.count;
+          glwthread_waitqueue_notify_all (&lock->waiting_readers);
+        }
+    }
+  LeaveCriticalSection (&lock->lock);
+  return 0;
+}
+
+int
+glwthread_rwlock_destroy (glwthread_rwlock_t *lock)
+{
+  if (!lock->guard.done)
+    return EINVAL;
+  if (lock->runcount != 0)
+    return EBUSY;
+  DeleteCriticalSection (&lock->lock);
+  if (lock->waiting_readers.array != NULL)
+    free (lock->waiting_readers.array);
+  if (lock->waiting_writers.array != NULL)
+    free (lock->waiting_writers.array);
+  lock->guard.done = 0;
+  return 0;
+}
diff --git a/gnulib-lib/windows-rwlock.h b/gnulib-lib/windows-rwlock.h
new file mode 100644 (file)
index 0000000..9002040
--- /dev/null
@@ -0,0 +1,68 @@
+/* Read-write locks (native Windows implementation).
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.
+   Based on GCC's gthr-win32.h.  */
+
+#ifndef _WINDOWS_RWLOCK_H
+#define _WINDOWS_RWLOCK_H
+
+#define WIN32_LEAN_AND_MEAN  /* avoid including junk */
+#include <windows.h>
+
+#include "windows-initguard.h"
+
+/* It is impossible to implement read-write locks using plain locks, without
+   introducing an extra thread dedicated to managing read-write locks.
+   Therefore here we need to use the low-level Event type.  */
+
+typedef struct
+        {
+          HANDLE *array; /* array of waiting threads, each represented by an event */
+          unsigned int count; /* number of waiting threads */
+          unsigned int alloc; /* length of allocated array */
+          unsigned int offset; /* index of first waiting thread in array */
+        }
+        glwthread_carray_waitqueue_t;
+typedef struct
+        {
+          glwthread_initguard_t guard; /* protects the initialization */
+          CRITICAL_SECTION lock; /* protects the remaining fields */
+          glwthread_carray_waitqueue_t waiting_readers; /* waiting readers */
+          glwthread_carray_waitqueue_t waiting_writers; /* waiting writers */
+          int runcount; /* number of readers running, or -1 when a writer runs */
+        }
+        glwthread_rwlock_t;
+
+#define GLWTHREAD_RWLOCK_INIT { GLWTHREAD_INITGUARD_INIT }
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+extern void glwthread_rwlock_init (glwthread_rwlock_t *lock);
+extern int glwthread_rwlock_rdlock (glwthread_rwlock_t *lock);
+extern int glwthread_rwlock_wrlock (glwthread_rwlock_t *lock);
+extern int glwthread_rwlock_tryrdlock (glwthread_rwlock_t *lock);
+extern int glwthread_rwlock_trywrlock (glwthread_rwlock_t *lock);
+extern int glwthread_rwlock_unlock (glwthread_rwlock_t *lock);
+extern int glwthread_rwlock_destroy (glwthread_rwlock_t *lock);
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* _WINDOWS_RWLOCK_H */
diff --git a/gnulib-m4/00gnulib.m4 b/gnulib-m4/00gnulib.m4
new file mode 100644 (file)
index 0000000..e3e0fb6
--- /dev/null
@@ -0,0 +1,46 @@
+# 00gnulib.m4 serial 3
+dnl Copyright (C) 2009-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl This file must be named something that sorts before all other
+dnl gnulib-provided .m4 files.  It is needed until such time as we can
+dnl assume Autoconf 2.64, with its improved AC_DEFUN_ONCE and
+dnl m4_divert semantics.
+
+# Until autoconf 2.63, handling of the diversion stack required m4_init
+# to be called first; but this does not happen with aclocal.  Wrapping
+# the entire execution in another layer of the diversion stack fixes this.
+# Worse, prior to autoconf 2.62, m4_wrap depended on the underlying m4
+# for whether it was FIFO or LIFO; in order to properly balance with
+# m4_init, we need to undo our push just before anything wrapped within
+# the m4_init body.  The way to ensure this is to wrap both sides of
+# m4_init with a one-shot macro that does the pop at the right time.
+m4_ifndef([_m4_divert_diversion],
+[m4_divert_push([KILL])
+m4_define([gl_divert_fixup], [m4_divert_pop()m4_define([$0])])
+m4_define([m4_init],
+  [gl_divert_fixup()]m4_defn([m4_init])[gl_divert_fixup()])])
+
+
+# AC_DEFUN_ONCE([NAME], VALUE)
+# ----------------------------
+# Define NAME to expand to VALUE on the first use (whether by direct
+# expansion, or by AC_REQUIRE), and to nothing on all subsequent uses.
+# Avoid bugs in AC_REQUIRE in Autoconf 2.63 and earlier.  This
+# definition is slower than the version in Autoconf 2.64, because it
+# can only use interfaces that existed since 2.59; but it achieves the
+# same effect.  Quoting is necessary to avoid confusing Automake.
+m4_version_prereq([2.63.263], [],
+[m4_define([AC][_DEFUN_ONCE],
+  [AC][_DEFUN([$1],
+    [AC_REQUIRE([_gl_DEFUN_ONCE([$1])],
+      [m4_indir([_gl_DEFUN_ONCE([$1])])])])]dnl
+[AC][_DEFUN([_gl_DEFUN_ONCE([$1])], [$2])])])
+
+# gl_00GNULIB
+# -----------
+# Witness macro that this file has been included.  Needed to force
+# Automake to include this file prior to all other gnulib .m4 files.
+AC_DEFUN([gl_00GNULIB])
diff --git a/gnulib-m4/absolute-header.m4 b/gnulib-m4/absolute-header.m4
new file mode 100644 (file)
index 0000000..a8f2cba
--- /dev/null
@@ -0,0 +1,102 @@
+# absolute-header.m4 serial 16
+dnl Copyright (C) 2006-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Derek Price.
+
+# gl_ABSOLUTE_HEADER(HEADER1 HEADER2 ...)
+# ---------------------------------------
+# Find the absolute name of a header file, testing first if the header exists.
+# If the header were sys/inttypes.h, this macro would define
+# ABSOLUTE_SYS_INTTYPES_H to the '""' quoted absolute name of sys/inttypes.h
+# in config.h
+# (e.g. '#define ABSOLUTE_SYS_INTTYPES_H "///usr/include/sys/inttypes.h"').
+# The three "///" are to pacify Sun C 5.8, which otherwise would say
+# "warning: #include of /usr/include/... may be non-portable".
+# Use '""', not '<>', so that the /// cannot be confused with a C99 comment.
+# Note: This macro assumes that the header file is not empty after
+# preprocessing, i.e. it does not only define preprocessor macros but also
+# provides some type/enum definitions or function/variable declarations.
+AC_DEFUN([gl_ABSOLUTE_HEADER],
+[AC_REQUIRE([AC_CANONICAL_HOST])
+AC_LANG_PREPROC_REQUIRE()dnl
+dnl FIXME: gl_absolute_header and ac_header_exists must be used unquoted
+dnl until we can assume autoconf 2.64 or newer.
+m4_foreach_w([gl_HEADER_NAME], [$1],
+  [AS_VAR_PUSHDEF([gl_absolute_header],
+                  [gl_cv_absolute_]m4_defn([gl_HEADER_NAME]))dnl
+  AC_CACHE_CHECK([absolute name of <]m4_defn([gl_HEADER_NAME])[>],
+    m4_defn([gl_absolute_header]),
+    [AS_VAR_PUSHDEF([ac_header_exists],
+                    [ac_cv_header_]m4_defn([gl_HEADER_NAME]))dnl
+    AC_CHECK_HEADERS_ONCE(m4_defn([gl_HEADER_NAME]))dnl
+    if test AS_VAR_GET(ac_header_exists) = yes; then
+      gl_ABSOLUTE_HEADER_ONE(m4_defn([gl_HEADER_NAME]))
+    fi
+    AS_VAR_POPDEF([ac_header_exists])dnl
+    ])dnl
+  AC_DEFINE_UNQUOTED(AS_TR_CPP([ABSOLUTE_]m4_defn([gl_HEADER_NAME])),
+                     ["AS_VAR_GET(gl_absolute_header)"],
+                     [Define this to an absolute name of <]m4_defn([gl_HEADER_NAME])[>.])
+  AS_VAR_POPDEF([gl_absolute_header])dnl
+])dnl
+])# gl_ABSOLUTE_HEADER
+
+# gl_ABSOLUTE_HEADER_ONE(HEADER)
+# ------------------------------
+# Like gl_ABSOLUTE_HEADER, except that:
+#   - it assumes that the header exists,
+#   - it uses the current CPPFLAGS,
+#   - it does not cache the result,
+#   - it is silent.
+AC_DEFUN([gl_ABSOLUTE_HEADER_ONE],
+[
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  AC_LANG_CONFTEST([AC_LANG_SOURCE([[#include <]]m4_dquote([$1])[[>]])])
+  dnl AIX "xlc -E" and "cc -E" omit #line directives for header files
+  dnl that contain only a #include of other header files and no
+  dnl non-comment tokens of their own. This leads to a failure to
+  dnl detect the absolute name of <dirent.h>, <signal.h>, <poll.h>
+  dnl and others. The workaround is to force preservation of comments
+  dnl through option -C. This ensures all necessary #line directives
+  dnl are present. GCC supports option -C as well.
+  case "$host_os" in
+    aix*) gl_absname_cpp="$ac_cpp -C" ;;
+    *)    gl_absname_cpp="$ac_cpp" ;;
+  esac
+changequote(,)
+  case "$host_os" in
+    mingw*)
+      dnl For the sake of native Windows compilers (excluding gcc),
+      dnl treat backslash as a directory separator, like /.
+      dnl Actually, these compilers use a double-backslash as
+      dnl directory separator, inside the
+      dnl   # line "filename"
+      dnl directives.
+      gl_dirsep_regex='[/\\]'
+      ;;
+    *)
+      gl_dirsep_regex='\/'
+      ;;
+  esac
+  dnl A sed expression that turns a string into a basic regular
+  dnl expression, for use within "/.../".
+  gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g'
+  gl_header_literal_regex=`echo '$1' \
+                           | sed -e "$gl_make_literal_regex_sed"`
+  gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{
+      s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/
+      s|^/[^/]|//&|
+      p
+      q
+    }'
+changequote([,])
+  dnl eval is necessary to expand gl_absname_cpp.
+  dnl Ultrix and Pyramid sh refuse to redirect output of eval,
+  dnl so use subshell.
+  AS_VAR_SET([gl_cv_absolute_]AS_TR_SH([[$1]]),
+[`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&AS_MESSAGE_LOG_FD |
+  sed -n "$gl_absolute_header_sed"`])
+])
diff --git a/gnulib-m4/ansi-c++.m4 b/gnulib-m4/ansi-c++.m4
new file mode 100644 (file)
index 0000000..cc94dc6
--- /dev/null
@@ -0,0 +1,138 @@
+# ansi-c++.m4 serial 10
+dnl Copyright (C) 2002-2003, 2005, 2010-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Bruno Haible.
+
+# Sets CXX_CHOICE to 'yes' or 'no', depending on the preferred use of C++.
+# The default is 'yes'. If the configure.ac contains a definition of the
+# macro gl_CXX_CHOICE_DEFAULT_NO, then the default is 'no'. In both cases,
+# the user can change the value by passing the option --disable-cxx or
+# --enable-cxx, respectively.
+
+AC_DEFUN([gl_CXX_CHOICE],
+[
+  AC_MSG_CHECKING([whether to use C++])
+  dnl Plus signs are supported in AC_ARG_ENABLE starting with autoconf-2.66.
+  m4_version_prereq([2.66],
+    [m4_ifdef([gl_CXX_CHOICE_DEFAULT_NO],
+       [AC_ARG_ENABLE([c++],
+          [  --enable-c++            also build C++ sources],
+          [CXX_CHOICE="$enableval"],
+          [CXX_CHOICE=no])],
+       [AC_ARG_ENABLE([c++],
+          [  --disable-c++           do not build C++ sources],
+          [CXX_CHOICE="$enableval"],
+          [CXX_CHOICE=yes])])],
+    [m4_ifdef([gl_CXX_CHOICE_DEFAULT_NO],
+       [AC_ARG_ENABLE([cxx],
+          [  --enable-cxx            also build C++ sources],
+          [CXX_CHOICE="$enableval"],
+          [CXX_CHOICE=no])],
+       [AC_ARG_ENABLE([cxx],
+          [  --disable-cxx           do not build C++ sources],
+          [CXX_CHOICE="$enableval"],
+          [CXX_CHOICE=yes])])])
+  AC_MSG_RESULT([$CXX_CHOICE])
+  AC_SUBST([CXX_CHOICE])
+])
+
+# gl_PROG_ANSI_CXX([ANSICXX_VARIABLE], [ANSICXX_CONDITIONAL])
+# Sets ANSICXX_VARIABLE to the name of a sufficiently ANSI C++ compliant
+# compiler, or to "no" if none is found.
+# Defines the Automake condition ANSICXX_CONDITIONAL to true if such a compiler
+# was found, or to false if not.
+
+AC_DEFUN([gl_PROG_ANSI_CXX],
+[
+  AC_REQUIRE([gl_CXX_CHOICE])
+  m4_if([$1], [CXX], [],
+    [gl_save_CXX="$CXX"])
+  if test "$CXX_CHOICE" = no; then
+    CXX=no
+  fi
+  if test -z "$CXX"; then
+    if test -n "$CCC"; then
+      CXX="$CCC"
+    else
+      AC_CHECK_TOOLS([CXX],
+                     [g++ c++ gpp aCC CC cxx cc++ cl FCC KCC RCC xlC_r xlC],
+                     [:])
+    fi
+  fi
+  if test "$CXX" != no; then
+    dnl Use a modified version of AC_PROG_CXX_WORKS that does not exit
+    dnl upon failure.
+    AC_MSG_CHECKING([whether the C++ compiler ($CXX $CXXFLAGS $LDFLAGS) works])
+    AC_LANG_PUSH([C++])
+    AC_ARG_VAR([CXX], [C++ compiler command])
+    AC_ARG_VAR([CXXFLAGS], [C++ compiler flags])
+    echo 'int main () { return 0; }' > conftest.$ac_ext
+    if AC_TRY_EVAL([ac_link]) && test -s conftest$ac_exeext; then
+      gl_cv_prog_ansicxx_works=yes
+      if (./conftest; exit) 2>/dev/null; then
+        gl_cv_prog_ansicxx_cross=no
+      else
+        gl_cv_prog_ansicxx_cross=yes
+      fi
+    else
+      gl_cv_prog_ansicxx_works=no
+    fi
+    rm -fr conftest*
+    AC_LANG_POP([C++])
+    AC_MSG_RESULT([$gl_cv_prog_ansicxx_works])
+    if test $gl_cv_prog_ansicxx_works = no; then
+      CXX=no
+    else
+      dnl Test for namespaces.
+      dnl We don't bother supporting pre-ANSI-C++ compilers.
+      AC_MSG_CHECKING([whether the C++ compiler supports namespaces])
+      AC_LANG_PUSH([C++])
+      cat <<EOF > conftest.$ac_ext
+#include <iostream>
+namespace test { using namespace std; }
+std::ostream* ptr;
+int main () { return 0; }
+EOF
+      if AC_TRY_EVAL([ac_link]) && test -s conftest$ac_exeext; then
+        gl_cv_prog_ansicxx_namespaces=yes
+      else
+        gl_cv_prog_ansicxx_namespaces=no
+      fi
+      rm -fr conftest*
+      AC_LANG_POP([C++])
+      AC_MSG_RESULT([$gl_cv_prog_ansicxx_namespaces])
+      if test $gl_cv_prog_ansicxx_namespaces = no; then
+        CXX=no
+      fi
+    fi
+  fi
+  m4_if([$1], [CXX], [],
+    [$1="$CXX"
+     CXX="$gl_save_CXX"])
+  AC_SUBST([$1])
+
+  AM_CONDITIONAL([$2], [test "$$1" != no])
+
+  if test "$$1" != no; then
+    dnl This macro invocation resolves an automake error:
+    dnl /usr/local/share/automake-1.11/am/depend2.am: am__fastdepCXX does not appear in AM_CONDITIONAL
+    dnl /usr/local/share/automake-1.11/am/depend2.am:   The usual way to define 'am__fastdepCXX' is to add 'AC_PROG_CXX'
+    dnl /usr/local/share/automake-1.11/am/depend2.am:   to 'configure.ac' and run 'aclocal' and 'autoconf' again.
+    _AM_DEPENDENCIES([CXX])
+  else
+    AM_CONDITIONAL([am__fastdepCXX], [false])
+  fi
+])
+
+# gl_ANSI_CXX
+# Sets CXX to the name of a sufficiently ANSI C++ compliant compiler, or to
+# "no" if none is found.
+# Defines the Automake condition ANSICXX to true if such a compiler was found,
+# or to false if not.
+AC_DEFUN([gl_ANSI_CXX],
+[
+  gl_PROG_ANSI_CXX([CXX], [ANSICXX])
+])
diff --git a/gnulib-m4/asm-underscore.m4 b/gnulib-m4/asm-underscore.m4
new file mode 100644 (file)
index 0000000..0f6bee4
--- /dev/null
@@ -0,0 +1,72 @@
+# asm-underscore.m4 serial 4
+dnl Copyright (C) 2010-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Bruno Haible. Based on as-underscore.m4 in GNU clisp.
+
+# gl_ASM_SYMBOL_PREFIX
+# Tests for the prefix of C symbols at the assembly language level and the
+# linker level. This prefix is either an underscore or empty. Defines the
+# C macro USER_LABEL_PREFIX to this prefix, and sets ASM_SYMBOL_PREFIX to
+# a stringified variant of this prefix.
+
+AC_DEFUN([gl_ASM_SYMBOL_PREFIX],
+[
+  AC_REQUIRE([AC_PROG_EGREP])
+  dnl We don't use GCC's __USER_LABEL_PREFIX__ here, because
+  dnl 1. It works only for GCC.
+  dnl 2. It is incorrectly defined on some platforms, in some GCC versions.
+  AC_REQUIRE([gl_C_ASM])
+  AC_CACHE_CHECK(
+    [whether C symbols are prefixed with underscore at the linker level],
+    [gl_cv_prog_as_underscore],
+    [cat > conftest.c <<EOF
+#ifdef __cplusplus
+extern "C" int foo (void);
+#endif
+int foo(void) { return 0; }
+EOF
+     # Look for the assembly language name in the .s file.
+     AC_TRY_COMMAND(${CC-cc} $CFLAGS $CPPFLAGS $gl_c_asm_opt conftest.c) >/dev/null 2>&1
+     if LC_ALL=C $EGREP '(^|[[^a-zA-Z0-9_]])_foo([[^a-zA-Z0-9_]]|$)' conftest.$gl_asmext >/dev/null; then
+       gl_cv_prog_as_underscore=yes
+     else
+       gl_cv_prog_as_underscore=no
+     fi
+     rm -f conftest*
+    ])
+  if test $gl_cv_prog_as_underscore = yes; then
+    USER_LABEL_PREFIX=_
+  else
+    USER_LABEL_PREFIX=
+  fi
+  AC_DEFINE_UNQUOTED([USER_LABEL_PREFIX], [$USER_LABEL_PREFIX],
+    [Define to the prefix of C symbols at the assembler and linker level,
+     either an underscore or empty.])
+  ASM_SYMBOL_PREFIX='"'${USER_LABEL_PREFIX}'"'
+  AC_SUBST([ASM_SYMBOL_PREFIX])
+])
+
+# gl_C_ASM
+# Determines how to produce an assembly language file from C source code.
+# Sets the variables:
+#   gl_asmext - the extension of assembly language output,
+#   gl_c_asm_opt - the C compiler option that produces assembly language output.
+
+AC_DEFUN([gl_C_ASM],
+[
+  AC_EGREP_CPP([MicrosoftCompiler],
+    [
+#ifdef _MSC_VER
+MicrosoftCompiler
+#endif
+    ],
+    [gl_asmext='asm'
+     gl_c_asm_opt='-c -Fa'
+    ],
+    [gl_asmext='s'
+     gl_c_asm_opt='-S'
+    ])
+])
diff --git a/gnulib-m4/extensions.m4 b/gnulib-m4/extensions.m4
new file mode 100644 (file)
index 0000000..fd1ce81
--- /dev/null
@@ -0,0 +1,189 @@
+# serial 18  -*- Autoconf -*-
+# Enable extensions on systems that normally disable them.
+
+# Copyright (C) 2003, 2006-2019 Free Software Foundation, Inc.
+# This file is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# This definition of AC_USE_SYSTEM_EXTENSIONS is stolen from git
+# Autoconf.  Perhaps we can remove this once we can assume Autoconf
+# 2.70 or later everywhere, but since Autoconf mutates rapidly
+# enough in this area it's likely we'll need to redefine
+# AC_USE_SYSTEM_EXTENSIONS for quite some time.
+
+# If autoconf reports a warning
+#     warning: AC_COMPILE_IFELSE was called before AC_USE_SYSTEM_EXTENSIONS
+# or  warning: AC_RUN_IFELSE was called before AC_USE_SYSTEM_EXTENSIONS
+# the fix is
+#   1) to ensure that AC_USE_SYSTEM_EXTENSIONS is never directly invoked
+#      but always AC_REQUIREd,
+#   2) to ensure that for each occurrence of
+#        AC_REQUIRE([AC_USE_SYSTEM_EXTENSIONS])
+#      or
+#        AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS])
+#      the corresponding gnulib module description has 'extensions' among
+#      its dependencies. This will ensure that the gl_USE_SYSTEM_EXTENSIONS
+#      invocation occurs in gl_EARLY, not in gl_INIT.
+
+# AC_USE_SYSTEM_EXTENSIONS
+# ------------------------
+# Enable extensions on systems that normally disable them,
+# typically due to standards-conformance issues.
+#
+# Remember that #undef in AH_VERBATIM gets replaced with #define by
+# AC_DEFINE.  The goal here is to define all known feature-enabling
+# macros, then, if reports of conflicts are made, disable macros that
+# cause problems on some platforms (such as __EXTENSIONS__).
+AC_DEFUN_ONCE([AC_USE_SYSTEM_EXTENSIONS],
+[AC_BEFORE([$0], [AC_COMPILE_IFELSE])dnl
+AC_BEFORE([$0], [AC_RUN_IFELSE])dnl
+
+  AC_CHECK_HEADER([minix/config.h], [MINIX=yes], [MINIX=])
+  if test "$MINIX" = yes; then
+    AC_DEFINE([_POSIX_SOURCE], [1],
+      [Define to 1 if you need to in order for 'stat' and other
+       things to work.])
+    AC_DEFINE([_POSIX_1_SOURCE], [2],
+      [Define to 2 if the system does not provide POSIX.1 features
+       except with this defined.])
+    AC_DEFINE([_MINIX], [1],
+      [Define to 1 if on MINIX.])
+    AC_DEFINE([_NETBSD_SOURCE], [1],
+      [Define to 1 to make NetBSD features available.  MINIX 3 needs this.])
+  fi
+
+dnl Use a different key than __EXTENSIONS__, as that name broke existing
+dnl configure.ac when using autoheader 2.62.
+  AH_VERBATIM([USE_SYSTEM_EXTENSIONS],
+[/* Enable extensions on AIX 3, Interix.  */
+#ifndef _ALL_SOURCE
+# undef _ALL_SOURCE
+#endif
+/* Enable general extensions on macOS.  */
+#ifndef _DARWIN_C_SOURCE
+# undef _DARWIN_C_SOURCE
+#endif
+/* Enable GNU extensions on systems that have them.  */
+#ifndef _GNU_SOURCE
+# undef _GNU_SOURCE
+#endif
+/* Enable NetBSD extensions on NetBSD.  */
+#ifndef _NETBSD_SOURCE
+# undef _NETBSD_SOURCE
+#endif
+/* Enable OpenBSD extensions on NetBSD.  */
+#ifndef _OPENBSD_SOURCE
+# undef _OPENBSD_SOURCE
+#endif
+/* Enable threading extensions on Solaris.  */
+#ifndef _POSIX_PTHREAD_SEMANTICS
+# undef _POSIX_PTHREAD_SEMANTICS
+#endif
+/* Enable extensions specified by ISO/IEC TS 18661-5:2014.  */
+#ifndef __STDC_WANT_IEC_60559_ATTRIBS_EXT__
+# undef __STDC_WANT_IEC_60559_ATTRIBS_EXT__
+#endif
+/* Enable extensions specified by ISO/IEC TS 18661-1:2014.  */
+#ifndef __STDC_WANT_IEC_60559_BFP_EXT__
+# undef __STDC_WANT_IEC_60559_BFP_EXT__
+#endif
+/* Enable extensions specified by ISO/IEC TS 18661-2:2015.  */
+#ifndef __STDC_WANT_IEC_60559_DFP_EXT__
+# undef __STDC_WANT_IEC_60559_DFP_EXT__
+#endif
+/* Enable extensions specified by ISO/IEC TS 18661-4:2015.  */
+#ifndef __STDC_WANT_IEC_60559_FUNCS_EXT__
+# undef __STDC_WANT_IEC_60559_FUNCS_EXT__
+#endif
+/* Enable extensions specified by ISO/IEC TS 18661-3:2015.  */
+#ifndef __STDC_WANT_IEC_60559_TYPES_EXT__
+# undef __STDC_WANT_IEC_60559_TYPES_EXT__
+#endif
+/* Enable extensions specified by ISO/IEC TR 24731-2:2010.  */
+#ifndef __STDC_WANT_LIB_EXT2__
+# undef __STDC_WANT_LIB_EXT2__
+#endif
+/* Enable extensions specified by ISO/IEC 24747:2009.  */
+#ifndef __STDC_WANT_MATH_SPEC_FUNCS__
+# undef __STDC_WANT_MATH_SPEC_FUNCS__
+#endif
+/* Enable extensions on HP NonStop.  */
+#ifndef _TANDEM_SOURCE
+# undef _TANDEM_SOURCE
+#endif
+/* Enable X/Open extensions if necessary.  HP-UX 11.11 defines
+   mbstate_t only if _XOPEN_SOURCE is defined to 500, regardless of
+   whether compiling with -Ae or -D_HPUX_SOURCE=1.  */
+#ifndef _XOPEN_SOURCE
+# undef _XOPEN_SOURCE
+#endif
+/* Enable X/Open compliant socket functions that do not require linking
+   with -lxnet on HP-UX 11.11.  */
+#ifndef _HPUX_ALT_XOPEN_SOCKET_API
+# undef _HPUX_ALT_XOPEN_SOCKET_API
+#endif
+/* Enable general extensions on Solaris.  */
+#ifndef __EXTENSIONS__
+# undef __EXTENSIONS__
+#endif
+])
+  AC_CACHE_CHECK([whether it is safe to define __EXTENSIONS__],
+    [ac_cv_safe_to_define___extensions__],
+    [AC_COMPILE_IFELSE(
+       [AC_LANG_PROGRAM([[
+#         define __EXTENSIONS__ 1
+          ]AC_INCLUDES_DEFAULT])],
+       [ac_cv_safe_to_define___extensions__=yes],
+       [ac_cv_safe_to_define___extensions__=no])])
+  test $ac_cv_safe_to_define___extensions__ = yes &&
+    AC_DEFINE([__EXTENSIONS__])
+  AC_DEFINE([_ALL_SOURCE])
+  AC_DEFINE([_DARWIN_C_SOURCE])
+  AC_DEFINE([_GNU_SOURCE])
+  AC_DEFINE([_NETBSD_SOURCE])
+  AC_DEFINE([_OPENBSD_SOURCE])
+  AC_DEFINE([_POSIX_PTHREAD_SEMANTICS])
+  AC_DEFINE([__STDC_WANT_IEC_60559_ATTRIBS_EXT__])
+  AC_DEFINE([__STDC_WANT_IEC_60559_BFP_EXT__])
+  AC_DEFINE([__STDC_WANT_IEC_60559_DFP_EXT__])
+  AC_DEFINE([__STDC_WANT_IEC_60559_FUNCS_EXT__])
+  AC_DEFINE([__STDC_WANT_IEC_60559_TYPES_EXT__])
+  AC_DEFINE([__STDC_WANT_LIB_EXT2__])
+  AC_DEFINE([__STDC_WANT_MATH_SPEC_FUNCS__])
+  AC_DEFINE([_TANDEM_SOURCE])
+  AC_CACHE_CHECK([whether _XOPEN_SOURCE should be defined],
+    [ac_cv_should_define__xopen_source],
+    [ac_cv_should_define__xopen_source=no
+     AC_COMPILE_IFELSE(
+       [AC_LANG_PROGRAM([[
+          #include <wchar.h>
+          mbstate_t x;]])],
+       [],
+       [AC_COMPILE_IFELSE(
+          [AC_LANG_PROGRAM([[
+             #define _XOPEN_SOURCE 500
+             #include <wchar.h>
+             mbstate_t x;]])],
+          [ac_cv_should_define__xopen_source=yes])])])
+  test $ac_cv_should_define__xopen_source = yes &&
+    AC_DEFINE([_XOPEN_SOURCE], [500])
+  AC_DEFINE([_HPUX_ALT_XOPEN_SOCKET_API])
+])# AC_USE_SYSTEM_EXTENSIONS
+
+# gl_USE_SYSTEM_EXTENSIONS
+# ------------------------
+# Enable extensions on systems that normally disable them,
+# typically due to standards-conformance issues.
+AC_DEFUN_ONCE([gl_USE_SYSTEM_EXTENSIONS],
+[
+  dnl Require this macro before AC_USE_SYSTEM_EXTENSIONS.
+  dnl gnulib does not need it. But if it gets required by third-party macros
+  dnl after AC_USE_SYSTEM_EXTENSIONS is required, autoconf 2.62..2.63 emit a
+  dnl warning: "AC_COMPILE_IFELSE was called before AC_USE_SYSTEM_EXTENSIONS".
+  dnl Note: We can do this only for one of the macros AC_AIX, AC_GNU_SOURCE,
+  dnl AC_MINIX. If people still use AC_AIX or AC_MINIX, they are out of luck.
+  AC_REQUIRE([AC_GNU_SOURCE])
+
+  AC_REQUIRE([AC_USE_SYSTEM_EXTENSIONS])
+])
diff --git a/gnulib-m4/gnulib-cache.m4 b/gnulib-m4/gnulib-cache.m4
new file mode 100644 (file)
index 0000000..aab31ca
--- /dev/null
@@ -0,0 +1,70 @@
+# Copyright (C) 2002-2019 Free Software Foundation, Inc.
+#
+# This file is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# This file is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this file.  If not, see <https://www.gnu.org/licenses/>.
+#
+# As a special exception to the GNU General Public License,
+# this file may be distributed as part of a program that
+# contains a configuration script generated by Autoconf, under
+# the same distribution terms as the rest of that program.
+#
+# Generated by gnulib-tool.
+#
+# This file represents the specification of how gnulib-tool is used.
+# It acts as a cache: It is written and read by gnulib-tool.
+# In projects that use version control, this file is meant to be put under
+# version control, like the configure.ac and various Makefile.am files.
+
+
+# Specification in the form of a command-line invocation:
+# gnulib-tool --import \
+#  --lib=libgnu \
+#  --source-base=gnulib-lib \
+#  --m4-base=gnulib-m4 \
+#  --doc-base=doc \
+#  --tests-base=tests \
+#  --aux-dir=build-aux \
+#  --no-conditional-dependencies \
+#  --libtool \
+#  --macro-prefix=gl \
+#  ansi-c++-opt \
+#  host-cpu-c-abi \
+#  lock \
+#  longlong \
+#  nocrash \
+#  stdint \
+#  stdnoreturn
+
+# Specification in the form of a few gnulib-tool.m4 macro invocations:
+gl_LOCAL_DIR([])
+gl_MODULES([
+  ansi-c++-opt
+  host-cpu-c-abi
+  lock
+  longlong
+  nocrash
+  stdint
+  stdnoreturn
+])
+gl_AVOID([])
+gl_SOURCE_BASE([gnulib-lib])
+gl_M4_BASE([gnulib-m4])
+gl_PO_BASE([])
+gl_DOC_BASE([doc])
+gl_TESTS_BASE([tests])
+gl_LIB([libgnu])
+gl_MAKEFILE_NAME([])
+gl_LIBTOOL
+gl_MACRO_PREFIX([gl])
+gl_PO_DOMAIN([])
+gl_WITNESS_C_MACRO([])
diff --git a/gnulib-m4/gnulib-common.m4 b/gnulib-m4/gnulib-common.m4
new file mode 100644 (file)
index 0000000..57b94ed
--- /dev/null
@@ -0,0 +1,424 @@
+# gnulib-common.m4 serial 44
+dnl Copyright (C) 2007-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+AC_PREREQ([2.62])
+
+# gl_COMMON
+# is expanded unconditionally through gnulib-tool magic.
+AC_DEFUN([gl_COMMON], [
+  dnl Use AC_REQUIRE here, so that the code is expanded once only.
+  AC_REQUIRE([gl_00GNULIB])
+  AC_REQUIRE([gl_COMMON_BODY])
+])
+AC_DEFUN([gl_COMMON_BODY], [
+  AH_VERBATIM([_Noreturn],
+[/* The _Noreturn keyword of C11.  */
+#ifndef _Noreturn
+# if (defined __cplusplus \
+      && ((201103 <= __cplusplus && !(__GNUC__ == 4 && __GNUC_MINOR__ == 7)) \
+          || (defined _MSC_VER && 1900 <= _MSC_VER)))
+#  define _Noreturn [[noreturn]]
+# elif ((!defined __cplusplus || defined __clang__) \
+        && (201112 <= (defined __STDC_VERSION__ ? __STDC_VERSION__ : 0)  \
+            || 4 < __GNUC__ + (7 <= __GNUC_MINOR__)))
+   /* _Noreturn works as-is.  */
+# elif 2 < __GNUC__ + (8 <= __GNUC_MINOR__) || 0x5110 <= __SUNPRO_C
+#  define _Noreturn __attribute__ ((__noreturn__))
+# elif 1200 <= (defined _MSC_VER ? _MSC_VER : 0)
+#  define _Noreturn __declspec (noreturn)
+# else
+#  define _Noreturn
+# endif
+#endif
+])
+  AH_VERBATIM([isoc99_inline],
+[/* Work around a bug in Apple GCC 4.0.1 build 5465: In C99 mode, it supports
+   the ISO C 99 semantics of 'extern inline' (unlike the GNU C semantics of
+   earlier versions), but does not display it by setting __GNUC_STDC_INLINE__.
+   __APPLE__ && __MACH__ test for Mac OS X.
+   __APPLE_CC__ tests for the Apple compiler and its version.
+   __STDC_VERSION__ tests for the C99 mode.  */
+#if defined __APPLE__ && defined __MACH__ && __APPLE_CC__ >= 5465 && !defined __cplusplus && __STDC_VERSION__ >= 199901L && !defined __GNUC_STDC_INLINE__
+# define __GNUC_STDC_INLINE__ 1
+#endif])
+  AH_VERBATIM([unused_parameter],
+[/* Define as a marker that can be attached to declarations that might not
+    be used.  This helps to reduce warnings, such as from
+    GCC -Wunused-parameter.  */
+#if __GNUC__ >= 3 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 7)
+# define _GL_UNUSED __attribute__ ((__unused__))
+#else
+# define _GL_UNUSED
+#endif
+/* The name _UNUSED_PARAMETER_ is an earlier spelling, although the name
+   is a misnomer outside of parameter lists.  */
+#define _UNUSED_PARAMETER_ _GL_UNUSED
+
+/* gcc supports the "unused" attribute on possibly unused labels, and
+   g++ has since version 4.5.  Note to support C++ as well as C,
+   _GL_UNUSED_LABEL should be used with a trailing ;  */
+#if !defined __cplusplus || __GNUC__ > 4 \
+    || (__GNUC__ == 4 && __GNUC_MINOR__ >= 5)
+# define _GL_UNUSED_LABEL _GL_UNUSED
+#else
+# define _GL_UNUSED_LABEL
+#endif
+
+/* The __pure__ attribute was added in gcc 2.96.  */
+#if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 96)
+# define _GL_ATTRIBUTE_PURE __attribute__ ((__pure__))
+#else
+# define _GL_ATTRIBUTE_PURE /* empty */
+#endif
+
+/* The __const__ attribute was added in gcc 2.95.  */
+#if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 95)
+# define _GL_ATTRIBUTE_CONST __attribute__ ((__const__))
+#else
+# define _GL_ATTRIBUTE_CONST /* empty */
+#endif
+
+/* The __malloc__ attribute was added in gcc 3.  */
+#if 3 <= __GNUC__
+# define _GL_ATTRIBUTE_MALLOC __attribute__ ((__malloc__))
+#else
+# define _GL_ATTRIBUTE_MALLOC /* empty */
+#endif
+])
+  AH_VERBATIM([async_safe],
+[/* The _GL_ASYNC_SAFE marker should be attached to functions that are
+   signal handlers (for signals other than SIGABRT, SIGPIPE) or can be
+   invoked from such signal handlers.  Such functions have some restrictions:
+     * All functions that it calls should be marked _GL_ASYNC_SAFE as well,
+       or should be listed as async-signal-safe in POSIX
+       <http://pubs.opengroup.org/onlinepubs/9699919799/functions/V2_chap02.html#tag_15_04>
+       section 2.4.3.  Note that malloc(), sprintf(), and fwrite(), in
+       particular, are NOT async-signal-safe.
+     * All memory locations (variables and struct fields) that these functions
+       access must be marked 'volatile'.  This holds for both read and write
+       accesses.  Otherwise the compiler might optimize away stores to and
+       reads from such locations that occur in the program, depending on its
+       data flow analysis.  For example, when the program contains a loop
+       that is intended to inspect a variable set from within a signal handler
+           while (!signal_occurred)
+             ;
+       the compiler is allowed to transform this into an endless loop if the
+       variable 'signal_occurred' is not declared 'volatile'.
+   Additionally, recall that:
+     * A signal handler should not modify errno (except if it is a handler
+       for a fatal signal and ends by raising the same signal again, thus
+       provoking the termination of the process).  If it invokes a function
+       that may clobber errno, it needs to save and restore the value of
+       errno.  */
+#define _GL_ASYNC_SAFE
+])
+  dnl Preparation for running test programs:
+  dnl Tell glibc to write diagnostics from -D_FORTIFY_SOURCE=2 to stderr, not
+  dnl to /dev/tty, so they can be redirected to log files.  Such diagnostics
+  dnl arise e.g., in the macros gl_PRINTF_DIRECTIVE_N, gl_SNPRINTF_DIRECTIVE_N.
+  LIBC_FATAL_STDERR_=1
+  export LIBC_FATAL_STDERR_
+])
+
+# gl_MODULE_INDICATOR_CONDITION
+# expands to a C preprocessor expression that evaluates to 1 or 0, depending
+# whether a gnulib module that has been requested shall be considered present
+# or not.
+m4_define([gl_MODULE_INDICATOR_CONDITION], [1])
+
+# gl_MODULE_INDICATOR_SET_VARIABLE([modulename])
+# sets the shell variable that indicates the presence of the given module to
+# a C preprocessor expression that will evaluate to 1.
+AC_DEFUN([gl_MODULE_INDICATOR_SET_VARIABLE],
+[
+  gl_MODULE_INDICATOR_SET_VARIABLE_AUX(
+    [GNULIB_[]m4_translit([[$1]],
+                          [abcdefghijklmnopqrstuvwxyz./-],
+                          [ABCDEFGHIJKLMNOPQRSTUVWXYZ___])],
+    [gl_MODULE_INDICATOR_CONDITION])
+])
+
+# gl_MODULE_INDICATOR_SET_VARIABLE_AUX([variable])
+# modifies the shell variable to include the gl_MODULE_INDICATOR_CONDITION.
+# The shell variable's value is a C preprocessor expression that evaluates
+# to 0 or 1.
+AC_DEFUN([gl_MODULE_INDICATOR_SET_VARIABLE_AUX],
+[
+  m4_if(m4_defn([gl_MODULE_INDICATOR_CONDITION]), [1],
+    [
+     dnl Simplify the expression VALUE || 1 to 1.
+     $1=1
+    ],
+    [gl_MODULE_INDICATOR_SET_VARIABLE_AUX_OR([$1],
+                                             [gl_MODULE_INDICATOR_CONDITION])])
+])
+
+# gl_MODULE_INDICATOR_SET_VARIABLE_AUX_OR([variable], [condition])
+# modifies the shell variable to include the given condition.  The shell
+# variable's value is a C preprocessor expression that evaluates to 0 or 1.
+AC_DEFUN([gl_MODULE_INDICATOR_SET_VARIABLE_AUX_OR],
+[
+  dnl Simplify the expression 1 || CONDITION to 1.
+  if test "$[]$1" != 1; then
+    dnl Simplify the expression 0 || CONDITION to CONDITION.
+    if test "$[]$1" = 0; then
+      $1=$2
+    else
+      $1="($[]$1 || $2)"
+    fi
+  fi
+])
+
+# gl_MODULE_INDICATOR([modulename])
+# defines a C macro indicating the presence of the given module
+# in a location where it can be used.
+#                                             |  Value  |   Value   |
+#                                             | in lib/ | in tests/ |
+# --------------------------------------------+---------+-----------+
+# Module present among main modules:          |    1    |     1     |
+# --------------------------------------------+---------+-----------+
+# Module present among tests-related modules: |    0    |     1     |
+# --------------------------------------------+---------+-----------+
+# Module not present at all:                  |    0    |     0     |
+# --------------------------------------------+---------+-----------+
+AC_DEFUN([gl_MODULE_INDICATOR],
+[
+  AC_DEFINE_UNQUOTED([GNULIB_]m4_translit([[$1]],
+      [abcdefghijklmnopqrstuvwxyz./-],
+      [ABCDEFGHIJKLMNOPQRSTUVWXYZ___]),
+    [gl_MODULE_INDICATOR_CONDITION],
+    [Define to a C preprocessor expression that evaluates to 1 or 0,
+     depending whether the gnulib module $1 shall be considered present.])
+])
+
+# gl_MODULE_INDICATOR_FOR_TESTS([modulename])
+# defines a C macro indicating the presence of the given module
+# in lib or tests. This is useful to determine whether the module
+# should be tested.
+#                                             |  Value  |   Value   |
+#                                             | in lib/ | in tests/ |
+# --------------------------------------------+---------+-----------+
+# Module present among main modules:          |    1    |     1     |
+# --------------------------------------------+---------+-----------+
+# Module present among tests-related modules: |    1    |     1     |
+# --------------------------------------------+---------+-----------+
+# Module not present at all:                  |    0    |     0     |
+# --------------------------------------------+---------+-----------+
+AC_DEFUN([gl_MODULE_INDICATOR_FOR_TESTS],
+[
+  AC_DEFINE([GNULIB_TEST_]m4_translit([[$1]],
+      [abcdefghijklmnopqrstuvwxyz./-],
+      [ABCDEFGHIJKLMNOPQRSTUVWXYZ___]), [1],
+    [Define to 1 when the gnulib module $1 should be tested.])
+])
+
+# gl_ASSERT_NO_GNULIB_POSIXCHECK
+# asserts that there will never be a need to #define GNULIB_POSIXCHECK.
+# and thereby enables an optimization of configure and config.h.
+# Used by Emacs.
+AC_DEFUN([gl_ASSERT_NO_GNULIB_POSIXCHECK],
+[
+  dnl Override gl_WARN_ON_USE_PREPARE.
+  dnl But hide this definition from 'aclocal'.
+  AC_DEFUN([gl_W][ARN_ON_USE_PREPARE], [])
+])
+
+# gl_ASSERT_NO_GNULIB_TESTS
+# asserts that there will be no gnulib tests in the scope of the configure.ac
+# and thereby enables an optimization of config.h.
+# Used by Emacs.
+AC_DEFUN([gl_ASSERT_NO_GNULIB_TESTS],
+[
+  dnl Override gl_MODULE_INDICATOR_FOR_TESTS.
+  AC_DEFUN([gl_MODULE_INDICATOR_FOR_TESTS], [])
+])
+
+# Test whether <features.h> exists.
+# Set HAVE_FEATURES_H.
+AC_DEFUN([gl_FEATURES_H],
+[
+  AC_CHECK_HEADERS_ONCE([features.h])
+  if test $ac_cv_header_features_h = yes; then
+    HAVE_FEATURES_H=1
+  else
+    HAVE_FEATURES_H=0
+  fi
+  AC_SUBST([HAVE_FEATURES_H])
+])
+
+# AS_VAR_IF(VAR, VALUE, [IF-MATCH], [IF-NOT-MATCH])
+# ----------------------------------------------------
+# Backport of autoconf-2.63b's macro.
+# Remove this macro when we can assume autoconf >= 2.64.
+m4_ifndef([AS_VAR_IF],
+[m4_define([AS_VAR_IF],
+[AS_IF([test x"AS_VAR_GET([$1])" = x""$2], [$3], [$4])])])
+
+# gl_PROG_CC_C99
+# Modifies the value of the shell variable CC in an attempt to make $CC
+# understand ISO C99 source code.
+# This is like AC_PROG_CC_C99, except that
+# - AC_PROG_CC_C99 does not mix well with AC_PROG_CC_STDC
+#   <https://lists.gnu.org/r/bug-gnulib/2011-09/msg00367.html>,
+#   but many more packages use AC_PROG_CC_STDC than AC_PROG_CC_C99
+#   <https://lists.gnu.org/r/bug-gnulib/2011-09/msg00441.html>.
+# Remaining problems:
+# - When AC_PROG_CC_STDC is invoked twice, it adds the C99 enabling options
+#   to CC twice
+#   <https://lists.gnu.org/r/bug-gnulib/2011-09/msg00431.html>.
+# - AC_PROG_CC_STDC is likely to change now that C11 is an ISO standard.
+AC_DEFUN([gl_PROG_CC_C99],
+[
+  dnl Change that version number to the minimum Autoconf version that supports
+  dnl mixing AC_PROG_CC_C99 calls with AC_PROG_CC_STDC calls.
+  m4_version_prereq([9.0],
+    [AC_REQUIRE([AC_PROG_CC_C99])],
+    [AC_REQUIRE([AC_PROG_CC_STDC])])
+])
+
+# gl_PROG_AR_RANLIB
+# Determines the values for AR, ARFLAGS, RANLIB that fit with the compiler.
+# The user can set the variables AR, ARFLAGS, RANLIB if he wants to override
+# the values.
+AC_DEFUN([gl_PROG_AR_RANLIB],
+[
+  dnl Minix 3 comes with two toolchains: The Amsterdam Compiler Kit compiler
+  dnl as "cc", and GCC as "gcc". They have different object file formats and
+  dnl library formats. In particular, the GNU binutils programs ar and ranlib
+  dnl produce libraries that work only with gcc, not with cc.
+  AC_REQUIRE([AC_PROG_CC])
+  dnl The '][' hides this use from 'aclocal'.
+  AC_BEFORE([$0], [A][M_PROG_AR])
+  AC_CACHE_CHECK([for Minix Amsterdam compiler], [gl_cv_c_amsterdam_compiler],
+    [
+      AC_EGREP_CPP([Amsterdam],
+        [
+#ifdef __ACK__
+Amsterdam
+#endif
+        ],
+        [gl_cv_c_amsterdam_compiler=yes],
+        [gl_cv_c_amsterdam_compiler=no])
+    ])
+
+  dnl Don't compete with AM_PROG_AR's decision about AR/ARFLAGS if we are not
+  dnl building with __ACK__.
+  if test $gl_cv_c_amsterdam_compiler = yes; then
+    if test -z "$AR"; then
+      AR='cc -c.a'
+    fi
+    if test -z "$ARFLAGS"; then
+      ARFLAGS='-o'
+    fi
+  else
+    dnl AM_PROG_AR was added in automake v1.11.2.  AM_PROG_AR does not AC_SUBST
+    dnl ARFLAGS variable (it is filed into Makefile.in directly by automake
+    dnl script on-demand, if not specified by ./configure of course).
+    dnl Don't AC_REQUIRE the AM_PROG_AR otherwise the code for __ACK__ above
+    dnl will be ignored.  Also, pay attention to call AM_PROG_AR in else block
+    dnl because AM_PROG_AR is written so it could re-set AR variable even for
+    dnl __ACK__.  It may seem like its easier to avoid calling the macro here,
+    dnl but we need to AC_SUBST both AR/ARFLAGS (thus those must have some good
+    dnl default value and automake should usually know them).
+    dnl
+    dnl The '][' hides this use from 'aclocal'.
+    m4_ifdef([A][M_PROG_AR], [A][M_PROG_AR], [:])
+  fi
+
+  dnl In case the code above has not helped with setting AR/ARFLAGS, use
+  dnl Automake-documented default values for AR and ARFLAGS, but prefer
+  dnl ${host}-ar over ar (useful for cross-compiling).
+  AC_CHECK_TOOL([AR], [ar], [ar])
+  if test -z "$ARFLAGS"; then
+    ARFLAGS='cr'
+  fi
+
+  AC_SUBST([AR])
+  AC_SUBST([ARFLAGS])
+  if test -z "$RANLIB"; then
+    if test $gl_cv_c_amsterdam_compiler = yes; then
+      RANLIB=':'
+    else
+      dnl Use the ranlib program if it is available.
+      AC_PROG_RANLIB
+    fi
+  fi
+  AC_SUBST([RANLIB])
+])
+
+# AC_C_RESTRICT
+# This definition is copied from post-2.69 Autoconf and overrides the
+# AC_C_RESTRICT macro from autoconf 2.60..2.69.  It can be removed
+# once autoconf >= 2.70 can be assumed.  It's painful to check version
+# numbers, and in practice this macro is more up-to-date than Autoconf
+# is, so override Autoconf unconditionally.
+AC_DEFUN([AC_C_RESTRICT],
+[AC_CACHE_CHECK([for C/C++ restrict keyword], [ac_cv_c_restrict],
+  [ac_cv_c_restrict=no
+   # The order here caters to the fact that C++ does not require restrict.
+   for ac_kw in __restrict __restrict__ _Restrict restrict; do
+     AC_COMPILE_IFELSE(
+      [AC_LANG_PROGRAM(
+         [[typedef int *int_ptr;
+           int foo (int_ptr $ac_kw ip) { return ip[0]; }
+           int bar (int [$ac_kw]); /* Catch GCC bug 14050.  */
+           int bar (int ip[$ac_kw]) { return ip[0]; }
+         ]],
+         [[int s[1];
+           int *$ac_kw t = s;
+           t[0] = 0;
+           return foo (t) + bar (t);
+         ]])],
+      [ac_cv_c_restrict=$ac_kw])
+     test "$ac_cv_c_restrict" != no && break
+   done
+  ])
+ AH_VERBATIM([restrict],
+[/* Define to the equivalent of the C99 'restrict' keyword, or to
+   nothing if this is not supported.  Do not define if restrict is
+   supported directly.  */
+#undef restrict
+/* Work around a bug in Sun C++: it does not support _Restrict or
+   __restrict__, even though the corresponding Sun C compiler ends up with
+   "#define restrict _Restrict" or "#define restrict __restrict__" in the
+   previous line.  Perhaps some future version of Sun C++ will work with
+   restrict; if so, hopefully it defines __RESTRICT like Sun C does.  */
+#if defined __SUNPRO_CC && !defined __RESTRICT
+# define _Restrict
+# define __restrict__
+#endif])
+ case $ac_cv_c_restrict in
+   restrict) ;;
+   no) AC_DEFINE([restrict], []) ;;
+   *)  AC_DEFINE_UNQUOTED([restrict], [$ac_cv_c_restrict]) ;;
+ esac
+])# AC_C_RESTRICT
+
+# gl_BIGENDIAN
+# is like AC_C_BIGENDIAN, except that it can be AC_REQUIREd.
+# Note that AC_REQUIRE([AC_C_BIGENDIAN]) does not work reliably because some
+# macros invoke AC_C_BIGENDIAN with arguments.
+AC_DEFUN([gl_BIGENDIAN],
+[
+  AC_C_BIGENDIAN
+])
+
+# gl_CACHE_VAL_SILENT(cache-id, command-to-set-it)
+# is like AC_CACHE_VAL(cache-id, command-to-set-it), except that it does not
+# output a spurious "(cached)" mark in the midst of other configure output.
+# This macro should be used instead of AC_CACHE_VAL when it is not surrounded
+# by an AC_MSG_CHECKING/AC_MSG_RESULT pair.
+AC_DEFUN([gl_CACHE_VAL_SILENT],
+[
+  saved_as_echo_n="$as_echo_n"
+  as_echo_n=':'
+  AC_CACHE_VAL([$1], [$2])
+  as_echo_n="$saved_as_echo_n"
+])
+
+# AS_VAR_COPY was added in autoconf 2.63b
+m4_define_default([AS_VAR_COPY],
+[AS_LITERAL_IF([$1[]$2], [$1=$$2], [eval $1=\$$2])])
diff --git a/gnulib-m4/gnulib-comp.m4 b/gnulib-m4/gnulib-comp.m4
new file mode 100644 (file)
index 0000000..bbcb959
--- /dev/null
@@ -0,0 +1,300 @@
+# DO NOT EDIT! GENERATED AUTOMATICALLY!
+# Copyright (C) 2002-2019 Free Software Foundation, Inc.
+#
+# This file is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# This file is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this file.  If not, see <https://www.gnu.org/licenses/>.
+#
+# As a special exception to the GNU General Public License,
+# this file may be distributed as part of a program that
+# contains a configuration script generated by Autoconf, under
+# the same distribution terms as the rest of that program.
+#
+# Generated by gnulib-tool.
+#
+# This file represents the compiled summary of the specification in
+# gnulib-cache.m4. It lists the computed macro invocations that need
+# to be invoked from configure.ac.
+# In projects that use version control, this file can be treated like
+# other built files.
+
+
+# This macro should be invoked from ./configure.ac, in the section
+# "Checks for programs", right after AC_PROG_CC, and certainly before
+# any checks for libraries, header files, types and library functions.
+AC_DEFUN([gl_EARLY],
+[
+  m4_pattern_forbid([^gl_[A-Z]])dnl the gnulib macro namespace
+  m4_pattern_allow([^gl_ES$])dnl a valid locale name
+  m4_pattern_allow([^gl_LIBOBJS$])dnl a variable
+  m4_pattern_allow([^gl_LTLIBOBJS$])dnl a variable
+
+  # Pre-early section.
+  AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS])
+  AC_REQUIRE([gl_PROG_AR_RANLIB])
+
+  AC_REQUIRE([AM_PROG_CC_C_O])
+  # Code from module absolute-header:
+  # Code from module ansi-c++-opt:
+  # Code from module extensions:
+  # Code from module havelib:
+  # Code from module host-cpu-c-abi:
+  # Code from module include_next:
+  # Code from module limits-h:
+  # Code from module lock:
+  # Code from module longlong:
+  # Code from module multiarch:
+  # Code from module nocrash:
+  # Code from module snippet/_Noreturn:
+  # Code from module ssize_t:
+  # Code from module stdint:
+  # Code from module stdnoreturn:
+  # Code from module sys_types:
+  # Code from module threadlib:
+  gl_THREADLIB_EARLY
+  # Code from module windows-mutex:
+  # Code from module windows-once:
+  # Code from module windows-recmutex:
+  # Code from module windows-rwlock:
+])
+
+# This macro should be invoked from ./configure.ac, in the section
+# "Check for header files, types and library functions".
+AC_DEFUN([gl_INIT],
+[
+  AM_CONDITIONAL([GL_COND_LIBTOOL], [true])
+  gl_cond_libtool=true
+  gl_m4_base='gnulib-m4'
+  m4_pushdef([AC_LIBOBJ], m4_defn([gl_LIBOBJ]))
+  m4_pushdef([AC_REPLACE_FUNCS], m4_defn([gl_REPLACE_FUNCS]))
+  m4_pushdef([AC_LIBSOURCES], m4_defn([gl_LIBSOURCES]))
+  m4_pushdef([gl_LIBSOURCES_LIST], [])
+  m4_pushdef([gl_LIBSOURCES_DIR], [])
+  gl_COMMON
+  gl_source_base='gnulib-lib'
+  AC_REQUIRE([gl_ANSI_CXX])
+  AC_REQUIRE([gl_HOST_CPU_C_ABI])
+  gl_LIMITS_H
+  gl_LOCK
+  gl_MODULE_INDICATOR([lock])
+  AC_REQUIRE([AC_TYPE_LONG_LONG_INT])
+  AC_REQUIRE([AC_TYPE_UNSIGNED_LONG_LONG_INT])
+  gl_MULTIARCH
+  gt_TYPE_SSIZE_T
+  gl_STDINT_H
+  gl_STDNORETURN_H
+  gl_SYS_TYPES_H
+  AC_PROG_MKDIR_P
+  AC_REQUIRE([gl_THREADLIB])
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  case "$host_os" in
+    mingw*)
+      AC_LIBOBJ([windows-mutex])
+      ;;
+  esac
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  case "$host_os" in
+    mingw*)
+      AC_LIBOBJ([windows-once])
+      ;;
+  esac
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  case "$host_os" in
+    mingw*)
+      AC_LIBOBJ([windows-recmutex])
+      ;;
+  esac
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  case "$host_os" in
+    mingw*)
+      AC_LIBOBJ([windows-rwlock])
+      ;;
+  esac
+  # End of code from modules
+  m4_ifval(gl_LIBSOURCES_LIST, [
+    m4_syscmd([test ! -d ]m4_defn([gl_LIBSOURCES_DIR])[ ||
+      for gl_file in ]gl_LIBSOURCES_LIST[ ; do
+        if test ! -r ]m4_defn([gl_LIBSOURCES_DIR])[/$gl_file ; then
+          echo "missing file ]m4_defn([gl_LIBSOURCES_DIR])[/$gl_file" >&2
+          exit 1
+        fi
+      done])dnl
+      m4_if(m4_sysval, [0], [],
+        [AC_FATAL([expected source file, required through AC_LIBSOURCES, not found])])
+  ])
+  m4_popdef([gl_LIBSOURCES_DIR])
+  m4_popdef([gl_LIBSOURCES_LIST])
+  m4_popdef([AC_LIBSOURCES])
+  m4_popdef([AC_REPLACE_FUNCS])
+  m4_popdef([AC_LIBOBJ])
+  AC_CONFIG_COMMANDS_PRE([
+    gl_libobjs=
+    gl_ltlibobjs=
+    if test -n "$gl_LIBOBJS"; then
+      # Remove the extension.
+      sed_drop_objext='s/\.o$//;s/\.obj$//'
+      for i in `for i in $gl_LIBOBJS; do echo "$i"; done | sed -e "$sed_drop_objext" | sort | uniq`; do
+        gl_libobjs="$gl_libobjs $i.$ac_objext"
+        gl_ltlibobjs="$gl_ltlibobjs $i.lo"
+      done
+    fi
+    AC_SUBST([gl_LIBOBJS], [$gl_libobjs])
+    AC_SUBST([gl_LTLIBOBJS], [$gl_ltlibobjs])
+  ])
+  gltests_libdeps=
+  gltests_ltlibdeps=
+  m4_pushdef([AC_LIBOBJ], m4_defn([gltests_LIBOBJ]))
+  m4_pushdef([AC_REPLACE_FUNCS], m4_defn([gltests_REPLACE_FUNCS]))
+  m4_pushdef([AC_LIBSOURCES], m4_defn([gltests_LIBSOURCES]))
+  m4_pushdef([gltests_LIBSOURCES_LIST], [])
+  m4_pushdef([gltests_LIBSOURCES_DIR], [])
+  gl_COMMON
+  gl_source_base='tests'
+changequote(,)dnl
+  gltests_WITNESS=IN_`echo "${PACKAGE-$PACKAGE_TARNAME}" | LC_ALL=C tr abcdefghijklmnopqrstuvwxyz ABCDEFGHIJKLMNOPQRSTUVWXYZ | LC_ALL=C sed -e 's/[^A-Z0-9_]/_/g'`_GNULIB_TESTS
+changequote([, ])dnl
+  AC_SUBST([gltests_WITNESS])
+  gl_module_indicator_condition=$gltests_WITNESS
+  m4_pushdef([gl_MODULE_INDICATOR_CONDITION], [$gl_module_indicator_condition])
+  m4_popdef([gl_MODULE_INDICATOR_CONDITION])
+  m4_ifval(gltests_LIBSOURCES_LIST, [
+    m4_syscmd([test ! -d ]m4_defn([gltests_LIBSOURCES_DIR])[ ||
+      for gl_file in ]gltests_LIBSOURCES_LIST[ ; do
+        if test ! -r ]m4_defn([gltests_LIBSOURCES_DIR])[/$gl_file ; then
+          echo "missing file ]m4_defn([gltests_LIBSOURCES_DIR])[/$gl_file" >&2
+          exit 1
+        fi
+      done])dnl
+      m4_if(m4_sysval, [0], [],
+        [AC_FATAL([expected source file, required through AC_LIBSOURCES, not found])])
+  ])
+  m4_popdef([gltests_LIBSOURCES_DIR])
+  m4_popdef([gltests_LIBSOURCES_LIST])
+  m4_popdef([AC_LIBSOURCES])
+  m4_popdef([AC_REPLACE_FUNCS])
+  m4_popdef([AC_LIBOBJ])
+  AC_CONFIG_COMMANDS_PRE([
+    gltests_libobjs=
+    gltests_ltlibobjs=
+    if test -n "$gltests_LIBOBJS"; then
+      # Remove the extension.
+      sed_drop_objext='s/\.o$//;s/\.obj$//'
+      for i in `for i in $gltests_LIBOBJS; do echo "$i"; done | sed -e "$sed_drop_objext" | sort | uniq`; do
+        gltests_libobjs="$gltests_libobjs $i.$ac_objext"
+        gltests_ltlibobjs="$gltests_ltlibobjs $i.lo"
+      done
+    fi
+    AC_SUBST([gltests_LIBOBJS], [$gltests_libobjs])
+    AC_SUBST([gltests_LTLIBOBJS], [$gltests_ltlibobjs])
+  ])
+])
+
+# Like AC_LIBOBJ, except that the module name goes
+# into gl_LIBOBJS instead of into LIBOBJS.
+AC_DEFUN([gl_LIBOBJ], [
+  AS_LITERAL_IF([$1], [gl_LIBSOURCES([$1.c])])dnl
+  gl_LIBOBJS="$gl_LIBOBJS $1.$ac_objext"
+])
+
+# Like AC_REPLACE_FUNCS, except that the module name goes
+# into gl_LIBOBJS instead of into LIBOBJS.
+AC_DEFUN([gl_REPLACE_FUNCS], [
+  m4_foreach_w([gl_NAME], [$1], [AC_LIBSOURCES(gl_NAME[.c])])dnl
+  AC_CHECK_FUNCS([$1], , [gl_LIBOBJ($ac_func)])
+])
+
+# Like AC_LIBSOURCES, except the directory where the source file is
+# expected is derived from the gnulib-tool parameterization,
+# and alloca is special cased (for the alloca-opt module).
+# We could also entirely rely on EXTRA_lib..._SOURCES.
+AC_DEFUN([gl_LIBSOURCES], [
+  m4_foreach([_gl_NAME], [$1], [
+    m4_if(_gl_NAME, [alloca.c], [], [
+      m4_define([gl_LIBSOURCES_DIR], [gnulib-lib])
+      m4_append([gl_LIBSOURCES_LIST], _gl_NAME, [ ])
+    ])
+  ])
+])
+
+# Like AC_LIBOBJ, except that the module name goes
+# into gltests_LIBOBJS instead of into LIBOBJS.
+AC_DEFUN([gltests_LIBOBJ], [
+  AS_LITERAL_IF([$1], [gltests_LIBSOURCES([$1.c])])dnl
+  gltests_LIBOBJS="$gltests_LIBOBJS $1.$ac_objext"
+])
+
+# Like AC_REPLACE_FUNCS, except that the module name goes
+# into gltests_LIBOBJS instead of into LIBOBJS.
+AC_DEFUN([gltests_REPLACE_FUNCS], [
+  m4_foreach_w([gl_NAME], [$1], [AC_LIBSOURCES(gl_NAME[.c])])dnl
+  AC_CHECK_FUNCS([$1], , [gltests_LIBOBJ($ac_func)])
+])
+
+# Like AC_LIBSOURCES, except the directory where the source file is
+# expected is derived from the gnulib-tool parameterization,
+# and alloca is special cased (for the alloca-opt module).
+# We could also entirely rely on EXTRA_lib..._SOURCES.
+AC_DEFUN([gltests_LIBSOURCES], [
+  m4_foreach([_gl_NAME], [$1], [
+    m4_if(_gl_NAME, [alloca.c], [], [
+      m4_define([gltests_LIBSOURCES_DIR], [tests])
+      m4_append([gltests_LIBSOURCES_LIST], _gl_NAME, [ ])
+    ])
+  ])
+])
+
+# This macro records the list of files which have been installed by
+# gnulib-tool and may be removed by future gnulib-tool invocations.
+AC_DEFUN([gl_FILE_LIST], [
+  build-aux/config.rpath
+  lib/_Noreturn.h
+  lib/glthread/lock.c
+  lib/glthread/lock.h
+  lib/glthread/threadlib.c
+  lib/limits.in.h
+  lib/stdint.in.h
+  lib/stdnoreturn.in.h
+  lib/sys_types.in.h
+  lib/windows-initguard.h
+  lib/windows-mutex.c
+  lib/windows-mutex.h
+  lib/windows-once.c
+  lib/windows-once.h
+  lib/windows-recmutex.c
+  lib/windows-recmutex.h
+  lib/windows-rwlock.c
+  lib/windows-rwlock.h
+  m4/00gnulib.m4
+  m4/absolute-header.m4
+  m4/ansi-c++.m4
+  m4/asm-underscore.m4
+  m4/extensions.m4
+  m4/gnulib-common.m4
+  m4/host-cpu-c-abi.m4
+  m4/include_next.m4
+  m4/lib-ld.m4
+  m4/lib-link.m4
+  m4/lib-prefix.m4
+  m4/limits-h.m4
+  m4/lock.m4
+  m4/longlong.m4
+  m4/multiarch.m4
+  m4/nocrash.m4
+  m4/off_t.m4
+  m4/pthread_rwlock_rdlock.m4
+  m4/ssize_t.m4
+  m4/stdint.m4
+  m4/stdnoreturn.m4
+  m4/sys_types_h.m4
+  m4/threadlib.m4
+  m4/wint_t.m4
+])
diff --git a/gnulib-m4/gnulib-tool.m4 b/gnulib-m4/gnulib-tool.m4
new file mode 100644 (file)
index 0000000..98e6ade
--- /dev/null
@@ -0,0 +1,57 @@
+# gnulib-tool.m4 serial 2
+dnl Copyright (C) 2004-2005, 2009-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl The following macros need not be invoked explicitly.
+dnl Invoking them does nothing except to declare default arguments
+dnl for "gnulib-tool --import".
+
+dnl Usage: gl_LOCAL_DIR([DIR])
+AC_DEFUN([gl_LOCAL_DIR], [])
+
+dnl Usage: gl_MODULES([module1 module2 ...])
+AC_DEFUN([gl_MODULES], [])
+
+dnl Usage: gl_AVOID([module1 module2 ...])
+AC_DEFUN([gl_AVOID], [])
+
+dnl Usage: gl_SOURCE_BASE([DIR])
+AC_DEFUN([gl_SOURCE_BASE], [])
+
+dnl Usage: gl_M4_BASE([DIR])
+AC_DEFUN([gl_M4_BASE], [])
+
+dnl Usage: gl_PO_BASE([DIR])
+AC_DEFUN([gl_PO_BASE], [])
+
+dnl Usage: gl_DOC_BASE([DIR])
+AC_DEFUN([gl_DOC_BASE], [])
+
+dnl Usage: gl_TESTS_BASE([DIR])
+AC_DEFUN([gl_TESTS_BASE], [])
+
+dnl Usage: gl_WITH_TESTS
+AC_DEFUN([gl_WITH_TESTS], [])
+
+dnl Usage: gl_LIB([LIBNAME])
+AC_DEFUN([gl_LIB], [])
+
+dnl Usage: gl_LGPL or gl_LGPL([VERSION])
+AC_DEFUN([gl_LGPL], [])
+
+dnl Usage: gl_MAKEFILE_NAME([FILENAME])
+AC_DEFUN([gl_MAKEFILE_NAME], [])
+
+dnl Usage: gl_LIBTOOL
+AC_DEFUN([gl_LIBTOOL], [])
+
+dnl Usage: gl_MACRO_PREFIX([PREFIX])
+AC_DEFUN([gl_MACRO_PREFIX], [])
+
+dnl Usage: gl_PO_DOMAIN([DOMAIN])
+AC_DEFUN([gl_PO_DOMAIN], [])
+
+dnl Usage: gl_VC_FILES([BOOLEAN])
+AC_DEFUN([gl_VC_FILES], [])
diff --git a/gnulib-m4/host-cpu-c-abi.m4 b/gnulib-m4/host-cpu-c-abi.m4
new file mode 100644 (file)
index 0000000..4407296
--- /dev/null
@@ -0,0 +1,644 @@
+# host-cpu-c-abi.m4 serial 11
+dnl Copyright (C) 2002-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Bruno Haible and Sam Steingold.
+
+dnl Sets the HOST_CPU variable to the canonical name of the CPU.
+dnl Sets the HOST_CPU_C_ABI variable to the canonical name of the CPU with its
+dnl C language ABI (application binary interface).
+dnl Also defines __${HOST_CPU}__ and __${HOST_CPU_C_ABI}__ as C macros in
+dnl config.h.
+dnl
+dnl This canonical name can be used to select a particular assembly language
+dnl source file that will interoperate with C code on the given host.
+dnl
+dnl For example:
+dnl * 'i386' and 'sparc' are different canonical names, because code for i386
+dnl   will not run on SPARC CPUs and vice versa. They have different
+dnl   instruction sets.
+dnl * 'sparc' and 'sparc64' are different canonical names, because code for
+dnl   'sparc' and code for 'sparc64' cannot be linked together: 'sparc' code
+dnl   contains 32-bit instructions, whereas 'sparc64' code contains 64-bit
+dnl   instructions. A process on a SPARC CPU can be in 32-bit mode or in 64-bit
+dnl   mode, but not both.
+dnl * 'mips' and 'mipsn32' are different canonical names, because they use
+dnl   different argument passing and return conventions for C functions, and
+dnl   although the instruction set of 'mips' is a large subset of the
+dnl   instruction set of 'mipsn32'.
+dnl * 'mipsn32' and 'mips64' are different canonical names, because they use
+dnl   different sizes for the C types like 'int' and 'void *', and although
+dnl   the instruction sets of 'mipsn32' and 'mips64' are the same.
+dnl * The same canonical name is used for different endiannesses. You can
+dnl   determine the endianness through preprocessor symbols:
+dnl   - 'arm': test __ARMEL__.
+dnl   - 'mips', 'mipsn32', 'mips64': test _MIPSEB vs. _MIPSEL.
+dnl   - 'powerpc64': test _BIG_ENDIAN vs. _LITTLE_ENDIAN.
+dnl * The same name 'i386' is used for CPUs of type i386, i486, i586
+dnl   (Pentium), AMD K7, Pentium II, Pentium IV, etc., because
+dnl   - Instructions that do not exist on all of these CPUs (cmpxchg,
+dnl     MMX, SSE, SSE2, 3DNow! etc.) are not frequently used. If your
+dnl     assembly language source files use such instructions, you will
+dnl     need to make the distinction.
+dnl   - Speed of execution of the common instruction set is reasonable across
+dnl     the entire family of CPUs. If you have assembly language source files
+dnl     that are optimized for particular CPU types (like GNU gmp has), you
+dnl     will need to make the distinction.
+dnl   See <https://en.wikipedia.org/wiki/X86_instruction_listings>.
+AC_DEFUN([gl_HOST_CPU_C_ABI],
+[
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  AC_REQUIRE([gl_C_ASM])
+  AC_CACHE_CHECK([host CPU and C ABI], [gl_cv_host_cpu_c_abi],
+    [case "$host_cpu" in
+
+changequote(,)dnl
+       i[4567]86 )
+changequote([,])dnl
+         gl_cv_host_cpu_c_abi=i386
+         ;;
+
+       x86_64 )
+         # On x86_64 systems, the C compiler may be generating code in one of
+         # these ABIs:
+         # - 64-bit instruction set, 64-bit pointers, 64-bit 'long': x86_64.
+         # - 64-bit instruction set, 64-bit pointers, 32-bit 'long': x86_64
+         #   with native Windows (mingw, MSVC).
+         # - 64-bit instruction set, 32-bit pointers, 32-bit 'long': x86_64-x32.
+         # - 32-bit instruction set, 32-bit pointers, 32-bit 'long': i386.
+         AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#if (defined __x86_64__ || defined __amd64__ \
+                     || defined _M_X64 || defined _M_AMD64)
+                 int ok;
+                #else
+                 error fail
+                #endif
+              ]])],
+           [AC_COMPILE_IFELSE(
+              [AC_LANG_SOURCE(
+                 [[#if defined __ILP32__ || defined _ILP32
+                    int ok;
+                   #else
+                    error fail
+                   #endif
+                 ]])],
+              [gl_cv_host_cpu_c_abi=x86_64-x32],
+              [gl_cv_host_cpu_c_abi=x86_64])],
+           [gl_cv_host_cpu_c_abi=i386])
+         ;;
+
+changequote(,)dnl
+       alphaev[4-8] | alphaev56 | alphapca5[67] | alphaev6[78] )
+changequote([,])dnl
+         gl_cv_host_cpu_c_abi=alpha
+         ;;
+
+       arm* | aarch64 )
+         # Assume arm with EABI.
+         # On arm64 systems, the C compiler may be generating code in one of
+         # these ABIs:
+         # - aarch64 instruction set, 64-bit pointers, 64-bit 'long': arm64.
+         # - aarch64 instruction set, 32-bit pointers, 32-bit 'long': arm64-ilp32.
+         # - 32-bit instruction set, 32-bit pointers, 32-bit 'long': arm or armhf.
+         AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#ifdef __aarch64__
+                 int ok;
+                #else
+                 error fail
+                #endif
+              ]])],
+           [AC_COMPILE_IFELSE(
+              [AC_LANG_SOURCE(
+                [[#if defined __ILP32__ || defined _ILP32
+                   int ok;
+                  #else
+                   error fail
+                  #endif
+                ]])],
+              [gl_cv_host_cpu_c_abi=arm64-ilp32],
+              [gl_cv_host_cpu_c_abi=arm64])],
+           [# Don't distinguish little-endian and big-endian arm, since they
+            # don't require different machine code for simple operations and
+            # since the user can distinguish them through the preprocessor
+            # defines __ARMEL__ vs. __ARMEB__.
+            # But distinguish arm which passes floating-point arguments and
+            # return values in integer registers (r0, r1, ...) - this is
+            # gcc -mfloat-abi=soft or gcc -mfloat-abi=softfp - from arm which
+            # passes them in float registers (s0, s1, ...) and double registers
+            # (d0, d1, ...) - this is gcc -mfloat-abi=hard. GCC 4.6 or newer
+            # sets the preprocessor defines __ARM_PCS (for the first case) and
+            # __ARM_PCS_VFP (for the second case), but older GCC does not.
+            echo 'double ddd; void func (double dd) { ddd = dd; }' > conftest.c
+            # Look for a reference to the register d0 in the .s file.
+            AC_TRY_COMMAND(${CC-cc} $CFLAGS $CPPFLAGS $gl_c_asm_opt conftest.c) >/dev/null 2>&1
+            if LC_ALL=C grep 'd0,' conftest.$gl_asmext >/dev/null; then
+              gl_cv_host_cpu_c_abi=armhf
+            else
+              gl_cv_host_cpu_c_abi=arm
+            fi
+            rm -f conftest*
+           ])
+         ;;
+
+       hppa1.0 | hppa1.1 | hppa2.0* | hppa64 )
+         # On hppa, the C compiler may be generating 32-bit code or 64-bit
+         # code. In the latter case, it defines _LP64 and __LP64__.
+         AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#ifdef __LP64__
+                 int ok;
+                #else
+                 error fail
+                #endif
+              ]])],
+           [gl_cv_host_cpu_c_abi=hppa64],
+           [gl_cv_host_cpu_c_abi=hppa])
+         ;;
+
+       ia64* )
+         # On ia64 on HP-UX, the C compiler may be generating 64-bit code or
+         # 32-bit code. In the latter case, it defines _ILP32.
+         AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#ifdef _ILP32
+                 int ok;
+                #else
+                 error fail
+                #endif
+              ]])],
+           [gl_cv_host_cpu_c_abi=ia64-ilp32],
+           [gl_cv_host_cpu_c_abi=ia64])
+         ;;
+
+       mips* )
+         # We should also check for (_MIPS_SZPTR == 64), but gcc keeps this
+         # at 32.
+         AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#if defined _MIPS_SZLONG && (_MIPS_SZLONG == 64)
+                 int ok;
+                #else
+                 error fail
+                #endif
+              ]])],
+           [gl_cv_host_cpu_c_abi=mips64],
+           [# In the n32 ABI, _ABIN32 is defined, _ABIO32 is not defined (but
+            # may later get defined by <sgidefs.h>), and _MIPS_SIM == _ABIN32.
+            # In the 32 ABI, _ABIO32 is defined, _ABIN32 is not defined (but
+            # may later get defined by <sgidefs.h>), and _MIPS_SIM == _ABIO32.
+            AC_COMPILE_IFELSE(
+              [AC_LANG_SOURCE(
+                 [[#if (_MIPS_SIM == _ABIN32)
+                    int ok;
+                   #else
+                    error fail
+                   #endif
+                 ]])],
+              [gl_cv_host_cpu_c_abi=mipsn32],
+              [gl_cv_host_cpu_c_abi=mips])])
+         ;;
+
+       powerpc* )
+         # Different ABIs are in use on AIX vs. Mac OS X vs. Linux,*BSD.
+         # No need to distinguish them here; the caller may distinguish
+         # them based on the OS.
+         # On powerpc64 systems, the C compiler may still be generating
+         # 32-bit code. And on powerpc-ibm-aix systems, the C compiler may
+         # be generating 64-bit code.
+         AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#if defined __powerpc64__ || defined _ARCH_PPC64
+                 int ok;
+                #else
+                 error fail
+                #endif
+              ]])],
+           [# On powerpc64, there are two ABIs on Linux: The AIX compatible
+            # one and the ELFv2 one. The latter defines _CALL_ELF=2.
+            AC_COMPILE_IFELSE(
+              [AC_LANG_SOURCE(
+                 [[#if defined _CALL_ELF && _CALL_ELF == 2
+                    int ok;
+                   #else
+                    error fail
+                   #endif
+                 ]])],
+              [gl_cv_host_cpu_c_abi=powerpc64-elfv2],
+              [gl_cv_host_cpu_c_abi=powerpc64])
+           ],
+           [gl_cv_host_cpu_c_abi=powerpc])
+         ;;
+
+       rs6000 )
+         gl_cv_host_cpu_c_abi=powerpc
+         ;;
+
+       riscv32 | riscv64 )
+         # There are 2 architectures (with variants): rv32* and rv64*.
+         AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#if __riscv_xlen == 64
+                  int ok;
+                #else
+                  error fail
+                #endif
+              ]])],
+           [cpu=riscv64],
+           [cpu=riscv32])
+         # There are 6 ABIs: ilp32, ilp32f, ilp32d, lp64, lp64f, lp64d.
+         # Size of 'long' and 'void *':
+         AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#if defined __LP64__
+                  int ok;
+                #else
+                  error fail
+                #endif
+              ]])],
+           [main_abi=lp64],
+           [main_abi=ilp32])
+         # Float ABIs:
+         # __riscv_float_abi_double:
+         #   'float' and 'double' are passed in floating-point registers.
+         # __riscv_float_abi_single:
+         #   'float' are passed in floating-point registers.
+         # __riscv_float_abi_soft:
+         #   No values are passed in floating-point registers.
+         AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#if defined __riscv_float_abi_double
+                  int ok;
+                #else
+                  error fail
+                #endif
+              ]])],
+           [float_abi=d],
+           [AC_COMPILE_IFELSE(
+              [AC_LANG_SOURCE(
+                 [[#if defined __riscv_float_abi_single
+                     int ok;
+                   #else
+                     error fail
+                   #endif
+                 ]])],
+              [float_abi=f],
+              [float_abi=''])
+           ])
+         gl_cv_host_cpu_c_abi="${cpu}-${main_abi}${float_abi}"
+         ;;
+
+       s390* )
+         # On s390x, the C compiler may be generating 64-bit (= s390x) code
+         # or 31-bit (= s390) code.
+         AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#if defined __LP64__ || defined __s390x__
+                  int ok;
+                #else
+                  error fail
+                #endif
+              ]])],
+           [gl_cv_host_cpu_c_abi=s390x],
+           [gl_cv_host_cpu_c_abi=s390])
+         ;;
+
+       sparc | sparc64 )
+         # UltraSPARCs running Linux have `uname -m` = "sparc64", but the
+         # C compiler still generates 32-bit code.
+         AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#if defined __sparcv9 || defined __arch64__
+                 int ok;
+                #else
+                 error fail
+                #endif
+              ]])],
+           [gl_cv_host_cpu_c_abi=sparc64],
+           [gl_cv_host_cpu_c_abi=sparc])
+         ;;
+
+       *)
+         gl_cv_host_cpu_c_abi="$host_cpu"
+         ;;
+     esac
+    ])
+
+  dnl In most cases, $HOST_CPU and $HOST_CPU_C_ABI are the same.
+  HOST_CPU=`echo "$gl_cv_host_cpu_c_abi" | sed -e 's/-.*//'`
+  HOST_CPU_C_ABI="$gl_cv_host_cpu_c_abi"
+  AC_SUBST([HOST_CPU])
+  AC_SUBST([HOST_CPU_C_ABI])
+
+  # This was
+  #   AC_DEFINE_UNQUOTED([__${HOST_CPU}__])
+  #   AC_DEFINE_UNQUOTED([__${HOST_CPU_C_ABI}__])
+  # earlier, but KAI C++ 3.2d doesn't like this.
+  sed -e 's/-/_/g' >> confdefs.h <<EOF
+#ifndef __${HOST_CPU}__
+#define __${HOST_CPU}__ 1
+#endif
+#ifndef __${HOST_CPU_C_ABI}__
+#define __${HOST_CPU_C_ABI}__ 1
+#endif
+EOF
+  AH_TOP([/* CPU and C ABI indicator */
+#ifndef __i386__
+#undef __i386__
+#endif
+#ifndef __x86_64_x32__
+#undef __x86_64_x32__
+#endif
+#ifndef __x86_64__
+#undef __x86_64__
+#endif
+#ifndef __alpha__
+#undef __alpha__
+#endif
+#ifndef __arm__
+#undef __arm__
+#endif
+#ifndef __armhf__
+#undef __armhf__
+#endif
+#ifndef __arm64_ilp32__
+#undef __arm64_ilp32__
+#endif
+#ifndef __arm64__
+#undef __arm64__
+#endif
+#ifndef __hppa__
+#undef __hppa__
+#endif
+#ifndef __hppa64__
+#undef __hppa64__
+#endif
+#ifndef __ia64_ilp32__
+#undef __ia64_ilp32__
+#endif
+#ifndef __ia64__
+#undef __ia64__
+#endif
+#ifndef __m68k__
+#undef __m68k__
+#endif
+#ifndef __mips__
+#undef __mips__
+#endif
+#ifndef __mipsn32__
+#undef __mipsn32__
+#endif
+#ifndef __mips64__
+#undef __mips64__
+#endif
+#ifndef __powerpc__
+#undef __powerpc__
+#endif
+#ifndef __powerpc64__
+#undef __powerpc64__
+#endif
+#ifndef __powerpc64_elfv2__
+#undef __powerpc64_elfv2__
+#endif
+#ifndef __riscv32__
+#undef __riscv32__
+#endif
+#ifndef __riscv64__
+#undef __riscv64__
+#endif
+#ifndef __riscv32_ilp32__
+#undef __riscv32_ilp32__
+#endif
+#ifndef __riscv32_ilp32f__
+#undef __riscv32_ilp32f__
+#endif
+#ifndef __riscv32_ilp32d__
+#undef __riscv32_ilp32d__
+#endif
+#ifndef __riscv64_ilp32__
+#undef __riscv64_ilp32__
+#endif
+#ifndef __riscv64_ilp32f__
+#undef __riscv64_ilp32f__
+#endif
+#ifndef __riscv64_ilp32d__
+#undef __riscv64_ilp32d__
+#endif
+#ifndef __riscv64_lp64__
+#undef __riscv64_lp64__
+#endif
+#ifndef __riscv64_lp64f__
+#undef __riscv64_lp64f__
+#endif
+#ifndef __riscv64_lp64d__
+#undef __riscv64_lp64d__
+#endif
+#ifndef __s390__
+#undef __s390__
+#endif
+#ifndef __s390x__
+#undef __s390x__
+#endif
+#ifndef __sh__
+#undef __sh__
+#endif
+#ifndef __sparc__
+#undef __sparc__
+#endif
+#ifndef __sparc64__
+#undef __sparc64__
+#endif
+])
+
+])
+
+
+dnl Sets the HOST_CPU_C_ABI_32BIT variable to 'yes' if the C language ABI
+dnl (application binary interface) is a 32-bit one, or to 'no' otherwise.
+dnl This is a simplified variant of gl_HOST_CPU_C_ABI.
+AC_DEFUN([gl_HOST_CPU_C_ABI_32BIT],
+[
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  AC_CACHE_CHECK([32-bit host C ABI], [gl_cv_host_cpu_c_abi_32bit],
+    [if test -n "$gl_cv_host_cpu_c_abi"; then
+       case "$gl_cv_host_cpu_c_abi" in
+         i386 | x86_64-x32 | arm | armhf | arm64-ilp32 | hppa | ia64-ilp32 | mips | mipsn32 | powerpc | riscv*-ilp32* | s390 | sparc)
+           gl_cv_host_cpu_c_abi_32bit=yes ;;
+         *)
+           gl_cv_host_cpu_c_abi_32bit=no ;;
+       esac
+     else
+       case "$host_cpu" in
+
+changequote(,)dnl
+         i[4567]86 )
+changequote([,])dnl
+           gl_cv_host_cpu_c_abi_32bit=yes
+           ;;
+
+         x86_64 )
+           # On x86_64 systems, the C compiler may be generating code in one of
+           # these ABIs:
+           # - 64-bit instruction set, 64-bit pointers, 64-bit 'long': x86_64.
+           # - 64-bit instruction set, 64-bit pointers, 32-bit 'long': x86_64
+           #   with native Windows (mingw, MSVC).
+           # - 64-bit instruction set, 32-bit pointers, 32-bit 'long': x86_64-x32.
+           # - 32-bit instruction set, 32-bit pointers, 32-bit 'long': i386.
+           AC_COMPILE_IFELSE(
+             [AC_LANG_SOURCE(
+                [[#if (defined __x86_64__ || defined __amd64__ \
+                       || defined _M_X64 || defined _M_AMD64) \
+                      && !(defined __ILP32__ || defined _ILP32)
+                   int ok;
+                  #else
+                   error fail
+                  #endif
+                ]])],
+             [gl_cv_host_cpu_c_abi_32bit=no],
+             [gl_cv_host_cpu_c_abi_32bit=yes])
+           ;;
+
+         arm* | aarch64 )
+           # Assume arm with EABI.
+           # On arm64 systems, the C compiler may be generating code in one of
+           # these ABIs:
+           # - aarch64 instruction set, 64-bit pointers, 64-bit 'long': arm64.
+           # - aarch64 instruction set, 32-bit pointers, 32-bit 'long': arm64-ilp32.
+           # - 32-bit instruction set, 32-bit pointers, 32-bit 'long': arm or armhf.
+           AC_COMPILE_IFELSE(
+             [AC_LANG_SOURCE(
+                [[#if defined __aarch64__ && !(defined __ILP32__ || defined _ILP32)
+                   int ok;
+                  #else
+                   error fail
+                  #endif
+                ]])],
+             [gl_cv_host_cpu_c_abi_32bit=no],
+             [gl_cv_host_cpu_c_abi_32bit=yes])
+           ;;
+
+         hppa1.0 | hppa1.1 | hppa2.0* | hppa64 )
+           # On hppa, the C compiler may be generating 32-bit code or 64-bit
+           # code. In the latter case, it defines _LP64 and __LP64__.
+           AC_COMPILE_IFELSE(
+             [AC_LANG_SOURCE(
+                [[#ifdef __LP64__
+                   int ok;
+                  #else
+                   error fail
+                  #endif
+                ]])],
+             [gl_cv_host_cpu_c_abi_32bit=no],
+             [gl_cv_host_cpu_c_abi_32bit=yes])
+           ;;
+
+         ia64* )
+           # On ia64 on HP-UX, the C compiler may be generating 64-bit code or
+           # 32-bit code. In the latter case, it defines _ILP32.
+           AC_COMPILE_IFELSE(
+             [AC_LANG_SOURCE(
+                [[#ifdef _ILP32
+                   int ok;
+                  #else
+                   error fail
+                  #endif
+                ]])],
+             [gl_cv_host_cpu_c_abi_32bit=yes],
+             [gl_cv_host_cpu_c_abi_32bit=no])
+           ;;
+
+         mips* )
+           # We should also check for (_MIPS_SZPTR == 64), but gcc keeps this
+           # at 32.
+           AC_COMPILE_IFELSE(
+             [AC_LANG_SOURCE(
+                [[#if defined _MIPS_SZLONG && (_MIPS_SZLONG == 64)
+                   int ok;
+                  #else
+                   error fail
+                  #endif
+                ]])],
+             [gl_cv_host_cpu_c_abi_32bit=no],
+             [gl_cv_host_cpu_c_abi_32bit=yes])
+           ;;
+
+         powerpc* )
+           # Different ABIs are in use on AIX vs. Mac OS X vs. Linux,*BSD.
+           # No need to distinguish them here; the caller may distinguish
+           # them based on the OS.
+           # On powerpc64 systems, the C compiler may still be generating
+           # 32-bit code. And on powerpc-ibm-aix systems, the C compiler may
+           # be generating 64-bit code.
+           AC_COMPILE_IFELSE(
+             [AC_LANG_SOURCE(
+                [[#if defined __powerpc64__ || defined _ARCH_PPC64
+                   int ok;
+                  #else
+                   error fail
+                  #endif
+                ]])],
+             [gl_cv_host_cpu_c_abi_32bit=no],
+             [gl_cv_host_cpu_c_abi_32bit=yes])
+           ;;
+
+         rs6000 )
+           gl_cv_host_cpu_c_abi_32bit=yes
+           ;;
+
+         riscv32 | riscv64 )
+           # There are 6 ABIs: ilp32, ilp32f, ilp32d, lp64, lp64f, lp64d.
+           # Size of 'long' and 'void *':
+           AC_COMPILE_IFELSE(
+             [AC_LANG_SOURCE(
+                [[#if defined __LP64__
+                    int ok;
+                  #else
+                    error fail
+                  #endif
+                ]])],
+             [gl_cv_host_cpu_c_abi_32bit=no],
+             [gl_cv_host_cpu_c_abi_32bit=yes])
+           ;;
+
+         s390* )
+           # On s390x, the C compiler may be generating 64-bit (= s390x) code
+           # or 31-bit (= s390) code.
+           AC_COMPILE_IFELSE(
+             [AC_LANG_SOURCE(
+                [[#if defined __LP64__ || defined __s390x__
+                    int ok;
+                  #else
+                    error fail
+                  #endif
+                ]])],
+             [gl_cv_host_cpu_c_abi_32bit=no],
+             [gl_cv_host_cpu_c_abi_32bit=yes])
+           ;;
+
+         sparc | sparc64 )
+           # UltraSPARCs running Linux have `uname -m` = "sparc64", but the
+           # C compiler still generates 32-bit code.
+           AC_COMPILE_IFELSE(
+             [AC_LANG_SOURCE(
+                [[#if defined __sparcv9 || defined __arch64__
+                   int ok;
+                  #else
+                   error fail
+                  #endif
+                ]])],
+             [gl_cv_host_cpu_c_abi_32bit=no],
+             [gl_cv_host_cpu_c_abi_32bit=yes])
+           ;;
+
+         *)
+           gl_cv_host_cpu_c_abi_32bit=no
+           ;;
+       esac
+     fi
+    ])
+
+  HOST_CPU_C_ABI_32BIT="$gl_cv_host_cpu_c_abi_32bit"
+])
diff --git a/gnulib-m4/include_next.m4 b/gnulib-m4/include_next.m4
new file mode 100644 (file)
index 0000000..86eb2c9
--- /dev/null
@@ -0,0 +1,224 @@
+# include_next.m4 serial 24
+dnl Copyright (C) 2006-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Paul Eggert and Derek Price.
+
+dnl Sets INCLUDE_NEXT, INCLUDE_NEXT_AS_FIRST_DIRECTIVE, PRAGMA_SYSTEM_HEADER,
+dnl and PRAGMA_COLUMNS.
+dnl
+dnl INCLUDE_NEXT expands to 'include_next' if the compiler supports it, or to
+dnl 'include' otherwise.
+dnl
+dnl INCLUDE_NEXT_AS_FIRST_DIRECTIVE expands to 'include_next' if the compiler
+dnl supports it in the special case that it is the first include directive in
+dnl the given file, or to 'include' otherwise.
+dnl
+dnl PRAGMA_SYSTEM_HEADER can be used in files that contain #include_next,
+dnl so as to avoid GCC warnings when the gcc option -pedantic is used.
+dnl '#pragma GCC system_header' has the same effect as if the file was found
+dnl through the include search path specified with '-isystem' options (as
+dnl opposed to the search path specified with '-I' options). Namely, gcc
+dnl does not warn about some things, and on some systems (Solaris and Interix)
+dnl __STDC__ evaluates to 0 instead of to 1. The latter is an undesired side
+dnl effect; we are therefore careful to use 'defined __STDC__' or '1' instead
+dnl of plain '__STDC__'.
+dnl
+dnl PRAGMA_COLUMNS can be used in files that override system header files, so
+dnl as to avoid compilation errors on HP NonStop systems when the gnulib file
+dnl is included by a system header file that does a "#pragma COLUMNS 80" (which
+dnl has the effect of truncating the lines of that file and all files that it
+dnl includes to 80 columns) and the gnulib file has lines longer than 80
+dnl columns.
+
+AC_DEFUN([gl_INCLUDE_NEXT],
+[
+  AC_LANG_PREPROC_REQUIRE()
+  AC_CACHE_CHECK([whether the preprocessor supports include_next],
+    [gl_cv_have_include_next],
+    [rm -rf conftestd1a conftestd1b conftestd2
+     mkdir conftestd1a conftestd1b conftestd2
+     dnl IBM C 9.0, 10.1 (original versions, prior to the 2009-01 updates) on
+     dnl AIX 6.1 support include_next when used as first preprocessor directive
+     dnl in a file, but not when preceded by another include directive. Check
+     dnl for this bug by including <stdio.h>.
+     dnl Additionally, with this same compiler, include_next is a no-op when
+     dnl used in a header file that was included by specifying its absolute
+     dnl file name. Despite these two bugs, include_next is used in the
+     dnl compiler's <math.h>. By virtue of the second bug, we need to use
+     dnl include_next as well in this case.
+     cat <<EOF > conftestd1a/conftest.h
+#define DEFINED_IN_CONFTESTD1
+#include_next <conftest.h>
+#ifdef DEFINED_IN_CONFTESTD2
+int foo;
+#else
+#error "include_next doesn't work"
+#endif
+EOF
+     cat <<EOF > conftestd1b/conftest.h
+#define DEFINED_IN_CONFTESTD1
+#include <stdio.h>
+#include_next <conftest.h>
+#ifdef DEFINED_IN_CONFTESTD2
+int foo;
+#else
+#error "include_next doesn't work"
+#endif
+EOF
+     cat <<EOF > conftestd2/conftest.h
+#ifndef DEFINED_IN_CONFTESTD1
+#error "include_next test doesn't work"
+#endif
+#define DEFINED_IN_CONFTESTD2
+EOF
+     gl_save_CPPFLAGS="$CPPFLAGS"
+     CPPFLAGS="$gl_save_CPPFLAGS -Iconftestd1b -Iconftestd2"
+dnl We intentionally avoid using AC_LANG_SOURCE here.
+     AC_COMPILE_IFELSE([AC_LANG_DEFINES_PROVIDED[#include <conftest.h>]],
+       [gl_cv_have_include_next=yes],
+       [CPPFLAGS="$gl_save_CPPFLAGS -Iconftestd1a -Iconftestd2"
+        AC_COMPILE_IFELSE([AC_LANG_DEFINES_PROVIDED[#include <conftest.h>]],
+          [gl_cv_have_include_next=buggy],
+          [gl_cv_have_include_next=no])
+       ])
+     CPPFLAGS="$gl_save_CPPFLAGS"
+     rm -rf conftestd1a conftestd1b conftestd2
+    ])
+  PRAGMA_SYSTEM_HEADER=
+  if test $gl_cv_have_include_next = yes; then
+    INCLUDE_NEXT=include_next
+    INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include_next
+    if test -n "$GCC"; then
+      PRAGMA_SYSTEM_HEADER='#pragma GCC system_header'
+    fi
+  else
+    if test $gl_cv_have_include_next = buggy; then
+      INCLUDE_NEXT=include
+      INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include_next
+    else
+      INCLUDE_NEXT=include
+      INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include
+    fi
+  fi
+  AC_SUBST([INCLUDE_NEXT])
+  AC_SUBST([INCLUDE_NEXT_AS_FIRST_DIRECTIVE])
+  AC_SUBST([PRAGMA_SYSTEM_HEADER])
+  AC_CACHE_CHECK([whether system header files limit the line length],
+    [gl_cv_pragma_columns],
+    [dnl HP NonStop systems, which define __TANDEM, have this misfeature.
+     AC_EGREP_CPP([choke me],
+       [
+#ifdef __TANDEM
+choke me
+#endif
+       ],
+       [gl_cv_pragma_columns=yes],
+       [gl_cv_pragma_columns=no])
+    ])
+  if test $gl_cv_pragma_columns = yes; then
+    PRAGMA_COLUMNS="#pragma COLUMNS 10000"
+  else
+    PRAGMA_COLUMNS=
+  fi
+  AC_SUBST([PRAGMA_COLUMNS])
+])
+
+# gl_CHECK_NEXT_HEADERS(HEADER1 HEADER2 ...)
+# ------------------------------------------
+# For each arg foo.h, if #include_next works, define NEXT_FOO_H to be
+# '<foo.h>'; otherwise define it to be
+# '"///usr/include/foo.h"', or whatever other absolute file name is suitable.
+# Also, if #include_next works as first preprocessing directive in a file,
+# define NEXT_AS_FIRST_DIRECTIVE_FOO_H to be '<foo.h>'; otherwise define it to
+# be
+# '"///usr/include/foo.h"', or whatever other absolute file name is suitable.
+# That way, a header file with the following line:
+#       #@INCLUDE_NEXT@ @NEXT_FOO_H@
+# or
+#       #@INCLUDE_NEXT_AS_FIRST_DIRECTIVE@ @NEXT_AS_FIRST_DIRECTIVE_FOO_H@
+# behaves (after sed substitution) as if it contained
+#       #include_next <foo.h>
+# even if the compiler does not support include_next.
+# The three "///" are to pacify Sun C 5.8, which otherwise would say
+# "warning: #include of /usr/include/... may be non-portable".
+# Use '""', not '<>', so that the /// cannot be confused with a C99 comment.
+# Note: This macro assumes that the header file is not empty after
+# preprocessing, i.e. it does not only define preprocessor macros but also
+# provides some type/enum definitions or function/variable declarations.
+#
+# This macro also checks whether each header exists, by invoking
+# AC_CHECK_HEADERS_ONCE or AC_CHECK_HEADERS on each argument.
+AC_DEFUN([gl_CHECK_NEXT_HEADERS],
+[
+  gl_NEXT_HEADERS_INTERNAL([$1], [check])
+])
+
+# gl_NEXT_HEADERS(HEADER1 HEADER2 ...)
+# ------------------------------------
+# Like gl_CHECK_NEXT_HEADERS, except do not check whether the headers exist.
+# This is suitable for headers like <stddef.h> that are standardized by C89
+# and therefore can be assumed to exist.
+AC_DEFUN([gl_NEXT_HEADERS],
+[
+  gl_NEXT_HEADERS_INTERNAL([$1], [assume])
+])
+
+# The guts of gl_CHECK_NEXT_HEADERS and gl_NEXT_HEADERS.
+AC_DEFUN([gl_NEXT_HEADERS_INTERNAL],
+[
+  AC_REQUIRE([gl_INCLUDE_NEXT])
+  AC_REQUIRE([AC_CANONICAL_HOST])
+
+  m4_if([$2], [check],
+    [AC_CHECK_HEADERS_ONCE([$1])
+    ])
+
+dnl FIXME: gl_next_header and gl_header_exists must be used unquoted
+dnl until we can assume autoconf 2.64 or newer.
+  m4_foreach_w([gl_HEADER_NAME], [$1],
+    [AS_VAR_PUSHDEF([gl_next_header],
+                    [gl_cv_next_]m4_defn([gl_HEADER_NAME]))
+     if test $gl_cv_have_include_next = yes; then
+       AS_VAR_SET(gl_next_header, ['<'gl_HEADER_NAME'>'])
+     else
+       AC_CACHE_CHECK(
+         [absolute name of <]m4_defn([gl_HEADER_NAME])[>],
+         m4_defn([gl_next_header]),
+         [m4_if([$2], [check],
+            [AS_VAR_PUSHDEF([gl_header_exists],
+                            [ac_cv_header_]m4_defn([gl_HEADER_NAME]))
+             if test AS_VAR_GET(gl_header_exists) = yes; then
+             AS_VAR_POPDEF([gl_header_exists])
+            ])
+           gl_ABSOLUTE_HEADER_ONE(gl_HEADER_NAME)
+           AS_VAR_COPY([gl_header], [gl_cv_absolute_]AS_TR_SH(gl_HEADER_NAME))
+           AS_VAR_SET(gl_next_header, ['"'$gl_header'"'])
+          m4_if([$2], [check],
+            [else
+               AS_VAR_SET(gl_next_header, ['<'gl_HEADER_NAME'>'])
+             fi
+            ])
+         ])
+     fi
+     AC_SUBST(
+       AS_TR_CPP([NEXT_]m4_defn([gl_HEADER_NAME])),
+       [AS_VAR_GET(gl_next_header)])
+     if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then
+       # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next'
+       gl_next_as_first_directive='<'gl_HEADER_NAME'>'
+     else
+       # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include'
+       gl_next_as_first_directive=AS_VAR_GET(gl_next_header)
+     fi
+     AC_SUBST(
+       AS_TR_CPP([NEXT_AS_FIRST_DIRECTIVE_]m4_defn([gl_HEADER_NAME])),
+       [$gl_next_as_first_directive])
+     AS_VAR_POPDEF([gl_next_header])])
+])
+
+# Autoconf 2.68 added warnings for our use of AC_COMPILE_IFELSE;
+# this fallback is safe for all earlier autoconf versions.
+m4_define_default([AC_LANG_DEFINES_PROVIDED])
diff --git a/gnulib-m4/lib-ld.m4 b/gnulib-m4/lib-ld.m4
new file mode 100644 (file)
index 0000000..a187196
--- /dev/null
@@ -0,0 +1,168 @@
+# lib-ld.m4 serial 9
+dnl Copyright (C) 1996-2003, 2009-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl Subroutines of libtool.m4,
+dnl with replacements s/_*LT_PATH/AC_LIB_PROG/ and s/lt_/acl_/ to avoid
+dnl collision with libtool.m4.
+
+dnl From libtool-2.4. Sets the variable with_gnu_ld to yes or no.
+AC_DEFUN([AC_LIB_PROG_LD_GNU],
+[AC_CACHE_CHECK([if the linker ($LD) is GNU ld], [acl_cv_prog_gnu_ld],
+[# I'd rather use --version here, but apparently some GNU lds only accept -v.
+case `$LD -v 2>&1 </dev/null` in
+*GNU* | *'with BFD'*)
+  acl_cv_prog_gnu_ld=yes
+  ;;
+*)
+  acl_cv_prog_gnu_ld=no
+  ;;
+esac])
+with_gnu_ld=$acl_cv_prog_gnu_ld
+])
+
+dnl From libtool-2.4. Sets the variable LD.
+AC_DEFUN([AC_LIB_PROG_LD],
+[AC_REQUIRE([AC_PROG_CC])dnl
+AC_REQUIRE([AC_CANONICAL_HOST])dnl
+
+AC_ARG_WITH([gnu-ld],
+    [AS_HELP_STRING([--with-gnu-ld],
+        [assume the C compiler uses GNU ld [default=no]])],
+    [test "$withval" = no || with_gnu_ld=yes],
+    [with_gnu_ld=no])dnl
+
+# Prepare PATH_SEPARATOR.
+# The user is always right.
+if test "${PATH_SEPARATOR+set}" != set; then
+  # Determine PATH_SEPARATOR by trying to find /bin/sh in a PATH which
+  # contains only /bin. Note that ksh looks also at the FPATH variable,
+  # so we have to set that as well for the test.
+  PATH_SEPARATOR=:
+  (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 \
+    && { (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 \
+           || PATH_SEPARATOR=';'
+       }
+fi
+
+if test -n "$LD"; then
+  AC_MSG_CHECKING([for ld])
+elif test "$GCC" = yes; then
+  AC_MSG_CHECKING([for ld used by $CC])
+elif test "$with_gnu_ld" = yes; then
+  AC_MSG_CHECKING([for GNU ld])
+else
+  AC_MSG_CHECKING([for non-GNU ld])
+fi
+if test -n "$LD"; then
+  # Let the user override the test with a path.
+  :
+else
+  AC_CACHE_VAL([acl_cv_path_LD],
+  [
+    acl_cv_path_LD= # Final result of this test
+    ac_prog=ld # Program to search in $PATH
+    if test "$GCC" = yes; then
+      # Check if gcc -print-prog-name=ld gives a path.
+      case $host in
+        *-*-mingw*)
+          # gcc leaves a trailing carriage return which upsets mingw
+          acl_output=`($CC -print-prog-name=ld) 2>&5 | tr -d '\015'` ;;
+        *)
+          acl_output=`($CC -print-prog-name=ld) 2>&5` ;;
+      esac
+      case $acl_output in
+        # Accept absolute paths.
+        [[\\/]]* | ?:[[\\/]]*)
+          re_direlt='/[[^/]][[^/]]*/\.\./'
+          # Canonicalize the pathname of ld
+          acl_output=`echo "$acl_output" | sed 's%\\\\%/%g'`
+          while echo "$acl_output" | grep "$re_direlt" > /dev/null 2>&1; do
+            acl_output=`echo $acl_output | sed "s%$re_direlt%/%"`
+          done
+          # Got the pathname. No search in PATH is needed.
+          acl_cv_path_LD="$acl_output"
+          ac_prog=
+          ;;
+        "")
+          # If it fails, then pretend we aren't using GCC.
+          ;;
+        *)
+          # If it is relative, then search for the first ld in PATH.
+          with_gnu_ld=unknown
+          ;;
+      esac
+    fi
+    if test -n "$ac_prog"; then
+      # Search for $ac_prog in $PATH.
+      acl_save_ifs="$IFS"; IFS=$PATH_SEPARATOR
+      for ac_dir in $PATH; do
+        IFS="$acl_save_ifs"
+        test -z "$ac_dir" && ac_dir=.
+        if test -f "$ac_dir/$ac_prog" || test -f "$ac_dir/$ac_prog$ac_exeext"; then
+          acl_cv_path_LD="$ac_dir/$ac_prog"
+          # Check to see if the program is GNU ld.  I'd rather use --version,
+          # but apparently some variants of GNU ld only accept -v.
+          # Break only if it was the GNU/non-GNU ld that we prefer.
+          case `"$acl_cv_path_LD" -v 2>&1 </dev/null` in
+            *GNU* | *'with BFD'*)
+              test "$with_gnu_ld" != no && break
+              ;;
+            *)
+              test "$with_gnu_ld" != yes && break
+              ;;
+          esac
+        fi
+      done
+      IFS="$acl_save_ifs"
+    fi
+    case $host in
+      *-*-aix*)
+        AC_COMPILE_IFELSE(
+          [AC_LANG_SOURCE(
+             [[#if defined __powerpc64__ || defined _ARCH_PPC64
+                int ok;
+               #else
+                error fail
+               #endif
+             ]])],
+          [# The compiler produces 64-bit code. Add option '-b64' so that the
+           # linker groks 64-bit object files.
+           case "$acl_cv_path_LD " in
+             *" -b64 "*) ;;
+             *) acl_cv_path_LD="$acl_cv_path_LD -b64" ;;
+           esac
+          ], [])
+        ;;
+      sparc64-*-netbsd*)
+        AC_COMPILE_IFELSE(
+          [AC_LANG_SOURCE(
+             [[#if defined __sparcv9 || defined __arch64__
+                int ok;
+               #else
+                error fail
+               #endif
+             ]])],
+          [],
+          [# The compiler produces 32-bit code. Add option '-m elf32_sparc'
+           # so that the linker groks 32-bit object files.
+           case "$acl_cv_path_LD " in
+             *" -m elf32_sparc "*) ;;
+             *) acl_cv_path_LD="$acl_cv_path_LD -m elf32_sparc" ;;
+           esac
+          ])
+        ;;
+    esac
+  ])
+  LD="$acl_cv_path_LD"
+fi
+if test -n "$LD"; then
+  AC_MSG_RESULT([$LD])
+else
+  AC_MSG_RESULT([no])
+  AC_MSG_ERROR([no acceptable ld found in \$PATH])
+fi
+AC_LIB_PROG_LD_GNU
+])
diff --git a/gnulib-m4/lib-link.m4 b/gnulib-m4/lib-link.m4
new file mode 100644 (file)
index 0000000..0ff1073
--- /dev/null
@@ -0,0 +1,774 @@
+# lib-link.m4 serial 28
+dnl Copyright (C) 2001-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Bruno Haible.
+
+AC_PREREQ([2.61])
+
+dnl AC_LIB_LINKFLAGS(name [, dependencies]) searches for libname and
+dnl the libraries corresponding to explicit and implicit dependencies.
+dnl Sets and AC_SUBSTs the LIB${NAME} and LTLIB${NAME} variables and
+dnl augments the CPPFLAGS variable.
+dnl Sets and AC_SUBSTs the LIB${NAME}_PREFIX variable to nonempty if libname
+dnl was found in ${LIB${NAME}_PREFIX}/$acl_libdirstem.
+AC_DEFUN([AC_LIB_LINKFLAGS],
+[
+  AC_REQUIRE([AC_LIB_PREPARE_PREFIX])
+  AC_REQUIRE([AC_LIB_RPATH])
+  pushdef([Name],[m4_translit([$1],[./+-], [____])])
+  pushdef([NAME],[m4_translit([$1],[abcdefghijklmnopqrstuvwxyz./+-],
+                                   [ABCDEFGHIJKLMNOPQRSTUVWXYZ____])])
+  AC_CACHE_CHECK([how to link with lib[]$1], [ac_cv_lib[]Name[]_libs], [
+    AC_LIB_LINKFLAGS_BODY([$1], [$2])
+    ac_cv_lib[]Name[]_libs="$LIB[]NAME"
+    ac_cv_lib[]Name[]_ltlibs="$LTLIB[]NAME"
+    ac_cv_lib[]Name[]_cppflags="$INC[]NAME"
+    ac_cv_lib[]Name[]_prefix="$LIB[]NAME[]_PREFIX"
+  ])
+  LIB[]NAME="$ac_cv_lib[]Name[]_libs"
+  LTLIB[]NAME="$ac_cv_lib[]Name[]_ltlibs"
+  INC[]NAME="$ac_cv_lib[]Name[]_cppflags"
+  LIB[]NAME[]_PREFIX="$ac_cv_lib[]Name[]_prefix"
+  AC_LIB_APPENDTOVAR([CPPFLAGS], [$INC]NAME)
+  AC_SUBST([LIB]NAME)
+  AC_SUBST([LTLIB]NAME)
+  AC_SUBST([LIB]NAME[_PREFIX])
+  dnl Also set HAVE_LIB[]NAME so that AC_LIB_HAVE_LINKFLAGS can reuse the
+  dnl results of this search when this library appears as a dependency.
+  HAVE_LIB[]NAME=yes
+  popdef([NAME])
+  popdef([Name])
+])
+
+dnl AC_LIB_HAVE_LINKFLAGS(name, dependencies, includes, testcode, [missing-message])
+dnl searches for libname and the libraries corresponding to explicit and
+dnl implicit dependencies, together with the specified include files and
+dnl the ability to compile and link the specified testcode. The missing-message
+dnl defaults to 'no' and may contain additional hints for the user.
+dnl If found, it sets and AC_SUBSTs HAVE_LIB${NAME}=yes and the LIB${NAME}
+dnl and LTLIB${NAME} variables and augments the CPPFLAGS variable, and
+dnl #defines HAVE_LIB${NAME} to 1. Otherwise, it sets and AC_SUBSTs
+dnl HAVE_LIB${NAME}=no and LIB${NAME} and LTLIB${NAME} to empty.
+dnl Sets and AC_SUBSTs the LIB${NAME}_PREFIX variable to nonempty if libname
+dnl was found in ${LIB${NAME}_PREFIX}/$acl_libdirstem.
+AC_DEFUN([AC_LIB_HAVE_LINKFLAGS],
+[
+  AC_REQUIRE([AC_LIB_PREPARE_PREFIX])
+  AC_REQUIRE([AC_LIB_RPATH])
+  pushdef([Name],[m4_translit([$1],[./+-], [____])])
+  pushdef([NAME],[m4_translit([$1],[abcdefghijklmnopqrstuvwxyz./+-],
+                                   [ABCDEFGHIJKLMNOPQRSTUVWXYZ____])])
+
+  dnl Search for lib[]Name and define LIB[]NAME, LTLIB[]NAME and INC[]NAME
+  dnl accordingly.
+  AC_LIB_LINKFLAGS_BODY([$1], [$2])
+
+  dnl Add $INC[]NAME to CPPFLAGS before performing the following checks,
+  dnl because if the user has installed lib[]Name and not disabled its use
+  dnl via --without-lib[]Name-prefix, he wants to use it.
+  ac_save_CPPFLAGS="$CPPFLAGS"
+  AC_LIB_APPENDTOVAR([CPPFLAGS], [$INC]NAME)
+
+  AC_CACHE_CHECK([for lib[]$1], [ac_cv_lib[]Name], [
+    ac_save_LIBS="$LIBS"
+    dnl If $LIB[]NAME contains some -l options, add it to the end of LIBS,
+    dnl because these -l options might require -L options that are present in
+    dnl LIBS. -l options benefit only from the -L options listed before it.
+    dnl Otherwise, add it to the front of LIBS, because it may be a static
+    dnl library that depends on another static library that is present in LIBS.
+    dnl Static libraries benefit only from the static libraries listed after
+    dnl it.
+    case " $LIB[]NAME" in
+      *" -l"*) LIBS="$LIBS $LIB[]NAME" ;;
+      *)       LIBS="$LIB[]NAME $LIBS" ;;
+    esac
+    AC_LINK_IFELSE(
+      [AC_LANG_PROGRAM([[$3]], [[$4]])],
+      [ac_cv_lib[]Name=yes],
+      [ac_cv_lib[]Name='m4_if([$5], [], [no], [[$5]])'])
+    LIBS="$ac_save_LIBS"
+  ])
+  if test "$ac_cv_lib[]Name" = yes; then
+    HAVE_LIB[]NAME=yes
+    AC_DEFINE([HAVE_LIB]NAME, 1, [Define if you have the lib][$1 library.])
+    AC_MSG_CHECKING([how to link with lib[]$1])
+    AC_MSG_RESULT([$LIB[]NAME])
+  else
+    HAVE_LIB[]NAME=no
+    dnl If $LIB[]NAME didn't lead to a usable library, we don't need
+    dnl $INC[]NAME either.
+    CPPFLAGS="$ac_save_CPPFLAGS"
+    LIB[]NAME=
+    LTLIB[]NAME=
+    LIB[]NAME[]_PREFIX=
+  fi
+  AC_SUBST([HAVE_LIB]NAME)
+  AC_SUBST([LIB]NAME)
+  AC_SUBST([LTLIB]NAME)
+  AC_SUBST([LIB]NAME[_PREFIX])
+  popdef([NAME])
+  popdef([Name])
+])
+
+dnl Determine the platform dependent parameters needed to use rpath:
+dnl   acl_libext,
+dnl   acl_shlibext,
+dnl   acl_libname_spec,
+dnl   acl_library_names_spec,
+dnl   acl_hardcode_libdir_flag_spec,
+dnl   acl_hardcode_libdir_separator,
+dnl   acl_hardcode_direct,
+dnl   acl_hardcode_minus_L.
+AC_DEFUN([AC_LIB_RPATH],
+[
+  dnl Complain if config.rpath is missing.
+  AC_REQUIRE_AUX_FILE([config.rpath])
+  AC_REQUIRE([AC_PROG_CC])                dnl we use $CC, $GCC, $LDFLAGS
+  AC_REQUIRE([AC_LIB_PROG_LD])            dnl we use $LD, $with_gnu_ld
+  AC_REQUIRE([AC_CANONICAL_HOST])         dnl we use $host
+  AC_REQUIRE([AC_CONFIG_AUX_DIR_DEFAULT]) dnl we use $ac_aux_dir
+  AC_CACHE_CHECK([for shared library run path origin], [acl_cv_rpath], [
+    CC="$CC" GCC="$GCC" LDFLAGS="$LDFLAGS" LD="$LD" with_gnu_ld="$with_gnu_ld" \
+    ${CONFIG_SHELL-/bin/sh} "$ac_aux_dir/config.rpath" "$host" > conftest.sh
+    . ./conftest.sh
+    rm -f ./conftest.sh
+    acl_cv_rpath=done
+  ])
+  wl="$acl_cv_wl"
+  acl_libext="$acl_cv_libext"
+  acl_shlibext="$acl_cv_shlibext"
+  acl_libname_spec="$acl_cv_libname_spec"
+  acl_library_names_spec="$acl_cv_library_names_spec"
+  acl_hardcode_libdir_flag_spec="$acl_cv_hardcode_libdir_flag_spec"
+  acl_hardcode_libdir_separator="$acl_cv_hardcode_libdir_separator"
+  acl_hardcode_direct="$acl_cv_hardcode_direct"
+  acl_hardcode_minus_L="$acl_cv_hardcode_minus_L"
+  dnl Determine whether the user wants rpath handling at all.
+  AC_ARG_ENABLE([rpath],
+    [  --disable-rpath         do not hardcode runtime library paths],
+    :, enable_rpath=yes)
+])
+
+dnl AC_LIB_FROMPACKAGE(name, package)
+dnl declares that libname comes from the given package. The configure file
+dnl will then not have a --with-libname-prefix option but a
+dnl --with-package-prefix option. Several libraries can come from the same
+dnl package. This declaration must occur before an AC_LIB_LINKFLAGS or similar
+dnl macro call that searches for libname.
+AC_DEFUN([AC_LIB_FROMPACKAGE],
+[
+  pushdef([NAME],[m4_translit([$1],[abcdefghijklmnopqrstuvwxyz./+-],
+                                   [ABCDEFGHIJKLMNOPQRSTUVWXYZ____])])
+  define([acl_frompackage_]NAME, [$2])
+  popdef([NAME])
+  pushdef([PACK],[$2])
+  pushdef([PACKUP],[m4_translit(PACK,[abcdefghijklmnopqrstuvwxyz./+-],
+                                     [ABCDEFGHIJKLMNOPQRSTUVWXYZ____])])
+  define([acl_libsinpackage_]PACKUP,
+    m4_ifdef([acl_libsinpackage_]PACKUP, [m4_defn([acl_libsinpackage_]PACKUP)[, ]],)[lib$1])
+  popdef([PACKUP])
+  popdef([PACK])
+])
+
+dnl AC_LIB_LINKFLAGS_BODY(name [, dependencies]) searches for libname and
+dnl the libraries corresponding to explicit and implicit dependencies.
+dnl Sets the LIB${NAME}, LTLIB${NAME} and INC${NAME} variables.
+dnl Also, sets the LIB${NAME}_PREFIX variable to nonempty if libname was found
+dnl in ${LIB${NAME}_PREFIX}/$acl_libdirstem.
+AC_DEFUN([AC_LIB_LINKFLAGS_BODY],
+[
+  AC_REQUIRE([AC_LIB_PREPARE_MULTILIB])
+  pushdef([NAME],[m4_translit([$1],[abcdefghijklmnopqrstuvwxyz./+-],
+                                   [ABCDEFGHIJKLMNOPQRSTUVWXYZ____])])
+  pushdef([PACK],[m4_ifdef([acl_frompackage_]NAME, [acl_frompackage_]NAME, lib[$1])])
+  pushdef([PACKUP],[m4_translit(PACK,[abcdefghijklmnopqrstuvwxyz./+-],
+                                     [ABCDEFGHIJKLMNOPQRSTUVWXYZ____])])
+  pushdef([PACKLIBS],[m4_ifdef([acl_frompackage_]NAME, [acl_libsinpackage_]PACKUP, lib[$1])])
+  dnl By default, look in $includedir and $libdir.
+  use_additional=yes
+  AC_LIB_WITH_FINAL_PREFIX([
+    eval additional_includedir=\"$includedir\"
+    eval additional_libdir=\"$libdir\"
+  ])
+  AC_ARG_WITH(PACK[-prefix],
+[[  --with-]]PACK[[-prefix[=DIR]  search for ]PACKLIBS[ in DIR/include and DIR/lib
+  --without-]]PACK[[-prefix     don't search for ]PACKLIBS[ in includedir and libdir]],
+[
+    if test "X$withval" = "Xno"; then
+      use_additional=no
+    else
+      if test "X$withval" = "X"; then
+        AC_LIB_WITH_FINAL_PREFIX([
+          eval additional_includedir=\"$includedir\"
+          eval additional_libdir=\"$libdir\"
+        ])
+      else
+        additional_includedir="$withval/include"
+        additional_libdir="$withval/$acl_libdirstem"
+        if test "$acl_libdirstem2" != "$acl_libdirstem" \
+           && test ! -d "$withval/$acl_libdirstem"; then
+          additional_libdir="$withval/$acl_libdirstem2"
+        fi
+      fi
+    fi
+])
+  dnl Search the library and its dependencies in $additional_libdir and
+  dnl $LDFLAGS. Using breadth-first-seach.
+  LIB[]NAME=
+  LTLIB[]NAME=
+  INC[]NAME=
+  LIB[]NAME[]_PREFIX=
+  dnl HAVE_LIB${NAME} is an indicator that LIB${NAME}, LTLIB${NAME} have been
+  dnl computed. So it has to be reset here.
+  HAVE_LIB[]NAME=
+  rpathdirs=
+  ltrpathdirs=
+  names_already_handled=
+  names_next_round='$1 $2'
+  while test -n "$names_next_round"; do
+    names_this_round="$names_next_round"
+    names_next_round=
+    for name in $names_this_round; do
+      already_handled=
+      for n in $names_already_handled; do
+        if test "$n" = "$name"; then
+          already_handled=yes
+          break
+        fi
+      done
+      if test -z "$already_handled"; then
+        names_already_handled="$names_already_handled $name"
+        dnl See if it was already located by an earlier AC_LIB_LINKFLAGS
+        dnl or AC_LIB_HAVE_LINKFLAGS call.
+        uppername=`echo "$name" | sed -e 'y|abcdefghijklmnopqrstuvwxyz./+-|ABCDEFGHIJKLMNOPQRSTUVWXYZ____|'`
+        eval value=\"\$HAVE_LIB$uppername\"
+        if test -n "$value"; then
+          if test "$value" = yes; then
+            eval value=\"\$LIB$uppername\"
+            test -z "$value" || LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$value"
+            eval value=\"\$LTLIB$uppername\"
+            test -z "$value" || LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }$value"
+          else
+            dnl An earlier call to AC_LIB_HAVE_LINKFLAGS has determined
+            dnl that this library doesn't exist. So just drop it.
+            :
+          fi
+        else
+          dnl Search the library lib$name in $additional_libdir and $LDFLAGS
+          dnl and the already constructed $LIBNAME/$LTLIBNAME.
+          found_dir=
+          found_la=
+          found_so=
+          found_a=
+          eval libname=\"$acl_libname_spec\"    # typically: libname=lib$name
+          if test -n "$acl_shlibext"; then
+            shrext=".$acl_shlibext"             # typically: shrext=.so
+          else
+            shrext=
+          fi
+          if test $use_additional = yes; then
+            dir="$additional_libdir"
+            dnl The same code as in the loop below:
+            dnl First look for a shared library.
+            if test -n "$acl_shlibext"; then
+              if test -f "$dir/$libname$shrext"; then
+                found_dir="$dir"
+                found_so="$dir/$libname$shrext"
+              else
+                if test "$acl_library_names_spec" = '$libname$shrext$versuffix'; then
+                  ver=`(cd "$dir" && \
+                        for f in "$libname$shrext".*; do echo "$f"; done \
+                        | sed -e "s,^$libname$shrext\\\\.,," \
+                        | sort -t '.' -n -r -k1,1 -k2,2 -k3,3 -k4,4 -k5,5 \
+                        | sed 1q ) 2>/dev/null`
+                  if test -n "$ver" && test -f "$dir/$libname$shrext.$ver"; then
+                    found_dir="$dir"
+                    found_so="$dir/$libname$shrext.$ver"
+                  fi
+                else
+                  eval library_names=\"$acl_library_names_spec\"
+                  for f in $library_names; do
+                    if test -f "$dir/$f"; then
+                      found_dir="$dir"
+                      found_so="$dir/$f"
+                      break
+                    fi
+                  done
+                fi
+              fi
+            fi
+            dnl Then look for a static library.
+            if test "X$found_dir" = "X"; then
+              if test -f "$dir/$libname.$acl_libext"; then
+                found_dir="$dir"
+                found_a="$dir/$libname.$acl_libext"
+              fi
+            fi
+            if test "X$found_dir" != "X"; then
+              if test -f "$dir/$libname.la"; then
+                found_la="$dir/$libname.la"
+              fi
+            fi
+          fi
+          if test "X$found_dir" = "X"; then
+            for x in $LDFLAGS $LTLIB[]NAME; do
+              AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"])
+              case "$x" in
+                -L*)
+                  dir=`echo "X$x" | sed -e 's/^X-L//'`
+                  dnl First look for a shared library.
+                  if test -n "$acl_shlibext"; then
+                    if test -f "$dir/$libname$shrext"; then
+                      found_dir="$dir"
+                      found_so="$dir/$libname$shrext"
+                    else
+                      if test "$acl_library_names_spec" = '$libname$shrext$versuffix'; then
+                        ver=`(cd "$dir" && \
+                              for f in "$libname$shrext".*; do echo "$f"; done \
+                              | sed -e "s,^$libname$shrext\\\\.,," \
+                              | sort -t '.' -n -r -k1,1 -k2,2 -k3,3 -k4,4 -k5,5 \
+                              | sed 1q ) 2>/dev/null`
+                        if test -n "$ver" && test -f "$dir/$libname$shrext.$ver"; then
+                          found_dir="$dir"
+                          found_so="$dir/$libname$shrext.$ver"
+                        fi
+                      else
+                        eval library_names=\"$acl_library_names_spec\"
+                        for f in $library_names; do
+                          if test -f "$dir/$f"; then
+                            found_dir="$dir"
+                            found_so="$dir/$f"
+                            break
+                          fi
+                        done
+                      fi
+                    fi
+                  fi
+                  dnl Then look for a static library.
+                  if test "X$found_dir" = "X"; then
+                    if test -f "$dir/$libname.$acl_libext"; then
+                      found_dir="$dir"
+                      found_a="$dir/$libname.$acl_libext"
+                    fi
+                  fi
+                  if test "X$found_dir" != "X"; then
+                    if test -f "$dir/$libname.la"; then
+                      found_la="$dir/$libname.la"
+                    fi
+                  fi
+                  ;;
+              esac
+              if test "X$found_dir" != "X"; then
+                break
+              fi
+            done
+          fi
+          if test "X$found_dir" != "X"; then
+            dnl Found the library.
+            LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }-L$found_dir -l$name"
+            if test "X$found_so" != "X"; then
+              dnl Linking with a shared library. We attempt to hardcode its
+              dnl directory into the executable's runpath, unless it's the
+              dnl standard /usr/lib.
+              if test "$enable_rpath" = no \
+                 || test "X$found_dir" = "X/usr/$acl_libdirstem" \
+                 || test "X$found_dir" = "X/usr/$acl_libdirstem2"; then
+                dnl No hardcoding is needed.
+                LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$found_so"
+              else
+                dnl Use an explicit option to hardcode DIR into the resulting
+                dnl binary.
+                dnl Potentially add DIR to ltrpathdirs.
+                dnl The ltrpathdirs will be appended to $LTLIBNAME at the end.
+                haveit=
+                for x in $ltrpathdirs; do
+                  if test "X$x" = "X$found_dir"; then
+                    haveit=yes
+                    break
+                  fi
+                done
+                if test -z "$haveit"; then
+                  ltrpathdirs="$ltrpathdirs $found_dir"
+                fi
+                dnl The hardcoding into $LIBNAME is system dependent.
+                if test "$acl_hardcode_direct" = yes; then
+                  dnl Using DIR/libNAME.so during linking hardcodes DIR into the
+                  dnl resulting binary.
+                  LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$found_so"
+                else
+                  if test -n "$acl_hardcode_libdir_flag_spec" && test "$acl_hardcode_minus_L" = no; then
+                    dnl Use an explicit option to hardcode DIR into the resulting
+                    dnl binary.
+                    LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$found_so"
+                    dnl Potentially add DIR to rpathdirs.
+                    dnl The rpathdirs will be appended to $LIBNAME at the end.
+                    haveit=
+                    for x in $rpathdirs; do
+                      if test "X$x" = "X$found_dir"; then
+                        haveit=yes
+                        break
+                      fi
+                    done
+                    if test -z "$haveit"; then
+                      rpathdirs="$rpathdirs $found_dir"
+                    fi
+                  else
+                    dnl Rely on "-L$found_dir".
+                    dnl But don't add it if it's already contained in the LDFLAGS
+                    dnl or the already constructed $LIBNAME
+                    haveit=
+                    for x in $LDFLAGS $LIB[]NAME; do
+                      AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"])
+                      if test "X$x" = "X-L$found_dir"; then
+                        haveit=yes
+                        break
+                      fi
+                    done
+                    if test -z "$haveit"; then
+                      LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }-L$found_dir"
+                    fi
+                    if test "$acl_hardcode_minus_L" != no; then
+                      dnl FIXME: Not sure whether we should use
+                      dnl "-L$found_dir -l$name" or "-L$found_dir $found_so"
+                      dnl here.
+                      LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$found_so"
+                    else
+                      dnl We cannot use $acl_hardcode_runpath_var and LD_RUN_PATH
+                      dnl here, because this doesn't fit in flags passed to the
+                      dnl compiler. So give up. No hardcoding. This affects only
+                      dnl very old systems.
+                      dnl FIXME: Not sure whether we should use
+                      dnl "-L$found_dir -l$name" or "-L$found_dir $found_so"
+                      dnl here.
+                      LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }-l$name"
+                    fi
+                  fi
+                fi
+              fi
+            else
+              if test "X$found_a" != "X"; then
+                dnl Linking with a static library.
+                LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$found_a"
+              else
+                dnl We shouldn't come here, but anyway it's good to have a
+                dnl fallback.
+                LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }-L$found_dir -l$name"
+              fi
+            fi
+            dnl Assume the include files are nearby.
+            additional_includedir=
+            case "$found_dir" in
+              */$acl_libdirstem | */$acl_libdirstem/)
+                basedir=`echo "X$found_dir" | sed -e 's,^X,,' -e "s,/$acl_libdirstem/"'*$,,'`
+                if test "$name" = '$1'; then
+                  LIB[]NAME[]_PREFIX="$basedir"
+                fi
+                additional_includedir="$basedir/include"
+                ;;
+              */$acl_libdirstem2 | */$acl_libdirstem2/)
+                basedir=`echo "X$found_dir" | sed -e 's,^X,,' -e "s,/$acl_libdirstem2/"'*$,,'`
+                if test "$name" = '$1'; then
+                  LIB[]NAME[]_PREFIX="$basedir"
+                fi
+                additional_includedir="$basedir/include"
+                ;;
+            esac
+            if test "X$additional_includedir" != "X"; then
+              dnl Potentially add $additional_includedir to $INCNAME.
+              dnl But don't add it
+              dnl   1. if it's the standard /usr/include,
+              dnl   2. if it's /usr/local/include and we are using GCC on Linux,
+              dnl   3. if it's already present in $CPPFLAGS or the already
+              dnl      constructed $INCNAME,
+              dnl   4. if it doesn't exist as a directory.
+              if test "X$additional_includedir" != "X/usr/include"; then
+                haveit=
+                if test "X$additional_includedir" = "X/usr/local/include"; then
+                  if test -n "$GCC"; then
+                    case $host_os in
+                      linux* | gnu* | k*bsd*-gnu) haveit=yes;;
+                    esac
+                  fi
+                fi
+                if test -z "$haveit"; then
+                  for x in $CPPFLAGS $INC[]NAME; do
+                    AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"])
+                    if test "X$x" = "X-I$additional_includedir"; then
+                      haveit=yes
+                      break
+                    fi
+                  done
+                  if test -z "$haveit"; then
+                    if test -d "$additional_includedir"; then
+                      dnl Really add $additional_includedir to $INCNAME.
+                      INC[]NAME="${INC[]NAME}${INC[]NAME:+ }-I$additional_includedir"
+                    fi
+                  fi
+                fi
+              fi
+            fi
+            dnl Look for dependencies.
+            if test -n "$found_la"; then
+              dnl Read the .la file. It defines the variables
+              dnl dlname, library_names, old_library, dependency_libs, current,
+              dnl age, revision, installed, dlopen, dlpreopen, libdir.
+              save_libdir="$libdir"
+              case "$found_la" in
+                */* | *\\*) . "$found_la" ;;
+                *) . "./$found_la" ;;
+              esac
+              libdir="$save_libdir"
+              dnl We use only dependency_libs.
+              for dep in $dependency_libs; do
+                case "$dep" in
+                  -L*)
+                    additional_libdir=`echo "X$dep" | sed -e 's/^X-L//'`
+                    dnl Potentially add $additional_libdir to $LIBNAME and $LTLIBNAME.
+                    dnl But don't add it
+                    dnl   1. if it's the standard /usr/lib,
+                    dnl   2. if it's /usr/local/lib and we are using GCC on Linux,
+                    dnl   3. if it's already present in $LDFLAGS or the already
+                    dnl      constructed $LIBNAME,
+                    dnl   4. if it doesn't exist as a directory.
+                    if test "X$additional_libdir" != "X/usr/$acl_libdirstem" \
+                       && test "X$additional_libdir" != "X/usr/$acl_libdirstem2"; then
+                      haveit=
+                      if test "X$additional_libdir" = "X/usr/local/$acl_libdirstem" \
+                         || test "X$additional_libdir" = "X/usr/local/$acl_libdirstem2"; then
+                        if test -n "$GCC"; then
+                          case $host_os in
+                            linux* | gnu* | k*bsd*-gnu) haveit=yes;;
+                          esac
+                        fi
+                      fi
+                      if test -z "$haveit"; then
+                        haveit=
+                        for x in $LDFLAGS $LIB[]NAME; do
+                          AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"])
+                          if test "X$x" = "X-L$additional_libdir"; then
+                            haveit=yes
+                            break
+                          fi
+                        done
+                        if test -z "$haveit"; then
+                          if test -d "$additional_libdir"; then
+                            dnl Really add $additional_libdir to $LIBNAME.
+                            LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }-L$additional_libdir"
+                          fi
+                        fi
+                        haveit=
+                        for x in $LDFLAGS $LTLIB[]NAME; do
+                          AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"])
+                          if test "X$x" = "X-L$additional_libdir"; then
+                            haveit=yes
+                            break
+                          fi
+                        done
+                        if test -z "$haveit"; then
+                          if test -d "$additional_libdir"; then
+                            dnl Really add $additional_libdir to $LTLIBNAME.
+                            LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }-L$additional_libdir"
+                          fi
+                        fi
+                      fi
+                    fi
+                    ;;
+                  -R*)
+                    dir=`echo "X$dep" | sed -e 's/^X-R//'`
+                    if test "$enable_rpath" != no; then
+                      dnl Potentially add DIR to rpathdirs.
+                      dnl The rpathdirs will be appended to $LIBNAME at the end.
+                      haveit=
+                      for x in $rpathdirs; do
+                        if test "X$x" = "X$dir"; then
+                          haveit=yes
+                          break
+                        fi
+                      done
+                      if test -z "$haveit"; then
+                        rpathdirs="$rpathdirs $dir"
+                      fi
+                      dnl Potentially add DIR to ltrpathdirs.
+                      dnl The ltrpathdirs will be appended to $LTLIBNAME at the end.
+                      haveit=
+                      for x in $ltrpathdirs; do
+                        if test "X$x" = "X$dir"; then
+                          haveit=yes
+                          break
+                        fi
+                      done
+                      if test -z "$haveit"; then
+                        ltrpathdirs="$ltrpathdirs $dir"
+                      fi
+                    fi
+                    ;;
+                  -l*)
+                    dnl Handle this in the next round.
+                    names_next_round="$names_next_round "`echo "X$dep" | sed -e 's/^X-l//'`
+                    ;;
+                  *.la)
+                    dnl Handle this in the next round. Throw away the .la's
+                    dnl directory; it is already contained in a preceding -L
+                    dnl option.
+                    names_next_round="$names_next_round "`echo "X$dep" | sed -e 's,^X.*/,,' -e 's,^lib,,' -e 's,\.la$,,'`
+                    ;;
+                  *)
+                    dnl Most likely an immediate library name.
+                    LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$dep"
+                    LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }$dep"
+                    ;;
+                esac
+              done
+            fi
+          else
+            dnl Didn't find the library; assume it is in the system directories
+            dnl known to the linker and runtime loader. (All the system
+            dnl directories known to the linker should also be known to the
+            dnl runtime loader, otherwise the system is severely misconfigured.)
+            LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }-l$name"
+            LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }-l$name"
+          fi
+        fi
+      fi
+    done
+  done
+  if test "X$rpathdirs" != "X"; then
+    if test -n "$acl_hardcode_libdir_separator"; then
+      dnl Weird platform: only the last -rpath option counts, the user must
+      dnl pass all path elements in one option. We can arrange that for a
+      dnl single library, but not when more than one $LIBNAMEs are used.
+      alldirs=
+      for found_dir in $rpathdirs; do
+        alldirs="${alldirs}${alldirs:+$acl_hardcode_libdir_separator}$found_dir"
+      done
+      dnl Note: acl_hardcode_libdir_flag_spec uses $libdir and $wl.
+      acl_save_libdir="$libdir"
+      libdir="$alldirs"
+      eval flag=\"$acl_hardcode_libdir_flag_spec\"
+      libdir="$acl_save_libdir"
+      LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$flag"
+    else
+      dnl The -rpath options are cumulative.
+      for found_dir in $rpathdirs; do
+        acl_save_libdir="$libdir"
+        libdir="$found_dir"
+        eval flag=\"$acl_hardcode_libdir_flag_spec\"
+        libdir="$acl_save_libdir"
+        LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$flag"
+      done
+    fi
+  fi
+  if test "X$ltrpathdirs" != "X"; then
+    dnl When using libtool, the option that works for both libraries and
+    dnl executables is -R. The -R options are cumulative.
+    for found_dir in $ltrpathdirs; do
+      LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }-R$found_dir"
+    done
+  fi
+  popdef([PACKLIBS])
+  popdef([PACKUP])
+  popdef([PACK])
+  popdef([NAME])
+])
+
+dnl AC_LIB_APPENDTOVAR(VAR, CONTENTS) appends the elements of CONTENTS to VAR,
+dnl unless already present in VAR.
+dnl Works only for CPPFLAGS, not for LIB* variables because that sometimes
+dnl contains two or three consecutive elements that belong together.
+AC_DEFUN([AC_LIB_APPENDTOVAR],
+[
+  for element in [$2]; do
+    haveit=
+    for x in $[$1]; do
+      AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"])
+      if test "X$x" = "X$element"; then
+        haveit=yes
+        break
+      fi
+    done
+    if test -z "$haveit"; then
+      [$1]="${[$1]}${[$1]:+ }$element"
+    fi
+  done
+])
+
+dnl For those cases where a variable contains several -L and -l options
+dnl referring to unknown libraries and directories, this macro determines the
+dnl necessary additional linker options for the runtime path.
+dnl AC_LIB_LINKFLAGS_FROM_LIBS([LDADDVAR], [LIBSVALUE], [USE-LIBTOOL])
+dnl sets LDADDVAR to linker options needed together with LIBSVALUE.
+dnl If USE-LIBTOOL evaluates to non-empty, linking with libtool is assumed,
+dnl otherwise linking without libtool is assumed.
+AC_DEFUN([AC_LIB_LINKFLAGS_FROM_LIBS],
+[
+  AC_REQUIRE([AC_LIB_RPATH])
+  AC_REQUIRE([AC_LIB_PREPARE_MULTILIB])
+  $1=
+  if test "$enable_rpath" != no; then
+    if test -n "$acl_hardcode_libdir_flag_spec" && test "$acl_hardcode_minus_L" = no; then
+      dnl Use an explicit option to hardcode directories into the resulting
+      dnl binary.
+      rpathdirs=
+      next=
+      for opt in $2; do
+        if test -n "$next"; then
+          dir="$next"
+          dnl No need to hardcode the standard /usr/lib.
+          if test "X$dir" != "X/usr/$acl_libdirstem" \
+             && test "X$dir" != "X/usr/$acl_libdirstem2"; then
+            rpathdirs="$rpathdirs $dir"
+          fi
+          next=
+        else
+          case $opt in
+            -L) next=yes ;;
+            -L*) dir=`echo "X$opt" | sed -e 's,^X-L,,'`
+                 dnl No need to hardcode the standard /usr/lib.
+                 if test "X$dir" != "X/usr/$acl_libdirstem" \
+                    && test "X$dir" != "X/usr/$acl_libdirstem2"; then
+                   rpathdirs="$rpathdirs $dir"
+                 fi
+                 next= ;;
+            *) next= ;;
+          esac
+        fi
+      done
+      if test "X$rpathdirs" != "X"; then
+        if test -n ""$3""; then
+          dnl libtool is used for linking. Use -R options.
+          for dir in $rpathdirs; do
+            $1="${$1}${$1:+ }-R$dir"
+          done
+        else
+          dnl The linker is used for linking directly.
+          if test -n "$acl_hardcode_libdir_separator"; then
+            dnl Weird platform: only the last -rpath option counts, the user
+            dnl must pass all path elements in one option.
+            alldirs=
+            for dir in $rpathdirs; do
+              alldirs="${alldirs}${alldirs:+$acl_hardcode_libdir_separator}$dir"
+            done
+            acl_save_libdir="$libdir"
+            libdir="$alldirs"
+            eval flag=\"$acl_hardcode_libdir_flag_spec\"
+            libdir="$acl_save_libdir"
+            $1="$flag"
+          else
+            dnl The -rpath options are cumulative.
+            for dir in $rpathdirs; do
+              acl_save_libdir="$libdir"
+              libdir="$dir"
+              eval flag=\"$acl_hardcode_libdir_flag_spec\"
+              libdir="$acl_save_libdir"
+              $1="${$1}${$1:+ }$flag"
+            done
+          fi
+        fi
+      fi
+    fi
+  fi
+  AC_SUBST([$1])
+])
diff --git a/gnulib-m4/lib-prefix.m4 b/gnulib-m4/lib-prefix.m4
new file mode 100644 (file)
index 0000000..8adb17b
--- /dev/null
@@ -0,0 +1,249 @@
+# lib-prefix.m4 serial 14
+dnl Copyright (C) 2001-2005, 2008-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Bruno Haible.
+
+dnl AC_LIB_PREFIX adds to the CPPFLAGS and LDFLAGS the flags that are needed
+dnl to access previously installed libraries. The basic assumption is that
+dnl a user will want packages to use other packages he previously installed
+dnl with the same --prefix option.
+dnl This macro is not needed if only AC_LIB_LINKFLAGS is used to locate
+dnl libraries, but is otherwise very convenient.
+AC_DEFUN([AC_LIB_PREFIX],
+[
+  AC_BEFORE([$0], [AC_LIB_LINKFLAGS])
+  AC_REQUIRE([AC_PROG_CC])
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  AC_REQUIRE([AC_LIB_PREPARE_MULTILIB])
+  AC_REQUIRE([AC_LIB_PREPARE_PREFIX])
+  dnl By default, look in $includedir and $libdir.
+  use_additional=yes
+  AC_LIB_WITH_FINAL_PREFIX([
+    eval additional_includedir=\"$includedir\"
+    eval additional_libdir=\"$libdir\"
+  ])
+  AC_ARG_WITH([lib-prefix],
+[[  --with-lib-prefix[=DIR] search for libraries in DIR/include and DIR/lib
+  --without-lib-prefix    don't search for libraries in includedir and libdir]],
+[
+    if test "X$withval" = "Xno"; then
+      use_additional=no
+    else
+      if test "X$withval" = "X"; then
+        AC_LIB_WITH_FINAL_PREFIX([
+          eval additional_includedir=\"$includedir\"
+          eval additional_libdir=\"$libdir\"
+        ])
+      else
+        additional_includedir="$withval/include"
+        additional_libdir="$withval/$acl_libdirstem"
+      fi
+    fi
+])
+  if test $use_additional = yes; then
+    dnl Potentially add $additional_includedir to $CPPFLAGS.
+    dnl But don't add it
+    dnl   1. if it's the standard /usr/include,
+    dnl   2. if it's already present in $CPPFLAGS,
+    dnl   3. if it's /usr/local/include and we are using GCC on Linux,
+    dnl   4. if it doesn't exist as a directory.
+    if test "X$additional_includedir" != "X/usr/include"; then
+      haveit=
+      for x in $CPPFLAGS; do
+        AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"])
+        if test "X$x" = "X-I$additional_includedir"; then
+          haveit=yes
+          break
+        fi
+      done
+      if test -z "$haveit"; then
+        if test "X$additional_includedir" = "X/usr/local/include"; then
+          if test -n "$GCC"; then
+            case $host_os in
+              linux* | gnu* | k*bsd*-gnu) haveit=yes;;
+            esac
+          fi
+        fi
+        if test -z "$haveit"; then
+          if test -d "$additional_includedir"; then
+            dnl Really add $additional_includedir to $CPPFLAGS.
+            CPPFLAGS="${CPPFLAGS}${CPPFLAGS:+ }-I$additional_includedir"
+          fi
+        fi
+      fi
+    fi
+    dnl Potentially add $additional_libdir to $LDFLAGS.
+    dnl But don't add it
+    dnl   1. if it's the standard /usr/lib,
+    dnl   2. if it's already present in $LDFLAGS,
+    dnl   3. if it's /usr/local/lib and we are using GCC on Linux,
+    dnl   4. if it doesn't exist as a directory.
+    if test "X$additional_libdir" != "X/usr/$acl_libdirstem"; then
+      haveit=
+      for x in $LDFLAGS; do
+        AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"])
+        if test "X$x" = "X-L$additional_libdir"; then
+          haveit=yes
+          break
+        fi
+      done
+      if test -z "$haveit"; then
+        if test "X$additional_libdir" = "X/usr/local/$acl_libdirstem"; then
+          if test -n "$GCC"; then
+            case $host_os in
+              linux*) haveit=yes;;
+            esac
+          fi
+        fi
+        if test -z "$haveit"; then
+          if test -d "$additional_libdir"; then
+            dnl Really add $additional_libdir to $LDFLAGS.
+            LDFLAGS="${LDFLAGS}${LDFLAGS:+ }-L$additional_libdir"
+          fi
+        fi
+      fi
+    fi
+  fi
+])
+
+dnl AC_LIB_PREPARE_PREFIX creates variables acl_final_prefix,
+dnl acl_final_exec_prefix, containing the values to which $prefix and
+dnl $exec_prefix will expand at the end of the configure script.
+AC_DEFUN([AC_LIB_PREPARE_PREFIX],
+[
+  dnl Unfortunately, prefix and exec_prefix get only finally determined
+  dnl at the end of configure.
+  if test "X$prefix" = "XNONE"; then
+    acl_final_prefix="$ac_default_prefix"
+  else
+    acl_final_prefix="$prefix"
+  fi
+  if test "X$exec_prefix" = "XNONE"; then
+    acl_final_exec_prefix='${prefix}'
+  else
+    acl_final_exec_prefix="$exec_prefix"
+  fi
+  acl_save_prefix="$prefix"
+  prefix="$acl_final_prefix"
+  eval acl_final_exec_prefix=\"$acl_final_exec_prefix\"
+  prefix="$acl_save_prefix"
+])
+
+dnl AC_LIB_WITH_FINAL_PREFIX([statement]) evaluates statement, with the
+dnl variables prefix and exec_prefix bound to the values they will have
+dnl at the end of the configure script.
+AC_DEFUN([AC_LIB_WITH_FINAL_PREFIX],
+[
+  acl_save_prefix="$prefix"
+  prefix="$acl_final_prefix"
+  acl_save_exec_prefix="$exec_prefix"
+  exec_prefix="$acl_final_exec_prefix"
+  $1
+  exec_prefix="$acl_save_exec_prefix"
+  prefix="$acl_save_prefix"
+])
+
+dnl AC_LIB_PREPARE_MULTILIB creates
+dnl - a variable acl_libdirstem, containing the basename of the libdir, either
+dnl   "lib" or "lib64" or "lib/64",
+dnl - a variable acl_libdirstem2, as a secondary possible value for
+dnl   acl_libdirstem, either the same as acl_libdirstem or "lib/sparcv9" or
+dnl   "lib/amd64".
+AC_DEFUN([AC_LIB_PREPARE_MULTILIB],
+[
+  dnl There is no formal standard regarding lib and lib64.
+  dnl On glibc systems, the current practice is that on a system supporting
+  dnl 32-bit and 64-bit instruction sets or ABIs, 64-bit libraries go under
+  dnl $prefix/lib64 and 32-bit libraries go under $prefix/lib. We determine
+  dnl the compiler's default mode by looking at the compiler's library search
+  dnl path. If at least one of its elements ends in /lib64 or points to a
+  dnl directory whose absolute pathname ends in /lib64, we assume a 64-bit ABI.
+  dnl Otherwise we use the default, namely "lib".
+  dnl On Solaris systems, the current practice is that on a system supporting
+  dnl 32-bit and 64-bit instruction sets or ABIs, 64-bit libraries go under
+  dnl $prefix/lib/64 (which is a symlink to either $prefix/lib/sparcv9 or
+  dnl $prefix/lib/amd64) and 32-bit libraries go under $prefix/lib.
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  AC_REQUIRE([gl_HOST_CPU_C_ABI_32BIT])
+
+  case "$host_os" in
+    solaris*)
+      AC_CACHE_CHECK([for 64-bit host], [gl_cv_solaris_64bit],
+        [AC_COMPILE_IFELSE(
+           [AC_LANG_SOURCE(
+              [[#ifdef _LP64
+                 int ok;
+                #else
+                 error fail
+                #endif
+              ]])],
+           [gl_cv_solaris_64bit=yes],
+           [gl_cv_solaris_64bit=no])
+        ]);;
+  esac
+
+  dnl Allow the user to override the result by setting acl_cv_libdirstems.
+  AC_CACHE_CHECK([for the common suffixes of directories in the library search path],
+    [acl_cv_libdirstems],
+    [acl_libdirstem=lib
+     acl_libdirstem2=
+     case "$host_os" in
+       solaris*)
+         dnl See Solaris 10 Software Developer Collection > Solaris 64-bit Developer's Guide > The Development Environment
+         dnl <https://docs.oracle.com/cd/E19253-01/816-5138/dev-env/index.html>.
+         dnl "Portable Makefiles should refer to any library directories using the 64 symbolic link."
+         dnl But we want to recognize the sparcv9 or amd64 subdirectory also if the
+         dnl symlink is missing, so we set acl_libdirstem2 too.
+         if test $gl_cv_solaris_64bit = yes; then
+           acl_libdirstem=lib/64
+           case "$host_cpu" in
+             sparc*)        acl_libdirstem2=lib/sparcv9 ;;
+             i*86 | x86_64) acl_libdirstem2=lib/amd64 ;;
+           esac
+         fi
+         ;;
+       *)
+         dnl If $CC generates code for a 32-bit ABI, the libraries are
+         dnl surely under $prefix/lib, not $prefix/lib64.
+         if test "$HOST_CPU_C_ABI_32BIT" != yes; then
+           dnl The result is a property of the system. However, non-system
+           dnl compilers sometimes have odd library search paths. Therefore
+           dnl prefer asking /usr/bin/gcc, if available, rather than $CC.
+           searchpath=`(if test -f /usr/bin/gcc \
+                           && LC_ALL=C /usr/bin/gcc -print-search-dirs >/dev/null 2>/dev/null; then \
+                          LC_ALL=C /usr/bin/gcc -print-search-dirs; \
+                        else \
+                          LC_ALL=C $CC -print-search-dirs; \
+                        fi) 2>/dev/null \
+                       | sed -n -e 's,^libraries: ,,p' | sed -e 's,^=,,'`
+           if test -n "$searchpath"; then
+             acl_save_IFS="${IFS=      }"; IFS=":"
+             for searchdir in $searchpath; do
+               if test -d "$searchdir"; then
+                 case "$searchdir" in
+                   */lib64/ | */lib64 ) acl_libdirstem=lib64 ;;
+                   */../ | */.. )
+                     # Better ignore directories of this form. They are misleading.
+                     ;;
+                   *) searchdir=`cd "$searchdir" && pwd`
+                      case "$searchdir" in
+                        */lib64 ) acl_libdirstem=lib64 ;;
+                      esac ;;
+                 esac
+               fi
+             done
+             IFS="$acl_save_IFS"
+           fi
+         fi
+         ;;
+     esac
+     test -n "$acl_libdirstem2" || acl_libdirstem2="$acl_libdirstem"
+     acl_cv_libdirstems="$acl_libdirstem,$acl_libdirstem2"
+    ])
+  # Decompose acl_cv_libdirstems into acl_libdirstem and acl_libdirstem2.
+  acl_libdirstem=`echo "$acl_cv_libdirstems" | sed -e 's/,.*//'`
+  acl_libdirstem2=`echo "$acl_cv_libdirstems" | sed -e '/,/s/.*,//'`
+])
diff --git a/gnulib-m4/limits-h.m4 b/gnulib-m4/limits-h.m4
new file mode 100644 (file)
index 0000000..68f724c
--- /dev/null
@@ -0,0 +1,43 @@
+dnl Check whether limits.h has needed features.
+
+dnl Copyright 2016-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Paul Eggert.
+
+AC_DEFUN_ONCE([gl_LIMITS_H],
+[
+  gl_CHECK_NEXT_HEADERS([limits.h])
+
+  AC_CACHE_CHECK([whether limits.h has LLONG_MAX, WORD_BIT, ULLONG_WIDTH etc.],
+    [gl_cv_header_limits_width],
+    [AC_COMPILE_IFELSE(
+       [AC_LANG_PROGRAM(
+          [[#ifndef __STDC_WANT_IEC_60559_BFP_EXT__
+             #define __STDC_WANT_IEC_60559_BFP_EXT__ 1
+            #endif
+            #include <limits.h>
+            long long llm = LLONG_MAX;
+            int wb = WORD_BIT;
+            int ullw = ULLONG_WIDTH;
+          ]])],
+       [gl_cv_header_limits_width=yes],
+       [gl_cv_header_limits_width=no])])
+  if test "$gl_cv_header_limits_width" = yes; then
+    LIMITS_H=
+  else
+    LIMITS_H=limits.h
+  fi
+  AC_SUBST([LIMITS_H])
+  AM_CONDITIONAL([GL_GENERATE_LIMITS_H], [test -n "$LIMITS_H"])
+])
+
+dnl Unconditionally enables the replacement of <limits.h>.
+AC_DEFUN([gl_REPLACE_LIMITS_H],
+[
+  AC_REQUIRE([gl_LIMITS_H])
+  LIMITS_H='limits.h'
+  AM_CONDITIONAL([GL_GENERATE_LIMITS_H], [test -n "$LIMITS_H"])
+])
diff --git a/gnulib-m4/lock.m4 b/gnulib-m4/lock.m4
new file mode 100644 (file)
index 0000000..93b76fa
--- /dev/null
@@ -0,0 +1,47 @@
+# lock.m4 serial 14
+dnl Copyright (C) 2005-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Bruno Haible.
+
+AC_DEFUN([gl_LOCK],
+[
+  AC_REQUIRE([gl_THREADLIB])
+  if test "$gl_threads_api" = posix; then
+    # OSF/1 4.0 and Mac OS X 10.1 lack the pthread_rwlock_t type and the
+    # pthread_rwlock_* functions.
+    has_rwlock=false
+    AC_CHECK_TYPE([pthread_rwlock_t],
+      [has_rwlock=true
+       AC_DEFINE([HAVE_PTHREAD_RWLOCK], [1],
+         [Define if the POSIX multithreading library has read/write locks.])],
+      [],
+      [#include <pthread.h>])
+    if $has_rwlock; then
+      gl_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER
+    fi
+    # glibc defines PTHREAD_MUTEX_RECURSIVE as enum, not as a macro.
+    AC_COMPILE_IFELSE([
+      AC_LANG_PROGRAM(
+        [[#include <pthread.h>]],
+        [[
+#if __FreeBSD__ == 4
+error "No, in FreeBSD 4.0 recursive mutexes actually don't work."
+#elif (defined __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ \
+       && __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ < 1070)
+error "No, in Mac OS X < 10.7 recursive mutexes actually don't work."
+#else
+int x = (int)PTHREAD_MUTEX_RECURSIVE;
+return !x;
+#endif
+        ]])],
+      [AC_DEFINE([HAVE_PTHREAD_MUTEX_RECURSIVE], [1],
+         [Define if the <pthread.h> defines PTHREAD_MUTEX_RECURSIVE.])])
+  fi
+  gl_PREREQ_LOCK
+])
+
+# Prerequisites of lib/glthread/lock.c.
+AC_DEFUN([gl_PREREQ_LOCK], [:])
diff --git a/gnulib-m4/longlong.m4 b/gnulib-m4/longlong.m4
new file mode 100644 (file)
index 0000000..08d0e36
--- /dev/null
@@ -0,0 +1,113 @@
+# longlong.m4 serial 18
+dnl Copyright (C) 1999-2007, 2009-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Paul Eggert.
+
+AC_PREREQ([2.62])
+
+# Define HAVE_LONG_LONG_INT if 'long long int' works.
+# This can be faster than what's in Autoconf 2.62 through 2.68.
+
+# Note: If the type 'long long int' exists but is only 32 bits large
+# (as on some very old compilers), HAVE_LONG_LONG_INT will not be
+# defined. In this case you can treat 'long long int' like 'long int'.
+
+AC_DEFUN([AC_TYPE_LONG_LONG_INT],
+[
+  AC_REQUIRE([AC_TYPE_UNSIGNED_LONG_LONG_INT])
+  AC_CACHE_CHECK([for long long int], [ac_cv_type_long_long_int],
+     [ac_cv_type_long_long_int=yes
+      if test "x${ac_cv_prog_cc_c99-no}" = xno; then
+        ac_cv_type_long_long_int=$ac_cv_type_unsigned_long_long_int
+        if test $ac_cv_type_long_long_int = yes; then
+          dnl Catch a bug in Tandem NonStop Kernel (OSS) cc -O circa 2004.
+          dnl If cross compiling, assume the bug is not important, since
+          dnl nobody cross compiles for this platform as far as we know.
+          AC_RUN_IFELSE(
+            [AC_LANG_PROGRAM(
+               [[@%:@include <limits.h>
+                 @%:@ifndef LLONG_MAX
+                 @%:@ define HALF \
+                          (1LL << (sizeof (long long int) * CHAR_BIT - 2))
+                 @%:@ define LLONG_MAX (HALF - 1 + HALF)
+                 @%:@endif]],
+               [[long long int n = 1;
+                 int i;
+                 for (i = 0; ; i++)
+                   {
+                     long long int m = n << i;
+                     if (m >> i != n)
+                       return 1;
+                     if (LLONG_MAX / 2 < m)
+                       break;
+                   }
+                 return 0;]])],
+            [],
+            [ac_cv_type_long_long_int=no],
+            [:])
+        fi
+      fi])
+  if test $ac_cv_type_long_long_int = yes; then
+    AC_DEFINE([HAVE_LONG_LONG_INT], [1],
+      [Define to 1 if the system has the type 'long long int'.])
+  fi
+])
+
+# Define HAVE_UNSIGNED_LONG_LONG_INT if 'unsigned long long int' works.
+# This can be faster than what's in Autoconf 2.62 through 2.68.
+
+# Note: If the type 'unsigned long long int' exists but is only 32 bits
+# large (as on some very old compilers), AC_TYPE_UNSIGNED_LONG_LONG_INT
+# will not be defined. In this case you can treat 'unsigned long long int'
+# like 'unsigned long int'.
+
+AC_DEFUN([AC_TYPE_UNSIGNED_LONG_LONG_INT],
+[
+  AC_CACHE_CHECK([for unsigned long long int],
+    [ac_cv_type_unsigned_long_long_int],
+    [ac_cv_type_unsigned_long_long_int=yes
+     if test "x${ac_cv_prog_cc_c99-no}" = xno; then
+       AC_LINK_IFELSE(
+         [_AC_TYPE_LONG_LONG_SNIPPET],
+         [],
+         [ac_cv_type_unsigned_long_long_int=no])
+     fi])
+  if test $ac_cv_type_unsigned_long_long_int = yes; then
+    AC_DEFINE([HAVE_UNSIGNED_LONG_LONG_INT], [1],
+      [Define to 1 if the system has the type 'unsigned long long int'.])
+  fi
+])
+
+# Expands to a C program that can be used to test for simultaneous support
+# of 'long long' and 'unsigned long long'. We don't want to say that
+# 'long long' is available if 'unsigned long long' is not, or vice versa,
+# because too many programs rely on the symmetry between signed and unsigned
+# integer types (excluding 'bool').
+AC_DEFUN([_AC_TYPE_LONG_LONG_SNIPPET],
+[
+  AC_LANG_PROGRAM(
+    [[/* For now, do not test the preprocessor; as of 2007 there are too many
+         implementations with broken preprocessors.  Perhaps this can
+         be revisited in 2012.  In the meantime, code should not expect
+         #if to work with literals wider than 32 bits.  */
+      /* Test literals.  */
+      long long int ll = 9223372036854775807ll;
+      long long int nll = -9223372036854775807LL;
+      unsigned long long int ull = 18446744073709551615ULL;
+      /* Test constant expressions.   */
+      typedef int a[((-9223372036854775807LL < 0 && 0 < 9223372036854775807ll)
+                     ? 1 : -1)];
+      typedef int b[(18446744073709551615ULL <= (unsigned long long int) -1
+                     ? 1 : -1)];
+      int i = 63;]],
+    [[/* Test availability of runtime routines for shift and division.  */
+      long long int llmax = 9223372036854775807ll;
+      unsigned long long int ullmax = 18446744073709551615ull;
+      return ((ll << 63) | (ll >> 63) | (ll < i) | (ll > i)
+              | (llmax / ll) | (llmax % ll)
+              | (ull << 63) | (ull >> 63) | (ull << i) | (ull >> i)
+              | (ullmax / ull) | (ullmax % ull));]])
+])
diff --git a/gnulib-m4/multiarch.m4 b/gnulib-m4/multiarch.m4
new file mode 100644 (file)
index 0000000..d48316e
--- /dev/null
@@ -0,0 +1,62 @@
+# multiarch.m4 serial 7
+dnl Copyright (C) 2008-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+# Determine whether the compiler is or may be producing universal binaries.
+#
+# On Mac OS X 10.5 and later systems, the user can create libraries and
+# executables that work on multiple system types--known as "fat" or
+# "universal" binaries--by specifying multiple '-arch' options to the
+# compiler but only a single '-arch' option to the preprocessor.  Like
+# this:
+#
+#     ./configure CC="gcc -arch i386 -arch x86_64 -arch ppc -arch ppc64" \
+#                 CXX="g++ -arch i386 -arch x86_64 -arch ppc -arch ppc64" \
+#                 CPP="gcc -E" CXXCPP="g++ -E"
+#
+# Detect this situation and set APPLE_UNIVERSAL_BUILD accordingly.
+
+AC_DEFUN_ONCE([gl_MULTIARCH],
+[
+  dnl Code similar to autoconf-2.63 AC_C_BIGENDIAN.
+  gl_cv_c_multiarch=no
+  AC_COMPILE_IFELSE(
+    [AC_LANG_SOURCE(
+      [[#ifndef __APPLE_CC__
+         not a universal capable compiler
+        #endif
+        typedef int dummy;
+      ]])],
+    [
+     dnl Check for potential -arch flags.  It is not universal unless
+     dnl there are at least two -arch flags with different values.
+     arch=
+     prev=
+     for word in ${CC} ${CFLAGS} ${CPPFLAGS} ${LDFLAGS}; do
+       if test -n "$prev"; then
+         case $word in
+           i?86 | x86_64 | ppc | ppc64)
+             if test -z "$arch" || test "$arch" = "$word"; then
+               arch="$word"
+             else
+               gl_cv_c_multiarch=yes
+             fi
+             ;;
+         esac
+         prev=
+       else
+         if test "x$word" = "x-arch"; then
+           prev=arch
+         fi
+       fi
+     done
+    ])
+  if test $gl_cv_c_multiarch = yes; then
+    APPLE_UNIVERSAL_BUILD=1
+  else
+    APPLE_UNIVERSAL_BUILD=0
+  fi
+  AC_SUBST([APPLE_UNIVERSAL_BUILD])
+])
diff --git a/gnulib-m4/nocrash.m4 b/gnulib-m4/nocrash.m4
new file mode 100644 (file)
index 0000000..4d9f022
--- /dev/null
@@ -0,0 +1,131 @@
+# nocrash.m4 serial 5
+dnl Copyright (C) 2005, 2009-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl Based on libsigsegv, from Bruno Haible and Paolo Bonzini.
+
+AC_PREREQ([2.13])
+
+dnl Expands to some code for use in .c programs that will cause the configure
+dnl test to exit instead of crashing. This is useful to avoid triggering
+dnl action from a background debugger and to avoid core dumps.
+dnl Usage:   ...
+dnl          ]GL_NOCRASH[
+dnl          ...
+dnl          int main() { nocrash_init(); ... }
+AC_DEFUN([GL_NOCRASH],[[
+#include <stdlib.h>
+#if defined __MACH__ && defined __APPLE__
+/* Avoid a crash on Mac OS X.  */
+#include <mach/mach.h>
+#include <mach/mach_error.h>
+#include <mach/thread_status.h>
+#include <mach/exception.h>
+#include <mach/task.h>
+#include <pthread.h>
+/* The exception port on which our thread listens.  */
+static mach_port_t our_exception_port;
+/* The main function of the thread listening for exceptions of type
+   EXC_BAD_ACCESS.  */
+static void *
+mach_exception_thread (void *arg)
+{
+  /* Buffer for a message to be received.  */
+  struct {
+    mach_msg_header_t head;
+    mach_msg_body_t msgh_body;
+    char data[1024];
+  } msg;
+  mach_msg_return_t retval;
+  /* Wait for a message on the exception port.  */
+  retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg),
+                     our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
+  if (retval != MACH_MSG_SUCCESS)
+    abort ();
+  exit (1);
+}
+static void
+nocrash_init (void)
+{
+  mach_port_t self = mach_task_self ();
+  /* Allocate a port on which the thread shall listen for exceptions.  */
+  if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port)
+      == KERN_SUCCESS) {
+    /* See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html.  */
+    if (mach_port_insert_right (self, our_exception_port, our_exception_port,
+                                MACH_MSG_TYPE_MAKE_SEND)
+        == KERN_SUCCESS) {
+      /* The exceptions we want to catch.  Only EXC_BAD_ACCESS is interesting
+         for us.  */
+      exception_mask_t mask = EXC_MASK_BAD_ACCESS;
+      /* Create the thread listening on the exception port.  */
+      pthread_attr_t attr;
+      pthread_t thread;
+      if (pthread_attr_init (&attr) == 0
+          && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0
+          && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) {
+        pthread_attr_destroy (&attr);
+        /* Replace the exception port info for these exceptions with our own.
+           Note that we replace the exception port for the entire task, not only
+           for a particular thread.  This has the effect that when our exception
+           port gets the message, the thread specific exception port has already
+           been asked, and we don't need to bother about it.
+           See http://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html.  */
+        task_set_exception_ports (self, mask, our_exception_port,
+                                  EXCEPTION_DEFAULT, MACHINE_THREAD_STATE);
+      }
+    }
+  }
+}
+#elif defined _WIN32 && ! defined __CYGWIN__
+/* Avoid a crash on native Windows.  */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <winerror.h>
+static LONG WINAPI
+exception_filter (EXCEPTION_POINTERS *ExceptionInfo)
+{
+  switch (ExceptionInfo->ExceptionRecord->ExceptionCode)
+    {
+    case EXCEPTION_ACCESS_VIOLATION:
+    case EXCEPTION_IN_PAGE_ERROR:
+    case EXCEPTION_STACK_OVERFLOW:
+    case EXCEPTION_GUARD_PAGE:
+    case EXCEPTION_PRIV_INSTRUCTION:
+    case EXCEPTION_ILLEGAL_INSTRUCTION:
+    case EXCEPTION_DATATYPE_MISALIGNMENT:
+    case EXCEPTION_ARRAY_BOUNDS_EXCEEDED:
+    case EXCEPTION_NONCONTINUABLE_EXCEPTION:
+      exit (1);
+    }
+  return EXCEPTION_CONTINUE_SEARCH;
+}
+static void
+nocrash_init (void)
+{
+  SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter);
+}
+#else
+/* Avoid a crash on POSIX systems.  */
+#include <signal.h>
+#include <unistd.h>
+/* A POSIX signal handler.  */
+static void
+exception_handler (int sig)
+{
+  _exit (1);
+}
+static void
+nocrash_init (void)
+{
+#ifdef SIGSEGV
+  signal (SIGSEGV, exception_handler);
+#endif
+#ifdef SIGBUS
+  signal (SIGBUS, exception_handler);
+#endif
+}
+#endif
+]])
diff --git a/gnulib-m4/off_t.m4 b/gnulib-m4/off_t.m4
new file mode 100644 (file)
index 0000000..711a2d4
--- /dev/null
@@ -0,0 +1,18 @@
+# off_t.m4 serial 1
+dnl Copyright (C) 2012-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl Check whether to override the 'off_t' type.
+dnl Set WINDOWS_64_BIT_OFF_T.
+
+AC_DEFUN([gl_TYPE_OFF_T],
+[
+  m4_ifdef([gl_LARGEFILE], [
+    AC_REQUIRE([gl_LARGEFILE])
+  ], [
+    WINDOWS_64_BIT_OFF_T=0
+  ])
+  AC_SUBST([WINDOWS_64_BIT_OFF_T])
+])
diff --git a/gnulib-m4/onceonly.m4 b/gnulib-m4/onceonly.m4
new file mode 100644 (file)
index 0000000..5ab3dd7
--- /dev/null
@@ -0,0 +1,104 @@
+# onceonly.m4 serial 9
+dnl Copyright (C) 2002-2003, 2005-2006, 2008-2018 Free Software Foundation,
+dnl Inc.
+dnl
+dnl This file is free software; you can redistribute it and/or modify
+dnl it under the terms of the GNU General Public License as published by
+dnl the Free Software Foundation; either version 3 of the License, or
+dnl (at your option) any later version.
+dnl
+dnl This file is distributed in the hope that it will be useful,
+dnl but WITHOUT ANY WARRANTY; without even the implied warranty of
+dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+dnl GNU General Public License for more details.
+dnl
+dnl You should have received a copy of the GNU General Public License
+dnl along with this file.  If not, see <https://www.gnu.org/licenses/>.
+dnl
+dnl As a special exception to the GNU General Public License,
+dnl this file may be distributed as part of a program
+dnl that contains a configuration script generated by Autoconf, under
+dnl the same distribution terms as the rest of that program.
+
+dnl This file defines some "once only" variants of standard autoconf macros.
+dnl   AC_CHECK_HEADERS_ONCE          like  AC_CHECK_HEADERS
+dnl   AC_CHECK_FUNCS_ONCE            like  AC_CHECK_FUNCS
+dnl   AC_CHECK_DECLS_ONCE            like  AC_CHECK_DECLS
+dnl   AC_REQUIRE([AC_FUNC_STRCOLL])  like  AC_FUNC_STRCOLL
+dnl The advantage is that the check for each of the headers/functions/decls
+dnl will be put only once into the 'configure' file. It keeps the size of
+dnl the 'configure' file down, and avoids redundant output when 'configure'
+dnl is run.
+dnl The drawback is that the checks cannot be conditionalized. If you write
+dnl   if some_condition; then gl_CHECK_HEADERS(stdlib.h); fi
+dnl inside an AC_DEFUNed function, the gl_CHECK_HEADERS macro call expands to
+dnl empty, and the check will be inserted before the body of the AC_DEFUNed
+dnl function.
+
+dnl The original code implemented AC_CHECK_HEADERS_ONCE and AC_CHECK_FUNCS_ONCE
+dnl in terms of AC_DEFUN and AC_REQUIRE. This implementation uses diversions to
+dnl named sections DEFAULTS and INIT_PREPARE in order to check all requested
+dnl headers at once, thus reducing the size of 'configure'. It is known to work
+dnl with autoconf 2.57..2.62 at least . The size reduction is ca. 9%.
+
+dnl Autoconf version 2.59 plus gnulib is required; this file is not needed
+dnl with Autoconf 2.60 or greater. But note that autoconf's implementation of
+dnl AC_CHECK_DECLS_ONCE expects a comma-separated list of symbols as first
+dnl argument!
+AC_PREREQ([2.59])
+
+# AC_CHECK_HEADERS_ONCE(HEADER1 HEADER2 ...) is a once-only variant of
+# AC_CHECK_HEADERS(HEADER1 HEADER2 ...).
+AC_DEFUN([AC_CHECK_HEADERS_ONCE], [
+  :
+  m4_foreach_w([gl_HEADER_NAME], [$1], [
+    AC_DEFUN([gl_CHECK_HEADER_]m4_quote(m4_translit(gl_HEADER_NAME,
+                                                    [./-], [___])), [
+      m4_divert_text([INIT_PREPARE],
+        [gl_header_list="$gl_header_list gl_HEADER_NAME"])
+      gl_HEADERS_EXPANSION
+      AH_TEMPLATE(AS_TR_CPP([HAVE_]m4_defn([gl_HEADER_NAME])),
+        [Define to 1 if you have the <]m4_defn([gl_HEADER_NAME])[> header file.])
+    ])
+    AC_REQUIRE([gl_CHECK_HEADER_]m4_quote(m4_translit(gl_HEADER_NAME,
+                                                      [./-], [___])))
+  ])
+])
+m4_define([gl_HEADERS_EXPANSION], [
+  m4_divert_text([DEFAULTS], [gl_header_list=])
+  AC_CHECK_HEADERS([$gl_header_list])
+  m4_define([gl_HEADERS_EXPANSION], [])
+])
+
+# AC_CHECK_FUNCS_ONCE(FUNC1 FUNC2 ...) is a once-only variant of
+# AC_CHECK_FUNCS(FUNC1 FUNC2 ...).
+AC_DEFUN([AC_CHECK_FUNCS_ONCE], [
+  :
+  m4_foreach_w([gl_FUNC_NAME], [$1], [
+    AC_DEFUN([gl_CHECK_FUNC_]m4_defn([gl_FUNC_NAME]), [
+      m4_divert_text([INIT_PREPARE],
+        [gl_func_list="$gl_func_list gl_FUNC_NAME"])
+      gl_FUNCS_EXPANSION
+      AH_TEMPLATE(AS_TR_CPP([HAVE_]m4_defn([gl_FUNC_NAME])),
+        [Define to 1 if you have the ']m4_defn([gl_FUNC_NAME])[' function.])
+    ])
+    AC_REQUIRE([gl_CHECK_FUNC_]m4_defn([gl_FUNC_NAME]))
+  ])
+])
+m4_define([gl_FUNCS_EXPANSION], [
+  m4_divert_text([DEFAULTS], [gl_func_list=])
+  AC_CHECK_FUNCS([$gl_func_list])
+  m4_define([gl_FUNCS_EXPANSION], [])
+])
+
+# AC_CHECK_DECLS_ONCE(DECL1 DECL2 ...) is a once-only variant of
+# AC_CHECK_DECLS(DECL1, DECL2, ...).
+AC_DEFUN([AC_CHECK_DECLS_ONCE], [
+  :
+  m4_foreach_w([gl_DECL_NAME], [$1], [
+    AC_DEFUN([gl_CHECK_DECL_]m4_defn([gl_DECL_NAME]), [
+      AC_CHECK_DECLS(m4_defn([gl_DECL_NAME]))
+    ])
+    AC_REQUIRE([gl_CHECK_DECL_]m4_defn([gl_DECL_NAME]))
+  ])
+])
diff --git a/gnulib-m4/pthread_rwlock_rdlock.m4 b/gnulib-m4/pthread_rwlock_rdlock.m4
new file mode 100644 (file)
index 0000000..3c1d645
--- /dev/null
@@ -0,0 +1,165 @@
+# pthread_rwlock_rdlock.m4 serial 2
+dnl Copyright (C) 2017-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Bruno Haible.
+dnl Inspired by
+dnl https://github.com/linux-test-project/ltp/blob/master/testcases/open_posix_testsuite/conformance/interfaces/pthread_rwlock_rdlock/2-2.c
+dnl by Intel Corporation.
+
+dnl Test whether in a situation where
+dnl   - an rwlock is taken by a reader and has a writer waiting,
+dnl   - an additional reader requests the lock,
+dnl   - the waiting writer and the requesting reader threads have the same
+dnl     priority,
+dnl the requesting reader thread gets blocked, so that at some point the
+dnl waiting writer can acquire the lock.
+dnl Without such a guarantee, when there a N readers and each of the readers
+dnl spends more than 1/Nth of the time with the lock held, there is a high
+dnl probability that the waiting writer will not get the lock in a given finite
+dnl time, a phenomenon called "writer starvation".
+dnl Without such a guarantee, applications have a hard time avoiding writer
+dnl starvation.
+dnl
+dnl POSIX:2017 makes this requirement only for implementations that support TPS
+dnl (Thread Priority Scheduling) and only for the scheduling policies SCHED_FIFO
+dnl and SCHED_RR, see
+dnl http://pubs.opengroup.org/onlinepubs/9699919799/functions/pthread_rwlock_rdlock.html
+dnl but this test verifies the guarantee regardless of TPS and regardless of
+dnl scheduling policy.
+dnl Glibc currently does not provide this guarantee, see
+dnl https://sourceware.org/bugzilla/show_bug.cgi?id=13701
+AC_DEFUN([gl_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER],
+[
+  AC_REQUIRE([gl_THREADLIB_EARLY])
+  AC_CACHE_CHECK([whether pthread_rwlock_rdlock prefers a writer to a reader],
+    [gl_cv_pthread_rwlock_rdlock_prefer_writer],
+    [save_LIBS="$LIBS"
+     LIBS="$LIBS $LIBMULTITHREAD"
+     AC_RUN_IFELSE(
+       [AC_LANG_SOURCE([[
+#include <errno.h>
+#include <pthread.h>
+#include <stdlib.h>
+#include <unistd.h>
+
+#define SUCCEED() exit (0)
+#define FAILURE() exit (1)
+#define UNEXPECTED(n) (exit (10 + (n)))
+
+/* The main thread creates the waiting writer and the requesting reader threads
+   in the default way; this guarantees that they have the same priority.
+   We can reuse the main thread as first reader thread.  */
+
+static pthread_rwlock_t lock;
+static pthread_t reader1;
+static pthread_t writer;
+static pthread_t reader2;
+static pthread_t timer;
+/* Used to pass control from writer to reader2 and from reader2 to timer,
+   as in a relay race.
+   Passing control from one running thread to another running thread
+   is most likely faster than to create the second thread.  */
+static pthread_mutex_t baton;
+
+static void *
+timer_func (void *ignored)
+{
+  /* Step 13 (can be before or after step 12):
+     The timer thread takes the baton, then waits a moment to make sure
+     it can tell whether the second reader thread is blocked at step 12.  */
+  if (pthread_mutex_lock (&baton))
+    UNEXPECTED (13);
+  usleep (100000);
+  /* By the time we get here, it's clear that the second reader thread is
+     blocked at step 12.  This is the desired behaviour.  */
+  SUCCEED ();
+}
+
+static void *
+reader2_func (void *ignored)
+{
+  int err;
+
+  /* Step 8 (can be before or after step 7):
+     The second reader thread takes the baton, then waits a moment to make sure
+     the writer thread has reached step 7.  */
+  if (pthread_mutex_lock (&baton))
+    UNEXPECTED (8);
+  usleep (100000);
+  /* Step 9: The second reader thread requests the lock.  */
+  err = pthread_rwlock_tryrdlock (&lock);
+  if (err == 0)
+    FAILURE ();
+  else if (err != EBUSY)
+    UNEXPECTED (9);
+  /* Step 10: Launch a timer, to test whether the next call blocks.  */
+  if (pthread_create (&timer, NULL, timer_func, NULL))
+    UNEXPECTED (10);
+  /* Step 11: Release the baton.  */
+  if (pthread_mutex_unlock (&baton))
+    UNEXPECTED (11);
+  /* Step 12: The second reader thread requests the lock.  */
+  err = pthread_rwlock_rdlock (&lock);
+  if (err == 0)
+    FAILURE ();
+  else
+    UNEXPECTED (12);
+}
+
+static void *
+writer_func (void *ignored)
+{
+  /* Step 4: Take the baton, so that the second reader thread does not go ahead
+     too early.  */
+  if (pthread_mutex_lock (&baton))
+    UNEXPECTED (4);
+  /* Step 5: Create the second reader thread.  */
+  if (pthread_create (&reader2, NULL, reader2_func, NULL))
+    UNEXPECTED (5);
+  /* Step 6: Release the baton.  */
+  if (pthread_mutex_unlock (&baton))
+    UNEXPECTED (6);
+  /* Step 7: The writer thread requests the lock.  */
+  if (pthread_rwlock_wrlock (&lock))
+    UNEXPECTED (7);
+  return NULL;
+}
+
+int
+main ()
+{
+  reader1 = pthread_self ();
+
+  /* Step 1: The main thread initializes the lock and the baton.  */
+  if (pthread_rwlock_init (&lock, NULL))
+    UNEXPECTED (1);
+  if (pthread_mutex_init (&baton, NULL))
+    UNEXPECTED (1);
+  /* Step 2: The main thread acquires the lock as a reader.  */
+  if (pthread_rwlock_rdlock (&lock))
+    UNEXPECTED (2);
+  /* Step 3: Create the writer thread.  */
+  if (pthread_create (&writer, NULL, writer_func, NULL))
+    UNEXPECTED (3);
+  /* Job done.  Go to sleep.  */
+  for (;;)
+    {
+      sleep (1);
+    }
+}
+]])],
+       [gl_cv_pthread_rwlock_rdlock_prefer_writer=yes],
+       [gl_cv_pthread_rwlock_rdlock_prefer_writer=no],
+       [gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing yes"])
+     LIBS="$save_LIBS"
+    ])
+  case "$gl_cv_pthread_rwlock_rdlock_prefer_writer" in
+    *yes)
+      AC_DEFINE([HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER], [1],
+        [Define if the 'pthread_rwlock_rdlock' function prefers a writer to a reader.])
+      ;;
+  esac
+])
diff --git a/gnulib-m4/ssize_t.m4 b/gnulib-m4/ssize_t.m4
new file mode 100644 (file)
index 0000000..38bcee1
--- /dev/null
@@ -0,0 +1,23 @@
+# ssize_t.m4 serial 5 (gettext-0.18.2)
+dnl Copyright (C) 2001-2003, 2006, 2010-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Bruno Haible.
+dnl Test whether ssize_t is defined.
+
+AC_DEFUN([gt_TYPE_SSIZE_T],
+[
+  AC_CACHE_CHECK([for ssize_t], [gt_cv_ssize_t],
+    [AC_COMPILE_IFELSE(
+       [AC_LANG_PROGRAM(
+          [[#include <sys/types.h>]],
+          [[int x = sizeof (ssize_t *) + sizeof (ssize_t);
+            return !x;]])],
+       [gt_cv_ssize_t=yes], [gt_cv_ssize_t=no])])
+  if test $gt_cv_ssize_t = no; then
+    AC_DEFINE([ssize_t], [int],
+              [Define as a signed type of the same size as size_t.])
+  fi
+])
diff --git a/gnulib-m4/stdint.m4 b/gnulib-m4/stdint.m4
new file mode 100644 (file)
index 0000000..11d8e8e
--- /dev/null
@@ -0,0 +1,544 @@
+# stdint.m4 serial 53
+dnl Copyright (C) 2001-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Paul Eggert and Bruno Haible.
+dnl Test whether <stdint.h> is supported or must be substituted.
+
+AC_PREREQ([2.61])
+
+AC_DEFUN_ONCE([gl_STDINT_H],
+[
+  AC_PREREQ([2.59])dnl
+  AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles
+
+  AC_REQUIRE([gl_LIMITS_H])
+  AC_REQUIRE([gt_TYPE_WINT_T])
+
+  dnl Check for long long int and unsigned long long int.
+  AC_REQUIRE([AC_TYPE_LONG_LONG_INT])
+  if test $ac_cv_type_long_long_int = yes; then
+    HAVE_LONG_LONG_INT=1
+  else
+    HAVE_LONG_LONG_INT=0
+  fi
+  AC_SUBST([HAVE_LONG_LONG_INT])
+  AC_REQUIRE([AC_TYPE_UNSIGNED_LONG_LONG_INT])
+  if test $ac_cv_type_unsigned_long_long_int = yes; then
+    HAVE_UNSIGNED_LONG_LONG_INT=1
+  else
+    HAVE_UNSIGNED_LONG_LONG_INT=0
+  fi
+  AC_SUBST([HAVE_UNSIGNED_LONG_LONG_INT])
+
+  dnl Check for <wchar.h>, in the same way as gl_WCHAR_H does.
+  AC_CHECK_HEADERS_ONCE([wchar.h])
+  if test $ac_cv_header_wchar_h = yes; then
+    HAVE_WCHAR_H=1
+  else
+    HAVE_WCHAR_H=0
+  fi
+  AC_SUBST([HAVE_WCHAR_H])
+
+  dnl Check for <inttypes.h>.
+  dnl AC_INCLUDES_DEFAULT defines $ac_cv_header_inttypes_h.
+  if test $ac_cv_header_inttypes_h = yes; then
+    HAVE_INTTYPES_H=1
+  else
+    HAVE_INTTYPES_H=0
+  fi
+  AC_SUBST([HAVE_INTTYPES_H])
+
+  dnl Check for <sys/types.h>.
+  dnl AC_INCLUDES_DEFAULT defines $ac_cv_header_sys_types_h.
+  if test $ac_cv_header_sys_types_h = yes; then
+    HAVE_SYS_TYPES_H=1
+  else
+    HAVE_SYS_TYPES_H=0
+  fi
+  AC_SUBST([HAVE_SYS_TYPES_H])
+
+  gl_CHECK_NEXT_HEADERS([stdint.h])
+  if test $ac_cv_header_stdint_h = yes; then
+    HAVE_STDINT_H=1
+  else
+    HAVE_STDINT_H=0
+  fi
+  AC_SUBST([HAVE_STDINT_H])
+
+  dnl Now see whether we need a substitute <stdint.h>.
+  if test $ac_cv_header_stdint_h = yes; then
+    AC_CACHE_CHECK([whether stdint.h conforms to C99],
+      [gl_cv_header_working_stdint_h],
+      [gl_cv_header_working_stdint_h=no
+       AC_COMPILE_IFELSE([
+         AC_LANG_PROGRAM([[
+#define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */
+#define __STDC_CONSTANT_MACROS 1
+#define __STDC_LIMIT_MACROS 1
+#include <stdint.h>
+/* Dragonfly defines WCHAR_MIN, WCHAR_MAX only in <wchar.h>.  */
+#if !(defined WCHAR_MIN && defined WCHAR_MAX)
+#error "WCHAR_MIN, WCHAR_MAX not defined in <stdint.h>"
+#endif
+]
+gl_STDINT_INCLUDES
+[
+#ifdef INT8_MAX
+int8_t a1 = INT8_MAX;
+int8_t a1min = INT8_MIN;
+#endif
+#ifdef INT16_MAX
+int16_t a2 = INT16_MAX;
+int16_t a2min = INT16_MIN;
+#endif
+#ifdef INT32_MAX
+int32_t a3 = INT32_MAX;
+int32_t a3min = INT32_MIN;
+#endif
+#ifdef INT64_MAX
+int64_t a4 = INT64_MAX;
+int64_t a4min = INT64_MIN;
+#endif
+#ifdef UINT8_MAX
+uint8_t b1 = UINT8_MAX;
+#else
+typedef int b1[(unsigned char) -1 != 255 ? 1 : -1];
+#endif
+#ifdef UINT16_MAX
+uint16_t b2 = UINT16_MAX;
+#endif
+#ifdef UINT32_MAX
+uint32_t b3 = UINT32_MAX;
+#endif
+#ifdef UINT64_MAX
+uint64_t b4 = UINT64_MAX;
+#endif
+int_least8_t c1 = INT8_C (0x7f);
+int_least8_t c1max = INT_LEAST8_MAX;
+int_least8_t c1min = INT_LEAST8_MIN;
+int_least16_t c2 = INT16_C (0x7fff);
+int_least16_t c2max = INT_LEAST16_MAX;
+int_least16_t c2min = INT_LEAST16_MIN;
+int_least32_t c3 = INT32_C (0x7fffffff);
+int_least32_t c3max = INT_LEAST32_MAX;
+int_least32_t c3min = INT_LEAST32_MIN;
+int_least64_t c4 = INT64_C (0x7fffffffffffffff);
+int_least64_t c4max = INT_LEAST64_MAX;
+int_least64_t c4min = INT_LEAST64_MIN;
+uint_least8_t d1 = UINT8_C (0xff);
+uint_least8_t d1max = UINT_LEAST8_MAX;
+uint_least16_t d2 = UINT16_C (0xffff);
+uint_least16_t d2max = UINT_LEAST16_MAX;
+uint_least32_t d3 = UINT32_C (0xffffffff);
+uint_least32_t d3max = UINT_LEAST32_MAX;
+uint_least64_t d4 = UINT64_C (0xffffffffffffffff);
+uint_least64_t d4max = UINT_LEAST64_MAX;
+int_fast8_t e1 = INT_FAST8_MAX;
+int_fast8_t e1min = INT_FAST8_MIN;
+int_fast16_t e2 = INT_FAST16_MAX;
+int_fast16_t e2min = INT_FAST16_MIN;
+int_fast32_t e3 = INT_FAST32_MAX;
+int_fast32_t e3min = INT_FAST32_MIN;
+int_fast64_t e4 = INT_FAST64_MAX;
+int_fast64_t e4min = INT_FAST64_MIN;
+uint_fast8_t f1 = UINT_FAST8_MAX;
+uint_fast16_t f2 = UINT_FAST16_MAX;
+uint_fast32_t f3 = UINT_FAST32_MAX;
+uint_fast64_t f4 = UINT_FAST64_MAX;
+#ifdef INTPTR_MAX
+intptr_t g = INTPTR_MAX;
+intptr_t gmin = INTPTR_MIN;
+#endif
+#ifdef UINTPTR_MAX
+uintptr_t h = UINTPTR_MAX;
+#endif
+intmax_t i = INTMAX_MAX;
+uintmax_t j = UINTMAX_MAX;
+
+/* Check that SIZE_MAX has the correct type, if possible.  */
+#if 201112 <= __STDC_VERSION__
+int k = _Generic (SIZE_MAX, size_t: 0);
+#elif (2 <= __GNUC__ || defined __IBM__TYPEOF__ \
+       || (0x5110 <= __SUNPRO_C && !__STDC__))
+extern size_t k;
+extern __typeof__ (SIZE_MAX) k;
+#endif
+
+#include <limits.h> /* for CHAR_BIT */
+#define TYPE_MINIMUM(t) \
+  ((t) ((t) 0 < (t) -1 ? (t) 0 : ~ TYPE_MAXIMUM (t)))
+#define TYPE_MAXIMUM(t) \
+  ((t) ((t) 0 < (t) -1 \
+        ? (t) -1 \
+        : ((((t) 1 << (sizeof (t) * CHAR_BIT - 2)) - 1) * 2 + 1)))
+struct s {
+  int check_PTRDIFF:
+      PTRDIFF_MIN == TYPE_MINIMUM (ptrdiff_t)
+      && PTRDIFF_MAX == TYPE_MAXIMUM (ptrdiff_t)
+      ? 1 : -1;
+  /* Detect bug in FreeBSD 6.0 / ia64.  */
+  int check_SIG_ATOMIC:
+      SIG_ATOMIC_MIN == TYPE_MINIMUM (sig_atomic_t)
+      && SIG_ATOMIC_MAX == TYPE_MAXIMUM (sig_atomic_t)
+      ? 1 : -1;
+  int check_SIZE: SIZE_MAX == TYPE_MAXIMUM (size_t) ? 1 : -1;
+  int check_WCHAR:
+      WCHAR_MIN == TYPE_MINIMUM (wchar_t)
+      && WCHAR_MAX == TYPE_MAXIMUM (wchar_t)
+      ? 1 : -1;
+  /* Detect bug in mingw.  */
+  int check_WINT:
+      WINT_MIN == TYPE_MINIMUM (wint_t)
+      && WINT_MAX == TYPE_MAXIMUM (wint_t)
+      ? 1 : -1;
+
+  /* Detect bugs in glibc 2.4 and Solaris 10 stdint.h, among others.  */
+  int check_UINT8_C:
+        (-1 < UINT8_C (0)) == (-1 < (uint_least8_t) 0) ? 1 : -1;
+  int check_UINT16_C:
+        (-1 < UINT16_C (0)) == (-1 < (uint_least16_t) 0) ? 1 : -1;
+
+  /* Detect bugs in OpenBSD 3.9 stdint.h.  */
+#ifdef UINT8_MAX
+  int check_uint8: (uint8_t) -1 == UINT8_MAX ? 1 : -1;
+#endif
+#ifdef UINT16_MAX
+  int check_uint16: (uint16_t) -1 == UINT16_MAX ? 1 : -1;
+#endif
+#ifdef UINT32_MAX
+  int check_uint32: (uint32_t) -1 == UINT32_MAX ? 1 : -1;
+#endif
+#ifdef UINT64_MAX
+  int check_uint64: (uint64_t) -1 == UINT64_MAX ? 1 : -1;
+#endif
+  int check_uint_least8: (uint_least8_t) -1 == UINT_LEAST8_MAX ? 1 : -1;
+  int check_uint_least16: (uint_least16_t) -1 == UINT_LEAST16_MAX ? 1 : -1;
+  int check_uint_least32: (uint_least32_t) -1 == UINT_LEAST32_MAX ? 1 : -1;
+  int check_uint_least64: (uint_least64_t) -1 == UINT_LEAST64_MAX ? 1 : -1;
+  int check_uint_fast8: (uint_fast8_t) -1 == UINT_FAST8_MAX ? 1 : -1;
+  int check_uint_fast16: (uint_fast16_t) -1 == UINT_FAST16_MAX ? 1 : -1;
+  int check_uint_fast32: (uint_fast32_t) -1 == UINT_FAST32_MAX ? 1 : -1;
+  int check_uint_fast64: (uint_fast64_t) -1 == UINT_FAST64_MAX ? 1 : -1;
+  int check_uintptr: (uintptr_t) -1 == UINTPTR_MAX ? 1 : -1;
+  int check_uintmax: (uintmax_t) -1 == UINTMAX_MAX ? 1 : -1;
+  int check_size: (size_t) -1 == SIZE_MAX ? 1 : -1;
+};
+         ]])],
+         [dnl Determine whether the various *_MIN, *_MAX macros are usable
+          dnl in preprocessor expression. We could do it by compiling a test
+          dnl program for each of these macros. It is faster to run a program
+          dnl that inspects the macro expansion.
+          dnl This detects a bug on HP-UX 11.23/ia64.
+          AC_RUN_IFELSE([
+            AC_LANG_PROGRAM([[
+#define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */
+#define __STDC_CONSTANT_MACROS 1
+#define __STDC_LIMIT_MACROS 1
+#include <stdint.h>
+]
+gl_STDINT_INCLUDES
+[
+#include <stdio.h>
+#include <string.h>
+#define MVAL(macro) MVAL1(macro)
+#define MVAL1(expression) #expression
+static const char *macro_values[] =
+  {
+#ifdef INT8_MAX
+    MVAL (INT8_MAX),
+#endif
+#ifdef INT16_MAX
+    MVAL (INT16_MAX),
+#endif
+#ifdef INT32_MAX
+    MVAL (INT32_MAX),
+#endif
+#ifdef INT64_MAX
+    MVAL (INT64_MAX),
+#endif
+#ifdef UINT8_MAX
+    MVAL (UINT8_MAX),
+#endif
+#ifdef UINT16_MAX
+    MVAL (UINT16_MAX),
+#endif
+#ifdef UINT32_MAX
+    MVAL (UINT32_MAX),
+#endif
+#ifdef UINT64_MAX
+    MVAL (UINT64_MAX),
+#endif
+    NULL
+  };
+]], [[
+  const char **mv;
+  for (mv = macro_values; *mv != NULL; mv++)
+    {
+      const char *value = *mv;
+      /* Test whether it looks like a cast expression.  */
+      if (strncmp (value, "((unsigned int)"/*)*/, 15) == 0
+          || strncmp (value, "((unsigned short)"/*)*/, 17) == 0
+          || strncmp (value, "((unsigned char)"/*)*/, 16) == 0
+          || strncmp (value, "((int)"/*)*/, 6) == 0
+          || strncmp (value, "((signed short)"/*)*/, 15) == 0
+          || strncmp (value, "((signed char)"/*)*/, 14) == 0)
+        return mv - macro_values + 1;
+    }
+  return 0;
+]])],
+              [gl_cv_header_working_stdint_h=yes],
+              [],
+              [case "$host_os" in
+                         # Guess yes on native Windows.
+                 mingw*) gl_cv_header_working_stdint_h="guessing yes" ;;
+                         # In general, assume it works.
+                 *)      gl_cv_header_working_stdint_h="guessing yes" ;;
+               esac
+              ])
+         ])
+      ])
+  fi
+
+  HAVE_C99_STDINT_H=0
+  HAVE_SYS_BITYPES_H=0
+  HAVE_SYS_INTTYPES_H=0
+  STDINT_H=stdint.h
+  case "$gl_cv_header_working_stdint_h" in
+    *yes)
+      HAVE_C99_STDINT_H=1
+      dnl Now see whether the system <stdint.h> works without
+      dnl __STDC_CONSTANT_MACROS/__STDC_LIMIT_MACROS defined.
+      AC_CACHE_CHECK([whether stdint.h predates C++11],
+        [gl_cv_header_stdint_predates_cxx11_h],
+        [gl_cv_header_stdint_predates_cxx11_h=yes
+         AC_COMPILE_IFELSE([
+           AC_LANG_PROGRAM([[
+#define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */
+#include <stdint.h>
+]
+gl_STDINT_INCLUDES
+[
+intmax_t im = INTMAX_MAX;
+int32_t i32 = INT32_C (0x7fffffff);
+           ]])],
+           [gl_cv_header_stdint_predates_cxx11_h=no])])
+
+      if test "$gl_cv_header_stdint_predates_cxx11_h" = yes; then
+        AC_DEFINE([__STDC_CONSTANT_MACROS], [1],
+                  [Define to 1 if the system <stdint.h> predates C++11.])
+        AC_DEFINE([__STDC_LIMIT_MACROS], [1],
+                  [Define to 1 if the system <stdint.h> predates C++11.])
+      fi
+      AC_CACHE_CHECK([whether stdint.h has UINTMAX_WIDTH etc.],
+        [gl_cv_header_stdint_width],
+        [gl_cv_header_stdint_width=no
+         AC_COMPILE_IFELSE(
+           [AC_LANG_PROGRAM([[
+              /* Work if build is not clean.  */
+              #define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1
+              #ifndef __STDC_WANT_IEC_60559_BFP_EXT__
+               #define __STDC_WANT_IEC_60559_BFP_EXT__ 1
+              #endif
+              #include <stdint.h>
+              ]gl_STDINT_INCLUDES[
+              int iw = UINTMAX_WIDTH;
+              ]])],
+           [gl_cv_header_stdint_width=yes])])
+      if test "$gl_cv_header_stdint_width" = yes; then
+        STDINT_H=
+      fi
+      ;;
+    *)
+      dnl Check for <sys/inttypes.h>, and for
+      dnl <sys/bitypes.h> (used in Linux libc4 >= 4.6.7 and libc5).
+      AC_CHECK_HEADERS([sys/inttypes.h sys/bitypes.h])
+      if test $ac_cv_header_sys_inttypes_h = yes; then
+        HAVE_SYS_INTTYPES_H=1
+      fi
+      if test $ac_cv_header_sys_bitypes_h = yes; then
+        HAVE_SYS_BITYPES_H=1
+      fi
+      gl_STDINT_TYPE_PROPERTIES
+      ;;
+  esac
+
+  dnl The substitute stdint.h needs the substitute limit.h's _GL_INTEGER_WIDTH.
+  gl_REPLACE_LIMITS_H
+
+  AC_SUBST([HAVE_C99_STDINT_H])
+  AC_SUBST([HAVE_SYS_BITYPES_H])
+  AC_SUBST([HAVE_SYS_INTTYPES_H])
+  AC_SUBST([STDINT_H])
+  AM_CONDITIONAL([GL_GENERATE_STDINT_H], [test -n "$STDINT_H"])
+])
+
+dnl gl_STDINT_BITSIZEOF(TYPES, INCLUDES)
+dnl Determine the size of each of the given types in bits.
+AC_DEFUN([gl_STDINT_BITSIZEOF],
+[
+  dnl Use a shell loop, to avoid bloating configure, and
+  dnl - extra AH_TEMPLATE calls, so that autoheader knows what to put into
+  dnl   config.h.in,
+  dnl - extra AC_SUBST calls, so that the right substitutions are made.
+  m4_foreach_w([gltype], [$1],
+    [AH_TEMPLATE([BITSIZEOF_]m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_]),
+       [Define to the number of bits in type ']gltype['.])])
+  for gltype in $1 ; do
+    AC_CACHE_CHECK([for bit size of $gltype], [gl_cv_bitsizeof_${gltype}],
+      [AC_COMPUTE_INT([result], [sizeof ($gltype) * CHAR_BIT],
+         [$2
+#include <limits.h>], [result=unknown])
+       eval gl_cv_bitsizeof_${gltype}=\$result
+      ])
+    eval result=\$gl_cv_bitsizeof_${gltype}
+    if test $result = unknown; then
+      dnl Use a nonempty default, because some compilers, such as IRIX 5 cc,
+      dnl do a syntax check even on unused #if conditions and give an error
+      dnl on valid C code like this:
+      dnl   #if 0
+      dnl   # if  > 32
+      dnl   # endif
+      dnl   #endif
+      result=0
+    fi
+    GLTYPE=`echo "$gltype" | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'`
+    AC_DEFINE_UNQUOTED([BITSIZEOF_${GLTYPE}], [$result])
+    eval BITSIZEOF_${GLTYPE}=\$result
+  done
+  m4_foreach_w([gltype], [$1],
+    [AC_SUBST([BITSIZEOF_]m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_]))])
+])
+
+dnl gl_CHECK_TYPES_SIGNED(TYPES, INCLUDES)
+dnl Determine the signedness of each of the given types.
+dnl Define HAVE_SIGNED_TYPE if type is signed.
+AC_DEFUN([gl_CHECK_TYPES_SIGNED],
+[
+  dnl Use a shell loop, to avoid bloating configure, and
+  dnl - extra AH_TEMPLATE calls, so that autoheader knows what to put into
+  dnl   config.h.in,
+  dnl - extra AC_SUBST calls, so that the right substitutions are made.
+  m4_foreach_w([gltype], [$1],
+    [AH_TEMPLATE([HAVE_SIGNED_]m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_]),
+       [Define to 1 if ']gltype[' is a signed integer type.])])
+  for gltype in $1 ; do
+    AC_CACHE_CHECK([whether $gltype is signed], [gl_cv_type_${gltype}_signed],
+      [AC_COMPILE_IFELSE(
+         [AC_LANG_PROGRAM([$2[
+            int verify[2 * (($gltype) -1 < ($gltype) 0) - 1];]])],
+         result=yes, result=no)
+       eval gl_cv_type_${gltype}_signed=\$result
+      ])
+    eval result=\$gl_cv_type_${gltype}_signed
+    GLTYPE=`echo $gltype | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'`
+    if test "$result" = yes; then
+      AC_DEFINE_UNQUOTED([HAVE_SIGNED_${GLTYPE}], [1])
+      eval HAVE_SIGNED_${GLTYPE}=1
+    else
+      eval HAVE_SIGNED_${GLTYPE}=0
+    fi
+  done
+  m4_foreach_w([gltype], [$1],
+    [AC_SUBST([HAVE_SIGNED_]m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_]))])
+])
+
+dnl gl_INTEGER_TYPE_SUFFIX(TYPES, INCLUDES)
+dnl Determine the suffix to use for integer constants of the given types.
+dnl Define t_SUFFIX for each such type.
+AC_DEFUN([gl_INTEGER_TYPE_SUFFIX],
+[
+  dnl Use a shell loop, to avoid bloating configure, and
+  dnl - extra AH_TEMPLATE calls, so that autoheader knows what to put into
+  dnl   config.h.in,
+  dnl - extra AC_SUBST calls, so that the right substitutions are made.
+  m4_foreach_w([gltype], [$1],
+    [AH_TEMPLATE(m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_])[_SUFFIX],
+       [Define to l, ll, u, ul, ull, etc., as suitable for
+        constants of type ']gltype['.])])
+  for gltype in $1 ; do
+    AC_CACHE_CHECK([for $gltype integer literal suffix],
+      [gl_cv_type_${gltype}_suffix],
+      [eval gl_cv_type_${gltype}_suffix=no
+       eval result=\$gl_cv_type_${gltype}_signed
+       if test "$result" = yes; then
+         glsufu=
+       else
+         glsufu=u
+       fi
+       for glsuf in "$glsufu" ${glsufu}l ${glsufu}ll ${glsufu}i64; do
+         case $glsuf in
+           '')  gltype1='int';;
+           l)   gltype1='long int';;
+           ll)  gltype1='long long int';;
+           i64) gltype1='__int64';;
+           u)   gltype1='unsigned int';;
+           ul)  gltype1='unsigned long int';;
+           ull) gltype1='unsigned long long int';;
+           ui64)gltype1='unsigned __int64';;
+         esac
+         AC_COMPILE_IFELSE(
+           [AC_LANG_PROGRAM([$2[
+              extern $gltype foo;
+              extern $gltype1 foo;]])],
+           [eval gl_cv_type_${gltype}_suffix=\$glsuf])
+         eval result=\$gl_cv_type_${gltype}_suffix
+         test "$result" != no && break
+       done])
+    GLTYPE=`echo $gltype | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'`
+    eval result=\$gl_cv_type_${gltype}_suffix
+    test "$result" = no && result=
+    eval ${GLTYPE}_SUFFIX=\$result
+    AC_DEFINE_UNQUOTED([${GLTYPE}_SUFFIX], [$result])
+  done
+  m4_foreach_w([gltype], [$1],
+    [AC_SUBST(m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_])[_SUFFIX])])
+])
+
+dnl gl_STDINT_INCLUDES
+AC_DEFUN([gl_STDINT_INCLUDES],
+[[
+  /* BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+     included before <wchar.h>.  */
+  #include <stddef.h>
+  #include <signal.h>
+  #if HAVE_WCHAR_H
+  # include <stdio.h>
+  # include <time.h>
+  # include <wchar.h>
+  #endif
+]])
+
+dnl gl_STDINT_TYPE_PROPERTIES
+dnl Compute HAVE_SIGNED_t, BITSIZEOF_t and t_SUFFIX, for all the types t
+dnl of interest to stdint.in.h.
+AC_DEFUN([gl_STDINT_TYPE_PROPERTIES],
+[
+  AC_REQUIRE([gl_MULTIARCH])
+  if test $APPLE_UNIVERSAL_BUILD = 0; then
+    gl_STDINT_BITSIZEOF([ptrdiff_t size_t],
+      [gl_STDINT_INCLUDES])
+  fi
+  gl_STDINT_BITSIZEOF([sig_atomic_t wchar_t wint_t],
+    [gl_STDINT_INCLUDES])
+  gl_CHECK_TYPES_SIGNED([sig_atomic_t wchar_t wint_t],
+    [gl_STDINT_INCLUDES])
+  gl_cv_type_ptrdiff_t_signed=yes
+  gl_cv_type_size_t_signed=no
+  if test $APPLE_UNIVERSAL_BUILD = 0; then
+    gl_INTEGER_TYPE_SUFFIX([ptrdiff_t size_t],
+      [gl_STDINT_INCLUDES])
+  fi
+  gl_INTEGER_TYPE_SUFFIX([sig_atomic_t wchar_t wint_t],
+    [gl_STDINT_INCLUDES])
+
+  dnl If wint_t is smaller than 'int', it cannot satisfy the ISO C 99
+  dnl requirement that wint_t is "unchanged by default argument promotions".
+  dnl In this case gnulib's <wchar.h> and <wctype.h> override wint_t.
+  dnl Set the variable BITSIZEOF_WINT_T accordingly.
+  if test $GNULIB_OVERRIDES_WINT_T = 1; then
+    BITSIZEOF_WINT_T=32
+  fi
+])
diff --git a/gnulib-m4/stdnoreturn.m4 b/gnulib-m4/stdnoreturn.m4
new file mode 100644 (file)
index 0000000..9dfd48d
--- /dev/null
@@ -0,0 +1,51 @@
+# Check for stdnoreturn.h that conforms to C11.
+
+dnl Copyright 2012-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+# Prepare for substituting <stdnoreturn.h> if it is not supported.
+
+AC_DEFUN([gl_STDNORETURN_H],
+[
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  case "$host_os" in
+    cygwin*)
+      dnl Regardless whether a working <stdnoreturn.h> exists or not,
+      dnl we need our own <stdnoreturn.h>, because of the definition
+      dnl of _Noreturn done by gnulib-common.m4.
+      STDNORETURN_H='stdnoreturn.h'
+      ;;
+    *)
+      AC_CACHE_CHECK([for working stdnoreturn.h],
+        [gl_cv_header_working_stdnoreturn_h],
+        [AC_COMPILE_IFELSE(
+           [AC_LANG_PROGRAM(
+              [[#include <stdlib.h>
+                #include <stdnoreturn.h>
+                /* Do not check for 'noreturn' after the return type.
+                   C11 allows it, but it's rarely done that way
+                   and circa-2012 bleeding-edge GCC rejects it when given
+                   -Werror=old-style-declaration.  */
+                noreturn void foo1 (void) { exit (0); }
+                _Noreturn void foo2 (void) { exit (0); }
+                int testit (int argc, char **argv)
+                {
+                  if (argc & 1)
+                    return 0;
+                  (argv[0][0] ? foo1 : foo2) ();
+                }
+              ]])],
+           [gl_cv_header_working_stdnoreturn_h=yes],
+           [gl_cv_header_working_stdnoreturn_h=no])])
+      if test $gl_cv_header_working_stdnoreturn_h = yes; then
+        STDNORETURN_H=''
+      else
+        STDNORETURN_H='stdnoreturn.h'
+      fi
+      ;;
+  esac
+  AC_SUBST([STDNORETURN_H])
+  AM_CONDITIONAL([GL_GENERATE_STDNORETURN_H], [test -n "$STDNORETURN_H"])
+])
diff --git a/gnulib-m4/sys_types_h.m4 b/gnulib-m4/sys_types_h.m4
new file mode 100644 (file)
index 0000000..be06559
--- /dev/null
@@ -0,0 +1,60 @@
+# sys_types_h.m4 serial 9
+dnl Copyright (C) 2011-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+AC_DEFUN_ONCE([gl_SYS_TYPES_H],
+[
+  dnl Use sane struct stat types in OpenVMS 8.2 and later.
+  AC_DEFINE([_USE_STD_STAT], 1, [For standard stat data types on VMS.])
+
+  AC_REQUIRE([gl_SYS_TYPES_H_DEFAULTS])
+  gl_NEXT_HEADERS([sys/types.h])
+
+  dnl Ensure the type pid_t gets defined.
+  AC_REQUIRE([AC_TYPE_PID_T])
+
+  dnl Ensure the type mode_t gets defined.
+  AC_REQUIRE([AC_TYPE_MODE_T])
+
+  dnl Whether to override the 'off_t' type.
+  AC_REQUIRE([gl_TYPE_OFF_T])
+
+  dnl Whether to override the 'dev_t' and 'ino_t' types.
+  m4_ifdef([gl_WINDOWS_STAT_INODES], [
+    AC_REQUIRE([gl_WINDOWS_STAT_INODES])
+  ], [
+    WINDOWS_STAT_INODES=0
+  ])
+  AC_SUBST([WINDOWS_STAT_INODES])
+])
+
+AC_DEFUN([gl_SYS_TYPES_H_DEFAULTS],
+[
+])
+
+# This works around a buggy version in autoconf <= 2.69.
+# See <https://lists.gnu.org/r/autoconf/2016-08/msg00014.html>
+
+m4_version_prereq([2.70], [], [
+
+# This is taken from the following Autoconf patch:
+# https://git.savannah.gnu.org/cgit/autoconf.git/commit/?id=e17a30e987d7ee695fb4294a82d987ec3dc9b974
+
+m4_undefine([AC_HEADER_MAJOR])
+AC_DEFUN([AC_HEADER_MAJOR],
+[AC_CHECK_HEADERS_ONCE([sys/types.h])
+AC_CHECK_HEADER([sys/mkdev.h],
+  [AC_DEFINE([MAJOR_IN_MKDEV], [1],
+    [Define to 1 if `major', `minor', and `makedev' are declared in
+     <mkdev.h>.])])
+if test $ac_cv_header_sys_mkdev_h = no; then
+  AC_CHECK_HEADER([sys/sysmacros.h],
+    [AC_DEFINE([MAJOR_IN_SYSMACROS], [1],
+      [Define to 1 if `major', `minor', and `makedev' are declared in
+       <sysmacros.h>.])])
+fi
+])
+
+])
diff --git a/gnulib-m4/threadlib.m4 b/gnulib-m4/threadlib.m4
new file mode 100644 (file)
index 0000000..045d9da
--- /dev/null
@@ -0,0 +1,359 @@
+# threadlib.m4 serial 20
+dnl Copyright (C) 2005-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Bruno Haible.
+
+AC_PREREQ([2.60])
+
+dnl gl_THREADLIB
+dnl ------------
+dnl Tests for a multithreading library to be used.
+dnl If the configure.ac contains a definition of the gl_THREADLIB_DEFAULT_NO
+dnl (it must be placed before the invocation of gl_THREADLIB_EARLY!), then the
+dnl default is 'no', otherwise it is system dependent. In both cases, the user
+dnl can change the choice through the options --enable-threads=choice or
+dnl --disable-threads.
+dnl Defines at most one of the macros USE_POSIX_THREADS, USE_WINDOWS_THREADS.
+dnl Sets the variables LIBTHREAD and LTLIBTHREAD to the linker options for use
+dnl in a Makefile (LIBTHREAD for use without libtool, LTLIBTHREAD for use with
+dnl libtool).
+dnl Sets the variables LIBMULTITHREAD and LTLIBMULTITHREAD similarly, for
+dnl programs that really need multithread functionality. The difference
+dnl between LIBTHREAD and LIBMULTITHREAD is that on platforms supporting weak
+dnl symbols, typically LIBTHREAD is empty whereas LIBMULTITHREAD is not.
+dnl Adds to CPPFLAGS the flag -D_REENTRANT or -D_THREAD_SAFE if needed for
+dnl multithread-safe programs.
+dnl Since support for GNU pth was removed, $LTLIBTHREAD and $LIBTHREAD have the
+dnl same value, and similarly $LTLIBMULTITHREAD and $LIBMULTITHREAD have the
+dnl same value. Only system libraries are needed.
+
+AC_DEFUN([gl_THREADLIB_EARLY],
+[
+  AC_REQUIRE([gl_THREADLIB_EARLY_BODY])
+])
+
+dnl The guts of gl_THREADLIB_EARLY. Needs to be expanded only once.
+
+AC_DEFUN([gl_THREADLIB_EARLY_BODY],
+[
+  dnl Ordering constraints: This macro modifies CPPFLAGS in a way that
+  dnl influences the result of the autoconf tests that test for *_unlocked
+  dnl declarations, on AIX 5 at least. Therefore it must come early.
+  AC_BEFORE([$0], [gl_FUNC_GLIBC_UNLOCKED_IO])dnl
+  AC_BEFORE([$0], [gl_ARGP])dnl
+
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  dnl _GNU_SOURCE is needed for pthread_rwlock_t on glibc systems.
+  AC_REQUIRE([AC_USE_SYSTEM_EXTENSIONS])
+  dnl Check for multithreading.
+  m4_ifdef([gl_THREADLIB_DEFAULT_NO],
+    [m4_divert_text([DEFAULTS], [gl_use_threads_default=no])],
+    [m4_divert_text([DEFAULTS], [gl_use_threads_default=])])
+  m4_divert_text([DEFAULTS], [gl_use_winpthreads_default=])
+  AC_ARG_ENABLE([threads],
+AC_HELP_STRING([--enable-threads={posix|windows}], [specify multithreading API])m4_ifdef([gl_THREADLIB_DEFAULT_NO], [], [
+AC_HELP_STRING([--disable-threads], [build without multithread safety])]),
+    [gl_use_threads=$enableval],
+    [if test -n "$gl_use_threads_default"; then
+       gl_use_threads="$gl_use_threads_default"
+     else
+changequote(,)dnl
+       case "$host_os" in
+         dnl Disable multithreading by default on OSF/1, because it interferes
+         dnl with fork()/exec(): When msgexec is linked with -lpthread, its
+         dnl child process gets an endless segmentation fault inside execvp().
+         osf*) gl_use_threads=no ;;
+         dnl Disable multithreading by default on Cygwin 1.5.x, because it has
+         dnl bugs that lead to endless loops or crashes. See
+         dnl <https://cygwin.com/ml/cygwin/2009-08/msg00283.html>.
+         cygwin*)
+               case `uname -r` in
+                 1.[0-5].*) gl_use_threads=no ;;
+                 *)         gl_use_threads=yes ;;
+               esac
+               ;;
+         dnl Obey gl_AVOID_WINPTHREAD on mingw.
+         mingw*)
+               case "$gl_use_winpthreads_default" in
+                 yes) gl_use_threads=posix ;;
+                 no)  gl_use_threads=windows ;;
+                 *)   gl_use_threads=yes ;;
+               esac
+               ;;
+         *)    gl_use_threads=yes ;;
+       esac
+changequote([,])dnl
+     fi
+    ])
+  if test "$gl_use_threads" = yes || test "$gl_use_threads" = posix; then
+    # For using <pthread.h>:
+    case "$host_os" in
+      osf*)
+        # On OSF/1, the compiler needs the flag -D_REENTRANT so that it
+        # groks <pthread.h>. cc also understands the flag -pthread, but
+        # we don't use it because 1. gcc-2.95 doesn't understand -pthread,
+        # 2. putting a flag into CPPFLAGS that has an effect on the linker
+        # causes the AC_LINK_IFELSE test below to succeed unexpectedly,
+        # leading to wrong values of LIBTHREAD and LTLIBTHREAD.
+        CPPFLAGS="$CPPFLAGS -D_REENTRANT"
+        ;;
+    esac
+    # Some systems optimize for single-threaded programs by default, and
+    # need special flags to disable these optimizations. For example, the
+    # definition of 'errno' in <errno.h>.
+    case "$host_os" in
+      aix* | freebsd*) CPPFLAGS="$CPPFLAGS -D_THREAD_SAFE" ;;
+      solaris*) CPPFLAGS="$CPPFLAGS -D_REENTRANT" ;;
+    esac
+  fi
+])
+
+dnl The guts of gl_THREADLIB. Needs to be expanded only once.
+
+AC_DEFUN([gl_THREADLIB_BODY],
+[
+  AC_REQUIRE([gl_THREADLIB_EARLY_BODY])
+  gl_threads_api=none
+  LIBTHREAD=
+  LTLIBTHREAD=
+  LIBMULTITHREAD=
+  LTLIBMULTITHREAD=
+  if test "$gl_use_threads" != no; then
+    dnl Check whether the compiler and linker support weak declarations.
+    AC_CACHE_CHECK([whether imported symbols can be declared weak],
+      [gl_cv_have_weak],
+      [gl_cv_have_weak=no
+       dnl First, test whether the compiler accepts it syntactically.
+       AC_LINK_IFELSE(
+         [AC_LANG_PROGRAM(
+            [[extern void xyzzy ();
+#pragma weak xyzzy]],
+            [[xyzzy();]])],
+         [gl_cv_have_weak=maybe])
+       if test $gl_cv_have_weak = maybe; then
+         dnl Second, test whether it actually works. On Cygwin 1.7.2, with
+         dnl gcc 4.3, symbols declared weak always evaluate to the address 0.
+         AC_RUN_IFELSE(
+           [AC_LANG_SOURCE([[
+#include <stdio.h>
+#pragma weak fputs
+int main ()
+{
+  return (fputs == NULL);
+}]])],
+           [gl_cv_have_weak=yes],
+           [gl_cv_have_weak=no],
+           [dnl When cross-compiling, assume that only ELF platforms support
+            dnl weak symbols.
+            AC_EGREP_CPP([Extensible Linking Format],
+              [#ifdef __ELF__
+               Extensible Linking Format
+               #endif
+              ],
+              [gl_cv_have_weak="guessing yes"],
+              [gl_cv_have_weak="guessing no"])
+           ])
+       fi
+       dnl But when linking statically, weak symbols don't work.
+       case " $LDFLAGS " in
+         *" -static "*) gl_cv_have_weak=no ;;
+       esac
+      ])
+    if case "$gl_cv_have_weak" in *yes) true;; *) false;; esac; then
+      dnl If we use weak symbols to implement pthread_in_use / pth_in_use /
+      dnl thread_in_use, we also need to test whether the ISO C 11 thrd_create
+      dnl facility is in use.
+      AC_CHECK_HEADERS_ONCE([threads.h])
+      :
+    fi
+    if test "$gl_use_threads" = yes || test "$gl_use_threads" = posix; then
+      # On OSF/1, the compiler needs the flag -pthread or -D_REENTRANT so that
+      # it groks <pthread.h>. It's added above, in gl_THREADLIB_EARLY_BODY.
+      AC_CHECK_HEADER([pthread.h],
+        [gl_have_pthread_h=yes], [gl_have_pthread_h=no])
+      if test "$gl_have_pthread_h" = yes; then
+        # Other possible tests:
+        #   -lpthreads (FSU threads, PCthreads)
+        #   -lgthreads
+        gl_have_pthread=
+        # Test whether both pthread_mutex_lock and pthread_mutexattr_init exist
+        # in libc. IRIX 6.5 has the first one in both libc and libpthread, but
+        # the second one only in libpthread, and lock.c needs it.
+        #
+        # If -pthread works, prefer it to -lpthread, since Ubuntu 14.04
+        # needs -pthread for some reason.  See:
+        # https://lists.gnu.org/r/bug-gnulib/2014-09/msg00023.html
+        save_LIBS=$LIBS
+        for gl_pthread in '' '-pthread'; do
+          LIBS="$LIBS $gl_pthread"
+          AC_LINK_IFELSE(
+            [AC_LANG_PROGRAM(
+               [[#include <pthread.h>
+                 pthread_mutex_t m;
+                 pthread_mutexattr_t ma;
+               ]],
+               [[pthread_mutex_lock (&m);
+                 pthread_mutexattr_init (&ma);]])],
+            [gl_have_pthread=yes
+             LIBTHREAD=$gl_pthread LTLIBTHREAD=$gl_pthread
+             LIBMULTITHREAD=$gl_pthread LTLIBMULTITHREAD=$gl_pthread])
+          LIBS=$save_LIBS
+          test -n "$gl_have_pthread" && break
+        done
+
+        # Test for libpthread by looking for pthread_kill. (Not pthread_self,
+        # since it is defined as a macro on OSF/1.)
+        if test -n "$gl_have_pthread" && test -z "$LIBTHREAD"; then
+          # The program links fine without libpthread. But it may actually
+          # need to link with libpthread in order to create multiple threads.
+          AC_CHECK_LIB([pthread], [pthread_kill],
+            [LIBMULTITHREAD=-lpthread LTLIBMULTITHREAD=-lpthread
+             # On Solaris and HP-UX, most pthread functions exist also in libc.
+             # Therefore pthread_in_use() needs to actually try to create a
+             # thread: pthread_create from libc will fail, whereas
+             # pthread_create will actually create a thread.
+             # On Solaris 10 or newer, this test is no longer needed, because
+             # libc contains the fully functional pthread functions.
+             case "$host_os" in
+               solaris | solaris2.[1-9] | solaris2.[1-9].* | hpux*)
+                 AC_DEFINE([PTHREAD_IN_USE_DETECTION_HARD], [1],
+                   [Define if the pthread_in_use() detection is hard.])
+             esac
+            ])
+        elif test -z "$gl_have_pthread"; then
+          # Some library is needed. Try libpthread and libc_r.
+          AC_CHECK_LIB([pthread], [pthread_kill],
+            [gl_have_pthread=yes
+             LIBTHREAD=-lpthread LTLIBTHREAD=-lpthread
+             LIBMULTITHREAD=-lpthread LTLIBMULTITHREAD=-lpthread])
+          if test -z "$gl_have_pthread"; then
+            # For FreeBSD 4.
+            AC_CHECK_LIB([c_r], [pthread_kill],
+              [gl_have_pthread=yes
+               LIBTHREAD=-lc_r LTLIBTHREAD=-lc_r
+               LIBMULTITHREAD=-lc_r LTLIBMULTITHREAD=-lc_r])
+          fi
+        fi
+        if test -n "$gl_have_pthread"; then
+          gl_threads_api=posix
+          AC_DEFINE([USE_POSIX_THREADS], [1],
+            [Define if the POSIX multithreading library can be used.])
+          if test -n "$LIBMULTITHREAD" || test -n "$LTLIBMULTITHREAD"; then
+            if case "$gl_cv_have_weak" in *yes) true;; *) false;; esac; then
+              AC_DEFINE([USE_POSIX_THREADS_WEAK], [1],
+                [Define if references to the POSIX multithreading library should be made weak.])
+              LIBTHREAD=
+              LTLIBTHREAD=
+            fi
+          fi
+        fi
+      fi
+    fi
+    if test -z "$gl_have_pthread"; then
+      case "$gl_use_threads" in
+        yes | windows | win32) # The 'win32' is for backward compatibility.
+          if { case "$host_os" in
+                 mingw*) true;;
+                 *) false;;
+               esac
+             }; then
+            gl_threads_api=windows
+            AC_DEFINE([USE_WINDOWS_THREADS], [1],
+              [Define if the native Windows multithreading API can be used.])
+          fi
+          ;;
+      esac
+    fi
+  fi
+  AC_MSG_CHECKING([for multithread API to use])
+  AC_MSG_RESULT([$gl_threads_api])
+  AC_SUBST([LIBTHREAD])
+  AC_SUBST([LTLIBTHREAD])
+  AC_SUBST([LIBMULTITHREAD])
+  AC_SUBST([LTLIBMULTITHREAD])
+])
+
+AC_DEFUN([gl_THREADLIB],
+[
+  AC_REQUIRE([gl_THREADLIB_EARLY])
+  AC_REQUIRE([gl_THREADLIB_BODY])
+])
+
+
+dnl gl_DISABLE_THREADS
+dnl ------------------
+dnl Sets the gl_THREADLIB default so that threads are not used by default.
+dnl The user can still override it at installation time, by using the
+dnl configure option '--enable-threads'.
+
+AC_DEFUN([gl_DISABLE_THREADS], [
+  m4_divert_text([INIT_PREPARE], [gl_use_threads_default=no])
+])
+
+
+dnl gl_AVOID_WINPTHREAD
+dnl -------------------
+dnl Sets the gl_THREADLIB default so that on mingw, a dependency to the
+dnl libwinpthread DLL (mingw-w64 winpthreads library) is avoided.
+dnl The user can still override it at installation time, by using the
+dnl configure option '--enable-threads'.
+
+AC_DEFUN([gl_AVOID_WINPTHREAD], [
+  m4_divert_text([INIT_PREPARE], [gl_use_winpthreads_default=no])
+])
+
+
+dnl Survey of platforms:
+dnl
+dnl Platform           Available  Compiler    Supports   test-lock
+dnl                    flavours   option      weak       result
+dnl ---------------    ---------  ---------   --------   ---------
+dnl Linux 2.4/glibc    posix      -lpthread       Y      OK
+dnl
+dnl GNU Hurd/glibc     posix
+dnl
+dnl Ubuntu 14.04       posix      -pthread        Y      OK
+dnl
+dnl FreeBSD 5.3        posix      -lc_r           Y
+dnl                    posix      -lkse ?         Y
+dnl                    posix      -lpthread ?     Y
+dnl                    posix      -lthr           Y
+dnl
+dnl FreeBSD 5.2        posix      -lc_r           Y
+dnl                    posix      -lkse           Y
+dnl                    posix      -lthr           Y
+dnl
+dnl FreeBSD 4.0,4.10   posix      -lc_r           Y      OK
+dnl
+dnl NetBSD 1.6         --
+dnl
+dnl OpenBSD 3.4        posix      -lpthread       Y      OK
+dnl
+dnl Mac OS X 10.[123]  posix      -lpthread       Y      OK
+dnl
+dnl Solaris 7,8,9      posix      -lpthread       Y      Sol 7,8: 0.0; Sol 9: OK
+dnl
+dnl HP-UX 11           posix      -lpthread       N (cc) OK
+dnl                                               Y (gcc)
+dnl
+dnl IRIX 6.5           posix      -lpthread       Y      0.5
+dnl
+dnl AIX 4.3,5.1        posix      -lpthread       N      AIX 4: 0.5; AIX 5: OK
+dnl
+dnl OSF/1 4.0,5.1      posix      -pthread (cc)   N      OK
+dnl                               -lpthread (gcc) Y
+dnl
+dnl Cygwin             posix      -lpthread       Y      OK
+dnl
+dnl Mingw              windows                    N      OK
+dnl
+dnl BeOS 5             --
+dnl
+dnl The test-lock result shows what happens if in test-lock.c EXPLICIT_YIELD is
+dnl turned off:
+dnl   OK if all three tests terminate OK,
+dnl   0.5 if the first test terminates OK but the second one loops endlessly,
+dnl   0.0 if the first test already loops endlessly.
diff --git a/gnulib-m4/wint_t.m4 b/gnulib-m4/wint_t.m4
new file mode 100644 (file)
index 0000000..61e8a23
--- /dev/null
@@ -0,0 +1,74 @@
+# wint_t.m4 serial 7
+dnl Copyright (C) 2003, 2007-2019 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Bruno Haible.
+dnl Test whether <wchar.h> has the 'wint_t' type and whether gnulib's
+dnl <wchar.h> or <wctype.h> would, if present, override 'wint_t'.
+dnl Prerequisite: AC_PROG_CC
+
+AC_DEFUN([gt_TYPE_WINT_T],
+[
+  AC_CACHE_CHECK([for wint_t], [gt_cv_c_wint_t],
+    [AC_COMPILE_IFELSE(
+       [AC_LANG_PROGRAM(
+          [[
+/* Tru64 with Desktop Toolkit C has a bug: <stdio.h> must be included before
+   <wchar.h>.
+   BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be included
+   before <wchar.h>.  */
+#include <stddef.h>
+#include <stdio.h>
+#include <time.h>
+#include <wchar.h>
+            wint_t foo = (wchar_t)'\0';]],
+          [[]])],
+       [gt_cv_c_wint_t=yes],
+       [gt_cv_c_wint_t=no])])
+  if test $gt_cv_c_wint_t = yes; then
+    AC_DEFINE([HAVE_WINT_T], [1], [Define if you have the 'wint_t' type.])
+
+    dnl Determine whether gnulib's <wchar.h> or <wctype.h> would, if present,
+    dnl override 'wint_t'.
+    AC_CACHE_CHECK([whether wint_t is too small],
+      [gl_cv_type_wint_t_too_small],
+      [AC_COMPILE_IFELSE(
+           [AC_LANG_PROGRAM([[
+/* Tru64 with Desktop Toolkit C has a bug: <stdio.h> must be included before
+   <wchar.h>.
+   BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
+   included before <wchar.h>.  */
+#if !(defined __GLIBC__ && !defined __UCLIBC__)
+# include <stddef.h>
+# include <stdio.h>
+# include <time.h>
+#endif
+#include <wchar.h>
+              int verify[sizeof (wint_t) < sizeof (int) ? -1 : 1];
+              ]])],
+           [gl_cv_type_wint_t_too_small=no],
+           [gl_cv_type_wint_t_too_small=yes])])
+    if test $gl_cv_type_wint_t_too_small = yes; then
+      GNULIB_OVERRIDES_WINT_T=1
+    else
+      GNULIB_OVERRIDES_WINT_T=0
+    fi
+  else
+    GNULIB_OVERRIDES_WINT_T=0
+  fi
+  AC_SUBST([GNULIB_OVERRIDES_WINT_T])
+])
+
+dnl Prerequisites of the 'wint_t' override.
+AC_DEFUN([gl_TYPE_WINT_T_PREREQ],
+[
+  AC_CHECK_HEADERS_ONCE([crtdefs.h])
+  if test $ac_cv_header_crtdefs_h = yes; then
+    HAVE_CRTDEFS_H=1
+  else
+    HAVE_CRTDEFS_H=0
+  fi
+  AC_SUBST([HAVE_CRTDEFS_H])
+])
diff --git a/m4/as-underscore.m4 b/m4/as-underscore.m4
new file mode 100644 (file)
index 0000000..92dc7f9
--- /dev/null
@@ -0,0 +1,24 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.57])
+
+AC_DEFUN([CL_AS_UNDERSCORE],
+[
+  AC_REQUIRE([gl_ASM_SYMBOL_PREFIX])
+  if test "$USER_LABEL_PREFIX" = '_'; then
+    AS_UNDERSCORE=true
+  else
+    AS_UNDERSCORE=false
+  fi
+  AC_SUBST([AS_UNDERSCORE])
+])
diff --git a/m4/cc-gcc.m4 b/m4/cc-gcc.m4
new file mode 100644 (file)
index 0000000..1e12d8e
--- /dev/null
@@ -0,0 +1,36 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels.
+
+AC_PREREQ([2.13])
+
+AC_DEFUN([CL_CC_GCC],
+[
+  AC_REQUIRE([AC_PROG_CPP])
+  AC_CACHE_CHECK([whether using GNU C], [cl_cv_prog_cc_gcc],
+    [AC_EGREP_CPP([yes],
+       [#ifdef __GNUC__
+        yes
+        #endif
+       ],
+       [cl_cv_prog_cc_gcc=yes],
+       [cl_cv_prog_cc_gcc=no])
+    ])
+  if test $cl_cv_prog_cc_gcc = yes; then
+    CC_GCC=true
+    GCC_X_NONE='-x none'
+  else
+    CC_GCC=false
+    GCC_X_NONE=''
+  fi
+  AC_SUBST([CC_GCC])
+  AC_SUBST([GCC_X_NONE])
+])
diff --git a/m4/codeexec.m4 b/m4/codeexec.m4
new file mode 100644 (file)
index 0000000..2d9eab3
--- /dev/null
@@ -0,0 +1,362 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.13])
+
+AC_DEFUN([CE_DOC],[whether code in malloc()ed memory is executable])
+AC_DEFUN([FFCALL_CODEEXEC],
+[
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  AC_REQUIRE([gl_HOST_CPU_C_ABI])
+  AC_CACHE_CHECK([CE_DOC], [ffcall_cv_codeexec],
+    [dnl The test below does not work on platforms with the following ABIs:
+     dnl - hppa, because function pointers are actually pointers into(!)
+     dnl   a two-pointer struct.
+     dnl - hppa64, because function pointers are actually pointers to a
+     dnl   four-pointer struct.
+     dnl - powerpc on AIX, powerpc64, because function pointers are actually
+     dnl   pointers to a three-pointer struct.
+     dnl - ia64, because function pointers are actually pointers to a
+     dnl   two-pointer struct.
+     case "$HOST_CPU_C_ABI--$host_os" in
+       hppa--* | hppa64--* | powerpc--aix* | powerpc64--* | ia64--*)
+         dnl On these platforms, it's irrelevant whether malloc'ed memory is
+         dnl executable, because the trampolines are built without executable
+         dnl code.
+         ffcall_cv_codeexec="irrelevant"
+         ;;
+       arm64--freebsd*)
+         dnl On this platform, malloc()ed memory is not executable, and the
+         dnl test program loops endlessly.
+         ffcall_cv_codeexec=no
+         ;;
+       *)
+         AC_TRY_RUN(GL_NOCRASH
+           [#include <sys/types.h>
+            /* declare malloc() */
+            #include <stdlib.h>
+            int fun () { return 31415926; }
+            int main ()
+            { nocrash_init();
+             {long size = (char*)&main - (char*)&fun;
+              char* funcopy = (char*) malloc(size);
+              int i;
+              for (i = 0; i < size; i++) { funcopy[i] = ((char*)&fun)[i]; }
+              return !((*(int(*)())funcopy)() == 31415926);
+            }}
+           ],
+           [ffcall_cv_codeexec=yes],
+           [ffcall_cv_codeexec=no],
+           [dnl When cross-compiling, assume the known behaviour.
+            dnl If we don't know, assume the worst.
+            case "$host_os" in
+              cygwin*)
+                case "$HOST_CPU_C_ABI" in
+                  i386)
+                    ffcall_cv_codeexec="guessing yes" ;;
+                  x86_64)
+                    ffcall_cv_codeexec="guessing no" ;;
+                  *)
+                    ffcall_cv_codeexec="guessing no" ;;
+                esac
+                ;;
+              darwin*)
+                case "$HOST_CPU_C_ABI" in
+                  i386 | powerpc)
+                    ffcall_cv_codeexec="guessing yes" ;;
+                  x86_64)
+                    ffcall_cv_codeexec="guessing no" ;;
+                  *)
+                    ffcall_cv_codeexec="guessing no" ;;
+                esac
+                ;;
+              irix*)
+                ffcall_cv_codeexec="guessing no" ;;
+              linux*)
+                case "$HOST_CPU_C_ABI" in
+                  alpha | ia64)
+                    ffcall_cv_codeexec="guessing yes" ;;
+                  arm | armhf | arm64 | i386 | mips* | s390 | s390x | sparc | sparc64 | x86_64*)
+                    ffcall_cv_codeexec="guessing no" ;;
+                  *)
+                    ffcall_cv_codeexec="guessing no" ;;
+                esac
+                ;;
+              solaris*)
+                case "$HOST_CPU_C_ABI" in
+                  i386 | sparc | sparc64)
+                    ffcall_cv_codeexec="guessing yes" ;;
+                  x86_64)
+                    ffcall_cv_codeexec="guessing no" ;;
+                  *)
+                    ffcall_cv_codeexec="guessing no" ;;
+                esac
+                ;;
+              *)
+                ffcall_cv_codeexec="guessing no" ;;
+            esac
+           ])
+         ;;
+     esac
+    ])
+  case "$ffcall_cv_codeexec" in
+    *yes | irrelevant) AC_DEFINE([CODE_EXECUTABLE], [], CE_DOC) ;;
+    *no)  ;;
+  esac
+])
+
+dnl Test how to use the mprotect function to make memory executable.
+dnl Test against the mprotect limitations found in PaX enabled Linux kernels
+dnl and HardenedBSD.
+AC_DEFUN([FFCALL_CODEEXEC_PAX],
+[
+  AC_REQUIRE([FFCALL_MMAP])
+  AC_REQUIRE([FFCALL_MPROTECT])
+  AC_REQUIRE([FFCALL_CODEEXEC])
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  case "$ffcall_cv_codeexec" in
+    *yes | irrelevant) ;;
+    *)
+      case "$ac_cv_func_mprotect--$cl_cv_func_mprotect_works" in
+        yes--*yes)
+          AC_CACHE_CHECK([whether mprotect can make malloc()ed memory executable],
+            [ffcall_cv_malloc_mprotect_can_exec],
+            [dnl On RHEL 6 / CentOS 6 with SELinux enabled, the result of
+             dnl this test depends on SELinux flags that can be changed at
+             dnl runtime: By default, the result is 'no'. However, when the flag
+             dnl allow_execheap is turned on, the result is 'yes'. But the flag
+             dnl can be turned off again at any moment.
+             if test "$cross_compiling" != yes -a -d /etc/selinux; then
+               ffcall_cv_malloc_mprotect_can_exec='determined by SELinux at runtime'
+             else
+               AC_TRY_RUN(
+                 [#include <errno.h>
+                  #include <stdlib.h>
+                  #ifdef HAVE_UNISTD_H
+                   #include <unistd.h>
+                  #endif
+                  #include <fcntl.h>
+                  /* declare getpagesize() and mprotect() */
+                  #include <sys/mman.h>
+                  #ifndef HAVE_GETPAGESIZE
+                   #include <sys/param.h>
+                   #define getpagesize() PAGESIZE
+                  #else
+                   ]AC_LANG_EXTERN[
+                   RETGETPAGESIZETYPE getpagesize (void);
+                  #endif
+                  int
+                  main ()
+                  {
+                    unsigned int pagesize = getpagesize ();
+                    char *p = (char *) malloc (50);
+                    int ret;
+                    if (p == (char*) -1)
+                      /* malloc is not working as expected. */
+                      return 1;
+                    p[5] = 0x77;
+                    ret = mprotect (p - ((unsigned int) p & (pagesize - 1)), pagesize, PROT_READ | PROT_WRITE | PROT_EXEC);
+                    if (ret < 0
+                        && (errno == EACCES || errno == ENOMEM
+                            #ifdef ENOTSUP
+                            || errno == ENOTSUP
+                            #endif
+                       )   )
+                      /* mprotect is forbidden to make malloc()ed pages executable that were writable earlier. */
+                      return 2;
+                    return 0;
+                  }
+                 ],
+                 [ffcall_cv_malloc_mprotect_can_exec=yes],
+                 [dnl When cross-compiling, assume SELinux on Linux.
+                  dnl If we don't know, assume the worst.
+                  case "$host_os" in
+                    linux*)
+                      ffcall_cv_malloc_mprotect_can_exec='determined by SELinux at runtime' ;;
+                    aix* | cygwin* | darwin* | irix* | solaris*)
+                      ffcall_cv_malloc_mprotect_can_exec="guessing yes" ;;
+                    *)
+                      ffcall_cv_malloc_mprotect_can_exec="guessing no" ;;
+                  esac
+                 ])
+             fi
+            ])
+          case "$ffcall_cv_malloc_mprotect_can_exec" in
+            *yes)      MPROTECT_AFTER_MALLOC_CAN_EXEC=1 ;;
+            *no)       MPROTECT_AFTER_MALLOC_CAN_EXEC=0 ;;
+            *runtime*) MPROTECT_AFTER_MALLOC_CAN_EXEC='-1' ;;
+          esac
+          AC_DEFINE_UNQUOTED([HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC], [$MPROTECT_AFTER_MALLOC_CAN_EXEC],
+            [have an mprotect() function that can make malloc()ed memory pages executable])
+          case "$ffcall_cv_malloc_mprotect_can_exec" in
+            *yes) ;;
+            *)
+              AC_CACHE_CHECK([whether mprotect can make mmap()ed memory executable],
+                [ffcall_cv_mmap_mprotect_can_exec],
+                [dnl On RHEL 6 / CentOS 6 with SELinux enabled, the result of
+                 dnl this test depends on SELinux flags that can be changed at
+                 dnl runtime: By default, the result is 'yes'. However, when the flags
+                 dnl allow_execmem and allow_execstack are turned off, the result is
+                 dnl 'no'.
+                 if test "$cross_compiling" != yes -a -d /etc/selinux; then
+                   ffcall_cv_mmap_mprotect_can_exec='determined by SELinux at runtime'
+                 else
+                   AC_TRY_RUN(
+                     [#include <errno.h>
+                      #include <stdlib.h>
+                      #ifdef HAVE_UNISTD_H
+                       #include <unistd.h>
+                      #endif
+                      #include <fcntl.h>
+                      /* declare getpagesize() and mprotect() */
+                      #include <sys/mman.h>
+                      #ifndef HAVE_GETPAGESIZE
+                       #include <sys/param.h>
+                       #define getpagesize() PAGESIZE
+                      #else
+                       ]AC_LANG_EXTERN[
+                       RETGETPAGESIZETYPE getpagesize (void);
+                      #endif
+                      #ifndef MAP_FILE
+                       #define MAP_FILE 0
+                      #endif
+                      #ifndef MAP_VARIABLE
+                       #define MAP_VARIABLE 0
+                      #endif
+                      int
+                      main ()
+                      {
+                        unsigned int pagesize = getpagesize ();
+                        char *p;
+                        int ret;
+                      #if defined HAVE_MMAP_ANON
+                        p = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANON | MAP_VARIABLE, -1, 0);
+                      #elif defined HAVE_MMAP_ANONYMOUS
+                        p = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0);
+                      #elif defined HAVE_MMAP_DEVZERO
+                        int zero_fd = open("/dev/zero", O_RDONLY, 0666);
+                        if (zero_fd < 0)
+                          return 1;
+                        p = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_FILE | MAP_VARIABLE, zero_fd, 0);
+                      #else
+                        ??
+                      #endif
+                        if (p == (char*) -1)
+                          /* mmap is not working as expected. */
+                          return 1;
+                        p[5] = 0x77;
+                        ret = mprotect (p, pagesize, PROT_READ | PROT_WRITE | PROT_EXEC);
+                        if (ret < 0
+                            && (errno == EACCES || errno == ENOMEM
+                                #ifdef ENOTSUP
+                                || errno == ENOTSUP
+                                #endif
+                           )   )
+                          /* mprotect is forbidden to make mmap()ed pages executable that were writable earlier. */
+                          return 2;
+                        return 0;
+                      }
+                     ],
+                     [ffcall_cv_mmap_mprotect_can_exec=yes],
+                     [dnl When cross-compiling, assume SELinux on Linux.
+                      dnl If we don't know, assume the worst.
+                      case "$host_os" in
+                        linux*) ffcall_cv_mmap_mprotect_can_exec='determined by SELinux at runtime' ;;
+                        *)      ffcall_cv_mmap_mprotect_can_exec="guessing no" ;;
+                      esac
+                     ])
+                 fi
+                ])
+              case "$ffcall_cv_mmap_mprotect_can_exec" in
+                *yes)      MPROTECT_AFTER_MMAP_CAN_EXEC=1 ;;
+                *no)       MPROTECT_AFTER_MMAP_CAN_EXEC=0 ;;
+                *runtime*) MPROTECT_AFTER_MMAP_CAN_EXEC='-1' ;;
+              esac
+              AC_DEFINE_UNQUOTED([HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC], [$MPROTECT_AFTER_MMAP_CAN_EXEC],
+                [have an mprotect() function that can make mmap()ed memory pages executable])
+              case "$ffcall_cv_mmap_mprotect_can_exec" in
+                *yes) ;;
+                *)
+                  AC_CACHE_CHECK([whether a shared mmap can make memory pages executable],
+                    [ffcall_cv_mmap_shared_can_exec],
+                    [filename="/tmp/trampdata$$.data"
+                     AC_TRY_RUN(
+                       [#include <fcntl.h>
+                        #include <stdlib.h>
+                        #ifdef HAVE_UNISTD_H
+                         #include <unistd.h>
+                        #endif
+                        /* declare getpagesize() and mmap() */
+                        #include <sys/mman.h>
+                        #ifndef HAVE_GETPAGESIZE
+                         #include <sys/param.h>
+                         #define getpagesize() PAGESIZE
+                        #else
+                         ]AC_LANG_EXTERN[
+                         RETGETPAGESIZETYPE getpagesize (void);
+                        #endif
+                        #ifndef MAP_FILE
+                         #define MAP_FILE 0
+                        #endif
+                        #ifndef MAP_VARIABLE
+                         #define MAP_VARIABLE 0
+                        #endif
+                        int
+                        main ()
+                        {
+                          unsigned int pagesize = getpagesize ();
+                          int fd;
+                          char *pw;
+                          char *px;
+                          fd = open ("$filename", O_CREAT | O_RDWR | O_TRUNC, 0700);
+                          if (fd < 0)
+                            return 1;
+                          if (ftruncate (fd, pagesize) < 0)
+                            return 2;
+                          pw = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_SHARED | MAP_FILE | MAP_VARIABLE, fd, 0);
+                          if (pw == (char*) -1)
+                            return 3;
+                          pw[5] = 0xc3;
+                          px = (char *) mmap (NULL, pagesize, PROT_READ | PROT_EXEC, MAP_SHARED | MAP_FILE | MAP_VARIABLE, fd, 0);
+                          if (px == (char*) -1)
+                            return 4;
+                          if ((char)px[5] != (char)0xc3)
+                            return 5;
+                          /* On i386 and x86_64 this is a 'ret' instruction that we can invoke. */
+                        #if (defined __i386 || defined __i386__ || defined _I386 || defined _M_IX86 || defined _X86_) || (defined __x86_64__ || defined __amd64__)
+                          ((void (*) (void)) (px + 5)) ();
+                        #endif
+                          return 0;
+                        }
+                       ],
+                       [ffcall_cv_mmap_shared_can_exec=yes],
+                       [dnl When cross-compiling, assume yes, since this is the result
+                        dnl on all the platforms where we have tested it.
+                        ffcall_cv_mmap_shared_can_exec="guessing yes"
+                       ])
+                     rm -f "$filename"
+                    ])
+                  case "$ffcall_cv_mmap_shared_can_exec" in
+                    *yes)
+                      AC_DEFINE([HAVE_MMAP_SHARED_CAN_EXEC], [],
+                        [have an mmap() function that, with MAP_SHARED, can make memory pages executable])
+                      ;;
+                  esac
+                  ;;
+              esac
+              ;;
+          esac
+          ;;
+      esac
+      ;;
+  esac
+])
diff --git a/m4/endianness.m4 b/m4/endianness.m4
new file mode 100644 (file)
index 0000000..51f1a3d
--- /dev/null
@@ -0,0 +1,70 @@
+# endianness.m4 serial 1
+dnl Copyright (C) 2017 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl From Bruno Haible.
+
+dnl For specific bi-endian CPUs, sets the ENDIANNESS variable to either
+dnl 'eb' (means big endian) or 'el' (means little endian).
+dnl
+dnl This variable can be used to select a particular assembly language
+dnl source file that will interoperate with C code on the given host.
+AC_DEFUN([FFCALL_ENDIANNESS],
+[
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  case "$host_cpu" in
+    arm* )
+      AC_CACHE_CHECK([endianness], [ffcall_cv_endianness],
+        [AC_EGREP_CPP([yes],
+           [#if defined __ARMEL__
+            yes
+            #endif],
+           [ffcall_cv_endianness=little],
+           [ffcall_cv_endianness=big])])
+      ;;
+    mips* )
+      AC_CACHE_CHECK([endianness], [ffcall_cv_endianness],
+        [# Compilers on IRIX define only _MIPSEB as indicator.
+         # Compilers on Linux define _MIPSEB, __MIPSEB__, __MIPSEB or - in
+         # the opposite case - _MIPSEL, __MIPSEL__, __MIPSEL.
+         AC_EGREP_CPP([yes],
+           [#if defined _MIPSEB
+            yes
+            #endif],
+           [ffcall_cv_endianness=big],
+           [AC_EGREP_CPP([yes],
+              [#if defined _MIPSEL
+               yes
+               #endif],
+              [ffcall_cv_endianness=little],
+              [ffcall_cv_endianness=unknown])])
+         ])
+      ;;
+    powerpc*)
+      AC_CACHE_CHECK([endianness], [ffcall_cv_endianness],
+        [# Compilers on AIX and Linux define _BIG_ENDIAN, __BIG_ENDIAN__ or
+         # - in the opposite case - _LITTLE_ENDIAN, __LITTLE_ENDIAN__.
+         AC_EGREP_CPP([yes],
+           [#if defined _BIG_ENDIAN
+            yes
+            #endif],
+           [ffcall_cv_endianness=big],
+           [AC_EGREP_CPP([yes],
+              [#if defined _LITTLE_ENDIAN
+               yes
+               #endif],
+              [ffcall_cv_endianness=little],
+              [ffcall_cv_endianness=unknown])])
+         ])
+      ;;
+    *) ffcall_cv_endianness=known ;;
+  esac
+  case "$ffcall_cv_endianness" in
+    big)    ENDIANNESS='eb' ;;
+    little) ENDIANNESS='el' ;;
+    *)      ENDIANNESS='' ;;
+  esac
+  AC_SUBST([ENDIANNESS])
+])
diff --git a/m4/general.m4 b/m4/general.m4
new file mode 100644 (file)
index 0000000..329d5b1
--- /dev/null
@@ -0,0 +1,34 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.61])
+
+AC_DEFUN([CL_CHECK],
+[
+  AC_CACHE_CHECK([for $2],[$3],
+    [$1([AC_LANG_PROGRAM([$4],[$5])],[$3=yes],[$3=no])])
+  AS_IF([test $$3 = yes], [$6], [$7])
+])
+
+AC_DEFUN([CL_LINK_CHECK],
+[
+  CL_CHECK([AC_LINK_IFELSE],$@)
+])
+
+dnl Expands to the "extern ..." prefix used for system declarations.
+dnl AC_LANG_EXTERN
+AC_DEFUN([AC_LANG_EXTERN],
+[extern
+#ifdef __cplusplus
+"C"
+#endif
+])
diff --git a/m4/getpagesize.m4 b/m4/getpagesize.m4
new file mode 100644 (file)
index 0000000..291af73
--- /dev/null
@@ -0,0 +1,47 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.57])
+
+AC_DEFUN([CL_GETPAGESIZE],
+[
+  CL_LINK_CHECK([getpagesize], [cl_cv_func_getpagesize],
+    [#ifdef HAVE_UNISTD_H
+      #include <sys/types.h>
+      #include <unistd.h>
+     #endif
+    ],
+    [getpagesize();],
+    [
+      AC_DEFINE([HAVE_GETPAGESIZE], [], [have getpagesize()])
+      have_getpagesize=1
+    ])
+  if test -n "$have_getpagesize"; then
+    CL_PROTO([getpagesize],
+      [CL_PROTO_RET(
+         [#include <stdlib.h>
+          #ifdef HAVE_UNISTD_H
+           #include <unistd.h>
+          #endif
+         ],
+         [int getpagesize();],
+         [cl_cv_proto_getpagesize_ret], [int], [size_t])
+      ],
+      [extern $cl_cv_proto_getpagesize_ret getpagesize (void);])
+    AC_DEFINE_UNQUOTED([RETGETPAGESIZETYPE], [$cl_cv_proto_getpagesize_ret],
+      [return type of getpagesize()])
+  else
+    dnl Otherwise we use PAGESIZE defined in <sys/param.h>.
+    dnl But mingw32 doesn't have <sys/param.h>.
+    AC_CHECK_HEADERS([sys/param.h])
+  fi
+])
diff --git a/m4/ireg.m4 b/m4/ireg.m4
new file mode 100644 (file)
index 0000000..bd83d31
--- /dev/null
@@ -0,0 +1,40 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.13])
+
+AC_DEFUN([IREG_DOC],[whether floats are returned in integer registers])
+AC_DEFUN([FFCALL_IREG_FLOAT_RETURN],
+[
+  AC_CACHE_CHECK([IREG_DOC], [ffcall_cv_c_float_return_ireg],
+    [AC_TRY_RUN(GL_NOCRASH
+       [float x = (float)1.2;
+        float y = (float)1.3;
+        float fun () { return x*y; }
+        int main()
+        { nocrash_init();
+         {int val = (* (int (*) ()) fun) ();
+          return !(val == 0x3FC7AE15 || val == 0x15AEC73F);
+        }}
+       ],
+       [ffcall_cv_c_float_return_ireg=yes],
+       [ffcall_cv_c_float_return_ireg=no],
+       [dnl When cross-compiling, assume no, because that's how it comes out on
+        dnl most platforms with floating-point unit, including m68k-linux.
+        ffcall_cv_c_float_return_ireg="guessing no"
+       ])
+    ])
+  case "$ffcall_cv_c_float_return_ireg" in
+    *yes) AC_DEFINE([__IREG_FLOAT_RETURN__], [], IREG_DOC) ;;
+    *no) ;;
+  esac
+])
diff --git a/m4/libtool.m4 b/m4/libtool.m4
new file mode 100644 (file)
index 0000000..2851b20
--- /dev/null
@@ -0,0 +1,8369 @@
+# libtool.m4 - Configure libtool for the host system. -*-Autoconf-*-
+#
+#   Copyright (C) 1996-2001, 2003-2015 Free Software Foundation, Inc.
+#   Written by Gordon Matzigkeit, 1996
+#
+# This file is free software; the Free Software Foundation gives
+# unlimited permission to copy and/or distribute it, with or without
+# modifications, as long as this notice is preserved.
+
+m4_define([_LT_COPYING], [dnl
+# Copyright (C) 2014 Free Software Foundation, Inc.
+# This is free software; see the source for copying conditions.  There is NO
+# warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+# GNU Libtool is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of of the License, or
+# (at your option) any later version.
+#
+# As a special exception to the GNU General Public License, if you
+# distribute this file as part of a program or library that is built
+# using GNU Libtool, you may include this file under the  same
+# distribution terms that you use for the rest of that program.
+#
+# GNU Libtool is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+])
+
+# serial 58 LT_INIT
+
+
+# LT_PREREQ(VERSION)
+# ------------------
+# Complain and exit if this libtool version is less that VERSION.
+m4_defun([LT_PREREQ],
+[m4_if(m4_version_compare(m4_defn([LT_PACKAGE_VERSION]), [$1]), -1,
+       [m4_default([$3],
+                  [m4_fatal([Libtool version $1 or higher is required],
+                            63)])],
+       [$2])])
+
+
+# _LT_CHECK_BUILDDIR
+# ------------------
+# Complain if the absolute build directory name contains unusual characters
+m4_defun([_LT_CHECK_BUILDDIR],
+[case `pwd` in
+  *\ * | *\    *)
+    AC_MSG_WARN([Libtool does not cope well with whitespace in `pwd`]) ;;
+esac
+])
+
+
+# LT_INIT([OPTIONS])
+# ------------------
+AC_DEFUN([LT_INIT],
+[AC_PREREQ([2.62])dnl We use AC_PATH_PROGS_FEATURE_CHECK
+AC_REQUIRE([AC_CONFIG_AUX_DIR_DEFAULT])dnl
+AC_BEFORE([$0], [LT_LANG])dnl
+AC_BEFORE([$0], [LT_OUTPUT])dnl
+AC_BEFORE([$0], [LTDL_INIT])dnl
+m4_require([_LT_CHECK_BUILDDIR])dnl
+
+dnl Autoconf doesn't catch unexpanded LT_ macros by default:
+m4_pattern_forbid([^_?LT_[A-Z_]+$])dnl
+m4_pattern_allow([^(_LT_EOF|LT_DLGLOBAL|LT_DLLAZY_OR_NOW|LT_MULTI_MODULE)$])dnl
+dnl aclocal doesn't pull ltoptions.m4, ltsugar.m4, or ltversion.m4
+dnl unless we require an AC_DEFUNed macro:
+AC_REQUIRE([LTOPTIONS_VERSION])dnl
+AC_REQUIRE([LTSUGAR_VERSION])dnl
+AC_REQUIRE([LTVERSION_VERSION])dnl
+AC_REQUIRE([LTOBSOLETE_VERSION])dnl
+m4_require([_LT_PROG_LTMAIN])dnl
+
+_LT_SHELL_INIT([SHELL=${CONFIG_SHELL-/bin/sh}])
+
+dnl Parse OPTIONS
+_LT_SET_OPTIONS([$0], [$1])
+
+# This can be used to rebuild libtool when needed
+LIBTOOL_DEPS=$ltmain
+
+# Always use our own libtool.
+LIBTOOL='$(SHELL) $(top_builddir)/libtool'
+AC_SUBST(LIBTOOL)dnl
+
+_LT_SETUP
+
+# Only expand once:
+m4_define([LT_INIT])
+])# LT_INIT
+
+# Old names:
+AU_ALIAS([AC_PROG_LIBTOOL], [LT_INIT])
+AU_ALIAS([AM_PROG_LIBTOOL], [LT_INIT])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_PROG_LIBTOOL], [])
+dnl AC_DEFUN([AM_PROG_LIBTOOL], [])
+
+
+# _LT_PREPARE_CC_BASENAME
+# -----------------------
+m4_defun([_LT_PREPARE_CC_BASENAME], [
+# Calculate cc_basename.  Skip known compiler wrappers and cross-prefix.
+func_cc_basename ()
+{
+    for cc_temp in @S|@*""; do
+      case $cc_temp in
+        compile | *[[\\/]]compile | ccache | *[[\\/]]ccache ) ;;
+        distcc | *[[\\/]]distcc | purify | *[[\\/]]purify ) ;;
+        \-*) ;;
+        *) break;;
+      esac
+    done
+    func_cc_basename_result=`$ECHO "$cc_temp" | $SED "s%.*/%%; s%^$host_alias-%%"`
+}
+])# _LT_PREPARE_CC_BASENAME
+
+
+# _LT_CC_BASENAME(CC)
+# -------------------
+# It would be clearer to call AC_REQUIREs from _LT_PREPARE_CC_BASENAME,
+# but that macro is also expanded into generated libtool script, which
+# arranges for $SED and $ECHO to be set by different means.
+m4_defun([_LT_CC_BASENAME],
+[m4_require([_LT_PREPARE_CC_BASENAME])dnl
+AC_REQUIRE([_LT_DECL_SED])dnl
+AC_REQUIRE([_LT_PROG_ECHO_BACKSLASH])dnl
+func_cc_basename $1
+cc_basename=$func_cc_basename_result
+])
+
+
+# _LT_FILEUTILS_DEFAULTS
+# ----------------------
+# It is okay to use these file commands and assume they have been set
+# sensibly after 'm4_require([_LT_FILEUTILS_DEFAULTS])'.
+m4_defun([_LT_FILEUTILS_DEFAULTS],
+[: ${CP="cp -f"}
+: ${MV="mv -f"}
+: ${RM="rm -f"}
+])# _LT_FILEUTILS_DEFAULTS
+
+
+# _LT_SETUP
+# ---------
+m4_defun([_LT_SETUP],
+[AC_REQUIRE([AC_CANONICAL_HOST])dnl
+AC_REQUIRE([AC_CANONICAL_BUILD])dnl
+AC_REQUIRE([_LT_PREPARE_SED_QUOTE_VARS])dnl
+AC_REQUIRE([_LT_PROG_ECHO_BACKSLASH])dnl
+
+_LT_DECL([], [PATH_SEPARATOR], [1], [The PATH separator for the build system])dnl
+dnl
+_LT_DECL([], [host_alias], [0], [The host system])dnl
+_LT_DECL([], [host], [0])dnl
+_LT_DECL([], [host_os], [0])dnl
+dnl
+_LT_DECL([], [build_alias], [0], [The build system])dnl
+_LT_DECL([], [build], [0])dnl
+_LT_DECL([], [build_os], [0])dnl
+dnl
+AC_REQUIRE([AC_PROG_CC])dnl
+AC_REQUIRE([LT_PATH_LD])dnl
+AC_REQUIRE([LT_PATH_NM])dnl
+dnl
+AC_REQUIRE([AC_PROG_LN_S])dnl
+test -z "$LN_S" && LN_S="ln -s"
+_LT_DECL([], [LN_S], [1], [Whether we need soft or hard links])dnl
+dnl
+AC_REQUIRE([LT_CMD_MAX_LEN])dnl
+_LT_DECL([objext], [ac_objext], [0], [Object file suffix (normally "o")])dnl
+_LT_DECL([], [exeext], [0], [Executable file suffix (normally "")])dnl
+dnl
+m4_require([_LT_FILEUTILS_DEFAULTS])dnl
+m4_require([_LT_CHECK_SHELL_FEATURES])dnl
+m4_require([_LT_PATH_CONVERSION_FUNCTIONS])dnl
+m4_require([_LT_CMD_RELOAD])dnl
+m4_require([_LT_CHECK_MAGIC_METHOD])dnl
+m4_require([_LT_CHECK_SHAREDLIB_FROM_LINKLIB])dnl
+m4_require([_LT_CMD_OLD_ARCHIVE])dnl
+m4_require([_LT_CMD_GLOBAL_SYMBOLS])dnl
+m4_require([_LT_WITH_SYSROOT])dnl
+m4_require([_LT_CMD_TRUNCATE])dnl
+
+_LT_CONFIG_LIBTOOL_INIT([
+# See if we are running on zsh, and set the options that allow our
+# commands through without removal of \ escapes INIT.
+if test -n "\${ZSH_VERSION+set}"; then
+   setopt NO_GLOB_SUBST
+fi
+])
+if test -n "${ZSH_VERSION+set}"; then
+   setopt NO_GLOB_SUBST
+fi
+
+_LT_CHECK_OBJDIR
+
+m4_require([_LT_TAG_COMPILER])dnl
+
+case $host_os in
+aix3*)
+  # AIX sometimes has problems with the GCC collect2 program.  For some
+  # reason, if we set the COLLECT_NAMES environment variable, the problems
+  # vanish in a puff of smoke.
+  if test set != "${COLLECT_NAMES+set}"; then
+    COLLECT_NAMES=
+    export COLLECT_NAMES
+  fi
+  ;;
+esac
+
+# Global variables:
+ofile=libtool
+can_build_shared=yes
+
+# All known linkers require a '.a' archive for static linking (except MSVC,
+# which needs '.lib').
+libext=a
+
+with_gnu_ld=$lt_cv_prog_gnu_ld
+
+old_CC=$CC
+old_CFLAGS=$CFLAGS
+
+# Set sane defaults for various variables
+test -z "$CC" && CC=cc
+test -z "$LTCC" && LTCC=$CC
+test -z "$LTCFLAGS" && LTCFLAGS=$CFLAGS
+test -z "$LD" && LD=ld
+test -z "$ac_objext" && ac_objext=o
+
+_LT_CC_BASENAME([$compiler])
+
+# Only perform the check for file, if the check method requires it
+test -z "$MAGIC_CMD" && MAGIC_CMD=file
+case $deplibs_check_method in
+file_magic*)
+  if test "$file_magic_cmd" = '$MAGIC_CMD'; then
+    _LT_PATH_MAGIC
+  fi
+  ;;
+esac
+
+# Use C for the default configuration in the libtool script
+LT_SUPPORTED_TAG([CC])
+_LT_LANG_C_CONFIG
+_LT_LANG_DEFAULT_CONFIG
+_LT_CONFIG_COMMANDS
+])# _LT_SETUP
+
+
+# _LT_PREPARE_SED_QUOTE_VARS
+# --------------------------
+# Define a few sed substitution that help us do robust quoting.
+m4_defun([_LT_PREPARE_SED_QUOTE_VARS],
+[# Backslashify metacharacters that are still active within
+# double-quoted strings.
+sed_quote_subst='s/\([["`$\\]]\)/\\\1/g'
+
+# Same as above, but do not quote variable references.
+double_quote_subst='s/\([["`\\]]\)/\\\1/g'
+
+# Sed substitution to delay expansion of an escaped shell variable in a
+# double_quote_subst'ed string.
+delay_variable_subst='s/\\\\\\\\\\\$/\\\\\\$/g'
+
+# Sed substitution to delay expansion of an escaped single quote.
+delay_single_quote_subst='s/'\''/'\'\\\\\\\'\''/g'
+
+# Sed substitution to avoid accidental globbing in evaled expressions
+no_glob_subst='s/\*/\\\*/g'
+])
+
+# _LT_PROG_LTMAIN
+# ---------------
+# Note that this code is called both from 'configure', and 'config.status'
+# now that we use AC_CONFIG_COMMANDS to generate libtool.  Notably,
+# 'config.status' has no value for ac_aux_dir unless we are using Automake,
+# so we pass a copy along to make sure it has a sensible value anyway.
+m4_defun([_LT_PROG_LTMAIN],
+[m4_ifdef([AC_REQUIRE_AUX_FILE], [AC_REQUIRE_AUX_FILE([ltmain.sh])])dnl
+_LT_CONFIG_LIBTOOL_INIT([ac_aux_dir='$ac_aux_dir'])
+ltmain=$ac_aux_dir/ltmain.sh
+])# _LT_PROG_LTMAIN
+
+
+## ------------------------------------- ##
+## Accumulate code for creating libtool. ##
+## ------------------------------------- ##
+
+# So that we can recreate a full libtool script including additional
+# tags, we accumulate the chunks of code to send to AC_CONFIG_COMMANDS
+# in macros and then make a single call at the end using the 'libtool'
+# label.
+
+
+# _LT_CONFIG_LIBTOOL_INIT([INIT-COMMANDS])
+# ----------------------------------------
+# Register INIT-COMMANDS to be passed to AC_CONFIG_COMMANDS later.
+m4_define([_LT_CONFIG_LIBTOOL_INIT],
+[m4_ifval([$1],
+          [m4_append([_LT_OUTPUT_LIBTOOL_INIT],
+                     [$1
+])])])
+
+# Initialize.
+m4_define([_LT_OUTPUT_LIBTOOL_INIT])
+
+
+# _LT_CONFIG_LIBTOOL([COMMANDS])
+# ------------------------------
+# Register COMMANDS to be passed to AC_CONFIG_COMMANDS later.
+m4_define([_LT_CONFIG_LIBTOOL],
+[m4_ifval([$1],
+          [m4_append([_LT_OUTPUT_LIBTOOL_COMMANDS],
+                     [$1
+])])])
+
+# Initialize.
+m4_define([_LT_OUTPUT_LIBTOOL_COMMANDS])
+
+
+# _LT_CONFIG_SAVE_COMMANDS([COMMANDS], [INIT_COMMANDS])
+# -----------------------------------------------------
+m4_defun([_LT_CONFIG_SAVE_COMMANDS],
+[_LT_CONFIG_LIBTOOL([$1])
+_LT_CONFIG_LIBTOOL_INIT([$2])
+])
+
+
+# _LT_FORMAT_COMMENT([COMMENT])
+# -----------------------------
+# Add leading comment marks to the start of each line, and a trailing
+# full-stop to the whole comment if one is not present already.
+m4_define([_LT_FORMAT_COMMENT],
+[m4_ifval([$1], [
+m4_bpatsubst([m4_bpatsubst([$1], [^ *], [# ])],
+              [['`$\]], [\\\&])]m4_bmatch([$1], [[!?.]$], [], [.])
+)])
+
+
+
+## ------------------------ ##
+## FIXME: Eliminate VARNAME ##
+## ------------------------ ##
+
+
+# _LT_DECL([CONFIGNAME], VARNAME, VALUE, [DESCRIPTION], [IS-TAGGED?])
+# -------------------------------------------------------------------
+# CONFIGNAME is the name given to the value in the libtool script.
+# VARNAME is the (base) name used in the configure script.
+# VALUE may be 0, 1 or 2 for a computed quote escaped value based on
+# VARNAME.  Any other value will be used directly.
+m4_define([_LT_DECL],
+[lt_if_append_uniq([lt_decl_varnames], [$2], [, ],
+    [lt_dict_add_subkey([lt_decl_dict], [$2], [libtool_name],
+       [m4_ifval([$1], [$1], [$2])])
+    lt_dict_add_subkey([lt_decl_dict], [$2], [value], [$3])
+    m4_ifval([$4],
+       [lt_dict_add_subkey([lt_decl_dict], [$2], [description], [$4])])
+    lt_dict_add_subkey([lt_decl_dict], [$2],
+       [tagged?], [m4_ifval([$5], [yes], [no])])])
+])
+
+
+# _LT_TAGDECL([CONFIGNAME], VARNAME, VALUE, [DESCRIPTION])
+# --------------------------------------------------------
+m4_define([_LT_TAGDECL], [_LT_DECL([$1], [$2], [$3], [$4], [yes])])
+
+
+# lt_decl_tag_varnames([SEPARATOR], [VARNAME1...])
+# ------------------------------------------------
+m4_define([lt_decl_tag_varnames],
+[_lt_decl_filter([tagged?], [yes], $@)])
+
+
+# _lt_decl_filter(SUBKEY, VALUE, [SEPARATOR], [VARNAME1..])
+# ---------------------------------------------------------
+m4_define([_lt_decl_filter],
+[m4_case([$#],
+  [0], [m4_fatal([$0: too few arguments: $#])],
+  [1], [m4_fatal([$0: too few arguments: $#: $1])],
+  [2], [lt_dict_filter([lt_decl_dict], [$1], [$2], [], lt_decl_varnames)],
+  [3], [lt_dict_filter([lt_decl_dict], [$1], [$2], [$3], lt_decl_varnames)],
+  [lt_dict_filter([lt_decl_dict], $@)])[]dnl
+])
+
+
+# lt_decl_quote_varnames([SEPARATOR], [VARNAME1...])
+# --------------------------------------------------
+m4_define([lt_decl_quote_varnames],
+[_lt_decl_filter([value], [1], $@)])
+
+
+# lt_decl_dquote_varnames([SEPARATOR], [VARNAME1...])
+# ---------------------------------------------------
+m4_define([lt_decl_dquote_varnames],
+[_lt_decl_filter([value], [2], $@)])
+
+
+# lt_decl_varnames_tagged([SEPARATOR], [VARNAME1...])
+# ---------------------------------------------------
+m4_define([lt_decl_varnames_tagged],
+[m4_assert([$# <= 2])dnl
+_$0(m4_quote(m4_default([$1], [[, ]])),
+    m4_ifval([$2], [[$2]], [m4_dquote(lt_decl_tag_varnames)]),
+    m4_split(m4_normalize(m4_quote(_LT_TAGS)), [ ]))])
+m4_define([_lt_decl_varnames_tagged],
+[m4_ifval([$3], [lt_combine([$1], [$2], [_], $3)])])
+
+
+# lt_decl_all_varnames([SEPARATOR], [VARNAME1...])
+# ------------------------------------------------
+m4_define([lt_decl_all_varnames],
+[_$0(m4_quote(m4_default([$1], [[, ]])),
+     m4_if([$2], [],
+          m4_quote(lt_decl_varnames),
+       m4_quote(m4_shift($@))))[]dnl
+])
+m4_define([_lt_decl_all_varnames],
+[lt_join($@, lt_decl_varnames_tagged([$1],
+                       lt_decl_tag_varnames([[, ]], m4_shift($@))))dnl
+])
+
+
+# _LT_CONFIG_STATUS_DECLARE([VARNAME])
+# ------------------------------------
+# Quote a variable value, and forward it to 'config.status' so that its
+# declaration there will have the same value as in 'configure'.  VARNAME
+# must have a single quote delimited value for this to work.
+m4_define([_LT_CONFIG_STATUS_DECLARE],
+[$1='`$ECHO "$][$1" | $SED "$delay_single_quote_subst"`'])
+
+
+# _LT_CONFIG_STATUS_DECLARATIONS
+# ------------------------------
+# We delimit libtool config variables with single quotes, so when
+# we write them to config.status, we have to be sure to quote all
+# embedded single quotes properly.  In configure, this macro expands
+# each variable declared with _LT_DECL (and _LT_TAGDECL) into:
+#
+#    <var>='`$ECHO "$<var>" | $SED "$delay_single_quote_subst"`'
+m4_defun([_LT_CONFIG_STATUS_DECLARATIONS],
+[m4_foreach([_lt_var], m4_quote(lt_decl_all_varnames),
+    [m4_n([_LT_CONFIG_STATUS_DECLARE(_lt_var)])])])
+
+
+# _LT_LIBTOOL_TAGS
+# ----------------
+# Output comment and list of tags supported by the script
+m4_defun([_LT_LIBTOOL_TAGS],
+[_LT_FORMAT_COMMENT([The names of the tagged configurations supported by this script])dnl
+available_tags='_LT_TAGS'dnl
+])
+
+
+# _LT_LIBTOOL_DECLARE(VARNAME, [TAG])
+# -----------------------------------
+# Extract the dictionary values for VARNAME (optionally with TAG) and
+# expand to a commented shell variable setting:
+#
+#    # Some comment about what VAR is for.
+#    visible_name=$lt_internal_name
+m4_define([_LT_LIBTOOL_DECLARE],
+[_LT_FORMAT_COMMENT(m4_quote(lt_dict_fetch([lt_decl_dict], [$1],
+                                          [description])))[]dnl
+m4_pushdef([_libtool_name],
+    m4_quote(lt_dict_fetch([lt_decl_dict], [$1], [libtool_name])))[]dnl
+m4_case(m4_quote(lt_dict_fetch([lt_decl_dict], [$1], [value])),
+    [0], [_libtool_name=[$]$1],
+    [1], [_libtool_name=$lt_[]$1],
+    [2], [_libtool_name=$lt_[]$1],
+    [_libtool_name=lt_dict_fetch([lt_decl_dict], [$1], [value])])[]dnl
+m4_ifval([$2], [_$2])[]m4_popdef([_libtool_name])[]dnl
+])
+
+
+# _LT_LIBTOOL_CONFIG_VARS
+# -----------------------
+# Produce commented declarations of non-tagged libtool config variables
+# suitable for insertion in the LIBTOOL CONFIG section of the 'libtool'
+# script.  Tagged libtool config variables (even for the LIBTOOL CONFIG
+# section) are produced by _LT_LIBTOOL_TAG_VARS.
+m4_defun([_LT_LIBTOOL_CONFIG_VARS],
+[m4_foreach([_lt_var],
+    m4_quote(_lt_decl_filter([tagged?], [no], [], lt_decl_varnames)),
+    [m4_n([_LT_LIBTOOL_DECLARE(_lt_var)])])])
+
+
+# _LT_LIBTOOL_TAG_VARS(TAG)
+# -------------------------
+m4_define([_LT_LIBTOOL_TAG_VARS],
+[m4_foreach([_lt_var], m4_quote(lt_decl_tag_varnames),
+    [m4_n([_LT_LIBTOOL_DECLARE(_lt_var, [$1])])])])
+
+
+# _LT_TAGVAR(VARNAME, [TAGNAME])
+# ------------------------------
+m4_define([_LT_TAGVAR], [m4_ifval([$2], [$1_$2], [$1])])
+
+
+# _LT_CONFIG_COMMANDS
+# -------------------
+# Send accumulated output to $CONFIG_STATUS.  Thanks to the lists of
+# variables for single and double quote escaping we saved from calls
+# to _LT_DECL, we can put quote escaped variables declarations
+# into 'config.status', and then the shell code to quote escape them in
+# for loops in 'config.status'.  Finally, any additional code accumulated
+# from calls to _LT_CONFIG_LIBTOOL_INIT is expanded.
+m4_defun([_LT_CONFIG_COMMANDS],
+[AC_PROVIDE_IFELSE([LT_OUTPUT],
+       dnl If the libtool generation code has been placed in $CONFIG_LT,
+       dnl instead of duplicating it all over again into config.status,
+       dnl then we will have config.status run $CONFIG_LT later, so it
+       dnl needs to know what name is stored there:
+        [AC_CONFIG_COMMANDS([libtool],
+            [$SHELL $CONFIG_LT || AS_EXIT(1)], [CONFIG_LT='$CONFIG_LT'])],
+    dnl If the libtool generation code is destined for config.status,
+    dnl expand the accumulated commands and init code now:
+    [AC_CONFIG_COMMANDS([libtool],
+        [_LT_OUTPUT_LIBTOOL_COMMANDS], [_LT_OUTPUT_LIBTOOL_COMMANDS_INIT])])
+])#_LT_CONFIG_COMMANDS
+
+
+# Initialize.
+m4_define([_LT_OUTPUT_LIBTOOL_COMMANDS_INIT],
+[
+
+# The HP-UX ksh and POSIX shell print the target directory to stdout
+# if CDPATH is set.
+(unset CDPATH) >/dev/null 2>&1 && unset CDPATH
+
+sed_quote_subst='$sed_quote_subst'
+double_quote_subst='$double_quote_subst'
+delay_variable_subst='$delay_variable_subst'
+_LT_CONFIG_STATUS_DECLARATIONS
+LTCC='$LTCC'
+LTCFLAGS='$LTCFLAGS'
+compiler='$compiler_DEFAULT'
+
+# A function that is used when there is no print builtin or printf.
+func_fallback_echo ()
+{
+  eval 'cat <<_LTECHO_EOF
+\$[]1
+_LTECHO_EOF'
+}
+
+# Quote evaled strings.
+for var in lt_decl_all_varnames([[ \
+]], lt_decl_quote_varnames); do
+    case \`eval \\\\\$ECHO \\\\""\\\\\$\$var"\\\\"\` in
+    *[[\\\\\\\`\\"\\\$]]*)
+      eval "lt_\$var=\\\\\\"\\\`\\\$ECHO \\"\\\$\$var\\" | \\\$SED \\"\\\$sed_quote_subst\\"\\\`\\\\\\"" ## exclude from sc_prohibit_nested_quotes
+      ;;
+    *)
+      eval "lt_\$var=\\\\\\"\\\$\$var\\\\\\""
+      ;;
+    esac
+done
+
+# Double-quote double-evaled strings.
+for var in lt_decl_all_varnames([[ \
+]], lt_decl_dquote_varnames); do
+    case \`eval \\\\\$ECHO \\\\""\\\\\$\$var"\\\\"\` in
+    *[[\\\\\\\`\\"\\\$]]*)
+      eval "lt_\$var=\\\\\\"\\\`\\\$ECHO \\"\\\$\$var\\" | \\\$SED -e \\"\\\$double_quote_subst\\" -e \\"\\\$sed_quote_subst\\" -e \\"\\\$delay_variable_subst\\"\\\`\\\\\\"" ## exclude from sc_prohibit_nested_quotes
+      ;;
+    *)
+      eval "lt_\$var=\\\\\\"\\\$\$var\\\\\\""
+      ;;
+    esac
+done
+
+_LT_OUTPUT_LIBTOOL_INIT
+])
+
+# _LT_GENERATED_FILE_INIT(FILE, [COMMENT])
+# ------------------------------------
+# Generate a child script FILE with all initialization necessary to
+# reuse the environment learned by the parent script, and make the
+# file executable.  If COMMENT is supplied, it is inserted after the
+# '#!' sequence but before initialization text begins.  After this
+# macro, additional text can be appended to FILE to form the body of
+# the child script.  The macro ends with non-zero status if the
+# file could not be fully written (such as if the disk is full).
+m4_ifdef([AS_INIT_GENERATED],
+[m4_defun([_LT_GENERATED_FILE_INIT],[AS_INIT_GENERATED($@)])],
+[m4_defun([_LT_GENERATED_FILE_INIT],
+[m4_require([AS_PREPARE])]dnl
+[m4_pushdef([AS_MESSAGE_LOG_FD])]dnl
+[lt_write_fail=0
+cat >$1 <<_ASEOF || lt_write_fail=1
+#! $SHELL
+# Generated by $as_me.
+$2
+SHELL=\${CONFIG_SHELL-$SHELL}
+export SHELL
+_ASEOF
+cat >>$1 <<\_ASEOF || lt_write_fail=1
+AS_SHELL_SANITIZE
+_AS_PREPARE
+exec AS_MESSAGE_FD>&1
+_ASEOF
+test 0 = "$lt_write_fail" && chmod +x $1[]dnl
+m4_popdef([AS_MESSAGE_LOG_FD])])])# _LT_GENERATED_FILE_INIT
+
+# LT_OUTPUT
+# ---------
+# This macro allows early generation of the libtool script (before
+# AC_OUTPUT is called), incase it is used in configure for compilation
+# tests.
+AC_DEFUN([LT_OUTPUT],
+[: ${CONFIG_LT=./config.lt}
+AC_MSG_NOTICE([creating $CONFIG_LT])
+_LT_GENERATED_FILE_INIT(["$CONFIG_LT"],
+[# Run this file to recreate a libtool stub with the current configuration.])
+
+cat >>"$CONFIG_LT" <<\_LTEOF
+lt_cl_silent=false
+exec AS_MESSAGE_LOG_FD>>config.log
+{
+  echo
+  AS_BOX([Running $as_me.])
+} >&AS_MESSAGE_LOG_FD
+
+lt_cl_help="\
+'$as_me' creates a local libtool stub from the current configuration,
+for use in further configure time tests before the real libtool is
+generated.
+
+Usage: $[0] [[OPTIONS]]
+
+  -h, --help      print this help, then exit
+  -V, --version   print version number, then exit
+  -q, --quiet     do not print progress messages
+  -d, --debug     don't remove temporary files
+
+Report bugs to <bug-libtool@gnu.org>."
+
+lt_cl_version="\
+m4_ifset([AC_PACKAGE_NAME], [AC_PACKAGE_NAME ])config.lt[]dnl
+m4_ifset([AC_PACKAGE_VERSION], [ AC_PACKAGE_VERSION])
+configured by $[0], generated by m4_PACKAGE_STRING.
+
+Copyright (C) 2011 Free Software Foundation, Inc.
+This config.lt script is free software; the Free Software Foundation
+gives unlimited permision to copy, distribute and modify it."
+
+while test 0 != $[#]
+do
+  case $[1] in
+    --version | --v* | -V )
+      echo "$lt_cl_version"; exit 0 ;;
+    --help | --h* | -h )
+      echo "$lt_cl_help"; exit 0 ;;
+    --debug | --d* | -d )
+      debug=: ;;
+    --quiet | --q* | --silent | --s* | -q )
+      lt_cl_silent=: ;;
+
+    -*) AC_MSG_ERROR([unrecognized option: $[1]
+Try '$[0] --help' for more information.]) ;;
+
+    *) AC_MSG_ERROR([unrecognized argument: $[1]
+Try '$[0] --help' for more information.]) ;;
+  esac
+  shift
+done
+
+if $lt_cl_silent; then
+  exec AS_MESSAGE_FD>/dev/null
+fi
+_LTEOF
+
+cat >>"$CONFIG_LT" <<_LTEOF
+_LT_OUTPUT_LIBTOOL_COMMANDS_INIT
+_LTEOF
+
+cat >>"$CONFIG_LT" <<\_LTEOF
+AC_MSG_NOTICE([creating $ofile])
+_LT_OUTPUT_LIBTOOL_COMMANDS
+AS_EXIT(0)
+_LTEOF
+chmod +x "$CONFIG_LT"
+
+# configure is writing to config.log, but config.lt does its own redirection,
+# appending to config.log, which fails on DOS, as config.log is still kept
+# open by configure.  Here we exec the FD to /dev/null, effectively closing
+# config.log, so it can be properly (re)opened and appended to by config.lt.
+lt_cl_success=:
+test yes = "$silent" &&
+  lt_config_lt_args="$lt_config_lt_args --quiet"
+exec AS_MESSAGE_LOG_FD>/dev/null
+$SHELL "$CONFIG_LT" $lt_config_lt_args || lt_cl_success=false
+exec AS_MESSAGE_LOG_FD>>config.log
+$lt_cl_success || AS_EXIT(1)
+])# LT_OUTPUT
+
+
+# _LT_CONFIG(TAG)
+# ---------------
+# If TAG is the built-in tag, create an initial libtool script with a
+# default configuration from the untagged config vars.  Otherwise add code
+# to config.status for appending the configuration named by TAG from the
+# matching tagged config vars.
+m4_defun([_LT_CONFIG],
+[m4_require([_LT_FILEUTILS_DEFAULTS])dnl
+_LT_CONFIG_SAVE_COMMANDS([
+  m4_define([_LT_TAG], m4_if([$1], [], [C], [$1]))dnl
+  m4_if(_LT_TAG, [C], [
+    # See if we are running on zsh, and set the options that allow our
+    # commands through without removal of \ escapes.
+    if test -n "${ZSH_VERSION+set}"; then
+      setopt NO_GLOB_SUBST
+    fi
+
+    cfgfile=${ofile}T
+    trap "$RM \"$cfgfile\"; exit 1" 1 2 15
+    $RM "$cfgfile"
+
+    cat <<_LT_EOF >> "$cfgfile"
+#! $SHELL
+# Generated automatically by $as_me ($PACKAGE) $VERSION
+# Libtool was configured on host `(hostname || uname -n) 2>/dev/null | sed 1q`:
+# NOTE: Changes made to this file will be lost: look at ltmain.sh.
+
+# Provide generalized library-building support services.
+# Written by Gordon Matzigkeit, 1996
+
+_LT_COPYING
+_LT_LIBTOOL_TAGS
+
+# Configured defaults for sys_lib_dlsearch_path munging.
+: \${LT_SYS_LIBRARY_PATH="$configure_time_lt_sys_library_path"}
+
+# ### BEGIN LIBTOOL CONFIG
+_LT_LIBTOOL_CONFIG_VARS
+_LT_LIBTOOL_TAG_VARS
+# ### END LIBTOOL CONFIG
+
+_LT_EOF
+
+    cat <<'_LT_EOF' >> "$cfgfile"
+
+# ### BEGIN FUNCTIONS SHARED WITH CONFIGURE
+
+_LT_PREPARE_MUNGE_PATH_LIST
+_LT_PREPARE_CC_BASENAME
+
+# ### END FUNCTIONS SHARED WITH CONFIGURE
+
+_LT_EOF
+
+  case $host_os in
+  aix3*)
+    cat <<\_LT_EOF >> "$cfgfile"
+# AIX sometimes has problems with the GCC collect2 program.  For some
+# reason, if we set the COLLECT_NAMES environment variable, the problems
+# vanish in a puff of smoke.
+if test set != "${COLLECT_NAMES+set}"; then
+  COLLECT_NAMES=
+  export COLLECT_NAMES
+fi
+_LT_EOF
+    ;;
+  esac
+
+  _LT_PROG_LTMAIN
+
+  # We use sed instead of cat because bash on DJGPP gets confused if
+  # if finds mixed CR/LF and LF-only lines.  Since sed operates in
+  # text mode, it properly converts lines to CR/LF.  This bash problem
+  # is reportedly fixed, but why not run on old versions too?
+  sed '$q' "$ltmain" >> "$cfgfile" \
+     || (rm -f "$cfgfile"; exit 1)
+
+   mv -f "$cfgfile" "$ofile" ||
+    (rm -f "$ofile" && cp "$cfgfile" "$ofile" && rm -f "$cfgfile")
+  chmod +x "$ofile"
+],
+[cat <<_LT_EOF >> "$ofile"
+
+dnl Unfortunately we have to use $1 here, since _LT_TAG is not expanded
+dnl in a comment (ie after a #).
+# ### BEGIN LIBTOOL TAG CONFIG: $1
+_LT_LIBTOOL_TAG_VARS(_LT_TAG)
+# ### END LIBTOOL TAG CONFIG: $1
+_LT_EOF
+])dnl /m4_if
+],
+[m4_if([$1], [], [
+    PACKAGE='$PACKAGE'
+    VERSION='$VERSION'
+    RM='$RM'
+    ofile='$ofile'], [])
+])dnl /_LT_CONFIG_SAVE_COMMANDS
+])# _LT_CONFIG
+
+
+# LT_SUPPORTED_TAG(TAG)
+# ---------------------
+# Trace this macro to discover what tags are supported by the libtool
+# --tag option, using:
+#    autoconf --trace 'LT_SUPPORTED_TAG:$1'
+AC_DEFUN([LT_SUPPORTED_TAG], [])
+
+
+# C support is built-in for now
+m4_define([_LT_LANG_C_enabled], [])
+m4_define([_LT_TAGS], [])
+
+
+# LT_LANG(LANG)
+# -------------
+# Enable libtool support for the given language if not already enabled.
+AC_DEFUN([LT_LANG],
+[AC_BEFORE([$0], [LT_OUTPUT])dnl
+m4_case([$1],
+  [C],                 [_LT_LANG(C)],
+  [C++],               [_LT_LANG(CXX)],
+  [Go],                        [_LT_LANG(GO)],
+  [Java],              [_LT_LANG(GCJ)],
+  [Fortran 77],                [_LT_LANG(F77)],
+  [Fortran],           [_LT_LANG(FC)],
+  [Windows Resource],  [_LT_LANG(RC)],
+  [m4_ifdef([_LT_LANG_]$1[_CONFIG],
+    [_LT_LANG($1)],
+    [m4_fatal([$0: unsupported language: "$1"])])])dnl
+])# LT_LANG
+
+
+# _LT_LANG(LANGNAME)
+# ------------------
+m4_defun([_LT_LANG],
+[m4_ifdef([_LT_LANG_]$1[_enabled], [],
+  [LT_SUPPORTED_TAG([$1])dnl
+  m4_append([_LT_TAGS], [$1 ])dnl
+  m4_define([_LT_LANG_]$1[_enabled], [])dnl
+  _LT_LANG_$1_CONFIG($1)])dnl
+])# _LT_LANG
+
+
+m4_ifndef([AC_PROG_GO], [
+############################################################
+# NOTE: This macro has been submitted for inclusion into   #
+#  GNU Autoconf as AC_PROG_GO.  When it is available in    #
+#  a released version of Autoconf we should remove this    #
+#  macro and use it instead.                               #
+############################################################
+m4_defun([AC_PROG_GO],
+[AC_LANG_PUSH(Go)dnl
+AC_ARG_VAR([GOC],     [Go compiler command])dnl
+AC_ARG_VAR([GOFLAGS], [Go compiler flags])dnl
+_AC_ARG_VAR_LDFLAGS()dnl
+AC_CHECK_TOOL(GOC, gccgo)
+if test -z "$GOC"; then
+  if test -n "$ac_tool_prefix"; then
+    AC_CHECK_PROG(GOC, [${ac_tool_prefix}gccgo], [${ac_tool_prefix}gccgo])
+  fi
+fi
+if test -z "$GOC"; then
+  AC_CHECK_PROG(GOC, gccgo, gccgo, false)
+fi
+])#m4_defun
+])#m4_ifndef
+
+
+# _LT_LANG_DEFAULT_CONFIG
+# -----------------------
+m4_defun([_LT_LANG_DEFAULT_CONFIG],
+[AC_PROVIDE_IFELSE([AC_PROG_CXX],
+  [LT_LANG(CXX)],
+  [m4_define([AC_PROG_CXX], defn([AC_PROG_CXX])[LT_LANG(CXX)])])
+
+AC_PROVIDE_IFELSE([AC_PROG_F77],
+  [LT_LANG(F77)],
+  [m4_define([AC_PROG_F77], defn([AC_PROG_F77])[LT_LANG(F77)])])
+
+AC_PROVIDE_IFELSE([AC_PROG_FC],
+  [LT_LANG(FC)],
+  [m4_define([AC_PROG_FC], defn([AC_PROG_FC])[LT_LANG(FC)])])
+
+dnl The call to [A][M_PROG_GCJ] is quoted like that to stop aclocal
+dnl pulling things in needlessly.
+AC_PROVIDE_IFELSE([AC_PROG_GCJ],
+  [LT_LANG(GCJ)],
+  [AC_PROVIDE_IFELSE([A][M_PROG_GCJ],
+    [LT_LANG(GCJ)],
+    [AC_PROVIDE_IFELSE([LT_PROG_GCJ],
+      [LT_LANG(GCJ)],
+      [m4_ifdef([AC_PROG_GCJ],
+       [m4_define([AC_PROG_GCJ], defn([AC_PROG_GCJ])[LT_LANG(GCJ)])])
+       m4_ifdef([A][M_PROG_GCJ],
+       [m4_define([A][M_PROG_GCJ], defn([A][M_PROG_GCJ])[LT_LANG(GCJ)])])
+       m4_ifdef([LT_PROG_GCJ],
+       [m4_define([LT_PROG_GCJ], defn([LT_PROG_GCJ])[LT_LANG(GCJ)])])])])])
+
+AC_PROVIDE_IFELSE([AC_PROG_GO],
+  [LT_LANG(GO)],
+  [m4_define([AC_PROG_GO], defn([AC_PROG_GO])[LT_LANG(GO)])])
+
+AC_PROVIDE_IFELSE([LT_PROG_RC],
+  [LT_LANG(RC)],
+  [m4_define([LT_PROG_RC], defn([LT_PROG_RC])[LT_LANG(RC)])])
+])# _LT_LANG_DEFAULT_CONFIG
+
+# Obsolete macros:
+AU_DEFUN([AC_LIBTOOL_CXX], [LT_LANG(C++)])
+AU_DEFUN([AC_LIBTOOL_F77], [LT_LANG(Fortran 77)])
+AU_DEFUN([AC_LIBTOOL_FC], [LT_LANG(Fortran)])
+AU_DEFUN([AC_LIBTOOL_GCJ], [LT_LANG(Java)])
+AU_DEFUN([AC_LIBTOOL_RC], [LT_LANG(Windows Resource)])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_LIBTOOL_CXX], [])
+dnl AC_DEFUN([AC_LIBTOOL_F77], [])
+dnl AC_DEFUN([AC_LIBTOOL_FC], [])
+dnl AC_DEFUN([AC_LIBTOOL_GCJ], [])
+dnl AC_DEFUN([AC_LIBTOOL_RC], [])
+
+
+# _LT_TAG_COMPILER
+# ----------------
+m4_defun([_LT_TAG_COMPILER],
+[AC_REQUIRE([AC_PROG_CC])dnl
+
+_LT_DECL([LTCC], [CC], [1], [A C compiler])dnl
+_LT_DECL([LTCFLAGS], [CFLAGS], [1], [LTCC compiler flags])dnl
+_LT_TAGDECL([CC], [compiler], [1], [A language specific compiler])dnl
+_LT_TAGDECL([with_gcc], [GCC], [0], [Is the compiler the GNU compiler?])dnl
+
+# If no C compiler was specified, use CC.
+LTCC=${LTCC-"$CC"}
+
+# If no C compiler flags were specified, use CFLAGS.
+LTCFLAGS=${LTCFLAGS-"$CFLAGS"}
+
+# Allow CC to be a program name with arguments.
+compiler=$CC
+])# _LT_TAG_COMPILER
+
+
+# _LT_COMPILER_BOILERPLATE
+# ------------------------
+# Check for compiler boilerplate output or warnings with
+# the simple compiler test code.
+m4_defun([_LT_COMPILER_BOILERPLATE],
+[m4_require([_LT_DECL_SED])dnl
+ac_outfile=conftest.$ac_objext
+echo "$lt_simple_compile_test_code" >conftest.$ac_ext
+eval "$ac_compile" 2>&1 >/dev/null | $SED '/^$/d; /^ *+/d' >conftest.err
+_lt_compiler_boilerplate=`cat conftest.err`
+$RM conftest*
+])# _LT_COMPILER_BOILERPLATE
+
+
+# _LT_LINKER_BOILERPLATE
+# ----------------------
+# Check for linker boilerplate output or warnings with
+# the simple link test code.
+m4_defun([_LT_LINKER_BOILERPLATE],
+[m4_require([_LT_DECL_SED])dnl
+ac_outfile=conftest.$ac_objext
+echo "$lt_simple_link_test_code" >conftest.$ac_ext
+eval "$ac_link" 2>&1 >/dev/null | $SED '/^$/d; /^ *+/d' >conftest.err
+_lt_linker_boilerplate=`cat conftest.err`
+$RM -r conftest*
+])# _LT_LINKER_BOILERPLATE
+
+# _LT_REQUIRED_DARWIN_CHECKS
+# -------------------------
+m4_defun_once([_LT_REQUIRED_DARWIN_CHECKS],[
+  case $host_os in
+    rhapsody* | darwin*)
+    AC_CHECK_TOOL([DSYMUTIL], [dsymutil], [:])
+    AC_CHECK_TOOL([NMEDIT], [nmedit], [:])
+    AC_CHECK_TOOL([LIPO], [lipo], [:])
+    AC_CHECK_TOOL([OTOOL], [otool], [:])
+    AC_CHECK_TOOL([OTOOL64], [otool64], [:])
+    _LT_DECL([], [DSYMUTIL], [1],
+      [Tool to manipulate archived DWARF debug symbol files on Mac OS X])
+    _LT_DECL([], [NMEDIT], [1],
+      [Tool to change global to local symbols on Mac OS X])
+    _LT_DECL([], [LIPO], [1],
+      [Tool to manipulate fat objects and archives on Mac OS X])
+    _LT_DECL([], [OTOOL], [1],
+      [ldd/readelf like tool for Mach-O binaries on Mac OS X])
+    _LT_DECL([], [OTOOL64], [1],
+      [ldd/readelf like tool for 64 bit Mach-O binaries on Mac OS X 10.4])
+
+    AC_CACHE_CHECK([for -single_module linker flag],[lt_cv_apple_cc_single_mod],
+      [lt_cv_apple_cc_single_mod=no
+      if test -z "$LT_MULTI_MODULE"; then
+       # By default we will add the -single_module flag. You can override
+       # by either setting the environment variable LT_MULTI_MODULE
+       # non-empty at configure time, or by adding -multi_module to the
+       # link flags.
+       rm -rf libconftest.dylib*
+       echo "int foo(void){return 1;}" > conftest.c
+       echo "$LTCC $LTCFLAGS $LDFLAGS -o libconftest.dylib \
+-dynamiclib -Wl,-single_module conftest.c" >&AS_MESSAGE_LOG_FD
+       $LTCC $LTCFLAGS $LDFLAGS -o libconftest.dylib \
+         -dynamiclib -Wl,-single_module conftest.c 2>conftest.err
+        _lt_result=$?
+       # If there is a non-empty error log, and "single_module"
+       # appears in it, assume the flag caused a linker warning
+        if test -s conftest.err && $GREP single_module conftest.err; then
+         cat conftest.err >&AS_MESSAGE_LOG_FD
+       # Otherwise, if the output was created with a 0 exit code from
+       # the compiler, it worked.
+       elif test -f libconftest.dylib && test 0 = "$_lt_result"; then
+         lt_cv_apple_cc_single_mod=yes
+       else
+         cat conftest.err >&AS_MESSAGE_LOG_FD
+       fi
+       rm -rf libconftest.dylib*
+       rm -f conftest.*
+      fi])
+
+    AC_CACHE_CHECK([for -exported_symbols_list linker flag],
+      [lt_cv_ld_exported_symbols_list],
+      [lt_cv_ld_exported_symbols_list=no
+      save_LDFLAGS=$LDFLAGS
+      echo "_main" > conftest.sym
+      LDFLAGS="$LDFLAGS -Wl,-exported_symbols_list,conftest.sym"
+      AC_LINK_IFELSE([AC_LANG_PROGRAM([],[])],
+       [lt_cv_ld_exported_symbols_list=yes],
+       [lt_cv_ld_exported_symbols_list=no])
+       LDFLAGS=$save_LDFLAGS
+    ])
+
+    AC_CACHE_CHECK([for -force_load linker flag],[lt_cv_ld_force_load],
+      [lt_cv_ld_force_load=no
+      cat > conftest.c << _LT_EOF
+int forced_loaded() { return 2;}
+_LT_EOF
+      echo "$LTCC $LTCFLAGS -c -o conftest.o conftest.c" >&AS_MESSAGE_LOG_FD
+      $LTCC $LTCFLAGS -c -o conftest.o conftest.c 2>&AS_MESSAGE_LOG_FD
+      echo "$AR cru libconftest.a conftest.o" >&AS_MESSAGE_LOG_FD
+      $AR cru libconftest.a conftest.o 2>&AS_MESSAGE_LOG_FD
+      echo "$RANLIB libconftest.a" >&AS_MESSAGE_LOG_FD
+      $RANLIB libconftest.a 2>&AS_MESSAGE_LOG_FD
+      cat > conftest.c << _LT_EOF
+int main() { return 0;}
+_LT_EOF
+      echo "$LTCC $LTCFLAGS $LDFLAGS -o conftest conftest.c -Wl,-force_load,./libconftest.a" >&AS_MESSAGE_LOG_FD
+      $LTCC $LTCFLAGS $LDFLAGS -o conftest conftest.c -Wl,-force_load,./libconftest.a 2>conftest.err
+      _lt_result=$?
+      if test -s conftest.err && $GREP force_load conftest.err; then
+       cat conftest.err >&AS_MESSAGE_LOG_FD
+      elif test -f conftest && test 0 = "$_lt_result" && $GREP forced_load conftest >/dev/null 2>&1; then
+       lt_cv_ld_force_load=yes
+      else
+       cat conftest.err >&AS_MESSAGE_LOG_FD
+      fi
+        rm -f conftest.err libconftest.a conftest conftest.c
+        rm -rf conftest.dSYM
+    ])
+    case $host_os in
+    rhapsody* | darwin1.[[012]])
+      _lt_dar_allow_undefined='$wl-undefined ${wl}suppress' ;;
+    darwin1.*)
+      _lt_dar_allow_undefined='$wl-flat_namespace $wl-undefined ${wl}suppress' ;;
+    darwin*) # darwin 5.x on
+      # if running on 10.5 or later, the deployment target defaults
+      # to the OS version, if on x86, and 10.4, the deployment
+      # target defaults to 10.4. Don't you love it?
+      case ${MACOSX_DEPLOYMENT_TARGET-10.0},$host in
+       10.0,*86*-darwin8*|10.0,*-darwin[[91]]*)
+         _lt_dar_allow_undefined='$wl-undefined ${wl}dynamic_lookup' ;;
+       10.[[012]][[,.]]*)
+         _lt_dar_allow_undefined='$wl-flat_namespace $wl-undefined ${wl}suppress' ;;
+       10.*)
+         _lt_dar_allow_undefined='$wl-undefined ${wl}dynamic_lookup' ;;
+      esac
+    ;;
+  esac
+    if test yes = "$lt_cv_apple_cc_single_mod"; then
+      _lt_dar_single_mod='$single_module'
+    fi
+    if test yes = "$lt_cv_ld_exported_symbols_list"; then
+      _lt_dar_export_syms=' $wl-exported_symbols_list,$output_objdir/$libname-symbols.expsym'
+    else
+      _lt_dar_export_syms='~$NMEDIT -s $output_objdir/$libname-symbols.expsym $lib'
+    fi
+    if test : != "$DSYMUTIL" && test no = "$lt_cv_ld_force_load"; then
+      _lt_dsymutil='~$DSYMUTIL $lib || :'
+    else
+      _lt_dsymutil=
+    fi
+    ;;
+  esac
+])
+
+
+# _LT_DARWIN_LINKER_FEATURES([TAG])
+# ---------------------------------
+# Checks for linker and compiler features on darwin
+m4_defun([_LT_DARWIN_LINKER_FEATURES],
+[
+  m4_require([_LT_REQUIRED_DARWIN_CHECKS])
+  _LT_TAGVAR(archive_cmds_need_lc, $1)=no
+  _LT_TAGVAR(hardcode_direct, $1)=no
+  _LT_TAGVAR(hardcode_automatic, $1)=yes
+  _LT_TAGVAR(hardcode_shlibpath_var, $1)=unsupported
+  if test yes = "$lt_cv_ld_force_load"; then
+    _LT_TAGVAR(whole_archive_flag_spec, $1)='`for conv in $convenience\"\"; do test  -n \"$conv\" && new_convenience=\"$new_convenience $wl-force_load,$conv\"; done; func_echo_all \"$new_convenience\"`'
+    m4_case([$1], [F77], [_LT_TAGVAR(compiler_needs_object, $1)=yes],
+                  [FC],  [_LT_TAGVAR(compiler_needs_object, $1)=yes])
+  else
+    _LT_TAGVAR(whole_archive_flag_spec, $1)=''
+  fi
+  _LT_TAGVAR(link_all_deplibs, $1)=yes
+  _LT_TAGVAR(allow_undefined_flag, $1)=$_lt_dar_allow_undefined
+  case $cc_basename in
+     ifort*|nagfor*) _lt_dar_can_shared=yes ;;
+     *) _lt_dar_can_shared=$GCC ;;
+  esac
+  if test yes = "$_lt_dar_can_shared"; then
+    output_verbose_link_cmd=func_echo_all
+    _LT_TAGVAR(archive_cmds, $1)="\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$libobjs \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring $_lt_dar_single_mod$_lt_dsymutil"
+    _LT_TAGVAR(module_cmds, $1)="\$CC \$allow_undefined_flag -o \$lib -bundle \$libobjs \$deplibs \$compiler_flags$_lt_dsymutil"
+    _LT_TAGVAR(archive_expsym_cmds, $1)="sed 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$libobjs \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring $_lt_dar_single_mod$_lt_dar_export_syms$_lt_dsymutil"
+    _LT_TAGVAR(module_expsym_cmds, $1)="sed -e 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC \$allow_undefined_flag -o \$lib -bundle \$libobjs \$deplibs \$compiler_flags$_lt_dar_export_syms$_lt_dsymutil"
+    m4_if([$1], [CXX],
+[   if test yes != "$lt_cv_apple_cc_single_mod"; then
+      _LT_TAGVAR(archive_cmds, $1)="\$CC -r -keep_private_externs -nostdlib -o \$lib-master.o \$libobjs~\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$lib-master.o \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring$_lt_dsymutil"
+      _LT_TAGVAR(archive_expsym_cmds, $1)="sed 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC -r -keep_private_externs -nostdlib -o \$lib-master.o \$libobjs~\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$lib-master.o \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring$_lt_dar_export_syms$_lt_dsymutil"
+    fi
+],[])
+  else
+  _LT_TAGVAR(ld_shlibs, $1)=no
+  fi
+])
+
+# _LT_SYS_MODULE_PATH_AIX([TAGNAME])
+# ----------------------------------
+# Links a minimal program and checks the executable
+# for the system default hardcoded library path. In most cases,
+# this is /usr/lib:/lib, but when the MPI compilers are used
+# the location of the communication and MPI libs are included too.
+# If we don't find anything, use the default library path according
+# to the aix ld manual.
+# Store the results from the different compilers for each TAGNAME.
+# Allow to override them for all tags through lt_cv_aix_libpath.
+m4_defun([_LT_SYS_MODULE_PATH_AIX],
+[m4_require([_LT_DECL_SED])dnl
+if test set = "${lt_cv_aix_libpath+set}"; then
+  aix_libpath=$lt_cv_aix_libpath
+else
+  AC_CACHE_VAL([_LT_TAGVAR([lt_cv_aix_libpath_], [$1])],
+  [AC_LINK_IFELSE([AC_LANG_PROGRAM],[
+  lt_aix_libpath_sed='[
+      /Import File Strings/,/^$/ {
+         /^0/ {
+             s/^0  *\([^ ]*\) *$/\1/
+             p
+         }
+      }]'
+  _LT_TAGVAR([lt_cv_aix_libpath_], [$1])=`dump -H conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"`
+  # Check for a 64-bit object if we didn't find anything.
+  if test -z "$_LT_TAGVAR([lt_cv_aix_libpath_], [$1])"; then
+    _LT_TAGVAR([lt_cv_aix_libpath_], [$1])=`dump -HX64 conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"`
+  fi],[])
+  if test -z "$_LT_TAGVAR([lt_cv_aix_libpath_], [$1])"; then
+    _LT_TAGVAR([lt_cv_aix_libpath_], [$1])=/usr/lib:/lib
+  fi
+  ])
+  aix_libpath=$_LT_TAGVAR([lt_cv_aix_libpath_], [$1])
+fi
+])# _LT_SYS_MODULE_PATH_AIX
+
+
+# _LT_SHELL_INIT(ARG)
+# -------------------
+m4_define([_LT_SHELL_INIT],
+[m4_divert_text([M4SH-INIT], [$1
+])])# _LT_SHELL_INIT
+
+
+
+# _LT_PROG_ECHO_BACKSLASH
+# -----------------------
+# Find how we can fake an echo command that does not interpret backslash.
+# In particular, with Autoconf 2.60 or later we add some code to the start
+# of the generated configure script that will find a shell with a builtin
+# printf (that we can use as an echo command).
+m4_defun([_LT_PROG_ECHO_BACKSLASH],
+[ECHO='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\'
+ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO
+ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO$ECHO
+
+AC_MSG_CHECKING([how to print strings])
+# Test print first, because it will be a builtin if present.
+if test "X`( print -r -- -n ) 2>/dev/null`" = X-n && \
+   test "X`print -r -- $ECHO 2>/dev/null`" = "X$ECHO"; then
+  ECHO='print -r --'
+elif test "X`printf %s $ECHO 2>/dev/null`" = "X$ECHO"; then
+  ECHO='printf %s\n'
+else
+  # Use this function as a fallback that always works.
+  func_fallback_echo ()
+  {
+    eval 'cat <<_LTECHO_EOF
+$[]1
+_LTECHO_EOF'
+  }
+  ECHO='func_fallback_echo'
+fi
+
+# func_echo_all arg...
+# Invoke $ECHO with all args, space-separated.
+func_echo_all ()
+{
+    $ECHO "$*"
+}
+
+case $ECHO in
+  printf*) AC_MSG_RESULT([printf]) ;;
+  print*) AC_MSG_RESULT([print -r]) ;;
+  *) AC_MSG_RESULT([cat]) ;;
+esac
+
+m4_ifdef([_AS_DETECT_SUGGESTED],
+[_AS_DETECT_SUGGESTED([
+  test -n "${ZSH_VERSION+set}${BASH_VERSION+set}" || (
+    ECHO='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\'
+    ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO
+    ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO$ECHO
+    PATH=/empty FPATH=/empty; export PATH FPATH
+    test "X`printf %s $ECHO`" = "X$ECHO" \
+      || test "X`print -r -- $ECHO`" = "X$ECHO" )])])
+
+_LT_DECL([], [SHELL], [1], [Shell to use when invoking shell scripts])
+_LT_DECL([], [ECHO], [1], [An echo program that protects backslashes])
+])# _LT_PROG_ECHO_BACKSLASH
+
+
+# _LT_WITH_SYSROOT
+# ----------------
+AC_DEFUN([_LT_WITH_SYSROOT],
+[AC_MSG_CHECKING([for sysroot])
+AC_ARG_WITH([sysroot],
+[AS_HELP_STRING([--with-sysroot@<:@=DIR@:>@],
+  [Search for dependent libraries within DIR (or the compiler's sysroot
+   if not specified).])],
+[], [with_sysroot=no])
+
+dnl lt_sysroot will always be passed unquoted.  We quote it here
+dnl in case the user passed a directory name.
+lt_sysroot=
+case $with_sysroot in #(
+ yes)
+   if test yes = "$GCC"; then
+     lt_sysroot=`$CC --print-sysroot 2>/dev/null`
+   fi
+   ;; #(
+ /*)
+   lt_sysroot=`echo "$with_sysroot" | sed -e "$sed_quote_subst"`
+   ;; #(
+ no|'')
+   ;; #(
+ *)
+   AC_MSG_RESULT([$with_sysroot])
+   AC_MSG_ERROR([The sysroot must be an absolute path.])
+   ;;
+esac
+
+ AC_MSG_RESULT([${lt_sysroot:-no}])
+_LT_DECL([], [lt_sysroot], [0], [The root where to search for ]dnl
+[dependent libraries, and where our libraries should be installed.])])
+
+# _LT_ENABLE_LOCK
+# ---------------
+m4_defun([_LT_ENABLE_LOCK],
+[AC_ARG_ENABLE([libtool-lock],
+  [AS_HELP_STRING([--disable-libtool-lock],
+    [avoid locking (might break parallel builds)])])
+test no = "$enable_libtool_lock" || enable_libtool_lock=yes
+
+# Some flags need to be propagated to the compiler or linker for good
+# libtool support.
+case $host in
+ia64-*-hpux*)
+  # Find out what ABI is being produced by ac_compile, and set mode
+  # options accordingly.
+  echo 'int i;' > conftest.$ac_ext
+  if AC_TRY_EVAL(ac_compile); then
+    case `/usr/bin/file conftest.$ac_objext` in
+      *ELF-32*)
+       HPUX_IA64_MODE=32
+       ;;
+      *ELF-64*)
+       HPUX_IA64_MODE=64
+       ;;
+    esac
+  fi
+  rm -rf conftest*
+  ;;
+*-*-irix6*)
+  # Find out what ABI is being produced by ac_compile, and set linker
+  # options accordingly.
+  echo '[#]line '$LINENO' "configure"' > conftest.$ac_ext
+  if AC_TRY_EVAL(ac_compile); then
+    if test yes = "$lt_cv_prog_gnu_ld"; then
+      case `/usr/bin/file conftest.$ac_objext` in
+       *32-bit*)
+         LD="${LD-ld} -melf32bsmip"
+         ;;
+       *N32*)
+         LD="${LD-ld} -melf32bmipn32"
+         ;;
+       *64-bit*)
+         LD="${LD-ld} -melf64bmip"
+       ;;
+      esac
+    else
+      case `/usr/bin/file conftest.$ac_objext` in
+       *32-bit*)
+         LD="${LD-ld} -32"
+         ;;
+       *N32*)
+         LD="${LD-ld} -n32"
+         ;;
+       *64-bit*)
+         LD="${LD-ld} -64"
+         ;;
+      esac
+    fi
+  fi
+  rm -rf conftest*
+  ;;
+
+mips64*-*linux*)
+  # Find out what ABI is being produced by ac_compile, and set linker
+  # options accordingly.
+  echo '[#]line '$LINENO' "configure"' > conftest.$ac_ext
+  if AC_TRY_EVAL(ac_compile); then
+    emul=elf
+    case `/usr/bin/file conftest.$ac_objext` in
+      *32-bit*)
+       emul="${emul}32"
+       ;;
+      *64-bit*)
+       emul="${emul}64"
+       ;;
+    esac
+    case `/usr/bin/file conftest.$ac_objext` in
+      *MSB*)
+       emul="${emul}btsmip"
+       ;;
+      *LSB*)
+       emul="${emul}ltsmip"
+       ;;
+    esac
+    case `/usr/bin/file conftest.$ac_objext` in
+      *N32*)
+       emul="${emul}n32"
+       ;;
+    esac
+    LD="${LD-ld} -m $emul"
+  fi
+  rm -rf conftest*
+  ;;
+
+x86_64-*kfreebsd*-gnu|x86_64-*linux*|powerpc*-*linux*| \
+s390*-*linux*|s390*-*tpf*|sparc*-*linux*)
+  # Find out what ABI is being produced by ac_compile, and set linker
+  # options accordingly.  Note that the listed cases only cover the
+  # situations where additional linker options are needed (such as when
+  # doing 32-bit compilation for a host where ld defaults to 64-bit, or
+  # vice versa); the common cases where no linker options are needed do
+  # not appear in the list.
+  echo 'int i;' > conftest.$ac_ext
+  if AC_TRY_EVAL(ac_compile); then
+    case `/usr/bin/file conftest.o` in
+      *32-bit*)
+       case $host in
+         x86_64-*kfreebsd*-gnu)
+           LD="${LD-ld} -m elf_i386_fbsd"
+           ;;
+         x86_64-*linux*)
+           case `/usr/bin/file conftest.o` in
+             *x86-64*)
+               LD="${LD-ld} -m elf32_x86_64"
+               ;;
+             *)
+               LD="${LD-ld} -m elf_i386"
+               ;;
+           esac
+           ;;
+         powerpc64le-*linux*)
+           LD="${LD-ld} -m elf32lppclinux"
+           ;;
+         powerpc64-*linux*)
+           LD="${LD-ld} -m elf32ppclinux"
+           ;;
+         s390x-*linux*)
+           LD="${LD-ld} -m elf_s390"
+           ;;
+         sparc64-*linux*)
+           LD="${LD-ld} -m elf32_sparc"
+           ;;
+       esac
+       ;;
+      *64-bit*)
+       case $host in
+         x86_64-*kfreebsd*-gnu)
+           LD="${LD-ld} -m elf_x86_64_fbsd"
+           ;;
+         x86_64-*linux*)
+           LD="${LD-ld} -m elf_x86_64"
+           ;;
+         powerpcle-*linux*)
+           LD="${LD-ld} -m elf64lppc"
+           ;;
+         powerpc-*linux*)
+           LD="${LD-ld} -m elf64ppc"
+           ;;
+         s390*-*linux*|s390*-*tpf*)
+           LD="${LD-ld} -m elf64_s390"
+           ;;
+         sparc*-*linux*)
+           LD="${LD-ld} -m elf64_sparc"
+           ;;
+       esac
+       ;;
+    esac
+  fi
+  rm -rf conftest*
+  ;;
+
+*-*-sco3.2v5*)
+  # On SCO OpenServer 5, we need -belf to get full-featured binaries.
+  SAVE_CFLAGS=$CFLAGS
+  CFLAGS="$CFLAGS -belf"
+  AC_CACHE_CHECK([whether the C compiler needs -belf], lt_cv_cc_needs_belf,
+    [AC_LANG_PUSH(C)
+     AC_LINK_IFELSE([AC_LANG_PROGRAM([[]],[[]])],[lt_cv_cc_needs_belf=yes],[lt_cv_cc_needs_belf=no])
+     AC_LANG_POP])
+  if test yes != "$lt_cv_cc_needs_belf"; then
+    # this is probably gcc 2.8.0, egcs 1.0 or newer; no need for -belf
+    CFLAGS=$SAVE_CFLAGS
+  fi
+  ;;
+*-*solaris*)
+  # Find out what ABI is being produced by ac_compile, and set linker
+  # options accordingly.
+  echo 'int i;' > conftest.$ac_ext
+  if AC_TRY_EVAL(ac_compile); then
+    case `/usr/bin/file conftest.o` in
+    *64-bit*)
+      case $lt_cv_prog_gnu_ld in
+      yes*)
+        case $host in
+        i?86-*-solaris*|x86_64-*-solaris*)
+          LD="${LD-ld} -m elf_x86_64"
+          ;;
+        sparc*-*-solaris*)
+          LD="${LD-ld} -m elf64_sparc"
+          ;;
+        esac
+        # GNU ld 2.21 introduced _sol2 emulations.  Use them if available.
+        if ${LD-ld} -V | grep _sol2 >/dev/null 2>&1; then
+          LD=${LD-ld}_sol2
+        fi
+        ;;
+      *)
+       if ${LD-ld} -64 -r -o conftest2.o conftest.o >/dev/null 2>&1; then
+         LD="${LD-ld} -64"
+       fi
+       ;;
+      esac
+      ;;
+    esac
+  fi
+  rm -rf conftest*
+  ;;
+esac
+
+need_locks=$enable_libtool_lock
+])# _LT_ENABLE_LOCK
+
+
+# _LT_PROG_AR
+# -----------
+m4_defun([_LT_PROG_AR],
+[AC_CHECK_TOOLS(AR, [ar], false)
+: ${AR=ar}
+: ${AR_FLAGS=cru}
+_LT_DECL([], [AR], [1], [The archiver])
+_LT_DECL([], [AR_FLAGS], [1], [Flags to create an archive])
+
+AC_CACHE_CHECK([for archiver @FILE support], [lt_cv_ar_at_file],
+  [lt_cv_ar_at_file=no
+   AC_COMPILE_IFELSE([AC_LANG_PROGRAM],
+     [echo conftest.$ac_objext > conftest.lst
+      lt_ar_try='$AR $AR_FLAGS libconftest.a @conftest.lst >&AS_MESSAGE_LOG_FD'
+      AC_TRY_EVAL([lt_ar_try])
+      if test 0 -eq "$ac_status"; then
+       # Ensure the archiver fails upon bogus file names.
+       rm -f conftest.$ac_objext libconftest.a
+       AC_TRY_EVAL([lt_ar_try])
+       if test 0 -ne "$ac_status"; then
+          lt_cv_ar_at_file=@
+        fi
+      fi
+      rm -f conftest.* libconftest.a
+     ])
+  ])
+
+if test no = "$lt_cv_ar_at_file"; then
+  archiver_list_spec=
+else
+  archiver_list_spec=$lt_cv_ar_at_file
+fi
+_LT_DECL([], [archiver_list_spec], [1],
+  [How to feed a file listing to the archiver])
+])# _LT_PROG_AR
+
+
+# _LT_CMD_OLD_ARCHIVE
+# -------------------
+m4_defun([_LT_CMD_OLD_ARCHIVE],
+[_LT_PROG_AR
+
+AC_CHECK_TOOL(STRIP, strip, :)
+test -z "$STRIP" && STRIP=:
+_LT_DECL([], [STRIP], [1], [A symbol stripping program])
+
+AC_CHECK_TOOL(RANLIB, ranlib, :)
+test -z "$RANLIB" && RANLIB=:
+_LT_DECL([], [RANLIB], [1],
+    [Commands used to install an old-style archive])
+
+# Determine commands to create old-style static archives.
+old_archive_cmds='$AR $AR_FLAGS $oldlib$oldobjs'
+old_postinstall_cmds='chmod 644 $oldlib'
+old_postuninstall_cmds=
+
+if test -n "$RANLIB"; then
+  case $host_os in
+  bitrig* | openbsd*)
+    old_postinstall_cmds="$old_postinstall_cmds~\$RANLIB -t \$tool_oldlib"
+    ;;
+  *)
+    old_postinstall_cmds="$old_postinstall_cmds~\$RANLIB \$tool_oldlib"
+    ;;
+  esac
+  old_archive_cmds="$old_archive_cmds~\$RANLIB \$tool_oldlib"
+fi
+
+case $host_os in
+  darwin*)
+    lock_old_archive_extraction=yes ;;
+  *)
+    lock_old_archive_extraction=no ;;
+esac
+_LT_DECL([], [old_postinstall_cmds], [2])
+_LT_DECL([], [old_postuninstall_cmds], [2])
+_LT_TAGDECL([], [old_archive_cmds], [2],
+    [Commands used to build an old-style archive])
+_LT_DECL([], [lock_old_archive_extraction], [0],
+    [Whether to use a lock for old archive extraction])
+])# _LT_CMD_OLD_ARCHIVE
+
+
+# _LT_COMPILER_OPTION(MESSAGE, VARIABLE-NAME, FLAGS,
+#              [OUTPUT-FILE], [ACTION-SUCCESS], [ACTION-FAILURE])
+# ----------------------------------------------------------------
+# Check whether the given compiler option works
+AC_DEFUN([_LT_COMPILER_OPTION],
+[m4_require([_LT_FILEUTILS_DEFAULTS])dnl
+m4_require([_LT_DECL_SED])dnl
+AC_CACHE_CHECK([$1], [$2],
+  [$2=no
+   m4_if([$4], , [ac_outfile=conftest.$ac_objext], [ac_outfile=$4])
+   echo "$lt_simple_compile_test_code" > conftest.$ac_ext
+   lt_compiler_flag="$3"  ## exclude from sc_useless_quotes_in_assignment
+   # Insert the option either (1) after the last *FLAGS variable, or
+   # (2) before a word containing "conftest.", or (3) at the end.
+   # Note that $ac_compile itself does not contain backslashes and begins
+   # with a dollar sign (not a hyphen), so the echo should work correctly.
+   # The option is referenced via a variable to avoid confusing sed.
+   lt_compile=`echo "$ac_compile" | $SED \
+   -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \
+   -e 's: [[^ ]]*conftest\.: $lt_compiler_flag&:; t' \
+   -e 's:$: $lt_compiler_flag:'`
+   (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&AS_MESSAGE_LOG_FD)
+   (eval "$lt_compile" 2>conftest.err)
+   ac_status=$?
+   cat conftest.err >&AS_MESSAGE_LOG_FD
+   echo "$as_me:$LINENO: \$? = $ac_status" >&AS_MESSAGE_LOG_FD
+   if (exit $ac_status) && test -s "$ac_outfile"; then
+     # The compiler can only warn and ignore the option if not recognized
+     # So say no if there are warnings other than the usual output.
+     $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' >conftest.exp
+     $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2
+     if test ! -s conftest.er2 || diff conftest.exp conftest.er2 >/dev/null; then
+       $2=yes
+     fi
+   fi
+   $RM conftest*
+])
+
+if test yes = "[$]$2"; then
+    m4_if([$5], , :, [$5])
+else
+    m4_if([$6], , :, [$6])
+fi
+])# _LT_COMPILER_OPTION
+
+# Old name:
+AU_ALIAS([AC_LIBTOOL_COMPILER_OPTION], [_LT_COMPILER_OPTION])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_LIBTOOL_COMPILER_OPTION], [])
+
+
+# _LT_LINKER_OPTION(MESSAGE, VARIABLE-NAME, FLAGS,
+#                  [ACTION-SUCCESS], [ACTION-FAILURE])
+# ----------------------------------------------------
+# Check whether the given linker option works
+AC_DEFUN([_LT_LINKER_OPTION],
+[m4_require([_LT_FILEUTILS_DEFAULTS])dnl
+m4_require([_LT_DECL_SED])dnl
+AC_CACHE_CHECK([$1], [$2],
+  [$2=no
+   save_LDFLAGS=$LDFLAGS
+   LDFLAGS="$LDFLAGS $3"
+   echo "$lt_simple_link_test_code" > conftest.$ac_ext
+   if (eval $ac_link 2>conftest.err) && test -s conftest$ac_exeext; then
+     # The linker can only warn and ignore the option if not recognized
+     # So say no if there are warnings
+     if test -s conftest.err; then
+       # Append any errors to the config.log.
+       cat conftest.err 1>&AS_MESSAGE_LOG_FD
+       $ECHO "$_lt_linker_boilerplate" | $SED '/^$/d' > conftest.exp
+       $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2
+       if diff conftest.exp conftest.er2 >/dev/null; then
+         $2=yes
+       fi
+     else
+       $2=yes
+     fi
+   fi
+   $RM -r conftest*
+   LDFLAGS=$save_LDFLAGS
+])
+
+if test yes = "[$]$2"; then
+    m4_if([$4], , :, [$4])
+else
+    m4_if([$5], , :, [$5])
+fi
+])# _LT_LINKER_OPTION
+
+# Old name:
+AU_ALIAS([AC_LIBTOOL_LINKER_OPTION], [_LT_LINKER_OPTION])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_LIBTOOL_LINKER_OPTION], [])
+
+
+# LT_CMD_MAX_LEN
+#---------------
+AC_DEFUN([LT_CMD_MAX_LEN],
+[AC_REQUIRE([AC_CANONICAL_HOST])dnl
+# find the maximum length of command line arguments
+AC_MSG_CHECKING([the maximum length of command line arguments])
+AC_CACHE_VAL([lt_cv_sys_max_cmd_len], [dnl
+  i=0
+  teststring=ABCD
+
+  case $build_os in
+  msdosdjgpp*)
+    # On DJGPP, this test can blow up pretty badly due to problems in libc
+    # (any single argument exceeding 2000 bytes causes a buffer overrun
+    # during glob expansion).  Even if it were fixed, the result of this
+    # check would be larger than it should be.
+    lt_cv_sys_max_cmd_len=12288;    # 12K is about right
+    ;;
+
+  gnu*)
+    # Under GNU Hurd, this test is not required because there is
+    # no limit to the length of command line arguments.
+    # Libtool will interpret -1 as no limit whatsoever
+    lt_cv_sys_max_cmd_len=-1;
+    ;;
+
+  cygwin* | mingw* | cegcc*)
+    # On Win9x/ME, this test blows up -- it succeeds, but takes
+    # about 5 minutes as the teststring grows exponentially.
+    # Worse, since 9x/ME are not pre-emptively multitasking,
+    # you end up with a "frozen" computer, even though with patience
+    # the test eventually succeeds (with a max line length of 256k).
+    # Instead, let's just punt: use the minimum linelength reported by
+    # all of the supported platforms: 8192 (on NT/2K/XP).
+    lt_cv_sys_max_cmd_len=8192;
+    ;;
+
+  mint*)
+    # On MiNT this can take a long time and run out of memory.
+    lt_cv_sys_max_cmd_len=8192;
+    ;;
+
+  amigaos*)
+    # On AmigaOS with pdksh, this test takes hours, literally.
+    # So we just punt and use a minimum line length of 8192.
+    lt_cv_sys_max_cmd_len=8192;
+    ;;
+
+  bitrig* | darwin* | dragonfly* | freebsd* | netbsd* | openbsd*)
+    # This has been around since 386BSD, at least.  Likely further.
+    if test -x /sbin/sysctl; then
+      lt_cv_sys_max_cmd_len=`/sbin/sysctl -n kern.argmax`
+    elif test -x /usr/sbin/sysctl; then
+      lt_cv_sys_max_cmd_len=`/usr/sbin/sysctl -n kern.argmax`
+    else
+      lt_cv_sys_max_cmd_len=65536      # usable default for all BSDs
+    fi
+    # And add a safety zone
+    lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 4`
+    lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \* 3`
+    ;;
+
+  interix*)
+    # We know the value 262144 and hardcode it with a safety zone (like BSD)
+    lt_cv_sys_max_cmd_len=196608
+    ;;
+
+  os2*)
+    # The test takes a long time on OS/2.
+    lt_cv_sys_max_cmd_len=8192
+    ;;
+
+  osf*)
+    # Dr. Hans Ekkehard Plesser reports seeing a kernel panic running configure
+    # due to this test when exec_disable_arg_limit is 1 on Tru64. It is not
+    # nice to cause kernel panics so lets avoid the loop below.
+    # First set a reasonable default.
+    lt_cv_sys_max_cmd_len=16384
+    #
+    if test -x /sbin/sysconfig; then
+      case `/sbin/sysconfig -q proc exec_disable_arg_limit` in
+        *1*) lt_cv_sys_max_cmd_len=-1 ;;
+      esac
+    fi
+    ;;
+  sco3.2v5*)
+    lt_cv_sys_max_cmd_len=102400
+    ;;
+  sysv5* | sco5v6* | sysv4.2uw2*)
+    kargmax=`grep ARG_MAX /etc/conf/cf.d/stune 2>/dev/null`
+    if test -n "$kargmax"; then
+      lt_cv_sys_max_cmd_len=`echo $kargmax | sed 's/.*[[        ]]//'`
+    else
+      lt_cv_sys_max_cmd_len=32768
+    fi
+    ;;
+  *)
+    lt_cv_sys_max_cmd_len=`(getconf ARG_MAX) 2> /dev/null`
+    if test -n "$lt_cv_sys_max_cmd_len" && \
+       test undefined != "$lt_cv_sys_max_cmd_len"; then
+      lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 4`
+      lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \* 3`
+    else
+      # Make teststring a little bigger before we do anything with it.
+      # a 1K string should be a reasonable start.
+      for i in 1 2 3 4 5 6 7 8; do
+        teststring=$teststring$teststring
+      done
+      SHELL=${SHELL-${CONFIG_SHELL-/bin/sh}}
+      # If test is not a shell built-in, we'll probably end up computing a
+      # maximum length that is only half of the actual maximum length, but
+      # we can't tell.
+      while { test X`env echo "$teststring$teststring" 2>/dev/null` \
+                = "X$teststring$teststring"; } >/dev/null 2>&1 &&
+             test 17 != "$i" # 1/2 MB should be enough
+      do
+        i=`expr $i + 1`
+        teststring=$teststring$teststring
+      done
+      # Only check the string length outside the loop.
+      lt_cv_sys_max_cmd_len=`expr "X$teststring" : ".*" 2>&1`
+      teststring=
+      # Add a significant safety factor because C++ compilers can tack on
+      # massive amounts of additional arguments before passing them to the
+      # linker.  It appears as though 1/2 is a usable value.
+      lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 2`
+    fi
+    ;;
+  esac
+])
+if test -n "$lt_cv_sys_max_cmd_len"; then
+  AC_MSG_RESULT($lt_cv_sys_max_cmd_len)
+else
+  AC_MSG_RESULT(none)
+fi
+max_cmd_len=$lt_cv_sys_max_cmd_len
+_LT_DECL([], [max_cmd_len], [0],
+    [What is the maximum length of a command?])
+])# LT_CMD_MAX_LEN
+
+# Old name:
+AU_ALIAS([AC_LIBTOOL_SYS_MAX_CMD_LEN], [LT_CMD_MAX_LEN])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_LIBTOOL_SYS_MAX_CMD_LEN], [])
+
+
+# _LT_HEADER_DLFCN
+# ----------------
+m4_defun([_LT_HEADER_DLFCN],
+[AC_CHECK_HEADERS([dlfcn.h], [], [], [AC_INCLUDES_DEFAULT])dnl
+])# _LT_HEADER_DLFCN
+
+
+# _LT_TRY_DLOPEN_SELF (ACTION-IF-TRUE, ACTION-IF-TRUE-W-USCORE,
+#                      ACTION-IF-FALSE, ACTION-IF-CROSS-COMPILING)
+# ----------------------------------------------------------------
+m4_defun([_LT_TRY_DLOPEN_SELF],
+[m4_require([_LT_HEADER_DLFCN])dnl
+if test yes = "$cross_compiling"; then :
+  [$4]
+else
+  lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2
+  lt_status=$lt_dlunknown
+  cat > conftest.$ac_ext <<_LT_EOF
+[#line $LINENO "configure"
+#include "confdefs.h"
+
+#if HAVE_DLFCN_H
+#include <dlfcn.h>
+#endif
+
+#include <stdio.h>
+
+#ifdef RTLD_GLOBAL
+#  define LT_DLGLOBAL          RTLD_GLOBAL
+#else
+#  ifdef DL_GLOBAL
+#    define LT_DLGLOBAL                DL_GLOBAL
+#  else
+#    define LT_DLGLOBAL                0
+#  endif
+#endif
+
+/* We may have to define LT_DLLAZY_OR_NOW in the command line if we
+   find out it does not work in some platform. */
+#ifndef LT_DLLAZY_OR_NOW
+#  ifdef RTLD_LAZY
+#    define LT_DLLAZY_OR_NOW           RTLD_LAZY
+#  else
+#    ifdef DL_LAZY
+#      define LT_DLLAZY_OR_NOW         DL_LAZY
+#    else
+#      ifdef RTLD_NOW
+#        define LT_DLLAZY_OR_NOW       RTLD_NOW
+#      else
+#        ifdef DL_NOW
+#          define LT_DLLAZY_OR_NOW     DL_NOW
+#        else
+#          define LT_DLLAZY_OR_NOW     0
+#        endif
+#      endif
+#    endif
+#  endif
+#endif
+
+/* When -fvisibility=hidden is used, assume the code has been annotated
+   correspondingly for the symbols needed.  */
+#if defined __GNUC__ && (((__GNUC__ == 3) && (__GNUC_MINOR__ >= 3)) || (__GNUC__ > 3))
+int fnord () __attribute__((visibility("default")));
+#endif
+
+int fnord () { return 42; }
+int main ()
+{
+  void *self = dlopen (0, LT_DLGLOBAL|LT_DLLAZY_OR_NOW);
+  int status = $lt_dlunknown;
+
+  if (self)
+    {
+      if (dlsym (self,"fnord"))       status = $lt_dlno_uscore;
+      else
+        {
+         if (dlsym( self,"_fnord"))  status = $lt_dlneed_uscore;
+          else puts (dlerror ());
+       }
+      /* dlclose (self); */
+    }
+  else
+    puts (dlerror ());
+
+  return status;
+}]
+_LT_EOF
+  if AC_TRY_EVAL(ac_link) && test -s "conftest$ac_exeext" 2>/dev/null; then
+    (./conftest; exit; ) >&AS_MESSAGE_LOG_FD 2>/dev/null
+    lt_status=$?
+    case x$lt_status in
+      x$lt_dlno_uscore) $1 ;;
+      x$lt_dlneed_uscore) $2 ;;
+      x$lt_dlunknown|x*) $3 ;;
+    esac
+  else :
+    # compilation failed
+    $3
+  fi
+fi
+rm -fr conftest*
+])# _LT_TRY_DLOPEN_SELF
+
+
+# LT_SYS_DLOPEN_SELF
+# ------------------
+AC_DEFUN([LT_SYS_DLOPEN_SELF],
+[m4_require([_LT_HEADER_DLFCN])dnl
+if test yes != "$enable_dlopen"; then
+  enable_dlopen=unknown
+  enable_dlopen_self=unknown
+  enable_dlopen_self_static=unknown
+else
+  lt_cv_dlopen=no
+  lt_cv_dlopen_libs=
+
+  case $host_os in
+  beos*)
+    lt_cv_dlopen=load_add_on
+    lt_cv_dlopen_libs=
+    lt_cv_dlopen_self=yes
+    ;;
+
+  mingw* | pw32* | cegcc*)
+    lt_cv_dlopen=LoadLibrary
+    lt_cv_dlopen_libs=
+    ;;
+
+  cygwin*)
+    lt_cv_dlopen=dlopen
+    lt_cv_dlopen_libs=
+    ;;
+
+  darwin*)
+    # if libdl is installed we need to link against it
+    AC_CHECK_LIB([dl], [dlopen],
+               [lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-ldl],[
+    lt_cv_dlopen=dyld
+    lt_cv_dlopen_libs=
+    lt_cv_dlopen_self=yes
+    ])
+    ;;
+
+  tpf*)
+    # Don't try to run any link tests for TPF.  We know it's impossible
+    # because TPF is a cross-compiler, and we know how we open DSOs.
+    lt_cv_dlopen=dlopen
+    lt_cv_dlopen_libs=
+    lt_cv_dlopen_self=no
+    ;;
+
+  *)
+    AC_CHECK_FUNC([shl_load],
+         [lt_cv_dlopen=shl_load],
+      [AC_CHECK_LIB([dld], [shl_load],
+           [lt_cv_dlopen=shl_load lt_cv_dlopen_libs=-ldld],
+       [AC_CHECK_FUNC([dlopen],
+             [lt_cv_dlopen=dlopen],
+         [AC_CHECK_LIB([dl], [dlopen],
+               [lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-ldl],
+           [AC_CHECK_LIB([svld], [dlopen],
+                 [lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-lsvld],
+             [AC_CHECK_LIB([dld], [dld_link],
+                   [lt_cv_dlopen=dld_link lt_cv_dlopen_libs=-ldld])
+             ])
+           ])
+         ])
+       ])
+      ])
+    ;;
+  esac
+
+  if test no = "$lt_cv_dlopen"; then
+    enable_dlopen=no
+  else
+    enable_dlopen=yes
+  fi
+
+  case $lt_cv_dlopen in
+  dlopen)
+    save_CPPFLAGS=$CPPFLAGS
+    test yes = "$ac_cv_header_dlfcn_h" && CPPFLAGS="$CPPFLAGS -DHAVE_DLFCN_H"
+
+    save_LDFLAGS=$LDFLAGS
+    wl=$lt_prog_compiler_wl eval LDFLAGS=\"\$LDFLAGS $export_dynamic_flag_spec\"
+
+    save_LIBS=$LIBS
+    LIBS="$lt_cv_dlopen_libs $LIBS"
+
+    AC_CACHE_CHECK([whether a program can dlopen itself],
+         lt_cv_dlopen_self, [dnl
+         _LT_TRY_DLOPEN_SELF(
+           lt_cv_dlopen_self=yes, lt_cv_dlopen_self=yes,
+           lt_cv_dlopen_self=no, lt_cv_dlopen_self=cross)
+    ])
+
+    if test yes = "$lt_cv_dlopen_self"; then
+      wl=$lt_prog_compiler_wl eval LDFLAGS=\"\$LDFLAGS $lt_prog_compiler_static\"
+      AC_CACHE_CHECK([whether a statically linked program can dlopen itself],
+         lt_cv_dlopen_self_static, [dnl
+         _LT_TRY_DLOPEN_SELF(
+           lt_cv_dlopen_self_static=yes, lt_cv_dlopen_self_static=yes,
+           lt_cv_dlopen_self_static=no,  lt_cv_dlopen_self_static=cross)
+      ])
+    fi
+
+    CPPFLAGS=$save_CPPFLAGS
+    LDFLAGS=$save_LDFLAGS
+    LIBS=$save_LIBS
+    ;;
+  esac
+
+  case $lt_cv_dlopen_self in
+  yes|no) enable_dlopen_self=$lt_cv_dlopen_self ;;
+  *) enable_dlopen_self=unknown ;;
+  esac
+
+  case $lt_cv_dlopen_self_static in
+  yes|no) enable_dlopen_self_static=$lt_cv_dlopen_self_static ;;
+  *) enable_dlopen_self_static=unknown ;;
+  esac
+fi
+_LT_DECL([dlopen_support], [enable_dlopen], [0],
+        [Whether dlopen is supported])
+_LT_DECL([dlopen_self], [enable_dlopen_self], [0],
+        [Whether dlopen of programs is supported])
+_LT_DECL([dlopen_self_static], [enable_dlopen_self_static], [0],
+        [Whether dlopen of statically linked programs is supported])
+])# LT_SYS_DLOPEN_SELF
+
+# Old name:
+AU_ALIAS([AC_LIBTOOL_DLOPEN_SELF], [LT_SYS_DLOPEN_SELF])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_LIBTOOL_DLOPEN_SELF], [])
+
+
+# _LT_COMPILER_C_O([TAGNAME])
+# ---------------------------
+# Check to see if options -c and -o are simultaneously supported by compiler.
+# This macro does not hard code the compiler like AC_PROG_CC_C_O.
+m4_defun([_LT_COMPILER_C_O],
+[m4_require([_LT_DECL_SED])dnl
+m4_require([_LT_FILEUTILS_DEFAULTS])dnl
+m4_require([_LT_TAG_COMPILER])dnl
+AC_CACHE_CHECK([if $compiler supports -c -o file.$ac_objext],
+  [_LT_TAGVAR(lt_cv_prog_compiler_c_o, $1)],
+  [_LT_TAGVAR(lt_cv_prog_compiler_c_o, $1)=no
+   $RM -r conftest 2>/dev/null
+   mkdir conftest
+   cd conftest
+   mkdir out
+   echo "$lt_simple_compile_test_code" > conftest.$ac_ext
+
+   lt_compiler_flag="-o out/conftest2.$ac_objext"
+   # Insert the option either (1) after the last *FLAGS variable, or
+   # (2) before a word containing "conftest.", or (3) at the end.
+   # Note that $ac_compile itself does not contain backslashes and begins
+   # with a dollar sign (not a hyphen), so the echo should work correctly.
+   lt_compile=`echo "$ac_compile" | $SED \
+   -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \
+   -e 's: [[^ ]]*conftest\.: $lt_compiler_flag&:; t' \
+   -e 's:$: $lt_compiler_flag:'`
+   (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&AS_MESSAGE_LOG_FD)
+   (eval "$lt_compile" 2>out/conftest.err)
+   ac_status=$?
+   cat out/conftest.err >&AS_MESSAGE_LOG_FD
+   echo "$as_me:$LINENO: \$? = $ac_status" >&AS_MESSAGE_LOG_FD
+   if (exit $ac_status) && test -s out/conftest2.$ac_objext
+   then
+     # The compiler can only warn and ignore the option if not recognized
+     # So say no if there are warnings
+     $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' > out/conftest.exp
+     $SED '/^$/d; /^ *+/d' out/conftest.err >out/conftest.er2
+     if test ! -s out/conftest.er2 || diff out/conftest.exp out/conftest.er2 >/dev/null; then
+       _LT_TAGVAR(lt_cv_prog_compiler_c_o, $1)=yes
+     fi
+   fi
+   chmod u+w . 2>&AS_MESSAGE_LOG_FD
+   $RM conftest*
+   # SGI C++ compiler will create directory out/ii_files/ for
+   # template instantiation
+   test -d out/ii_files && $RM out/ii_files/* && rmdir out/ii_files
+   $RM out/* && rmdir out
+   cd ..
+   $RM -r conftest
+   $RM conftest*
+])
+_LT_TAGDECL([compiler_c_o], [lt_cv_prog_compiler_c_o], [1],
+       [Does compiler simultaneously support -c and -o options?])
+])# _LT_COMPILER_C_O
+
+
+# _LT_COMPILER_FILE_LOCKS([TAGNAME])
+# ----------------------------------
+# Check to see if we can do hard links to lock some files if needed
+m4_defun([_LT_COMPILER_FILE_LOCKS],
+[m4_require([_LT_ENABLE_LOCK])dnl
+m4_require([_LT_FILEUTILS_DEFAULTS])dnl
+_LT_COMPILER_C_O([$1])
+
+hard_links=nottested
+if test no = "$_LT_TAGVAR(lt_cv_prog_compiler_c_o, $1)" && test no != "$need_locks"; then
+  # do not overwrite the value of need_locks provided by the user
+  AC_MSG_CHECKING([if we can lock with hard links])
+  hard_links=yes
+  $RM conftest*
+  ln conftest.a conftest.b 2>/dev/null && hard_links=no
+  touch conftest.a
+  ln conftest.a conftest.b 2>&5 || hard_links=no
+  ln conftest.a conftest.b 2>/dev/null && hard_links=no
+  AC_MSG_RESULT([$hard_links])
+  if test no = "$hard_links"; then
+    AC_MSG_WARN(['$CC' does not support '-c -o', so 'make -j' may be unsafe])
+    need_locks=warn
+  fi
+else
+  need_locks=no
+fi
+_LT_DECL([], [need_locks], [1], [Must we lock files when doing compilation?])
+])# _LT_COMPILER_FILE_LOCKS
+
+
+# _LT_CHECK_OBJDIR
+# ----------------
+m4_defun([_LT_CHECK_OBJDIR],
+[AC_CACHE_CHECK([for objdir], [lt_cv_objdir],
+[rm -f .libs 2>/dev/null
+mkdir .libs 2>/dev/null
+if test -d .libs; then
+  lt_cv_objdir=.libs
+else
+  # MS-DOS does not allow filenames that begin with a dot.
+  lt_cv_objdir=_libs
+fi
+rmdir .libs 2>/dev/null])
+objdir=$lt_cv_objdir
+_LT_DECL([], [objdir], [0],
+         [The name of the directory that contains temporary libtool files])dnl
+m4_pattern_allow([LT_OBJDIR])dnl
+AC_DEFINE_UNQUOTED([LT_OBJDIR], "$lt_cv_objdir/",
+  [Define to the sub-directory where libtool stores uninstalled libraries.])
+])# _LT_CHECK_OBJDIR
+
+
+# _LT_LINKER_HARDCODE_LIBPATH([TAGNAME])
+# --------------------------------------
+# Check hardcoding attributes.
+m4_defun([_LT_LINKER_HARDCODE_LIBPATH],
+[AC_MSG_CHECKING([how to hardcode library paths into programs])
+_LT_TAGVAR(hardcode_action, $1)=
+if test -n "$_LT_TAGVAR(hardcode_libdir_flag_spec, $1)" ||
+   test -n "$_LT_TAGVAR(runpath_var, $1)" ||
+   test yes = "$_LT_TAGVAR(hardcode_automatic, $1)"; then
+
+  # We can hardcode non-existent directories.
+  if test no != "$_LT_TAGVAR(hardcode_direct, $1)" &&
+     # If the only mechanism to avoid hardcoding is shlibpath_var, we
+     # have to relink, otherwise we might link with an installed library
+     # when we should be linking with a yet-to-be-installed one
+     ## test no != "$_LT_TAGVAR(hardcode_shlibpath_var, $1)" &&
+     test no != "$_LT_TAGVAR(hardcode_minus_L, $1)"; then
+    # Linking always hardcodes the temporary library directory.
+    _LT_TAGVAR(hardcode_action, $1)=relink
+  else
+    # We can link without hardcoding, and we can hardcode nonexisting dirs.
+    _LT_TAGVAR(hardcode_action, $1)=immediate
+  fi
+else
+  # We cannot hardcode anything, or else we can only hardcode existing
+  # directories.
+  _LT_TAGVAR(hardcode_action, $1)=unsupported
+fi
+AC_MSG_RESULT([$_LT_TAGVAR(hardcode_action, $1)])
+
+if test relink = "$_LT_TAGVAR(hardcode_action, $1)" ||
+   test yes = "$_LT_TAGVAR(inherit_rpath, $1)"; then
+  # Fast installation is not supported
+  enable_fast_install=no
+elif test yes = "$shlibpath_overrides_runpath" ||
+     test no = "$enable_shared"; then
+  # Fast installation is not necessary
+  enable_fast_install=needless
+fi
+_LT_TAGDECL([], [hardcode_action], [0],
+    [How to hardcode a shared library path into an executable])
+])# _LT_LINKER_HARDCODE_LIBPATH
+
+
+# _LT_CMD_STRIPLIB
+# ----------------
+m4_defun([_LT_CMD_STRIPLIB],
+[m4_require([_LT_DECL_EGREP])
+striplib=
+old_striplib=
+AC_MSG_CHECKING([whether stripping libraries is possible])
+if test -n "$STRIP" && $STRIP -V 2>&1 | $GREP "GNU strip" >/dev/null; then
+  test -z "$old_striplib" && old_striplib="$STRIP --strip-debug"
+  test -z "$striplib" && striplib="$STRIP --strip-unneeded"
+  AC_MSG_RESULT([yes])
+else
+# FIXME - insert some real tests, host_os isn't really good enough
+  case $host_os in
+  darwin*)
+    if test -n "$STRIP"; then
+      striplib="$STRIP -x"
+      old_striplib="$STRIP -S"
+      AC_MSG_RESULT([yes])
+    else
+      AC_MSG_RESULT([no])
+    fi
+    ;;
+  *)
+    AC_MSG_RESULT([no])
+    ;;
+  esac
+fi
+_LT_DECL([], [old_striplib], [1], [Commands to strip libraries])
+_LT_DECL([], [striplib], [1])
+])# _LT_CMD_STRIPLIB
+
+
+# _LT_PREPARE_MUNGE_PATH_LIST
+# ---------------------------
+# Make sure func_munge_path_list() is defined correctly.
+m4_defun([_LT_PREPARE_MUNGE_PATH_LIST],
+[[# func_munge_path_list VARIABLE PATH
+# -----------------------------------
+# VARIABLE is name of variable containing _space_ separated list of
+# directories to be munged by the contents of PATH, which is string
+# having a format:
+# "DIR[:DIR]:"
+#       string "DIR[ DIR]" will be prepended to VARIABLE
+# ":DIR[:DIR]"
+#       string "DIR[ DIR]" will be appended to VARIABLE
+# "DIRP[:DIRP]::[DIRA:]DIRA"
+#       string "DIRP[ DIRP]" will be prepended to VARIABLE and string
+#       "DIRA[ DIRA]" will be appended to VARIABLE
+# "DIR[:DIR]"
+#       VARIABLE will be replaced by "DIR[ DIR]"
+func_munge_path_list ()
+{
+    case x@S|@2 in
+    x)
+        ;;
+    *:)
+        eval @S|@1=\"`$ECHO @S|@2 | $SED 's/:/ /g'` \@S|@@S|@1\"
+        ;;
+    x:*)
+        eval @S|@1=\"\@S|@@S|@1 `$ECHO @S|@2 | $SED 's/:/ /g'`\"
+        ;;
+    *::*)
+        eval @S|@1=\"\@S|@@S|@1\ `$ECHO @S|@2 | $SED -e 's/.*:://' -e 's/:/ /g'`\"
+        eval @S|@1=\"`$ECHO @S|@2 | $SED -e 's/::.*//' -e 's/:/ /g'`\ \@S|@@S|@1\"
+        ;;
+    *)
+        eval @S|@1=\"`$ECHO @S|@2 | $SED 's/:/ /g'`\"
+        ;;
+    esac
+}
+]])# _LT_PREPARE_PATH_LIST
+
+
+# _LT_SYS_DYNAMIC_LINKER([TAG])
+# -----------------------------
+# PORTME Fill in your ld.so characteristics
+m4_defun([_LT_SYS_DYNAMIC_LINKER],
+[AC_REQUIRE([AC_CANONICAL_HOST])dnl
+m4_require([_LT_DECL_EGREP])dnl
+m4_require([_LT_FILEUTILS_DEFAULTS])dnl
+m4_require([_LT_DECL_OBJDUMP])dnl
+m4_require([_LT_DECL_SED])dnl
+m4_require([_LT_CHECK_SHELL_FEATURES])dnl
+m4_require([_LT_PREPARE_MUNGE_PATH_LIST])dnl
+AC_MSG_CHECKING([dynamic linker characteristics])
+m4_if([$1],
+       [], [
+if test yes = "$GCC"; then
+  case $host_os in
+    darwin*) lt_awk_arg='/^libraries:/,/LR/' ;;
+    *) lt_awk_arg='/^libraries:/' ;;
+  esac
+  case $host_os in
+    mingw* | cegcc*) lt_sed_strip_eq='s|=\([[A-Za-z]]:\)|\1|g' ;;
+    *) lt_sed_strip_eq='s|=/|/|g' ;;
+  esac
+  lt_search_path_spec=`$CC -print-search-dirs | awk $lt_awk_arg | $SED -e "s/^libraries://" -e $lt_sed_strip_eq`
+  case $lt_search_path_spec in
+  *\;*)
+    # if the path contains ";" then we assume it to be the separator
+    # otherwise default to the standard path separator (i.e. ":") - it is
+    # assumed that no part of a normal pathname contains ";" but that should
+    # okay in the real world where ";" in dirpaths is itself problematic.
+    lt_search_path_spec=`$ECHO "$lt_search_path_spec" | $SED 's/;/ /g'`
+    ;;
+  *)
+    lt_search_path_spec=`$ECHO "$lt_search_path_spec" | $SED "s/$PATH_SEPARATOR/ /g"`
+    ;;
+  esac
+  # Ok, now we have the path, separated by spaces, we can step through it
+  # and add multilib dir if necessary...
+  lt_tmp_lt_search_path_spec=
+  lt_multi_os_dir=/`$CC $CPPFLAGS $CFLAGS $LDFLAGS -print-multi-os-directory 2>/dev/null`
+  # ...but if some path component already ends with the multilib dir we assume
+  # that all is fine and trust -print-search-dirs as is (GCC 4.2? or newer).
+  case "$lt_multi_os_dir; $lt_search_path_spec " in
+  "/; "* | "/.; "* | "/./; "* | *"$lt_multi_os_dir "* | *"$lt_multi_os_dir/ "*)
+    lt_multi_os_dir=
+    ;;
+  esac
+  for lt_sys_path in $lt_search_path_spec; do
+    if test -d "$lt_sys_path$lt_multi_os_dir"; then
+      lt_tmp_lt_search_path_spec="$lt_tmp_lt_search_path_spec $lt_sys_path$lt_multi_os_dir"
+    elif test -n "$lt_multi_os_dir"; then
+      test -d "$lt_sys_path" && \
+       lt_tmp_lt_search_path_spec="$lt_tmp_lt_search_path_spec $lt_sys_path"
+    fi
+  done
+  lt_search_path_spec=`$ECHO "$lt_tmp_lt_search_path_spec" | awk '
+BEGIN {RS = " "; FS = "/|\n";} {
+  lt_foo = "";
+  lt_count = 0;
+  for (lt_i = NF; lt_i > 0; lt_i--) {
+    if ($lt_i != "" && $lt_i != ".") {
+      if ($lt_i == "..") {
+        lt_count++;
+      } else {
+        if (lt_count == 0) {
+          lt_foo = "/" $lt_i lt_foo;
+        } else {
+          lt_count--;
+        }
+      }
+    }
+  }
+  if (lt_foo != "") { lt_freq[[lt_foo]]++; }
+  if (lt_freq[[lt_foo]] == 1) { print lt_foo; }
+}'`
+  # AWK program above erroneously prepends '/' to C:/dos/paths
+  # for these hosts.
+  case $host_os in
+    mingw* | cegcc*) lt_search_path_spec=`$ECHO "$lt_search_path_spec" |\
+      $SED 's|/\([[A-Za-z]]:\)|\1|g'` ;;
+  esac
+  sys_lib_search_path_spec=`$ECHO "$lt_search_path_spec" | $lt_NL2SP`
+else
+  sys_lib_search_path_spec="/lib /usr/lib /usr/local/lib"
+fi])
+library_names_spec=
+libname_spec='lib$name'
+soname_spec=
+shrext_cmds=.so
+postinstall_cmds=
+postuninstall_cmds=
+finish_cmds=
+finish_eval=
+shlibpath_var=
+shlibpath_overrides_runpath=unknown
+version_type=none
+dynamic_linker="$host_os ld.so"
+sys_lib_dlsearch_path_spec="/lib /usr/lib"
+need_lib_prefix=unknown
+hardcode_into_libs=no
+
+# when you set need_version to no, make sure it does not cause -set_version
+# flags to be left without arguments
+need_version=unknown
+
+AC_ARG_VAR([LT_SYS_LIBRARY_PATH],
+[User-defined run-time library search path.])
+
+case $host_os in
+aix3*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  library_names_spec='$libname$release$shared_ext$versuffix $libname.a'
+  shlibpath_var=LIBPATH
+
+  # AIX 3 has no versioning support, so we append a major version to the name.
+  soname_spec='$libname$release$shared_ext$major'
+  ;;
+
+aix[[4-9]]*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  hardcode_into_libs=yes
+  if test ia64 = "$host_cpu"; then
+    # AIX 5 supports IA64
+    library_names_spec='$libname$release$shared_ext$major $libname$release$shared_ext$versuffix $libname$shared_ext'
+    shlibpath_var=LD_LIBRARY_PATH
+  else
+    # With GCC up to 2.95.x, collect2 would create an import file
+    # for dependence libraries.  The import file would start with
+    # the line '#! .'.  This would cause the generated library to
+    # depend on '.', always an invalid library.  This was fixed in
+    # development snapshots of GCC prior to 3.0.
+    case $host_os in
+      aix4 | aix4.[[01]] | aix4.[[01]].*)
+      if { echo '#if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 97)'
+          echo ' yes '
+          echo '#endif'; } | $CC -E - | $GREP yes > /dev/null; then
+       :
+      else
+       can_build_shared=no
+      fi
+      ;;
+    esac
+    # Using Import Files as archive members, it is possible to support
+    # filename-based versioning of shared library archives on AIX. While
+    # this would work for both with and without runtime linking, it will
+    # prevent static linking of such archives. So we do filename-based
+    # shared library versioning with .so extension only, which is used
+    # when both runtime linking and shared linking is enabled.
+    # Unfortunately, runtime linking may impact performance, so we do
+    # not want this to be the default eventually. Also, we use the
+    # versioned .so libs for executables only if there is the -brtl
+    # linker flag in LDFLAGS as well, or --with-aix-soname=svr4 only.
+    # To allow for filename-based versioning support, we need to create
+    # libNAME.so.V as an archive file, containing:
+    # *) an Import File, referring to the versioned filename of the
+    #    archive as well as the shared archive member, telling the
+    #    bitwidth (32 or 64) of that shared object, and providing the
+    #    list of exported symbols of that shared object, eventually
+    #    decorated with the 'weak' keyword
+    # *) the shared object with the F_LOADONLY flag set, to really avoid
+    #    it being seen by the linker.
+    # At run time we better use the real file rather than another symlink,
+    # but for link time we create the symlink libNAME.so -> libNAME.so.V
+
+    case $with_aix_soname,$aix_use_runtimelinking in
+    # AIX (on Power*) has no versioning support, so currently we cannot hardcode correct
+    # soname into executable. Probably we can add versioning support to
+    # collect2, so additional links can be useful in future.
+    aix,yes) # traditional libtool
+      dynamic_linker='AIX unversionable lib.so'
+      # If using run time linking (on AIX 4.2 or later) use lib<name>.so
+      # instead of lib<name>.a to let people know that these are not
+      # typical AIX shared libraries.
+      library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+      ;;
+    aix,no) # traditional AIX only
+      dynamic_linker='AIX lib.a[(]lib.so.V[)]'
+      # We preserve .a as extension for shared libraries through AIX4.2
+      # and later when we are not doing run time linking.
+      library_names_spec='$libname$release.a $libname.a'
+      soname_spec='$libname$release$shared_ext$major'
+      ;;
+    svr4,*) # full svr4 only
+      dynamic_linker="AIX lib.so.V[(]$shared_archive_member_spec.o[)]"
+      library_names_spec='$libname$release$shared_ext$major $libname$shared_ext'
+      # We do not specify a path in Import Files, so LIBPATH fires.
+      shlibpath_overrides_runpath=yes
+      ;;
+    *,yes) # both, prefer svr4
+      dynamic_linker="AIX lib.so.V[(]$shared_archive_member_spec.o[)], lib.a[(]lib.so.V[)]"
+      library_names_spec='$libname$release$shared_ext$major $libname$shared_ext'
+      # unpreferred sharedlib libNAME.a needs extra handling
+      postinstall_cmds='test -n "$linkname" || linkname="$realname"~func_stripname "" ".so" "$linkname"~$install_shared_prog "$dir/$func_stripname_result.$libext" "$destdir/$func_stripname_result.$libext"~test -z "$tstripme" || test -z "$striplib" || $striplib "$destdir/$func_stripname_result.$libext"'
+      postuninstall_cmds='for n in $library_names $old_library; do :; done~func_stripname "" ".so" "$n"~test "$func_stripname_result" = "$n" || func_append rmfiles " $odir/$func_stripname_result.$libext"'
+      # We do not specify a path in Import Files, so LIBPATH fires.
+      shlibpath_overrides_runpath=yes
+      ;;
+    *,no) # both, prefer aix
+      dynamic_linker="AIX lib.a[(]lib.so.V[)], lib.so.V[(]$shared_archive_member_spec.o[)]"
+      library_names_spec='$libname$release.a $libname.a'
+      soname_spec='$libname$release$shared_ext$major'
+      # unpreferred sharedlib libNAME.so.V and symlink libNAME.so need extra handling
+      postinstall_cmds='test -z "$dlname" || $install_shared_prog $dir/$dlname $destdir/$dlname~test -z "$tstripme" || test -z "$striplib" || $striplib $destdir/$dlname~test -n "$linkname" || linkname=$realname~func_stripname "" ".a" "$linkname"~(cd "$destdir" && $LN_S -f $dlname $func_stripname_result.so)'
+      postuninstall_cmds='test -z "$dlname" || func_append rmfiles " $odir/$dlname"~for n in $old_library $library_names; do :; done~func_stripname "" ".a" "$n"~func_append rmfiles " $odir/$func_stripname_result.so"'
+      ;;
+    esac
+    shlibpath_var=LIBPATH
+  fi
+  ;;
+
+amigaos*)
+  case $host_cpu in
+  powerpc)
+    # Since July 2007 AmigaOS4 officially supports .so libraries.
+    # When compiling the executable, add -use-dynld -Lsobjs: to the compileline.
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+    ;;
+  m68k)
+    library_names_spec='$libname.ixlibrary $libname.a'
+    # Create ${libname}_ixlibrary.a entries in /sys/libs.
+    finish_eval='for lib in `ls $libdir/*.ixlibrary 2>/dev/null`; do libname=`func_echo_all "$lib" | $SED '\''s%^.*/\([[^/]]*\)\.ixlibrary$%\1%'\''`; $RM /sys/libs/${libname}_ixlibrary.a; $show "cd /sys/libs && $LN_S $lib ${libname}_ixlibrary.a"; cd /sys/libs && $LN_S $lib ${libname}_ixlibrary.a || exit 1; done'
+    ;;
+  esac
+  ;;
+
+beos*)
+  library_names_spec='$libname$shared_ext'
+  dynamic_linker="$host_os ld.so"
+  shlibpath_var=LIBRARY_PATH
+  ;;
+
+bsdi[[45]]*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  finish_cmds='PATH="\$PATH:/sbin" ldconfig $libdir'
+  shlibpath_var=LD_LIBRARY_PATH
+  sys_lib_search_path_spec="/shlib /usr/lib /usr/X11/lib /usr/contrib/lib /lib /usr/local/lib"
+  sys_lib_dlsearch_path_spec="/shlib /usr/lib /usr/local/lib"
+  # the default ld.so.conf also contains /usr/contrib/lib and
+  # /usr/X11R6/lib (/usr/X11 is a link to /usr/X11R6), but let us allow
+  # libtool to hard-code these into programs
+  ;;
+
+cygwin* | mingw* | pw32* | cegcc*)
+  version_type=windows
+  shrext_cmds=.dll
+  need_version=no
+  need_lib_prefix=no
+
+  case $GCC,$cc_basename in
+  yes,*)
+    # gcc
+    library_names_spec='$libname.dll.a'
+    # DLL is installed to $(libdir)/../bin by postinstall_cmds
+    postinstall_cmds='base_file=`basename \$file`~
+      dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; echo \$dlname'\''`~
+      dldir=$destdir/`dirname \$dlpath`~
+      test -d \$dldir || mkdir -p \$dldir~
+      $install_prog $dir/$dlname \$dldir/$dlname~
+      chmod a+x \$dldir/$dlname~
+      if test -n '\''$stripme'\'' && test -n '\''$striplib'\''; then
+        eval '\''$striplib \$dldir/$dlname'\'' || exit \$?;
+      fi'
+    postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; echo \$dlname'\''`~
+      dlpath=$dir/\$dldll~
+       $RM \$dlpath'
+    shlibpath_overrides_runpath=yes
+
+    case $host_os in
+    cygwin*)
+      # Cygwin DLLs use 'cyg' prefix rather than 'lib'
+      soname_spec='`echo $libname | sed -e 's/^lib/cyg/'``echo $release | $SED -e 's/[[.]]/-/g'`$versuffix$shared_ext'
+m4_if([$1], [],[
+      sys_lib_search_path_spec="$sys_lib_search_path_spec /usr/lib/w32api"])
+      ;;
+    mingw* | cegcc*)
+      # MinGW DLLs use traditional 'lib' prefix
+      soname_spec='$libname`echo $release | $SED -e 's/[[.]]/-/g'`$versuffix$shared_ext'
+      ;;
+    pw32*)
+      # pw32 DLLs use 'pw' prefix rather than 'lib'
+      library_names_spec='`echo $libname | sed -e 's/^lib/pw/'``echo $release | $SED -e 's/[[.]]/-/g'`$versuffix$shared_ext'
+      ;;
+    esac
+    dynamic_linker='Win32 ld.exe'
+    ;;
+
+  *,cl*)
+    # Native MSVC
+    libname_spec='$name'
+    soname_spec='$libname`echo $release | $SED -e 's/[[.]]/-/g'`$versuffix$shared_ext'
+    library_names_spec='$libname.dll.lib'
+
+    case $build_os in
+    mingw*)
+      sys_lib_search_path_spec=
+      lt_save_ifs=$IFS
+      IFS=';'
+      for lt_path in $LIB
+      do
+        IFS=$lt_save_ifs
+        # Let DOS variable expansion print the short 8.3 style file name.
+        lt_path=`cd "$lt_path" 2>/dev/null && cmd //C "for %i in (".") do @echo %~si"`
+        sys_lib_search_path_spec="$sys_lib_search_path_spec $lt_path"
+      done
+      IFS=$lt_save_ifs
+      # Convert to MSYS style.
+      sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | sed -e 's|\\\\|/|g' -e 's| \\([[a-zA-Z]]\\):| /\\1|g' -e 's|^ ||'`
+      ;;
+    cygwin*)
+      # Convert to unix form, then to dos form, then back to unix form
+      # but this time dos style (no spaces!) so that the unix form looks
+      # like /cygdrive/c/PROGRA~1:/cygdr...
+      sys_lib_search_path_spec=`cygpath --path --unix "$LIB"`
+      sys_lib_search_path_spec=`cygpath --path --dos "$sys_lib_search_path_spec" 2>/dev/null`
+      sys_lib_search_path_spec=`cygpath --path --unix "$sys_lib_search_path_spec" | $SED -e "s/$PATH_SEPARATOR/ /g"`
+      ;;
+    *)
+      sys_lib_search_path_spec=$LIB
+      if $ECHO "$sys_lib_search_path_spec" | [$GREP ';[c-zC-Z]:/' >/dev/null]; then
+        # It is most probably a Windows format PATH.
+        sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e 's/;/ /g'`
+      else
+        sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e "s/$PATH_SEPARATOR/ /g"`
+      fi
+      # FIXME: find the short name or the path components, as spaces are
+      # common. (e.g. "Program Files" -> "PROGRA~1")
+      ;;
+    esac
+
+    # DLL is installed to $(libdir)/../bin by postinstall_cmds
+    postinstall_cmds='base_file=`basename \$file`~
+      dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; echo \$dlname'\''`~
+      dldir=$destdir/`dirname \$dlpath`~
+      test -d \$dldir || mkdir -p \$dldir~
+      $install_prog $dir/$dlname \$dldir/$dlname'
+    postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; echo \$dlname'\''`~
+      dlpath=$dir/\$dldll~
+       $RM \$dlpath'
+    shlibpath_overrides_runpath=yes
+    dynamic_linker='Win32 link.exe'
+    ;;
+
+  *)
+    # Assume MSVC wrapper
+    library_names_spec='$libname`echo $release | $SED -e 's/[[.]]/-/g'`$versuffix$shared_ext $libname.lib'
+    dynamic_linker='Win32 ld.exe'
+    ;;
+  esac
+  # FIXME: first we should search . and the directory the executable is in
+  shlibpath_var=PATH
+  ;;
+
+darwin* | rhapsody*)
+  dynamic_linker="$host_os dyld"
+  version_type=darwin
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$major$shared_ext $libname$shared_ext'
+  soname_spec='$libname$release$major$shared_ext'
+  shlibpath_overrides_runpath=yes
+  shlibpath_var=DYLD_LIBRARY_PATH
+  shrext_cmds='`test .$module = .yes && echo .so || echo .dylib`'
+m4_if([$1], [],[
+  sys_lib_search_path_spec="$sys_lib_search_path_spec /usr/local/lib"])
+  sys_lib_dlsearch_path_spec='/usr/local/lib /lib /usr/lib'
+  ;;
+
+dgux*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  ;;
+
+freebsd* | dragonfly*)
+  # DragonFly does not have aout.  When/if they implement a new
+  # versioning mechanism, adjust this.
+  if test -x /usr/bin/objformat; then
+    objformat=`/usr/bin/objformat`
+  else
+    case $host_os in
+    freebsd[[23]].*) objformat=aout ;;
+    *) objformat=elf ;;
+    esac
+  fi
+  version_type=freebsd-$objformat
+  case $version_type in
+    freebsd-elf*)
+      library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+      soname_spec='$libname$release$shared_ext$major'
+      need_version=no
+      need_lib_prefix=no
+      ;;
+    freebsd-*)
+      library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix'
+      need_version=yes
+      ;;
+  esac
+  shlibpath_var=LD_LIBRARY_PATH
+  case $host_os in
+  freebsd2.*)
+    shlibpath_overrides_runpath=yes
+    ;;
+  freebsd3.[[01]]* | freebsdelf3.[[01]]*)
+    shlibpath_overrides_runpath=yes
+    hardcode_into_libs=yes
+    ;;
+  freebsd3.[[2-9]]* | freebsdelf3.[[2-9]]* | \
+  freebsd4.[[0-5]] | freebsdelf4.[[0-5]] | freebsd4.1.1 | freebsdelf4.1.1)
+    shlibpath_overrides_runpath=no
+    hardcode_into_libs=yes
+    ;;
+  *) # from 4.6 on, and DragonFly
+    shlibpath_overrides_runpath=yes
+    hardcode_into_libs=yes
+    ;;
+  esac
+  ;;
+
+haiku*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  dynamic_linker="$host_os runtime_loader"
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LIBRARY_PATH
+  shlibpath_overrides_runpath=no
+  sys_lib_dlsearch_path_spec='/boot/home/config/lib /boot/common/lib /boot/system/lib'
+  hardcode_into_libs=yes
+  ;;
+
+hpux9* | hpux10* | hpux11*)
+  # Give a soname corresponding to the major version so that dld.sl refuses to
+  # link against other versions.
+  version_type=sunos
+  need_lib_prefix=no
+  need_version=no
+  case $host_cpu in
+  ia64*)
+    shrext_cmds='.so'
+    hardcode_into_libs=yes
+    dynamic_linker="$host_os dld.so"
+    shlibpath_var=LD_LIBRARY_PATH
+    shlibpath_overrides_runpath=yes # Unless +noenvvar is specified.
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+    soname_spec='$libname$release$shared_ext$major'
+    if test 32 = "$HPUX_IA64_MODE"; then
+      sys_lib_search_path_spec="/usr/lib/hpux32 /usr/local/lib/hpux32 /usr/local/lib"
+      sys_lib_dlsearch_path_spec=/usr/lib/hpux32
+    else
+      sys_lib_search_path_spec="/usr/lib/hpux64 /usr/local/lib/hpux64"
+      sys_lib_dlsearch_path_spec=/usr/lib/hpux64
+    fi
+    ;;
+  hppa*64*)
+    shrext_cmds='.sl'
+    hardcode_into_libs=yes
+    dynamic_linker="$host_os dld.sl"
+    shlibpath_var=LD_LIBRARY_PATH # How should we handle SHLIB_PATH
+    shlibpath_overrides_runpath=yes # Unless +noenvvar is specified.
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+    soname_spec='$libname$release$shared_ext$major'
+    sys_lib_search_path_spec="/usr/lib/pa20_64 /usr/ccs/lib/pa20_64"
+    sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec
+    ;;
+  *)
+    shrext_cmds='.sl'
+    dynamic_linker="$host_os dld.sl"
+    shlibpath_var=SHLIB_PATH
+    shlibpath_overrides_runpath=no # +s is required to enable SHLIB_PATH
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+    soname_spec='$libname$release$shared_ext$major'
+    ;;
+  esac
+  # HP-UX runs *really* slowly unless shared libraries are mode 555, ...
+  postinstall_cmds='chmod 555 $lib'
+  # or fails outright, so override atomically:
+  install_override_mode=555
+  ;;
+
+interix[[3-9]]*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  dynamic_linker='Interix 3.x ld.so.1 (PE, like ELF)'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=no
+  hardcode_into_libs=yes
+  ;;
+
+irix5* | irix6* | nonstopux*)
+  case $host_os in
+    nonstopux*) version_type=nonstopux ;;
+    *)
+       if test yes = "$lt_cv_prog_gnu_ld"; then
+               version_type=linux # correct to gnu/linux during the next big refactor
+       else
+               version_type=irix
+       fi ;;
+  esac
+  need_lib_prefix=no
+  need_version=no
+  soname_spec='$libname$release$shared_ext$major'
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$release$shared_ext $libname$shared_ext'
+  case $host_os in
+  irix5* | nonstopux*)
+    libsuff= shlibsuff=
+    ;;
+  *)
+    case $LD in # libtool.m4 will add one of these switches to LD
+    *-32|*"-32 "|*-melf32bsmip|*"-melf32bsmip ")
+      libsuff= shlibsuff= libmagic=32-bit;;
+    *-n32|*"-n32 "|*-melf32bmipn32|*"-melf32bmipn32 ")
+      libsuff=32 shlibsuff=N32 libmagic=N32;;
+    *-64|*"-64 "|*-melf64bmip|*"-melf64bmip ")
+      libsuff=64 shlibsuff=64 libmagic=64-bit;;
+    *) libsuff= shlibsuff= libmagic=never-match;;
+    esac
+    ;;
+  esac
+  shlibpath_var=LD_LIBRARY${shlibsuff}_PATH
+  shlibpath_overrides_runpath=no
+  sys_lib_search_path_spec="/usr/lib$libsuff /lib$libsuff /usr/local/lib$libsuff"
+  sys_lib_dlsearch_path_spec="/usr/lib$libsuff /lib$libsuff"
+  hardcode_into_libs=yes
+  ;;
+
+# No shared lib support for Linux oldld, aout, or coff.
+linux*oldld* | linux*aout* | linux*coff*)
+  dynamic_linker=no
+  ;;
+
+linux*android*)
+  version_type=none # Android doesn't support versioned libraries.
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext'
+  soname_spec='$libname$release$shared_ext'
+  finish_cmds=
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+
+  # This implies no fast_install, which is unacceptable.
+  # Some rework will be needed to allow for fast_install
+  # before this can be enabled.
+  hardcode_into_libs=yes
+
+  dynamic_linker='Android linker'
+  # Don't embed -rpath directories since the linker doesn't support them.
+  _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+  ;;
+
+# This must be glibc/ELF.
+linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  finish_cmds='PATH="\$PATH:/sbin" ldconfig -n $libdir'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=no
+
+  # Some binutils ld are patched to set DT_RUNPATH
+  AC_CACHE_VAL([lt_cv_shlibpath_overrides_runpath],
+    [lt_cv_shlibpath_overrides_runpath=no
+    save_LDFLAGS=$LDFLAGS
+    save_libdir=$libdir
+    eval "libdir=/foo; wl=\"$_LT_TAGVAR(lt_prog_compiler_wl, $1)\"; \
+        LDFLAGS=\"\$LDFLAGS $_LT_TAGVAR(hardcode_libdir_flag_spec, $1)\""
+    AC_LINK_IFELSE([AC_LANG_PROGRAM([],[])],
+      [AS_IF([ ($OBJDUMP -p conftest$ac_exeext) 2>/dev/null | grep "RUNPATH.*$libdir" >/dev/null],
+        [lt_cv_shlibpath_overrides_runpath=yes])])
+    LDFLAGS=$save_LDFLAGS
+    libdir=$save_libdir
+    ])
+  shlibpath_overrides_runpath=$lt_cv_shlibpath_overrides_runpath
+
+  # This implies no fast_install, which is unacceptable.
+  # Some rework will be needed to allow for fast_install
+  # before this can be enabled.
+  hardcode_into_libs=yes
+
+  # Ideally, we could use ldconfig to report *all* directores which are
+  # searched for libraries, however this is still not possible.  Aside from not
+  # being certain /sbin/ldconfig is available, command
+  # 'ldconfig -N -X -v | grep ^/' on 64bit Fedora does not report /usr/lib64,
+  # even though it is searched at run-time.  Try to do the best guess by
+  # appending ld.so.conf contents (and includes) to the search path.
+  if test -f /etc/ld.so.conf; then
+    lt_ld_extra=`awk '/^include / { system(sprintf("cd /etc; cat %s 2>/dev/null", \[$]2)); skip = 1; } { if (!skip) print \[$]0; skip = 0; }' < /etc/ld.so.conf | $SED -e 's/#.*//;/^[  ]*hwcap[        ]/d;s/[:,      ]/ /g;s/=[^=]*$//;s/=[^= ]* / /g;s/"//g;/^$/d' | tr '\n' ' '`
+    sys_lib_dlsearch_path_spec="/lib /usr/lib $lt_ld_extra"
+  fi
+
+  # We used to test for /lib/ld.so.1 and disable shared libraries on
+  # powerpc, because MkLinux only supported shared libraries with the
+  # GNU dynamic linker.  Since this was broken with cross compilers,
+  # most powerpc-linux boxes support dynamic linking these days and
+  # people can always --disable-shared, the test was removed, and we
+  # assume the GNU/Linux dynamic linker is in use.
+  dynamic_linker='GNU/Linux ld.so'
+  ;;
+
+netbsd*)
+  version_type=sunos
+  need_lib_prefix=no
+  need_version=no
+  if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix'
+    finish_cmds='PATH="\$PATH:/sbin" ldconfig -m $libdir'
+    dynamic_linker='NetBSD (a.out) ld.so'
+  else
+    library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+    soname_spec='$libname$release$shared_ext$major'
+    dynamic_linker='NetBSD ld.elf_so'
+  fi
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  hardcode_into_libs=yes
+  ;;
+
+newsos6)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  ;;
+
+*nto* | *qnx*)
+  version_type=qnx
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=no
+  hardcode_into_libs=yes
+  dynamic_linker='ldqnx.so'
+  ;;
+
+openbsd* | bitrig*)
+  version_type=sunos
+  sys_lib_dlsearch_path_spec=/usr/lib
+  need_lib_prefix=no
+  if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then
+    need_version=no
+  else
+    need_version=yes
+  fi
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix'
+  finish_cmds='PATH="\$PATH:/sbin" ldconfig -m $libdir'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  ;;
+
+os2*)
+  libname_spec='$name'
+  version_type=windows
+  shrext_cmds=.dll
+  need_version=no
+  need_lib_prefix=no
+  # OS/2 can only load a DLL with a base name of 8 characters or less.
+  soname_spec='`test -n "$os2dllname" && libname="$os2dllname";
+    v=$($ECHO $release$versuffix | tr -d .-);
+    n=$($ECHO $libname | cut -b -$((8 - ${#v})) | tr . _);
+    $ECHO $n$v`$shared_ext'
+  library_names_spec='${libname}_dll.$libext'
+  dynamic_linker='OS/2 ld.exe'
+  shlibpath_var=BEGINLIBPATH
+  sys_lib_search_path_spec="/lib /usr/lib /usr/local/lib"
+  sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec
+  postinstall_cmds='base_file=`basename \$file`~
+    dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; $ECHO \$dlname'\''`~
+    dldir=$destdir/`dirname \$dlpath`~
+    test -d \$dldir || mkdir -p \$dldir~
+    $install_prog $dir/$dlname \$dldir/$dlname~
+    chmod a+x \$dldir/$dlname~
+    if test -n '\''$stripme'\'' && test -n '\''$striplib'\''; then
+      eval '\''$striplib \$dldir/$dlname'\'' || exit \$?;
+    fi'
+  postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; $ECHO \$dlname'\''`~
+    dlpath=$dir/\$dldll~
+    $RM \$dlpath'
+  ;;
+
+osf3* | osf4* | osf5*)
+  version_type=osf
+  need_lib_prefix=no
+  need_version=no
+  soname_spec='$libname$release$shared_ext$major'
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  shlibpath_var=LD_LIBRARY_PATH
+  sys_lib_search_path_spec="/usr/shlib /usr/ccs/lib /usr/lib/cmplrs/cc /usr/lib /usr/local/lib /var/shlib"
+  sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec
+  ;;
+
+rdos*)
+  dynamic_linker=no
+  ;;
+
+solaris*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  hardcode_into_libs=yes
+  # ldd complains unless libraries are executable
+  postinstall_cmds='chmod +x $lib'
+  ;;
+
+sunos4*)
+  version_type=sunos
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix'
+  finish_cmds='PATH="\$PATH:/usr/etc" ldconfig $libdir'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  if test yes = "$with_gnu_ld"; then
+    need_lib_prefix=no
+  fi
+  need_version=yes
+  ;;
+
+sysv4 | sysv4.3*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  case $host_vendor in
+    sni)
+      shlibpath_overrides_runpath=no
+      need_lib_prefix=no
+      runpath_var=LD_RUN_PATH
+      ;;
+    siemens)
+      need_lib_prefix=no
+      ;;
+    motorola)
+      need_lib_prefix=no
+      need_version=no
+      shlibpath_overrides_runpath=no
+      sys_lib_search_path_spec='/lib /usr/lib /usr/ccs/lib'
+      ;;
+  esac
+  ;;
+
+sysv4*MP*)
+  if test -d /usr/nec; then
+    version_type=linux # correct to gnu/linux during the next big refactor
+    library_names_spec='$libname$shared_ext.$versuffix $libname$shared_ext.$major $libname$shared_ext'
+    soname_spec='$libname$shared_ext.$major'
+    shlibpath_var=LD_LIBRARY_PATH
+  fi
+  ;;
+
+sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX* | sysv4*uw2*)
+  version_type=sco
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=yes
+  hardcode_into_libs=yes
+  if test yes = "$with_gnu_ld"; then
+    sys_lib_search_path_spec='/usr/local/lib /usr/gnu/lib /usr/ccs/lib /usr/lib /lib'
+  else
+    sys_lib_search_path_spec='/usr/ccs/lib /usr/lib'
+    case $host_os in
+      sco3.2v5*)
+        sys_lib_search_path_spec="$sys_lib_search_path_spec /lib"
+       ;;
+    esac
+  fi
+  sys_lib_dlsearch_path_spec='/usr/lib'
+  ;;
+
+tpf*)
+  # TPF is a cross-target only.  Preferred cross-host = GNU/Linux.
+  version_type=linux # correct to gnu/linux during the next big refactor
+  need_lib_prefix=no
+  need_version=no
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  shlibpath_var=LD_LIBRARY_PATH
+  shlibpath_overrides_runpath=no
+  hardcode_into_libs=yes
+  ;;
+
+uts4*)
+  version_type=linux # correct to gnu/linux during the next big refactor
+  library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext'
+  soname_spec='$libname$release$shared_ext$major'
+  shlibpath_var=LD_LIBRARY_PATH
+  ;;
+
+*)
+  dynamic_linker=no
+  ;;
+esac
+AC_MSG_RESULT([$dynamic_linker])
+test no = "$dynamic_linker" && can_build_shared=no
+
+variables_saved_for_relink="PATH $shlibpath_var $runpath_var"
+if test yes = "$GCC"; then
+  variables_saved_for_relink="$variables_saved_for_relink GCC_EXEC_PREFIX COMPILER_PATH LIBRARY_PATH"
+fi
+
+if test set = "${lt_cv_sys_lib_search_path_spec+set}"; then
+  sys_lib_search_path_spec=$lt_cv_sys_lib_search_path_spec
+fi
+
+if test set = "${lt_cv_sys_lib_dlsearch_path_spec+set}"; then
+  sys_lib_dlsearch_path_spec=$lt_cv_sys_lib_dlsearch_path_spec
+fi
+
+# remember unaugmented sys_lib_dlsearch_path content for libtool script decls...
+configure_time_dlsearch_path=$sys_lib_dlsearch_path_spec
+
+# ... but it needs LT_SYS_LIBRARY_PATH munging for other configure-time code
+func_munge_path_list sys_lib_dlsearch_path_spec "$LT_SYS_LIBRARY_PATH"
+
+# to be used as default LT_SYS_LIBRARY_PATH value in generated libtool
+configure_time_lt_sys_library_path=$LT_SYS_LIBRARY_PATH
+
+_LT_DECL([], [variables_saved_for_relink], [1],
+    [Variables whose values should be saved in libtool wrapper scripts and
+    restored at link time])
+_LT_DECL([], [need_lib_prefix], [0],
+    [Do we need the "lib" prefix for modules?])
+_LT_DECL([], [need_version], [0], [Do we need a version for libraries?])
+_LT_DECL([], [version_type], [0], [Library versioning type])
+_LT_DECL([], [runpath_var], [0],  [Shared library runtime path variable])
+_LT_DECL([], [shlibpath_var], [0],[Shared library path variable])
+_LT_DECL([], [shlibpath_overrides_runpath], [0],
+    [Is shlibpath searched before the hard-coded library search path?])
+_LT_DECL([], [libname_spec], [1], [Format of library name prefix])
+_LT_DECL([], [library_names_spec], [1],
+    [[List of archive names.  First name is the real one, the rest are links.
+    The last name is the one that the linker finds with -lNAME]])
+_LT_DECL([], [soname_spec], [1],
+    [[The coded name of the library, if different from the real name]])
+_LT_DECL([], [install_override_mode], [1],
+    [Permission mode override for installation of shared libraries])
+_LT_DECL([], [postinstall_cmds], [2],
+    [Command to use after installation of a shared archive])
+_LT_DECL([], [postuninstall_cmds], [2],
+    [Command to use after uninstallation of a shared archive])
+_LT_DECL([], [finish_cmds], [2],
+    [Commands used to finish a libtool library installation in a directory])
+_LT_DECL([], [finish_eval], [1],
+    [[As "finish_cmds", except a single script fragment to be evaled but
+    not shown]])
+_LT_DECL([], [hardcode_into_libs], [0],
+    [Whether we should hardcode library paths into libraries])
+_LT_DECL([], [sys_lib_search_path_spec], [2],
+    [Compile-time system search path for libraries])
+_LT_DECL([sys_lib_dlsearch_path_spec], [configure_time_dlsearch_path], [2],
+    [Detected run-time system search path for libraries])
+_LT_DECL([], [configure_time_lt_sys_library_path], [2],
+    [Explicit LT_SYS_LIBRARY_PATH set during ./configure time])
+])# _LT_SYS_DYNAMIC_LINKER
+
+
+# _LT_PATH_TOOL_PREFIX(TOOL)
+# --------------------------
+# find a file program that can recognize shared library
+AC_DEFUN([_LT_PATH_TOOL_PREFIX],
+[m4_require([_LT_DECL_EGREP])dnl
+AC_MSG_CHECKING([for $1])
+AC_CACHE_VAL(lt_cv_path_MAGIC_CMD,
+[case $MAGIC_CMD in
+[[\\/*] |  ?:[\\/]*])
+  lt_cv_path_MAGIC_CMD=$MAGIC_CMD # Let the user override the test with a path.
+  ;;
+*)
+  lt_save_MAGIC_CMD=$MAGIC_CMD
+  lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR
+dnl $ac_dummy forces splitting on constant user-supplied paths.
+dnl POSIX.2 word splitting is done only on the output of word expansions,
+dnl not every word.  This closes a longstanding sh security hole.
+  ac_dummy="m4_if([$2], , $PATH, [$2])"
+  for ac_dir in $ac_dummy; do
+    IFS=$lt_save_ifs
+    test -z "$ac_dir" && ac_dir=.
+    if test -f "$ac_dir/$1"; then
+      lt_cv_path_MAGIC_CMD=$ac_dir/"$1"
+      if test -n "$file_magic_test_file"; then
+       case $deplibs_check_method in
+       "file_magic "*)
+         file_magic_regex=`expr "$deplibs_check_method" : "file_magic \(.*\)"`
+         MAGIC_CMD=$lt_cv_path_MAGIC_CMD
+         if eval $file_magic_cmd \$file_magic_test_file 2> /dev/null |
+           $EGREP "$file_magic_regex" > /dev/null; then
+           :
+         else
+           cat <<_LT_EOF 1>&2
+
+*** Warning: the command libtool uses to detect shared libraries,
+*** $file_magic_cmd, produces output that libtool cannot recognize.
+*** The result is that libtool may fail to recognize shared libraries
+*** as such.  This will affect the creation of libtool libraries that
+*** depend on shared libraries, but programs linked with such libtool
+*** libraries will work regardless of this problem.  Nevertheless, you
+*** may want to report the problem to your system manager and/or to
+*** bug-libtool@gnu.org
+
+_LT_EOF
+         fi ;;
+       esac
+      fi
+      break
+    fi
+  done
+  IFS=$lt_save_ifs
+  MAGIC_CMD=$lt_save_MAGIC_CMD
+  ;;
+esac])
+MAGIC_CMD=$lt_cv_path_MAGIC_CMD
+if test -n "$MAGIC_CMD"; then
+  AC_MSG_RESULT($MAGIC_CMD)
+else
+  AC_MSG_RESULT(no)
+fi
+_LT_DECL([], [MAGIC_CMD], [0],
+        [Used to examine libraries when file_magic_cmd begins with "file"])dnl
+])# _LT_PATH_TOOL_PREFIX
+
+# Old name:
+AU_ALIAS([AC_PATH_TOOL_PREFIX], [_LT_PATH_TOOL_PREFIX])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_PATH_TOOL_PREFIX], [])
+
+
+# _LT_PATH_MAGIC
+# --------------
+# find a file program that can recognize a shared library
+m4_defun([_LT_PATH_MAGIC],
+[_LT_PATH_TOOL_PREFIX(${ac_tool_prefix}file, /usr/bin$PATH_SEPARATOR$PATH)
+if test -z "$lt_cv_path_MAGIC_CMD"; then
+  if test -n "$ac_tool_prefix"; then
+    _LT_PATH_TOOL_PREFIX(file, /usr/bin$PATH_SEPARATOR$PATH)
+  else
+    MAGIC_CMD=:
+  fi
+fi
+])# _LT_PATH_MAGIC
+
+
+# LT_PATH_LD
+# ----------
+# find the pathname to the GNU or non-GNU linker
+AC_DEFUN([LT_PATH_LD],
+[AC_REQUIRE([AC_PROG_CC])dnl
+AC_REQUIRE([AC_CANONICAL_HOST])dnl
+AC_REQUIRE([AC_CANONICAL_BUILD])dnl
+m4_require([_LT_DECL_SED])dnl
+m4_require([_LT_DECL_EGREP])dnl
+m4_require([_LT_PROG_ECHO_BACKSLASH])dnl
+
+AC_ARG_WITH([gnu-ld],
+    [AS_HELP_STRING([--with-gnu-ld],
+       [assume the C compiler uses GNU ld @<:@default=no@:>@])],
+    [test no = "$withval" || with_gnu_ld=yes],
+    [with_gnu_ld=no])dnl
+
+ac_prog=ld
+if test yes = "$GCC"; then
+  # Check if gcc -print-prog-name=ld gives a path.
+  AC_MSG_CHECKING([for ld used by $CC])
+  case $host in
+  *-*-mingw*)
+    # gcc leaves a trailing carriage return, which upsets mingw
+    ac_prog=`($CC -print-prog-name=ld) 2>&5 | tr -d '\015'` ;;
+  *)
+    ac_prog=`($CC -print-prog-name=ld) 2>&5` ;;
+  esac
+  case $ac_prog in
+    # Accept absolute paths.
+    [[\\/]]* | ?:[[\\/]]*)
+      re_direlt='/[[^/]][[^/]]*/\.\./'
+      # Canonicalize the pathname of ld
+      ac_prog=`$ECHO "$ac_prog"| $SED 's%\\\\%/%g'`
+      while $ECHO "$ac_prog" | $GREP "$re_direlt" > /dev/null 2>&1; do
+       ac_prog=`$ECHO $ac_prog| $SED "s%$re_direlt%/%"`
+      done
+      test -z "$LD" && LD=$ac_prog
+      ;;
+  "")
+    # If it fails, then pretend we aren't using GCC.
+    ac_prog=ld
+    ;;
+  *)
+    # If it is relative, then search for the first ld in PATH.
+    with_gnu_ld=unknown
+    ;;
+  esac
+elif test yes = "$with_gnu_ld"; then
+  AC_MSG_CHECKING([for GNU ld])
+else
+  AC_MSG_CHECKING([for non-GNU ld])
+fi
+AC_CACHE_VAL(lt_cv_path_LD,
+[if test -z "$LD"; then
+  lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR
+  for ac_dir in $PATH; do
+    IFS=$lt_save_ifs
+    test -z "$ac_dir" && ac_dir=.
+    if test -f "$ac_dir/$ac_prog" || test -f "$ac_dir/$ac_prog$ac_exeext"; then
+      lt_cv_path_LD=$ac_dir/$ac_prog
+      # Check to see if the program is GNU ld.  I'd rather use --version,
+      # but apparently some variants of GNU ld only accept -v.
+      # Break only if it was the GNU/non-GNU ld that we prefer.
+      case `"$lt_cv_path_LD" -v 2>&1 </dev/null` in
+      *GNU* | *'with BFD'*)
+       test no != "$with_gnu_ld" && break
+       ;;
+      *)
+       test yes != "$with_gnu_ld" && break
+       ;;
+      esac
+    fi
+  done
+  IFS=$lt_save_ifs
+else
+  lt_cv_path_LD=$LD # Let the user override the test with a path.
+fi])
+LD=$lt_cv_path_LD
+if test -n "$LD"; then
+  AC_MSG_RESULT($LD)
+else
+  AC_MSG_RESULT(no)
+fi
+test -z "$LD" && AC_MSG_ERROR([no acceptable ld found in \$PATH])
+_LT_PATH_LD_GNU
+AC_SUBST([LD])
+
+_LT_TAGDECL([], [LD], [1], [The linker used to build libraries])
+])# LT_PATH_LD
+
+# Old names:
+AU_ALIAS([AM_PROG_LD], [LT_PATH_LD])
+AU_ALIAS([AC_PROG_LD], [LT_PATH_LD])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AM_PROG_LD], [])
+dnl AC_DEFUN([AC_PROG_LD], [])
+
+
+# _LT_PATH_LD_GNU
+#- --------------
+m4_defun([_LT_PATH_LD_GNU],
+[AC_CACHE_CHECK([if the linker ($LD) is GNU ld], lt_cv_prog_gnu_ld,
+[# I'd rather use --version here, but apparently some GNU lds only accept -v.
+case `$LD -v 2>&1 </dev/null` in
+*GNU* | *'with BFD'*)
+  lt_cv_prog_gnu_ld=yes
+  ;;
+*)
+  lt_cv_prog_gnu_ld=no
+  ;;
+esac])
+with_gnu_ld=$lt_cv_prog_gnu_ld
+])# _LT_PATH_LD_GNU
+
+
+# _LT_CMD_RELOAD
+# --------------
+# find reload flag for linker
+#   -- PORTME Some linkers may need a different reload flag.
+m4_defun([_LT_CMD_RELOAD],
+[AC_CACHE_CHECK([for $LD option to reload object files],
+  lt_cv_ld_reload_flag,
+  [lt_cv_ld_reload_flag='-r'])
+reload_flag=$lt_cv_ld_reload_flag
+case $reload_flag in
+"" | " "*) ;;
+*) reload_flag=" $reload_flag" ;;
+esac
+reload_cmds='$LD$reload_flag -o $output$reload_objs'
+case $host_os in
+  cygwin* | mingw* | pw32* | cegcc*)
+    if test yes != "$GCC"; then
+      reload_cmds=false
+    fi
+    ;;
+  darwin*)
+    if test yes = "$GCC"; then
+      reload_cmds='$LTCC $LTCFLAGS -nostdlib $wl-r -o $output$reload_objs'
+    else
+      reload_cmds='$LD$reload_flag -o $output$reload_objs'
+    fi
+    ;;
+esac
+_LT_TAGDECL([], [reload_flag], [1], [How to create reloadable object files])dnl
+_LT_TAGDECL([], [reload_cmds], [2])dnl
+])# _LT_CMD_RELOAD
+
+
+# _LT_PATH_DD
+# -----------
+# find a working dd
+m4_defun([_LT_PATH_DD],
+[AC_CACHE_CHECK([for a working dd], [ac_cv_path_lt_DD],
+[printf 0123456789abcdef0123456789abcdef >conftest.i
+cat conftest.i conftest.i >conftest2.i
+: ${lt_DD:=$DD}
+AC_PATH_PROGS_FEATURE_CHECK([lt_DD], [dd],
+[if "$ac_path_lt_DD" bs=32 count=1 <conftest2.i >conftest.out 2>/dev/null; then
+  cmp -s conftest.i conftest.out \
+  && ac_cv_path_lt_DD="$ac_path_lt_DD" ac_path_lt_DD_found=:
+fi])
+rm -f conftest.i conftest2.i conftest.out])
+])# _LT_PATH_DD
+
+
+# _LT_CMD_TRUNCATE
+# ----------------
+# find command to truncate a binary pipe
+m4_defun([_LT_CMD_TRUNCATE],
+[m4_require([_LT_PATH_DD])
+AC_CACHE_CHECK([how to truncate binary pipes], [lt_cv_truncate_bin],
+[printf 0123456789abcdef0123456789abcdef >conftest.i
+cat conftest.i conftest.i >conftest2.i
+lt_cv_truncate_bin=
+if "$ac_cv_path_lt_DD" bs=32 count=1 <conftest2.i >conftest.out 2>/dev/null; then
+  cmp -s conftest.i conftest.out \
+  && lt_cv_truncate_bin="$ac_cv_path_lt_DD bs=4096 count=1"
+fi
+rm -f conftest.i conftest2.i conftest.out
+test -z "$lt_cv_truncate_bin" && lt_cv_truncate_bin="$SED -e 4q"])
+_LT_DECL([lt_truncate_bin], [lt_cv_truncate_bin], [1],
+  [Command to truncate a binary pipe])
+])# _LT_CMD_TRUNCATE
+
+
+# _LT_CHECK_MAGIC_METHOD
+# ----------------------
+# how to check for library dependencies
+#  -- PORTME fill in with the dynamic library characteristics
+m4_defun([_LT_CHECK_MAGIC_METHOD],
+[m4_require([_LT_DECL_EGREP])
+m4_require([_LT_DECL_OBJDUMP])
+AC_CACHE_CHECK([how to recognize dependent libraries],
+lt_cv_deplibs_check_method,
+[lt_cv_file_magic_cmd='$MAGIC_CMD'
+lt_cv_file_magic_test_file=
+lt_cv_deplibs_check_method='unknown'
+# Need to set the preceding variable on all platforms that support
+# interlibrary dependencies.
+# 'none' -- dependencies not supported.
+# 'unknown' -- same as none, but documents that we really don't know.
+# 'pass_all' -- all dependencies passed with no checks.
+# 'test_compile' -- check by making test program.
+# 'file_magic [[regex]]' -- check by looking for files in library path
+# that responds to the $file_magic_cmd with a given extended regex.
+# If you have 'file' or equivalent on your system and you're not sure
+# whether 'pass_all' will *always* work, you probably want this one.
+
+case $host_os in
+aix[[4-9]]*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+beos*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+bsdi[[45]]*)
+  lt_cv_deplibs_check_method='file_magic ELF [[0-9]][[0-9]]*-bit [[ML]]SB (shared object|dynamic lib)'
+  lt_cv_file_magic_cmd='/usr/bin/file -L'
+  lt_cv_file_magic_test_file=/shlib/libc.so
+  ;;
+
+cygwin*)
+  # func_win32_libid is a shell function defined in ltmain.sh
+  lt_cv_deplibs_check_method='file_magic ^x86 archive import|^x86 DLL'
+  lt_cv_file_magic_cmd='func_win32_libid'
+  ;;
+
+mingw* | pw32*)
+  # Base MSYS/MinGW do not provide the 'file' command needed by
+  # func_win32_libid shell function, so use a weaker test based on 'objdump',
+  # unless we find 'file', for example because we are cross-compiling.
+  if ( file / ) >/dev/null 2>&1; then
+    lt_cv_deplibs_check_method='file_magic ^x86 archive import|^x86 DLL'
+    lt_cv_file_magic_cmd='func_win32_libid'
+  else
+    # Keep this pattern in sync with the one in func_win32_libid.
+    lt_cv_deplibs_check_method='file_magic file format (pei*-i386(.*architecture: i386)?|pe-arm-wince|pe-x86-64)'
+    lt_cv_file_magic_cmd='$OBJDUMP -f'
+  fi
+  ;;
+
+cegcc*)
+  # use the weaker test based on 'objdump'. See mingw*.
+  lt_cv_deplibs_check_method='file_magic file format pe-arm-.*little(.*architecture: arm)?'
+  lt_cv_file_magic_cmd='$OBJDUMP -f'
+  ;;
+
+darwin* | rhapsody*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+freebsd* | dragonfly*)
+  if echo __ELF__ | $CC -E - | $GREP __ELF__ > /dev/null; then
+    case $host_cpu in
+    i*86 )
+      # Not sure whether the presence of OpenBSD here was a mistake.
+      # Let's accept both of them until this is cleared up.
+      lt_cv_deplibs_check_method='file_magic (FreeBSD|OpenBSD|DragonFly)/i[[3-9]]86 (compact )?demand paged shared library'
+      lt_cv_file_magic_cmd=/usr/bin/file
+      lt_cv_file_magic_test_file=`echo /usr/lib/libc.so.*`
+      ;;
+    esac
+  else
+    lt_cv_deplibs_check_method=pass_all
+  fi
+  ;;
+
+haiku*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+hpux10.20* | hpux11*)
+  lt_cv_file_magic_cmd=/usr/bin/file
+  case $host_cpu in
+  ia64*)
+    lt_cv_deplibs_check_method='file_magic (s[[0-9]][[0-9]][[0-9]]|ELF-[[0-9]][[0-9]]) shared object file - IA64'
+    lt_cv_file_magic_test_file=/usr/lib/hpux32/libc.so
+    ;;
+  hppa*64*)
+    [lt_cv_deplibs_check_method='file_magic (s[0-9][0-9][0-9]|ELF[ -][0-9][0-9])(-bit)?( [LM]SB)? shared object( file)?[, -]* PA-RISC [0-9]\.[0-9]']
+    lt_cv_file_magic_test_file=/usr/lib/pa20_64/libc.sl
+    ;;
+  *)
+    lt_cv_deplibs_check_method='file_magic (s[[0-9]][[0-9]][[0-9]]|PA-RISC[[0-9]]\.[[0-9]]) shared library'
+    lt_cv_file_magic_test_file=/usr/lib/libc.sl
+    ;;
+  esac
+  ;;
+
+interix[[3-9]]*)
+  # PIC code is broken on Interix 3.x, that's why |\.a not |_pic\.a here
+  lt_cv_deplibs_check_method='match_pattern /lib[[^/]]+(\.so|\.a)$'
+  ;;
+
+irix5* | irix6* | nonstopux*)
+  case $LD in
+  *-32|*"-32 ") libmagic=32-bit;;
+  *-n32|*"-n32 ") libmagic=N32;;
+  *-64|*"-64 ") libmagic=64-bit;;
+  *) libmagic=never-match;;
+  esac
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+# This must be glibc/ELF.
+linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+netbsd*)
+  if echo __ELF__ | $CC -E - | $GREP __ELF__ > /dev/null; then
+    lt_cv_deplibs_check_method='match_pattern /lib[[^/]]+(\.so\.[[0-9]]+\.[[0-9]]+|_pic\.a)$'
+  else
+    lt_cv_deplibs_check_method='match_pattern /lib[[^/]]+(\.so|_pic\.a)$'
+  fi
+  ;;
+
+newos6*)
+  lt_cv_deplibs_check_method='file_magic ELF [[0-9]][[0-9]]*-bit [[ML]]SB (executable|dynamic lib)'
+  lt_cv_file_magic_cmd=/usr/bin/file
+  lt_cv_file_magic_test_file=/usr/lib/libnls.so
+  ;;
+
+*nto* | *qnx*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+openbsd* | bitrig*)
+  if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then
+    lt_cv_deplibs_check_method='match_pattern /lib[[^/]]+(\.so\.[[0-9]]+\.[[0-9]]+|\.so|_pic\.a)$'
+  else
+    lt_cv_deplibs_check_method='match_pattern /lib[[^/]]+(\.so\.[[0-9]]+\.[[0-9]]+|_pic\.a)$'
+  fi
+  ;;
+
+osf3* | osf4* | osf5*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+rdos*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+solaris*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX* | sysv4*uw2*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+
+sysv4 | sysv4.3*)
+  case $host_vendor in
+  motorola)
+    lt_cv_deplibs_check_method='file_magic ELF [[0-9]][[0-9]]*-bit [[ML]]SB (shared object|dynamic lib) M[[0-9]][[0-9]]* Version [[0-9]]'
+    lt_cv_file_magic_test_file=`echo /usr/lib/libc.so*`
+    ;;
+  ncr)
+    lt_cv_deplibs_check_method=pass_all
+    ;;
+  sequent)
+    lt_cv_file_magic_cmd='/bin/file'
+    lt_cv_deplibs_check_method='file_magic ELF [[0-9]][[0-9]]*-bit [[LM]]SB (shared object|dynamic lib )'
+    ;;
+  sni)
+    lt_cv_file_magic_cmd='/bin/file'
+    lt_cv_deplibs_check_method="file_magic ELF [[0-9]][[0-9]]*-bit [[LM]]SB dynamic lib"
+    lt_cv_file_magic_test_file=/lib/libc.so
+    ;;
+  siemens)
+    lt_cv_deplibs_check_method=pass_all
+    ;;
+  pc)
+    lt_cv_deplibs_check_method=pass_all
+    ;;
+  esac
+  ;;
+
+tpf*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+os2*)
+  lt_cv_deplibs_check_method=pass_all
+  ;;
+esac
+])
+
+file_magic_glob=
+want_nocaseglob=no
+if test "$build" = "$host"; then
+  case $host_os in
+  mingw* | pw32*)
+    if ( shopt | grep nocaseglob ) >/dev/null 2>&1; then
+      want_nocaseglob=yes
+    else
+      file_magic_glob=`echo aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ | $SED -e "s/\(..\)/s\/[[\1]]\/[[\1]]\/g;/g"`
+    fi
+    ;;
+  esac
+fi
+
+file_magic_cmd=$lt_cv_file_magic_cmd
+deplibs_check_method=$lt_cv_deplibs_check_method
+test -z "$deplibs_check_method" && deplibs_check_method=unknown
+
+_LT_DECL([], [deplibs_check_method], [1],
+    [Method to check whether dependent libraries are shared objects])
+_LT_DECL([], [file_magic_cmd], [1],
+    [Command to use when deplibs_check_method = "file_magic"])
+_LT_DECL([], [file_magic_glob], [1],
+    [How to find potential files when deplibs_check_method = "file_magic"])
+_LT_DECL([], [want_nocaseglob], [1],
+    [Find potential files using nocaseglob when deplibs_check_method = "file_magic"])
+])# _LT_CHECK_MAGIC_METHOD
+
+
+# LT_PATH_NM
+# ----------
+# find the pathname to a BSD- or MS-compatible name lister
+AC_DEFUN([LT_PATH_NM],
+[AC_REQUIRE([AC_PROG_CC])dnl
+AC_CACHE_CHECK([for BSD- or MS-compatible name lister (nm)], lt_cv_path_NM,
+[if test -n "$NM"; then
+  # Let the user override the test.
+  lt_cv_path_NM=$NM
+else
+  lt_nm_to_check=${ac_tool_prefix}nm
+  if test -n "$ac_tool_prefix" && test "$build" = "$host"; then
+    lt_nm_to_check="$lt_nm_to_check nm"
+  fi
+  for lt_tmp_nm in $lt_nm_to_check; do
+    lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR
+    for ac_dir in $PATH /usr/ccs/bin/elf /usr/ccs/bin /usr/ucb /bin; do
+      IFS=$lt_save_ifs
+      test -z "$ac_dir" && ac_dir=.
+      tmp_nm=$ac_dir/$lt_tmp_nm
+      if test -f "$tmp_nm" || test -f "$tmp_nm$ac_exeext"; then
+       # Check to see if the nm accepts a BSD-compat flag.
+       # Adding the 'sed 1q' prevents false positives on HP-UX, which says:
+       #   nm: unknown option "B" ignored
+       # Tru64's nm complains that /dev/null is an invalid object file
+       # MSYS converts /dev/null to NUL, MinGW nm treats NUL as empty
+       case $build_os in
+       mingw*) lt_bad_file=conftest.nm/nofile ;;
+       *) lt_bad_file=/dev/null ;;
+       esac
+       case `"$tmp_nm" -B $lt_bad_file 2>&1 | sed '1q'` in
+       *$lt_bad_file* | *'Invalid file or object type'*)
+         lt_cv_path_NM="$tmp_nm -B"
+         break 2
+         ;;
+       *)
+         case `"$tmp_nm" -p /dev/null 2>&1 | sed '1q'` in
+         */dev/null*)
+           lt_cv_path_NM="$tmp_nm -p"
+           break 2
+           ;;
+         *)
+           lt_cv_path_NM=${lt_cv_path_NM="$tmp_nm"} # keep the first match, but
+           continue # so that we can try to find one that supports BSD flags
+           ;;
+         esac
+         ;;
+       esac
+      fi
+    done
+    IFS=$lt_save_ifs
+  done
+  : ${lt_cv_path_NM=no}
+fi])
+if test no != "$lt_cv_path_NM"; then
+  NM=$lt_cv_path_NM
+else
+  # Didn't find any BSD compatible name lister, look for dumpbin.
+  if test -n "$DUMPBIN"; then :
+    # Let the user override the test.
+  else
+    AC_CHECK_TOOLS(DUMPBIN, [dumpbin "link -dump"], :)
+    case `$DUMPBIN -symbols -headers /dev/null 2>&1 | sed '1q'` in
+    *COFF*)
+      DUMPBIN="$DUMPBIN -symbols -headers"
+      ;;
+    *)
+      DUMPBIN=:
+      ;;
+    esac
+  fi
+  AC_SUBST([DUMPBIN])
+  if test : != "$DUMPBIN"; then
+    NM=$DUMPBIN
+  fi
+fi
+test -z "$NM" && NM=nm
+AC_SUBST([NM])
+_LT_DECL([], [NM], [1], [A BSD- or MS-compatible name lister])dnl
+
+AC_CACHE_CHECK([the name lister ($NM) interface], [lt_cv_nm_interface],
+  [lt_cv_nm_interface="BSD nm"
+  echo "int some_variable = 0;" > conftest.$ac_ext
+  (eval echo "\"\$as_me:$LINENO: $ac_compile\"" >&AS_MESSAGE_LOG_FD)
+  (eval "$ac_compile" 2>conftest.err)
+  cat conftest.err >&AS_MESSAGE_LOG_FD
+  (eval echo "\"\$as_me:$LINENO: $NM \\\"conftest.$ac_objext\\\"\"" >&AS_MESSAGE_LOG_FD)
+  (eval "$NM \"conftest.$ac_objext\"" 2>conftest.err > conftest.out)
+  cat conftest.err >&AS_MESSAGE_LOG_FD
+  (eval echo "\"\$as_me:$LINENO: output\"" >&AS_MESSAGE_LOG_FD)
+  cat conftest.out >&AS_MESSAGE_LOG_FD
+  if $GREP 'External.*some_variable' conftest.out > /dev/null; then
+    lt_cv_nm_interface="MS dumpbin"
+  fi
+  rm -f conftest*])
+])# LT_PATH_NM
+
+# Old names:
+AU_ALIAS([AM_PROG_NM], [LT_PATH_NM])
+AU_ALIAS([AC_PROG_NM], [LT_PATH_NM])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AM_PROG_NM], [])
+dnl AC_DEFUN([AC_PROG_NM], [])
+
+# _LT_CHECK_SHAREDLIB_FROM_LINKLIB
+# --------------------------------
+# how to determine the name of the shared library
+# associated with a specific link library.
+#  -- PORTME fill in with the dynamic library characteristics
+m4_defun([_LT_CHECK_SHAREDLIB_FROM_LINKLIB],
+[m4_require([_LT_DECL_EGREP])
+m4_require([_LT_DECL_OBJDUMP])
+m4_require([_LT_DECL_DLLTOOL])
+AC_CACHE_CHECK([how to associate runtime and link libraries],
+lt_cv_sharedlib_from_linklib_cmd,
+[lt_cv_sharedlib_from_linklib_cmd='unknown'
+
+case $host_os in
+cygwin* | mingw* | pw32* | cegcc*)
+  # two different shell functions defined in ltmain.sh;
+  # decide which one to use based on capabilities of $DLLTOOL
+  case `$DLLTOOL --help 2>&1` in
+  *--identify-strict*)
+    lt_cv_sharedlib_from_linklib_cmd=func_cygming_dll_for_implib
+    ;;
+  *)
+    lt_cv_sharedlib_from_linklib_cmd=func_cygming_dll_for_implib_fallback
+    ;;
+  esac
+  ;;
+*)
+  # fallback: assume linklib IS sharedlib
+  lt_cv_sharedlib_from_linklib_cmd=$ECHO
+  ;;
+esac
+])
+sharedlib_from_linklib_cmd=$lt_cv_sharedlib_from_linklib_cmd
+test -z "$sharedlib_from_linklib_cmd" && sharedlib_from_linklib_cmd=$ECHO
+
+_LT_DECL([], [sharedlib_from_linklib_cmd], [1],
+    [Command to associate shared and link libraries])
+])# _LT_CHECK_SHAREDLIB_FROM_LINKLIB
+
+
+# _LT_PATH_MANIFEST_TOOL
+# ----------------------
+# locate the manifest tool
+m4_defun([_LT_PATH_MANIFEST_TOOL],
+[AC_CHECK_TOOL(MANIFEST_TOOL, mt, :)
+test -z "$MANIFEST_TOOL" && MANIFEST_TOOL=mt
+AC_CACHE_CHECK([if $MANIFEST_TOOL is a manifest tool], [lt_cv_path_mainfest_tool],
+  [lt_cv_path_mainfest_tool=no
+  echo "$as_me:$LINENO: $MANIFEST_TOOL '-?'" >&AS_MESSAGE_LOG_FD
+  $MANIFEST_TOOL '-?' 2>conftest.err > conftest.out
+  cat conftest.err >&AS_MESSAGE_LOG_FD
+  if $GREP 'Manifest Tool' conftest.out > /dev/null; then
+    lt_cv_path_mainfest_tool=yes
+  fi
+  rm -f conftest*])
+if test yes != "$lt_cv_path_mainfest_tool"; then
+  MANIFEST_TOOL=:
+fi
+_LT_DECL([], [MANIFEST_TOOL], [1], [Manifest tool])dnl
+])# _LT_PATH_MANIFEST_TOOL
+
+
+# _LT_DLL_DEF_P([FILE])
+# ---------------------
+# True iff FILE is a Windows DLL '.def' file.
+# Keep in sync with func_dll_def_p in the libtool script
+AC_DEFUN([_LT_DLL_DEF_P],
+[dnl
+  test DEF = "`$SED -n dnl
+    -e '\''s/^[[        ]]*//'\'' dnl Strip leading whitespace
+    -e '\''/^\(;.*\)*$/d'\'' dnl      Delete empty lines and comments
+    -e '\''s/^\(EXPORTS\|LIBRARY\)\([[  ]].*\)*$/DEF/p'\'' dnl
+    -e q dnl                          Only consider the first "real" line
+    $1`" dnl
+])# _LT_DLL_DEF_P
+
+
+# LT_LIB_M
+# --------
+# check for math library
+AC_DEFUN([LT_LIB_M],
+[AC_REQUIRE([AC_CANONICAL_HOST])dnl
+LIBM=
+case $host in
+*-*-beos* | *-*-cegcc* | *-*-cygwin* | *-*-haiku* | *-*-pw32* | *-*-darwin*)
+  # These system don't have libm, or don't need it
+  ;;
+*-ncr-sysv4.3*)
+  AC_CHECK_LIB(mw, _mwvalidcheckl, LIBM=-lmw)
+  AC_CHECK_LIB(m, cos, LIBM="$LIBM -lm")
+  ;;
+*)
+  AC_CHECK_LIB(m, cos, LIBM=-lm)
+  ;;
+esac
+AC_SUBST([LIBM])
+])# LT_LIB_M
+
+# Old name:
+AU_ALIAS([AC_CHECK_LIBM], [LT_LIB_M])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_CHECK_LIBM], [])
+
+
+# _LT_COMPILER_NO_RTTI([TAGNAME])
+# -------------------------------
+m4_defun([_LT_COMPILER_NO_RTTI],
+[m4_require([_LT_TAG_COMPILER])dnl
+
+_LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)=
+
+if test yes = "$GCC"; then
+  case $cc_basename in
+  nvcc*)
+    _LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)=' -Xcompiler -fno-builtin' ;;
+  *)
+    _LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)=' -fno-builtin' ;;
+  esac
+
+  _LT_COMPILER_OPTION([if $compiler supports -fno-rtti -fno-exceptions],
+    lt_cv_prog_compiler_rtti_exceptions,
+    [-fno-rtti -fno-exceptions], [],
+    [_LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)="$_LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1) -fno-rtti -fno-exceptions"])
+fi
+_LT_TAGDECL([no_builtin_flag], [lt_prog_compiler_no_builtin_flag], [1],
+       [Compiler flag to turn off builtin functions])
+])# _LT_COMPILER_NO_RTTI
+
+
+# _LT_CMD_GLOBAL_SYMBOLS
+# ----------------------
+m4_defun([_LT_CMD_GLOBAL_SYMBOLS],
+[AC_REQUIRE([AC_CANONICAL_HOST])dnl
+AC_REQUIRE([AC_PROG_CC])dnl
+AC_REQUIRE([AC_PROG_AWK])dnl
+AC_REQUIRE([LT_PATH_NM])dnl
+AC_REQUIRE([LT_PATH_LD])dnl
+m4_require([_LT_DECL_SED])dnl
+m4_require([_LT_DECL_EGREP])dnl
+m4_require([_LT_TAG_COMPILER])dnl
+
+# Check for command to grab the raw symbol name followed by C symbol from nm.
+AC_MSG_CHECKING([command to parse $NM output from $compiler object])
+AC_CACHE_VAL([lt_cv_sys_global_symbol_pipe],
+[
+# These are sane defaults that work on at least a few old systems.
+# [They come from Ultrix.  What could be older than Ultrix?!! ;)]
+
+# Character class describing NM global symbol codes.
+symcode='[[BCDEGRST]]'
+
+# Regexp to match symbols that can be accessed directly from C.
+sympat='\([[_A-Za-z]][[_A-Za-z0-9]]*\)'
+
+# Define system-specific variables.
+case $host_os in
+aix*)
+  symcode='[[BCDT]]'
+  ;;
+cygwin* | mingw* | pw32* | cegcc*)
+  symcode='[[ABCDGISTW]]'
+  ;;
+hpux*)
+  if test ia64 = "$host_cpu"; then
+    symcode='[[ABCDEGRST]]'
+  fi
+  ;;
+irix* | nonstopux*)
+  symcode='[[BCDEGRST]]'
+  ;;
+osf*)
+  symcode='[[BCDEGQRST]]'
+  ;;
+solaris*)
+  symcode='[[BCDRT]]'
+  ;;
+sco3.2v5*)
+  symcode='[[DT]]'
+  ;;
+sysv4.2uw2*)
+  symcode='[[DT]]'
+  ;;
+sysv5* | sco5v6* | unixware* | OpenUNIX*)
+  symcode='[[ABDT]]'
+  ;;
+sysv4)
+  symcode='[[DFNSTU]]'
+  ;;
+esac
+
+# If we're using GNU nm, then use its standard symbol codes.
+case `$NM -V 2>&1` in
+*GNU* | *'with BFD'*)
+  symcode='[[ABCDGIRSTW]]' ;;
+esac
+
+if test "$lt_cv_nm_interface" = "MS dumpbin"; then
+  # Gets list of data symbols to import.
+  lt_cv_sys_global_symbol_to_import="sed -n -e 's/^I .* \(.*\)$/\1/p'"
+  # Adjust the below global symbol transforms to fixup imported variables.
+  lt_cdecl_hook=" -e 's/^I .* \(.*\)$/extern __declspec(dllimport) char \1;/p'"
+  lt_c_name_hook=" -e 's/^I .* \(.*\)$/  {\"\1\", (void *) 0},/p'"
+  lt_c_name_lib_hook="\
+  -e 's/^I .* \(lib.*\)$/  {\"\1\", (void *) 0},/p'\
+  -e 's/^I .* \(.*\)$/  {\"lib\1\", (void *) 0},/p'"
+else
+  # Disable hooks by default.
+  lt_cv_sys_global_symbol_to_import=
+  lt_cdecl_hook=
+  lt_c_name_hook=
+  lt_c_name_lib_hook=
+fi
+
+# Transform an extracted symbol line into a proper C declaration.
+# Some systems (esp. on ia64) link data and code symbols differently,
+# so use this general approach.
+lt_cv_sys_global_symbol_to_cdecl="sed -n"\
+$lt_cdecl_hook\
+" -e 's/^T .* \(.*\)$/extern int \1();/p'"\
+" -e 's/^$symcode$symcode* .* \(.*\)$/extern char \1;/p'"
+
+# Transform an extracted symbol line into symbol name and symbol address
+lt_cv_sys_global_symbol_to_c_name_address="sed -n"\
+$lt_c_name_hook\
+" -e 's/^: \(.*\) .*$/  {\"\1\", (void *) 0},/p'"\
+" -e 's/^$symcode$symcode* .* \(.*\)$/  {\"\1\", (void *) \&\1},/p'"
+
+# Transform an extracted symbol line into symbol name with lib prefix and
+# symbol address.
+lt_cv_sys_global_symbol_to_c_name_address_lib_prefix="sed -n"\
+$lt_c_name_lib_hook\
+" -e 's/^: \(.*\) .*$/  {\"\1\", (void *) 0},/p'"\
+" -e 's/^$symcode$symcode* .* \(lib.*\)$/  {\"\1\", (void *) \&\1},/p'"\
+" -e 's/^$symcode$symcode* .* \(.*\)$/  {\"lib\1\", (void *) \&\1},/p'"
+
+# Handle CRLF in mingw tool chain
+opt_cr=
+case $build_os in
+mingw*)
+  opt_cr=`$ECHO 'x\{0,1\}' | tr x '\015'` # option cr in regexp
+  ;;
+esac
+
+# Try without a prefix underscore, then with it.
+for ac_symprfx in "" "_"; do
+
+  # Transform symcode, sympat, and symprfx into a raw symbol and a C symbol.
+  symxfrm="\\1 $ac_symprfx\\2 \\2"
+
+  # Write the raw and C identifiers.
+  if test "$lt_cv_nm_interface" = "MS dumpbin"; then
+    # Fake it for dumpbin and say T for any non-static function,
+    # D for any global variable and I for any imported variable.
+    # Also find C++ and __fastcall symbols from MSVC++,
+    # which start with @ or ?.
+    lt_cv_sys_global_symbol_pipe="$AWK ['"\
+"     {last_section=section; section=\$ 3};"\
+"     /^COFF SYMBOL TABLE/{for(i in hide) delete hide[i]};"\
+"     /Section length .*#relocs.*(pick any)/{hide[last_section]=1};"\
+"     /^ *Symbol name *: /{split(\$ 0,sn,\":\"); si=substr(sn[2],2)};"\
+"     /^ *Type *: code/{print \"T\",si,substr(si,length(prfx))};"\
+"     /^ *Type *: data/{print \"I\",si,substr(si,length(prfx))};"\
+"     \$ 0!~/External *\|/{next};"\
+"     / 0+ UNDEF /{next}; / UNDEF \([^|]\)*()/{next};"\
+"     {if(hide[section]) next};"\
+"     {f=\"D\"}; \$ 0~/\(\).*\|/{f=\"T\"};"\
+"     {split(\$ 0,a,/\||\r/); split(a[2],s)};"\
+"     s[1]~/^[@?]/{print f,s[1],s[1]; next};"\
+"     s[1]~prfx {split(s[1],t,\"@\"); print f,t[1],substr(t[1],length(prfx))}"\
+"     ' prfx=^$ac_symprfx]"
+  else
+    lt_cv_sys_global_symbol_pipe="sed -n -e 's/^.*[[    ]]\($symcode$symcode*\)[[       ]][[    ]]*$ac_symprfx$sympat$opt_cr$/$symxfrm/p'"
+  fi
+  lt_cv_sys_global_symbol_pipe="$lt_cv_sys_global_symbol_pipe | sed '/ __gnu_lto/d'"
+
+  # Check to see that the pipe works correctly.
+  pipe_works=no
+
+  rm -f conftest*
+  cat > conftest.$ac_ext <<_LT_EOF
+#ifdef __cplusplus
+extern "C" {
+#endif
+char nm_test_var;
+void nm_test_func(void);
+void nm_test_func(void){}
+#ifdef __cplusplus
+}
+#endif
+int main(){nm_test_var='a';nm_test_func();return(0);}
+_LT_EOF
+
+  if AC_TRY_EVAL(ac_compile); then
+    # Now try to grab the symbols.
+    nlist=conftest.nm
+    if AC_TRY_EVAL(NM conftest.$ac_objext \| "$lt_cv_sys_global_symbol_pipe" \> $nlist) && test -s "$nlist"; then
+      # Try sorting and uniquifying the output.
+      if sort "$nlist" | uniq > "$nlist"T; then
+       mv -f "$nlist"T "$nlist"
+      else
+       rm -f "$nlist"T
+      fi
+
+      # Make sure that we snagged all the symbols we need.
+      if $GREP ' nm_test_var$' "$nlist" >/dev/null; then
+       if $GREP ' nm_test_func$' "$nlist" >/dev/null; then
+         cat <<_LT_EOF > conftest.$ac_ext
+/* Keep this code in sync between libtool.m4, ltmain, lt_system.h, and tests.  */
+#if defined _WIN32 || defined __CYGWIN__ || defined _WIN32_WCE
+/* DATA imports from DLLs on WIN32 can't be const, because runtime
+   relocations are performed -- see ld's documentation on pseudo-relocs.  */
+# define LT@&t@_DLSYM_CONST
+#elif defined __osf__
+/* This system does not cope well with relocations in const data.  */
+# define LT@&t@_DLSYM_CONST
+#else
+# define LT@&t@_DLSYM_CONST const
+#endif
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+_LT_EOF
+         # Now generate the symbol file.
+         eval "$lt_cv_sys_global_symbol_to_cdecl"' < "$nlist" | $GREP -v main >> conftest.$ac_ext'
+
+         cat <<_LT_EOF >> conftest.$ac_ext
+
+/* The mapping between symbol names and symbols.  */
+LT@&t@_DLSYM_CONST struct {
+  const char *name;
+  void       *address;
+}
+lt__PROGRAM__LTX_preloaded_symbols[[]] =
+{
+  { "@PROGRAM@", (void *) 0 },
+_LT_EOF
+         $SED "s/^$symcode$symcode* .* \(.*\)$/  {\"\1\", (void *) \&\1},/" < "$nlist" | $GREP -v main >> conftest.$ac_ext
+         cat <<\_LT_EOF >> conftest.$ac_ext
+  {0, (void *) 0}
+};
+
+/* This works around a problem in FreeBSD linker */
+#ifdef FREEBSD_WORKAROUND
+static const void *lt_preloaded_setup() {
+  return lt__PROGRAM__LTX_preloaded_symbols;
+}
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+_LT_EOF
+         # Now try linking the two files.
+         mv conftest.$ac_objext conftstm.$ac_objext
+         lt_globsym_save_LIBS=$LIBS
+         lt_globsym_save_CFLAGS=$CFLAGS
+         LIBS=conftstm.$ac_objext
+         CFLAGS="$CFLAGS$_LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)"
+         if AC_TRY_EVAL(ac_link) && test -s conftest$ac_exeext; then
+           pipe_works=yes
+         fi
+         LIBS=$lt_globsym_save_LIBS
+         CFLAGS=$lt_globsym_save_CFLAGS
+       else
+         echo "cannot find nm_test_func in $nlist" >&AS_MESSAGE_LOG_FD
+       fi
+      else
+       echo "cannot find nm_test_var in $nlist" >&AS_MESSAGE_LOG_FD
+      fi
+    else
+      echo "cannot run $lt_cv_sys_global_symbol_pipe" >&AS_MESSAGE_LOG_FD
+    fi
+  else
+    echo "$progname: failed program was:" >&AS_MESSAGE_LOG_FD
+    cat conftest.$ac_ext >&5
+  fi
+  rm -rf conftest* conftst*
+
+  # Do not use the global_symbol_pipe unless it works.
+  if test yes = "$pipe_works"; then
+    break
+  else
+    lt_cv_sys_global_symbol_pipe=
+  fi
+done
+])
+if test -z "$lt_cv_sys_global_symbol_pipe"; then
+  lt_cv_sys_global_symbol_to_cdecl=
+fi
+if test -z "$lt_cv_sys_global_symbol_pipe$lt_cv_sys_global_symbol_to_cdecl"; then
+  AC_MSG_RESULT(failed)
+else
+  AC_MSG_RESULT(ok)
+fi
+
+# Response file support.
+if test "$lt_cv_nm_interface" = "MS dumpbin"; then
+  nm_file_list_spec='@'
+elif $NM --help 2>/dev/null | grep '[[@]]FILE' >/dev/null; then
+  nm_file_list_spec='@'
+fi
+
+_LT_DECL([global_symbol_pipe], [lt_cv_sys_global_symbol_pipe], [1],
+    [Take the output of nm and produce a listing of raw symbols and C names])
+_LT_DECL([global_symbol_to_cdecl], [lt_cv_sys_global_symbol_to_cdecl], [1],
+    [Transform the output of nm in a proper C declaration])
+_LT_DECL([global_symbol_to_import], [lt_cv_sys_global_symbol_to_import], [1],
+    [Transform the output of nm into a list of symbols to manually relocate])
+_LT_DECL([global_symbol_to_c_name_address],
+    [lt_cv_sys_global_symbol_to_c_name_address], [1],
+    [Transform the output of nm in a C name address pair])
+_LT_DECL([global_symbol_to_c_name_address_lib_prefix],
+    [lt_cv_sys_global_symbol_to_c_name_address_lib_prefix], [1],
+    [Transform the output of nm in a C name address pair when lib prefix is needed])
+_LT_DECL([nm_interface], [lt_cv_nm_interface], [1],
+    [The name lister interface])
+_LT_DECL([], [nm_file_list_spec], [1],
+    [Specify filename containing input files for $NM])
+]) # _LT_CMD_GLOBAL_SYMBOLS
+
+
+# _LT_COMPILER_PIC([TAGNAME])
+# ---------------------------
+m4_defun([_LT_COMPILER_PIC],
+[m4_require([_LT_TAG_COMPILER])dnl
+_LT_TAGVAR(lt_prog_compiler_wl, $1)=
+_LT_TAGVAR(lt_prog_compiler_pic, $1)=
+_LT_TAGVAR(lt_prog_compiler_static, $1)=
+
+m4_if([$1], [CXX], [
+  # C++ specific cases for pic, static, wl, etc.
+  if test yes = "$GXX"; then
+    _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+    _LT_TAGVAR(lt_prog_compiler_static, $1)='-static'
+
+    case $host_os in
+    aix*)
+      # All AIX code is PIC.
+      if test ia64 = "$host_cpu"; then
+       # AIX 5 now supports IA64 processor
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+      fi
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+      ;;
+
+    amigaos*)
+      case $host_cpu in
+      powerpc)
+            # see comment about AmigaOS4 .so support
+            _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+        ;;
+      m68k)
+            # FIXME: we need at least 68020 code to build shared libraries, but
+            # adding the '-m68020' flag to GCC prevents building anything better,
+            # like '-m68040'.
+            _LT_TAGVAR(lt_prog_compiler_pic, $1)='-m68020 -resident32 -malways-restore-a4'
+        ;;
+      esac
+      ;;
+
+    beos* | irix5* | irix6* | nonstopux* | osf3* | osf4* | osf5*)
+      # PIC is the default for these OSes.
+      ;;
+    mingw* | cygwin* | os2* | pw32* | cegcc*)
+      # This hack is so that the source file can tell whether it is being
+      # built for inclusion in a dll (and should export symbols for example).
+      # Although the cygwin gcc ignores -fPIC, still need this for old-style
+      # (--disable-auto-import) libraries
+      m4_if([$1], [GCJ], [],
+       [_LT_TAGVAR(lt_prog_compiler_pic, $1)='-DDLL_EXPORT'])
+      case $host_os in
+      os2*)
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-static'
+       ;;
+      esac
+      ;;
+    darwin* | rhapsody*)
+      # PIC is the default on this platform
+      # Common symbols not allowed in MH_DYLIB files
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fno-common'
+      ;;
+    *djgpp*)
+      # DJGPP does not support shared libraries at all
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)=
+      ;;
+    haiku*)
+      # PIC is the default for Haiku.
+      # The "-static" flag exists, but is broken.
+      _LT_TAGVAR(lt_prog_compiler_static, $1)=
+      ;;
+    interix[[3-9]]*)
+      # Interix 3.x gcc -fpic/-fPIC options generate broken code.
+      # Instead, we relocate shared libraries at runtime.
+      ;;
+    sysv4*MP*)
+      if test -d /usr/nec; then
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)=-Kconform_pic
+      fi
+      ;;
+    hpux*)
+      # PIC is the default for 64-bit PA HP-UX, but not for 32-bit
+      # PA HP-UX.  On IA64 HP-UX, PIC is the default but the pic flag
+      # sets the default TLS model and affects inlining.
+      case $host_cpu in
+      hppa*64*)
+       ;;
+      *)
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+       ;;
+      esac
+      ;;
+    *qnx* | *nto*)
+      # QNX uses GNU C++, but need to define -shared option too, otherwise
+      # it will coredump.
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC -shared'
+      ;;
+    *)
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+      ;;
+    esac
+  else
+    case $host_os in
+      aix[[4-9]]*)
+       # All AIX code is PIC.
+       if test ia64 = "$host_cpu"; then
+         # AIX 5 now supports IA64 processor
+         _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+       else
+         _LT_TAGVAR(lt_prog_compiler_static, $1)='-bnso -bI:/lib/syscalls.exp'
+       fi
+       ;;
+      chorus*)
+       case $cc_basename in
+       cxch68*)
+         # Green Hills C++ Compiler
+         # _LT_TAGVAR(lt_prog_compiler_static, $1)="--no_auto_instantiation -u __main -u __premain -u _abort -r $COOL_DIR/lib/libOrb.a $MVME_DIR/lib/CC/libC.a $MVME_DIR/lib/classix/libcx.s.a"
+         ;;
+       esac
+       ;;
+      mingw* | cygwin* | os2* | pw32* | cegcc*)
+       # This hack is so that the source file can tell whether it is being
+       # built for inclusion in a dll (and should export symbols for example).
+       m4_if([$1], [GCJ], [],
+         [_LT_TAGVAR(lt_prog_compiler_pic, $1)='-DDLL_EXPORT'])
+       ;;
+      dgux*)
+       case $cc_basename in
+         ec++*)
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+           ;;
+         ghcx*)
+           # Green Hills C++ Compiler
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-pic'
+           ;;
+         *)
+           ;;
+       esac
+       ;;
+      freebsd* | dragonfly*)
+       # FreeBSD uses GNU C++
+       ;;
+      hpux9* | hpux10* | hpux11*)
+       case $cc_basename in
+         CC*)
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-a ${wl}archive'
+           if test ia64 != "$host_cpu"; then
+             _LT_TAGVAR(lt_prog_compiler_pic, $1)='+Z'
+           fi
+           ;;
+         aCC*)
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-a ${wl}archive'
+           case $host_cpu in
+           hppa*64*|ia64*)
+             # +Z the default
+             ;;
+           *)
+             _LT_TAGVAR(lt_prog_compiler_pic, $1)='+Z'
+             ;;
+           esac
+           ;;
+         *)
+           ;;
+       esac
+       ;;
+      interix*)
+       # This is c89, which is MS Visual C++ (no shared libs)
+       # Anyone wants to do a port?
+       ;;
+      irix5* | irix6* | nonstopux*)
+       case $cc_basename in
+         CC*)
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared'
+           # CC pic flag -KPIC is the default.
+           ;;
+         *)
+           ;;
+       esac
+       ;;
+      linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*)
+       case $cc_basename in
+         KCC*)
+           # KAI C++ Compiler
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='--backend -Wl,'
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+           ;;
+         ecpc* )
+           # old Intel C++ for x86_64, which still supported -KPIC.
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='-static'
+           ;;
+         icpc* )
+           # Intel C++, used to be incompatible with GCC.
+           # ICC 10 doesn't accept -KPIC any more.
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='-static'
+           ;;
+         pgCC* | pgcpp*)
+           # Portland Group C++ compiler
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fpic'
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+           ;;
+         cxx*)
+           # Compaq C++
+           # Make sure the PIC flag is empty.  It appears that all Alpha
+           # Linux and Compaq Tru64 Unix objects are PIC.
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)=
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared'
+           ;;
+         xlc* | xlC* | bgxl[[cC]]* | mpixl[[cC]]*)
+           # IBM XL 8.0, 9.0 on PPC and BlueGene
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-qpic'
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='-qstaticlink'
+           ;;
+         *)
+           case `$CC -V 2>&1 | sed 5q` in
+           *Sun\ C*)
+             # Sun C++ 5.9
+             _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+             _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+             _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Qoption ld '
+             ;;
+           esac
+           ;;
+       esac
+       ;;
+      lynxos*)
+       ;;
+      m88k*)
+       ;;
+      mvs*)
+       case $cc_basename in
+         cxx*)
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-W c,exportall'
+           ;;
+         *)
+           ;;
+       esac
+       ;;
+      netbsd*)
+       ;;
+      *qnx* | *nto*)
+        # QNX uses GNU C++, but need to define -shared option too, otherwise
+        # it will coredump.
+        _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC -shared'
+        ;;
+      osf3* | osf4* | osf5*)
+       case $cc_basename in
+         KCC*)
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='--backend -Wl,'
+           ;;
+         RCC*)
+           # Rational C++ 2.4.1
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-pic'
+           ;;
+         cxx*)
+           # Digital/Compaq C++
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+           # Make sure the PIC flag is empty.  It appears that all Alpha
+           # Linux and Compaq Tru64 Unix objects are PIC.
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)=
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared'
+           ;;
+         *)
+           ;;
+       esac
+       ;;
+      psos*)
+       ;;
+      solaris*)
+       case $cc_basename in
+         CC* | sunCC*)
+           # Sun C++ 4.2, 5.x and Centerline C++
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Qoption ld '
+           ;;
+         gcx*)
+           # Green Hills C++ Compiler
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-PIC'
+           ;;
+         *)
+           ;;
+       esac
+       ;;
+      sunos4*)
+       case $cc_basename in
+         CC*)
+           # Sun C++ 4.x
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-pic'
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+           ;;
+         lcc*)
+           # Lucid
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-pic'
+           ;;
+         *)
+           ;;
+       esac
+       ;;
+      sysv5* | unixware* | sco3.2v5* | sco5v6* | OpenUNIX*)
+       case $cc_basename in
+         CC*)
+           _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+           _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+           ;;
+       esac
+       ;;
+      tandem*)
+       case $cc_basename in
+         NCC*)
+           # NonStop-UX NCC 3.20
+           _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+           ;;
+         *)
+           ;;
+       esac
+       ;;
+      vxworks*)
+       ;;
+      *)
+       _LT_TAGVAR(lt_prog_compiler_can_build_shared, $1)=no
+       ;;
+    esac
+  fi
+],
+[
+  if test yes = "$GCC"; then
+    _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+    _LT_TAGVAR(lt_prog_compiler_static, $1)='-static'
+
+    case $host_os in
+      aix*)
+      # All AIX code is PIC.
+      if test ia64 = "$host_cpu"; then
+       # AIX 5 now supports IA64 processor
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+      fi
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+      ;;
+
+    amigaos*)
+      case $host_cpu in
+      powerpc)
+            # see comment about AmigaOS4 .so support
+            _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+        ;;
+      m68k)
+            # FIXME: we need at least 68020 code to build shared libraries, but
+            # adding the '-m68020' flag to GCC prevents building anything better,
+            # like '-m68040'.
+            _LT_TAGVAR(lt_prog_compiler_pic, $1)='-m68020 -resident32 -malways-restore-a4'
+        ;;
+      esac
+      ;;
+
+    beos* | irix5* | irix6* | nonstopux* | osf3* | osf4* | osf5*)
+      # PIC is the default for these OSes.
+      ;;
+
+    mingw* | cygwin* | pw32* | os2* | cegcc*)
+      # This hack is so that the source file can tell whether it is being
+      # built for inclusion in a dll (and should export symbols for example).
+      # Although the cygwin gcc ignores -fPIC, still need this for old-style
+      # (--disable-auto-import) libraries
+      m4_if([$1], [GCJ], [],
+       [_LT_TAGVAR(lt_prog_compiler_pic, $1)='-DDLL_EXPORT'])
+      case $host_os in
+      os2*)
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-static'
+       ;;
+      esac
+      ;;
+
+    darwin* | rhapsody*)
+      # PIC is the default on this platform
+      # Common symbols not allowed in MH_DYLIB files
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fno-common'
+      ;;
+
+    haiku*)
+      # PIC is the default for Haiku.
+      # The "-static" flag exists, but is broken.
+      _LT_TAGVAR(lt_prog_compiler_static, $1)=
+      ;;
+
+    hpux*)
+      # PIC is the default for 64-bit PA HP-UX, but not for 32-bit
+      # PA HP-UX.  On IA64 HP-UX, PIC is the default but the pic flag
+      # sets the default TLS model and affects inlining.
+      case $host_cpu in
+      hppa*64*)
+       # +Z the default
+       ;;
+      *)
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+       ;;
+      esac
+      ;;
+
+    interix[[3-9]]*)
+      # Interix 3.x gcc -fpic/-fPIC options generate broken code.
+      # Instead, we relocate shared libraries at runtime.
+      ;;
+
+    msdosdjgpp*)
+      # Just because we use GCC doesn't mean we suddenly get shared libraries
+      # on systems that don't support them.
+      _LT_TAGVAR(lt_prog_compiler_can_build_shared, $1)=no
+      enable_shared=no
+      ;;
+
+    *nto* | *qnx*)
+      # QNX uses GNU C++, but need to define -shared option too, otherwise
+      # it will coredump.
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC -shared'
+      ;;
+
+    sysv4*MP*)
+      if test -d /usr/nec; then
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)=-Kconform_pic
+      fi
+      ;;
+
+    *)
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+      ;;
+    esac
+
+    case $cc_basename in
+    nvcc*) # Cuda Compiler Driver 2.2
+      _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Xlinker '
+      if test -n "$_LT_TAGVAR(lt_prog_compiler_pic, $1)"; then
+        _LT_TAGVAR(lt_prog_compiler_pic, $1)="-Xcompiler $_LT_TAGVAR(lt_prog_compiler_pic, $1)"
+      fi
+      ;;
+    esac
+  else
+    # PORTME Check for flag to pass linker flags through the system compiler.
+    case $host_os in
+    aix*)
+      _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+      if test ia64 = "$host_cpu"; then
+       # AIX 5 now supports IA64 processor
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+      else
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='-bnso -bI:/lib/syscalls.exp'
+      fi
+      ;;
+
+    darwin* | rhapsody*)
+      # PIC is the default on this platform
+      # Common symbols not allowed in MH_DYLIB files
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fno-common'
+      case $cc_basename in
+      nagfor*)
+        # NAG Fortran compiler
+        _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,-Wl,,'
+        _LT_TAGVAR(lt_prog_compiler_pic, $1)='-PIC'
+        _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+        ;;
+      esac
+      ;;
+
+    mingw* | cygwin* | pw32* | os2* | cegcc*)
+      # This hack is so that the source file can tell whether it is being
+      # built for inclusion in a dll (and should export symbols for example).
+      m4_if([$1], [GCJ], [],
+       [_LT_TAGVAR(lt_prog_compiler_pic, $1)='-DDLL_EXPORT'])
+      case $host_os in
+      os2*)
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-static'
+       ;;
+      esac
+      ;;
+
+    hpux9* | hpux10* | hpux11*)
+      _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+      # PIC is the default for IA64 HP-UX and 64-bit HP-UX, but
+      # not for PA HP-UX.
+      case $host_cpu in
+      hppa*64*|ia64*)
+       # +Z the default
+       ;;
+      *)
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)='+Z'
+       ;;
+      esac
+      # Is there a better lt_prog_compiler_static that works with the bundled CC?
+      _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-a ${wl}archive'
+      ;;
+
+    irix5* | irix6* | nonstopux*)
+      _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+      # PIC (with -KPIC) is the default.
+      _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared'
+      ;;
+
+    linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*)
+      case $cc_basename in
+      # old Intel for x86_64, which still supported -KPIC.
+      ecc*)
+       _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='-static'
+        ;;
+      # icc used to be incompatible with GCC.
+      # ICC 10 doesn't accept -KPIC any more.
+      icc* | ifort*)
+       _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='-static'
+        ;;
+      # Lahey Fortran 8.1.
+      lf95*)
+       _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)='--shared'
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='--static'
+       ;;
+      nagfor*)
+       # NAG Fortran compiler
+       _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,-Wl,,'
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)='-PIC'
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+       ;;
+      tcc*)
+       # Fabrice Bellard et al's Tiny C Compiler
+       _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='-static'
+       ;;
+      pgcc* | pgf77* | pgf90* | pgf95* | pgfortran*)
+        # Portland Group compilers (*not* the Pentium gcc compiler,
+       # which looks to be a dead project)
+       _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fpic'
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+        ;;
+      ccc*)
+        _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+        # All Alpha code is PIC.
+        _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared'
+        ;;
+      xl* | bgxl* | bgf* | mpixl*)
+       # IBM XL C 8.0/Fortran 10.1, 11.1 on PPC and BlueGene
+       _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)='-qpic'
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='-qstaticlink'
+       ;;
+      *)
+       case `$CC -V 2>&1 | sed 5q` in
+       *Sun\ Ceres\ Fortran* | *Sun*Fortran*\ [[1-7]].* | *Sun*Fortran*\ 8.[[0-3]]*)
+         # Sun Fortran 8.3 passes all unrecognized flags to the linker
+         _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+         _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+         _LT_TAGVAR(lt_prog_compiler_wl, $1)=''
+         ;;
+       *Sun\ F* | *Sun*Fortran*)
+         _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+         _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+         _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Qoption ld '
+         ;;
+       *Sun\ C*)
+         # Sun C 5.9
+         _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+         _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+         _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+         ;;
+        *Intel*\ [[CF]]*Compiler*)
+         _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+         _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC'
+         _LT_TAGVAR(lt_prog_compiler_static, $1)='-static'
+         ;;
+       *Portland\ Group*)
+         _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+         _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fpic'
+         _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+         ;;
+       esac
+       ;;
+      esac
+      ;;
+
+    newsos6)
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+      _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+      ;;
+
+    *nto* | *qnx*)
+      # QNX uses GNU C++, but need to define -shared option too, otherwise
+      # it will coredump.
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC -shared'
+      ;;
+
+    osf3* | osf4* | osf5*)
+      _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+      # All OSF/1 code is PIC.
+      _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared'
+      ;;
+
+    rdos*)
+      _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared'
+      ;;
+
+    solaris*)
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+      _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+      case $cc_basename in
+      f77* | f90* | f95* | sunf77* | sunf90* | sunf95*)
+       _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Qoption ld ';;
+      *)
+       _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,';;
+      esac
+      ;;
+
+    sunos4*)
+      _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Qoption ld '
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-PIC'
+      _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+      ;;
+
+    sysv4 | sysv4.2uw2* | sysv4.3*)
+      _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+      _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+      ;;
+
+    sysv4*MP*)
+      if test -d /usr/nec; then
+       _LT_TAGVAR(lt_prog_compiler_pic, $1)='-Kconform_pic'
+       _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+      fi
+      ;;
+
+    sysv5* | unixware* | sco3.2v5* | sco5v6* | OpenUNIX*)
+      _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC'
+      _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+      ;;
+
+    unicos*)
+      _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,'
+      _LT_TAGVAR(lt_prog_compiler_can_build_shared, $1)=no
+      ;;
+
+    uts4*)
+      _LT_TAGVAR(lt_prog_compiler_pic, $1)='-pic'
+      _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic'
+      ;;
+
+    *)
+      _LT_TAGVAR(lt_prog_compiler_can_build_shared, $1)=no
+      ;;
+    esac
+  fi
+])
+case $host_os in
+  # For platforms that do not support PIC, -DPIC is meaningless:
+  *djgpp*)
+    _LT_TAGVAR(lt_prog_compiler_pic, $1)=
+    ;;
+  *)
+    _LT_TAGVAR(lt_prog_compiler_pic, $1)="$_LT_TAGVAR(lt_prog_compiler_pic, $1)@&t@m4_if([$1],[],[ -DPIC],[m4_if([$1],[CXX],[ -DPIC],[])])"
+    ;;
+esac
+
+AC_CACHE_CHECK([for $compiler option to produce PIC],
+  [_LT_TAGVAR(lt_cv_prog_compiler_pic, $1)],
+  [_LT_TAGVAR(lt_cv_prog_compiler_pic, $1)=$_LT_TAGVAR(lt_prog_compiler_pic, $1)])
+_LT_TAGVAR(lt_prog_compiler_pic, $1)=$_LT_TAGVAR(lt_cv_prog_compiler_pic, $1)
+
+#
+# Check to make sure the PIC flag actually works.
+#
+if test -n "$_LT_TAGVAR(lt_prog_compiler_pic, $1)"; then
+  _LT_COMPILER_OPTION([if $compiler PIC flag $_LT_TAGVAR(lt_prog_compiler_pic, $1) works],
+    [_LT_TAGVAR(lt_cv_prog_compiler_pic_works, $1)],
+    [$_LT_TAGVAR(lt_prog_compiler_pic, $1)@&t@m4_if([$1],[],[ -DPIC],[m4_if([$1],[CXX],[ -DPIC],[])])], [],
+    [case $_LT_TAGVAR(lt_prog_compiler_pic, $1) in
+     "" | " "*) ;;
+     *) _LT_TAGVAR(lt_prog_compiler_pic, $1)=" $_LT_TAGVAR(lt_prog_compiler_pic, $1)" ;;
+     esac],
+    [_LT_TAGVAR(lt_prog_compiler_pic, $1)=
+     _LT_TAGVAR(lt_prog_compiler_can_build_shared, $1)=no])
+fi
+_LT_TAGDECL([pic_flag], [lt_prog_compiler_pic], [1],
+       [Additional compiler flags for building library objects])
+
+_LT_TAGDECL([wl], [lt_prog_compiler_wl], [1],
+       [How to pass a linker flag through the compiler])
+#
+# Check to make sure the static flag actually works.
+#
+wl=$_LT_TAGVAR(lt_prog_compiler_wl, $1) eval lt_tmp_static_flag=\"$_LT_TAGVAR(lt_prog_compiler_static, $1)\"
+_LT_LINKER_OPTION([if $compiler static flag $lt_tmp_static_flag works],
+  _LT_TAGVAR(lt_cv_prog_compiler_static_works, $1),
+  $lt_tmp_static_flag,
+  [],
+  [_LT_TAGVAR(lt_prog_compiler_static, $1)=])
+_LT_TAGDECL([link_static_flag], [lt_prog_compiler_static], [1],
+       [Compiler flag to prevent dynamic linking])
+])# _LT_COMPILER_PIC
+
+
+# _LT_LINKER_SHLIBS([TAGNAME])
+# ----------------------------
+# See if the linker supports building shared libraries.
+m4_defun([_LT_LINKER_SHLIBS],
+[AC_REQUIRE([LT_PATH_LD])dnl
+AC_REQUIRE([LT_PATH_NM])dnl
+m4_require([_LT_PATH_MANIFEST_TOOL])dnl
+m4_require([_LT_FILEUTILS_DEFAULTS])dnl
+m4_require([_LT_DECL_EGREP])dnl
+m4_require([_LT_DECL_SED])dnl
+m4_require([_LT_CMD_GLOBAL_SYMBOLS])dnl
+m4_require([_LT_TAG_COMPILER])dnl
+AC_MSG_CHECKING([whether the $compiler linker ($LD) supports shared libraries])
+m4_if([$1], [CXX], [
+  _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED '\''s/.* //'\'' | sort | uniq > $export_symbols'
+  _LT_TAGVAR(exclude_expsyms, $1)=['_GLOBAL_OFFSET_TABLE_|_GLOBAL__F[ID]_.*']
+  case $host_os in
+  aix[[4-9]]*)
+    # If we're using GNU nm, then we don't want the "-C" option.
+    # -C means demangle to GNU nm, but means don't demangle to AIX nm.
+    # Without the "-l" option, or with the "-B" option, AIX nm treats
+    # weak defined symbols like other global defined symbols, whereas
+    # GNU nm marks them as "W".
+    # While the 'weak' keyword is ignored in the Export File, we need
+    # it in the Import File for the 'aix-soname' feature, so we have
+    # to replace the "-B" option with "-P" for AIX nm.
+    if $NM -V 2>&1 | $GREP 'GNU' > /dev/null; then
+      _LT_TAGVAR(export_symbols_cmds, $1)='$NM -Bpg $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "W")) && ([substr](\$ 3,1,1) != ".")) { if (\$ 2 == "W") { print \$ 3 " weak" } else { print \$ 3 } } }'\'' | sort -u > $export_symbols'
+    else
+      _LT_TAGVAR(export_symbols_cmds, $1)='`func_echo_all $NM | $SED -e '\''s/B\([[^B]]*\)$/P\1/'\''` -PCpgl $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) && ([substr](\$ 1,1,1) != ".")) { if ((\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) { print \$ 1 " weak" } else { print \$ 1 } } }'\'' | sort -u > $export_symbols'
+    fi
+    ;;
+  pw32*)
+    _LT_TAGVAR(export_symbols_cmds, $1)=$ltdll_cmds
+    ;;
+  cygwin* | mingw* | cegcc*)
+    case $cc_basename in
+    cl*)
+      _LT_TAGVAR(exclude_expsyms, $1)='_NULL_IMPORT_DESCRIPTOR|_IMPORT_DESCRIPTOR_.*'
+      ;;
+    *)
+      _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED -e '\''/^[[BCDGRS]][[ ]]/s/.*[[ ]]\([[^ ]]*\)/\1 DATA/;s/^.*[[ ]]__nm__\([[^ ]]*\)[[ ]][[^ ]]*/\1 DATA/;/^I[[ ]]/d;/^[[AITW]][[ ]]/s/.* //'\'' | sort | uniq > $export_symbols'
+      _LT_TAGVAR(exclude_expsyms, $1)=['[_]+GLOBAL_OFFSET_TABLE_|[_]+GLOBAL__[FID]_.*|[_]+head_[A-Za-z0-9_]+_dll|[A-Za-z0-9_]+_dll_iname']
+      ;;
+    esac
+    ;;
+  *)
+    _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED '\''s/.* //'\'' | sort | uniq > $export_symbols'
+    ;;
+  esac
+], [
+  runpath_var=
+  _LT_TAGVAR(allow_undefined_flag, $1)=
+  _LT_TAGVAR(always_export_symbols, $1)=no
+  _LT_TAGVAR(archive_cmds, $1)=
+  _LT_TAGVAR(archive_expsym_cmds, $1)=
+  _LT_TAGVAR(compiler_needs_object, $1)=no
+  _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=no
+  _LT_TAGVAR(export_dynamic_flag_spec, $1)=
+  _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED '\''s/.* //'\'' | sort | uniq > $export_symbols'
+  _LT_TAGVAR(hardcode_automatic, $1)=no
+  _LT_TAGVAR(hardcode_direct, $1)=no
+  _LT_TAGVAR(hardcode_direct_absolute, $1)=no
+  _LT_TAGVAR(hardcode_libdir_flag_spec, $1)=
+  _LT_TAGVAR(hardcode_libdir_separator, $1)=
+  _LT_TAGVAR(hardcode_minus_L, $1)=no
+  _LT_TAGVAR(hardcode_shlibpath_var, $1)=unsupported
+  _LT_TAGVAR(inherit_rpath, $1)=no
+  _LT_TAGVAR(link_all_deplibs, $1)=unknown
+  _LT_TAGVAR(module_cmds, $1)=
+  _LT_TAGVAR(module_expsym_cmds, $1)=
+  _LT_TAGVAR(old_archive_from_new_cmds, $1)=
+  _LT_TAGVAR(old_archive_from_expsyms_cmds, $1)=
+  _LT_TAGVAR(thread_safe_flag_spec, $1)=
+  _LT_TAGVAR(whole_archive_flag_spec, $1)=
+  # include_expsyms should be a list of space-separated symbols to be *always*
+  # included in the symbol list
+  _LT_TAGVAR(include_expsyms, $1)=
+  # exclude_expsyms can be an extended regexp of symbols to exclude
+  # it will be wrapped by ' (' and ')$', so one must not match beginning or
+  # end of line.  Example: 'a|bc|.*d.*' will exclude the symbols 'a' and 'bc',
+  # as well as any symbol that contains 'd'.
+  _LT_TAGVAR(exclude_expsyms, $1)=['_GLOBAL_OFFSET_TABLE_|_GLOBAL__F[ID]_.*']
+  # Although _GLOBAL_OFFSET_TABLE_ is a valid symbol C name, most a.out
+  # platforms (ab)use it in PIC code, but their linkers get confused if
+  # the symbol is explicitly referenced.  Since portable code cannot
+  # rely on this symbol name, it's probably fine to never include it in
+  # preloaded symbol tables.
+  # Exclude shared library initialization/finalization symbols.
+dnl Note also adjust exclude_expsyms for C++ above.
+  extract_expsyms_cmds=
+
+  case $host_os in
+  cygwin* | mingw* | pw32* | cegcc*)
+    # FIXME: the MSVC++ port hasn't been tested in a loooong time
+    # When not using gcc, we currently assume that we are using
+    # Microsoft Visual C++.
+    if test yes != "$GCC"; then
+      with_gnu_ld=no
+    fi
+    ;;
+  interix*)
+    # we just hope/assume this is gcc and not c89 (= MSVC++)
+    with_gnu_ld=yes
+    ;;
+  openbsd* | bitrig*)
+    with_gnu_ld=no
+    ;;
+  esac
+
+  _LT_TAGVAR(ld_shlibs, $1)=yes
+
+  # On some targets, GNU ld is compatible enough with the native linker
+  # that we're better off using the native interface for both.
+  lt_use_gnu_ld_interface=no
+  if test yes = "$with_gnu_ld"; then
+    case $host_os in
+      aix*)
+       # The AIX port of GNU ld has always aspired to compatibility
+       # with the native linker.  However, as the warning in the GNU ld
+       # block says, versions before 2.19.5* couldn't really create working
+       # shared libraries, regardless of the interface used.
+       case `$LD -v 2>&1` in
+         *\ \(GNU\ Binutils\)\ 2.19.5*) ;;
+         *\ \(GNU\ Binutils\)\ 2.[[2-9]]*) ;;
+         *\ \(GNU\ Binutils\)\ [[3-9]]*) ;;
+         *)
+           lt_use_gnu_ld_interface=yes
+           ;;
+       esac
+       ;;
+      *)
+       lt_use_gnu_ld_interface=yes
+       ;;
+    esac
+  fi
+
+  if test yes = "$lt_use_gnu_ld_interface"; then
+    # If archive_cmds runs LD, not CC, wlarc should be empty
+    wlarc='$wl'
+
+    # Set some defaults for GNU ld with shared library support. These
+    # are reset later if shared libraries are not supported. Putting them
+    # here allows them to be overridden if necessary.
+    runpath_var=LD_RUN_PATH
+    _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+    _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic'
+    # ancient GNU ld didn't support --whole-archive et. al.
+    if $LD --help 2>&1 | $GREP 'no-whole-archive' > /dev/null; then
+      _LT_TAGVAR(whole_archive_flag_spec, $1)=$wlarc'--whole-archive$convenience '$wlarc'--no-whole-archive'
+    else
+      _LT_TAGVAR(whole_archive_flag_spec, $1)=
+    fi
+    supports_anon_versioning=no
+    case `$LD -v | $SED -e 's/([^)]\+)\s\+//' 2>&1` in
+      *GNU\ gold*) supports_anon_versioning=yes ;;
+      *\ [[01]].* | *\ 2.[[0-9]].* | *\ 2.10.*) ;; # catch versions < 2.11
+      *\ 2.11.93.0.2\ *) supports_anon_versioning=yes ;; # RH7.3 ...
+      *\ 2.11.92.0.12\ *) supports_anon_versioning=yes ;; # Mandrake 8.2 ...
+      *\ 2.11.*) ;; # other 2.11 versions
+      *) supports_anon_versioning=yes ;;
+    esac
+
+    # See if GNU ld supports shared libraries.
+    case $host_os in
+    aix[[3-9]]*)
+      # On AIX/PPC, the GNU linker is very broken
+      if test ia64 != "$host_cpu"; then
+       _LT_TAGVAR(ld_shlibs, $1)=no
+       cat <<_LT_EOF 1>&2
+
+*** Warning: the GNU linker, at least up to release 2.19, is reported
+*** to be unable to reliably create shared libraries on AIX.
+*** Therefore, libtool is disabling shared libraries support.  If you
+*** really care for shared libraries, you may want to install binutils
+*** 2.20 or above, or modify your PATH so that a non-GNU linker is found.
+*** You will then need to restart the configuration process.
+
+_LT_EOF
+      fi
+      ;;
+
+    amigaos*)
+      case $host_cpu in
+      powerpc)
+            # see comment about AmigaOS4 .so support
+            _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+            _LT_TAGVAR(archive_expsym_cmds, $1)=''
+        ;;
+      m68k)
+            _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/a2ixlibrary.data~$ECHO "#define NAME $libname" > $output_objdir/a2ixlibrary.data~$ECHO "#define LIBRARY_ID 1" >> $output_objdir/a2ixlibrary.data~$ECHO "#define VERSION $major" >> $output_objdir/a2ixlibrary.data~$ECHO "#define REVISION $revision" >> $output_objdir/a2ixlibrary.data~$AR $AR_FLAGS $lib $libobjs~$RANLIB $lib~(cd $output_objdir && a2ixlibrary -32)'
+            _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+            _LT_TAGVAR(hardcode_minus_L, $1)=yes
+        ;;
+      esac
+      ;;
+
+    beos*)
+      if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then
+       _LT_TAGVAR(allow_undefined_flag, $1)=unsupported
+       # Joseph Beckenbach <jrb3@best.com> says some releases of gcc
+       # support --undefined.  This deserves some investigation.  FIXME
+       _LT_TAGVAR(archive_cmds, $1)='$CC -nostart $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+      else
+       _LT_TAGVAR(ld_shlibs, $1)=no
+      fi
+      ;;
+
+    cygwin* | mingw* | pw32* | cegcc*)
+      # _LT_TAGVAR(hardcode_libdir_flag_spec, $1) is actually meaningless,
+      # as there is no search path for DLLs.
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+      _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-all-symbols'
+      _LT_TAGVAR(allow_undefined_flag, $1)=unsupported
+      _LT_TAGVAR(always_export_symbols, $1)=no
+      _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes
+      _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED -e '\''/^[[BCDGRS]][[ ]]/s/.*[[ ]]\([[^ ]]*\)/\1 DATA/;s/^.*[[ ]]__nm__\([[^ ]]*\)[[ ]][[^ ]]*/\1 DATA/;/^I[[ ]]/d;/^[[AITW]][[ ]]/s/.* //'\'' | sort | uniq > $export_symbols'
+      _LT_TAGVAR(exclude_expsyms, $1)=['[_]+GLOBAL_OFFSET_TABLE_|[_]+GLOBAL__[FID]_.*|[_]+head_[A-Za-z0-9_]+_dll|[A-Za-z0-9_]+_dll_iname']
+
+      if $LD --help 2>&1 | $GREP 'auto-import' > /dev/null; then
+        _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib'
+       # If the export-symbols file already is a .def file, use it as
+       # is; otherwise, prepend EXPORTS...
+       _LT_TAGVAR(archive_expsym_cmds, $1)='if _LT_DLL_DEF_P([$export_symbols]); then
+          cp $export_symbols $output_objdir/$soname.def;
+        else
+          echo EXPORTS > $output_objdir/$soname.def;
+          cat $export_symbols >> $output_objdir/$soname.def;
+        fi~
+        $CC -shared $output_objdir/$soname.def $libobjs $deplibs $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib'
+      else
+       _LT_TAGVAR(ld_shlibs, $1)=no
+      fi
+      ;;
+
+    haiku*)
+      _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+      _LT_TAGVAR(link_all_deplibs, $1)=yes
+      ;;
+
+    os2*)
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+      _LT_TAGVAR(hardcode_minus_L, $1)=yes
+      _LT_TAGVAR(allow_undefined_flag, $1)=unsupported
+      shrext_cmds=.dll
+      _LT_TAGVAR(archive_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~
+       $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~
+       $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~
+       $ECHO EXPORTS >> $output_objdir/$libname.def~
+       emxexp $libobjs | $SED /"_DLL_InitTerm"/d >> $output_objdir/$libname.def~
+       $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~
+       emximp -o $lib $output_objdir/$libname.def'
+      _LT_TAGVAR(archive_expsym_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~
+       $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~
+       $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~
+       $ECHO EXPORTS >> $output_objdir/$libname.def~
+       prefix_cmds="$SED"~
+       if test EXPORTS = "`$SED 1q $export_symbols`"; then
+         prefix_cmds="$prefix_cmds -e 1d";
+       fi~
+       prefix_cmds="$prefix_cmds -e \"s/^\(.*\)$/_\1/g\""~
+       cat $export_symbols | $prefix_cmds >> $output_objdir/$libname.def~
+       $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~
+       emximp -o $lib $output_objdir/$libname.def'
+      _LT_TAGVAR(old_archive_From_new_cmds, $1)='emximp -o $output_objdir/${libname}_dll.a $output_objdir/$libname.def'
+      _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes
+      ;;
+
+    interix[[3-9]]*)
+      _LT_TAGVAR(hardcode_direct, $1)=no
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir'
+      _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E'
+      # Hack: On Interix 3.x, we cannot compile PIC because of a broken gcc.
+      # Instead, shared libraries are loaded at an image base (0x10000000 by
+      # default) and relocated if they conflict, which is a slow very memory
+      # consuming and fragmenting process.  To avoid this, we pick a random,
+      # 256 KiB-aligned image base between 0x50000000 and 0x6FFC0000 at link
+      # time.  Moving up from 0x10000000 also allows more sbrk(2) space.
+      _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib'
+      _LT_TAGVAR(archive_expsym_cmds, $1)='sed "s|^|_|" $export_symbols >$output_objdir/$soname.expsym~$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--retain-symbols-file,$output_objdir/$soname.expsym $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib'
+      ;;
+
+    gnu* | linux* | tpf* | k*bsd*-gnu | kopensolaris*-gnu)
+      tmp_diet=no
+      if test linux-dietlibc = "$host_os"; then
+       case $cc_basename in
+         diet\ *) tmp_diet=yes;;       # linux-dietlibc with static linking (!diet-dyn)
+       esac
+      fi
+      if $LD --help 2>&1 | $EGREP ': supported targets:.* elf' > /dev/null \
+        && test no = "$tmp_diet"
+      then
+       tmp_addflag=' $pic_flag'
+       tmp_sharedflag='-shared'
+       case $cc_basename,$host_cpu in
+        pgcc*)                         # Portland Group C compiler
+         _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`for conv in $convenience\"\"; do test  -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive'
+         tmp_addflag=' $pic_flag'
+         ;;
+       pgf77* | pgf90* | pgf95* | pgfortran*)
+                                       # Portland Group f77 and f90 compilers
+         _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`for conv in $convenience\"\"; do test  -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive'
+         tmp_addflag=' $pic_flag -Mnomain' ;;
+       ecc*,ia64* | icc*,ia64*)        # Intel C compiler on ia64
+         tmp_addflag=' -i_dynamic' ;;
+       efc*,ia64* | ifort*,ia64*)      # Intel Fortran compiler on ia64
+         tmp_addflag=' -i_dynamic -nofor_main' ;;
+       ifc* | ifort*)                  # Intel Fortran compiler
+         tmp_addflag=' -nofor_main' ;;
+       lf95*)                          # Lahey Fortran 8.1
+         _LT_TAGVAR(whole_archive_flag_spec, $1)=
+         tmp_sharedflag='--shared' ;;
+        nagfor*)                        # NAGFOR 5.3
+          tmp_sharedflag='-Wl,-shared' ;;
+       xl[[cC]]* | bgxl[[cC]]* | mpixl[[cC]]*) # IBM XL C 8.0 on PPC (deal with xlf below)
+         tmp_sharedflag='-qmkshrobj'
+         tmp_addflag= ;;
+       nvcc*)  # Cuda Compiler Driver 2.2
+         _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`for conv in $convenience\"\"; do test  -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive'
+         _LT_TAGVAR(compiler_needs_object, $1)=yes
+         ;;
+       esac
+       case `$CC -V 2>&1 | sed 5q` in
+       *Sun\ C*)                       # Sun C 5.9
+         _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`new_convenience=; for conv in $convenience\"\"; do test -z \"$conv\" || new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive'
+         _LT_TAGVAR(compiler_needs_object, $1)=yes
+         tmp_sharedflag='-G' ;;
+       *Sun\ F*)                       # Sun Fortran 8.3
+         tmp_sharedflag='-G' ;;
+       esac
+       _LT_TAGVAR(archive_cmds, $1)='$CC '"$tmp_sharedflag""$tmp_addflag"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+
+        if test yes = "$supports_anon_versioning"; then
+          _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $output_objdir/$libname.ver~
+            cat $export_symbols | sed -e "s/\(.*\)/\1;/" >> $output_objdir/$libname.ver~
+            echo "local: *; };" >> $output_objdir/$libname.ver~
+            $CC '"$tmp_sharedflag""$tmp_addflag"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-version-script $wl$output_objdir/$libname.ver -o $lib'
+        fi
+
+       case $cc_basename in
+       tcc*)
+         _LT_TAGVAR(export_dynamic_flag_spec, $1)='-rdynamic'
+         ;;
+       xlf* | bgf* | bgxlf* | mpixlf*)
+         # IBM XL Fortran 10.1 on PPC cannot create shared libs itself
+         _LT_TAGVAR(whole_archive_flag_spec, $1)='--whole-archive$convenience --no-whole-archive'
+         _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+         _LT_TAGVAR(archive_cmds, $1)='$LD -shared $libobjs $deplibs $linker_flags -soname $soname -o $lib'
+         if test yes = "$supports_anon_versioning"; then
+           _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $output_objdir/$libname.ver~
+              cat $export_symbols | sed -e "s/\(.*\)/\1;/" >> $output_objdir/$libname.ver~
+              echo "local: *; };" >> $output_objdir/$libname.ver~
+              $LD -shared $libobjs $deplibs $linker_flags -soname $soname -version-script $output_objdir/$libname.ver -o $lib'
+         fi
+         ;;
+       esac
+      else
+        _LT_TAGVAR(ld_shlibs, $1)=no
+      fi
+      ;;
+
+    netbsd*)
+      if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then
+       _LT_TAGVAR(archive_cmds, $1)='$LD -Bshareable $libobjs $deplibs $linker_flags -o $lib'
+       wlarc=
+      else
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+      fi
+      ;;
+
+    solaris*)
+      if $LD -v 2>&1 | $GREP 'BFD 2\.8' > /dev/null; then
+       _LT_TAGVAR(ld_shlibs, $1)=no
+       cat <<_LT_EOF 1>&2
+
+*** Warning: The releases 2.8.* of the GNU linker cannot reliably
+*** create shared libraries on Solaris systems.  Therefore, libtool
+*** is disabling shared libraries support.  We urge you to upgrade GNU
+*** binutils to release 2.9.1 or newer.  Another option is to modify
+*** your PATH or compiler configuration so that the native linker is
+*** used, and then restart.
+
+_LT_EOF
+      elif $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+      else
+       _LT_TAGVAR(ld_shlibs, $1)=no
+      fi
+      ;;
+
+    sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX*)
+      case `$LD -v 2>&1` in
+        *\ [[01]].* | *\ 2.[[0-9]].* | *\ 2.1[[0-5]].*)
+       _LT_TAGVAR(ld_shlibs, $1)=no
+       cat <<_LT_EOF 1>&2
+
+*** Warning: Releases of the GNU linker prior to 2.16.91.0.3 cannot
+*** reliably create shared libraries on SCO systems.  Therefore, libtool
+*** is disabling shared libraries support.  We urge you to upgrade GNU
+*** binutils to release 2.16.91.0.3 or newer.  Another option is to modify
+*** your PATH or compiler configuration so that the native linker is
+*** used, and then restart.
+
+_LT_EOF
+       ;;
+       *)
+         # For security reasons, it is highly recommended that you always
+         # use absolute paths for naming shared libraries, and exclude the
+         # DT_RUNPATH tag from executables and libraries.  But doing so
+         # requires that you compile everything twice, which is a pain.
+         if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then
+           _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+           _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+           _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+         else
+           _LT_TAGVAR(ld_shlibs, $1)=no
+         fi
+       ;;
+      esac
+      ;;
+
+    sunos4*)
+      _LT_TAGVAR(archive_cmds, $1)='$LD -assert pure-text -Bshareable -o $lib $libobjs $deplibs $linker_flags'
+      wlarc=
+      _LT_TAGVAR(hardcode_direct, $1)=yes
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      ;;
+
+    *)
+      if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+      else
+       _LT_TAGVAR(ld_shlibs, $1)=no
+      fi
+      ;;
+    esac
+
+    if test no = "$_LT_TAGVAR(ld_shlibs, $1)"; then
+      runpath_var=
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)=
+      _LT_TAGVAR(export_dynamic_flag_spec, $1)=
+      _LT_TAGVAR(whole_archive_flag_spec, $1)=
+    fi
+  else
+    # PORTME fill in a description of your system's linker (not GNU ld)
+    case $host_os in
+    aix3*)
+      _LT_TAGVAR(allow_undefined_flag, $1)=unsupported
+      _LT_TAGVAR(always_export_symbols, $1)=yes
+      _LT_TAGVAR(archive_expsym_cmds, $1)='$LD -o $output_objdir/$soname $libobjs $deplibs $linker_flags -bE:$export_symbols -T512 -H512 -bM:SRE~$AR $AR_FLAGS $lib $output_objdir/$soname'
+      # Note: this linker hardcodes the directories in LIBPATH if there
+      # are no directories specified by -L.
+      _LT_TAGVAR(hardcode_minus_L, $1)=yes
+      if test yes = "$GCC" && test -z "$lt_prog_compiler_static"; then
+       # Neither direct hardcoding nor static linking is supported with a
+       # broken collect2.
+       _LT_TAGVAR(hardcode_direct, $1)=unsupported
+      fi
+      ;;
+
+    aix[[4-9]]*)
+      if test ia64 = "$host_cpu"; then
+       # On IA64, the linker does run time linking by default, so we don't
+       # have to do anything special.
+       aix_use_runtimelinking=no
+       exp_sym_flag='-Bexport'
+       no_entry_flag=
+      else
+       # If we're using GNU nm, then we don't want the "-C" option.
+       # -C means demangle to GNU nm, but means don't demangle to AIX nm.
+       # Without the "-l" option, or with the "-B" option, AIX nm treats
+       # weak defined symbols like other global defined symbols, whereas
+       # GNU nm marks them as "W".
+       # While the 'weak' keyword is ignored in the Export File, we need
+       # it in the Import File for the 'aix-soname' feature, so we have
+       # to replace the "-B" option with "-P" for AIX nm.
+       if $NM -V 2>&1 | $GREP 'GNU' > /dev/null; then
+         _LT_TAGVAR(export_symbols_cmds, $1)='$NM -Bpg $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "W")) && ([substr](\$ 3,1,1) != ".")) { if (\$ 2 == "W") { print \$ 3 " weak" } else { print \$ 3 } } }'\'' | sort -u > $export_symbols'
+       else
+         _LT_TAGVAR(export_symbols_cmds, $1)='`func_echo_all $NM | $SED -e '\''s/B\([[^B]]*\)$/P\1/'\''` -PCpgl $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) && ([substr](\$ 1,1,1) != ".")) { if ((\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) { print \$ 1 " weak" } else { print \$ 1 } } }'\'' | sort -u > $export_symbols'
+       fi
+       aix_use_runtimelinking=no
+
+       # Test if we are trying to use run time linking or normal
+       # AIX style linking. If -brtl is somewhere in LDFLAGS, we
+       # have runtime linking enabled, and use it for executables.
+       # For shared libraries, we enable/disable runtime linking
+       # depending on the kind of the shared library created -
+       # when "with_aix_soname,aix_use_runtimelinking" is:
+       # "aix,no"   lib.a(lib.so.V) shared, rtl:no,  for executables
+       # "aix,yes"  lib.so          shared, rtl:yes, for executables
+       #            lib.a           static archive
+       # "both,no"  lib.so.V(shr.o) shared, rtl:yes
+       #            lib.a(lib.so.V) shared, rtl:no,  for executables
+       # "both,yes" lib.so.V(shr.o) shared, rtl:yes, for executables
+       #            lib.a(lib.so.V) shared, rtl:no
+       # "svr4,*"   lib.so.V(shr.o) shared, rtl:yes, for executables
+       #            lib.a           static archive
+       case $host_os in aix4.[[23]]|aix4.[[23]].*|aix[[5-9]]*)
+         for ld_flag in $LDFLAGS; do
+         if (test x-brtl = "x$ld_flag" || test x-Wl,-brtl = "x$ld_flag"); then
+           aix_use_runtimelinking=yes
+           break
+         fi
+         done
+         if test svr4,no = "$with_aix_soname,$aix_use_runtimelinking"; then
+           # With aix-soname=svr4, we create the lib.so.V shared archives only,
+           # so we don't have lib.a shared libs to link our executables.
+           # We have to force runtime linking in this case.
+           aix_use_runtimelinking=yes
+           LDFLAGS="$LDFLAGS -Wl,-brtl"
+         fi
+         ;;
+       esac
+
+       exp_sym_flag='-bexport'
+       no_entry_flag='-bnoentry'
+      fi
+
+      # When large executables or shared objects are built, AIX ld can
+      # have problems creating the table of contents.  If linking a library
+      # or program results in "error TOC overflow" add -mminimal-toc to
+      # CXXFLAGS/CFLAGS for g++/gcc.  In the cases where that is not
+      # enough to fix the problem, add -Wl,-bbigtoc to LDFLAGS.
+
+      _LT_TAGVAR(archive_cmds, $1)=''
+      _LT_TAGVAR(hardcode_direct, $1)=yes
+      _LT_TAGVAR(hardcode_direct_absolute, $1)=yes
+      _LT_TAGVAR(hardcode_libdir_separator, $1)=':'
+      _LT_TAGVAR(link_all_deplibs, $1)=yes
+      _LT_TAGVAR(file_list_spec, $1)='$wl-f,'
+      case $with_aix_soname,$aix_use_runtimelinking in
+      aix,*) ;; # traditional, no import file
+      svr4,* | *,yes) # use import file
+       # The Import File defines what to hardcode.
+       _LT_TAGVAR(hardcode_direct, $1)=no
+       _LT_TAGVAR(hardcode_direct_absolute, $1)=no
+       ;;
+      esac
+
+      if test yes = "$GCC"; then
+       case $host_os in aix4.[[012]]|aix4.[[012]].*)
+       # We only want to do this on AIX 4.2 and lower, the check
+       # below for broken collect2 doesn't work under 4.3+
+         collect2name=`$CC -print-prog-name=collect2`
+         if test -f "$collect2name" &&
+          strings "$collect2name" | $GREP resolve_lib_name >/dev/null
+         then
+         # We have reworked collect2
+         :
+         else
+         # We have old collect2
+         _LT_TAGVAR(hardcode_direct, $1)=unsupported
+         # It fails to find uninstalled libraries when the uninstalled
+         # path is not listed in the libpath.  Setting hardcode_minus_L
+         # to unsupported forces relinking
+         _LT_TAGVAR(hardcode_minus_L, $1)=yes
+         _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+         _LT_TAGVAR(hardcode_libdir_separator, $1)=
+         fi
+         ;;
+       esac
+       shared_flag='-shared'
+       if test yes = "$aix_use_runtimelinking"; then
+         shared_flag="$shared_flag "'$wl-G'
+       fi
+       # Need to ensure runtime linking is disabled for the traditional
+       # shared library, or the linker may eventually find shared libraries
+       # /with/ Import File - we do not want to mix them.
+       shared_flag_aix='-shared'
+       shared_flag_svr4='-shared $wl-G'
+      else
+       # not using gcc
+       if test ia64 = "$host_cpu"; then
+       # VisualAge C++, Version 5.5 for AIX 5L for IA-64, Beta 3 Release
+       # chokes on -Wl,-G. The following line is correct:
+         shared_flag='-G'
+       else
+         if test yes = "$aix_use_runtimelinking"; then
+           shared_flag='$wl-G'
+         else
+           shared_flag='$wl-bM:SRE'
+         fi
+         shared_flag_aix='$wl-bM:SRE'
+         shared_flag_svr4='$wl-G'
+       fi
+      fi
+
+      _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-bexpall'
+      # It seems that -bexpall does not export symbols beginning with
+      # underscore (_), so it is better to generate a list of symbols to export.
+      _LT_TAGVAR(always_export_symbols, $1)=yes
+      if test aix,yes = "$with_aix_soname,$aix_use_runtimelinking"; then
+       # Warning - without using the other runtime loading flags (-brtl),
+       # -berok will link without error, but may produce a broken library.
+       _LT_TAGVAR(allow_undefined_flag, $1)='-berok'
+        # Determine the default libpath from the value encoded in an
+        # empty executable.
+        _LT_SYS_MODULE_PATH_AIX([$1])
+        _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-blibpath:$libdir:'"$aix_libpath"
+        _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -o $output_objdir/$soname $libobjs $deplibs $wl'$no_entry_flag' $compiler_flags `if test -n "$allow_undefined_flag"; then func_echo_all "$wl$allow_undefined_flag"; else :; fi` $wl'$exp_sym_flag:\$export_symbols' '$shared_flag
+      else
+       if test ia64 = "$host_cpu"; then
+         _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-R $libdir:/usr/lib:/lib'
+         _LT_TAGVAR(allow_undefined_flag, $1)="-z nodefs"
+         _LT_TAGVAR(archive_expsym_cmds, $1)="\$CC $shared_flag"' -o $output_objdir/$soname $libobjs $deplibs '"\$wl$no_entry_flag"' $compiler_flags $wl$allow_undefined_flag '"\$wl$exp_sym_flag:\$export_symbols"
+       else
+        # Determine the default libpath from the value encoded in an
+        # empty executable.
+        _LT_SYS_MODULE_PATH_AIX([$1])
+        _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-blibpath:$libdir:'"$aix_libpath"
+         # Warning - without using the other run time loading flags,
+         # -berok will link without error, but may produce a broken library.
+         _LT_TAGVAR(no_undefined_flag, $1)=' $wl-bernotok'
+         _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-berok'
+         if test yes = "$with_gnu_ld"; then
+           # We only use this code for GNU lds that support --whole-archive.
+           _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive$convenience $wl--no-whole-archive'
+         else
+           # Exported symbols can be pulled into shared objects from archives
+           _LT_TAGVAR(whole_archive_flag_spec, $1)='$convenience'
+         fi
+         _LT_TAGVAR(archive_cmds_need_lc, $1)=yes
+         _LT_TAGVAR(archive_expsym_cmds, $1)='$RM -r $output_objdir/$realname.d~$MKDIR $output_objdir/$realname.d'
+         # -brtl affects multiple linker settings, -berok does not and is overridden later
+         compiler_flags_filtered='`func_echo_all "$compiler_flags " | $SED -e "s%-brtl\\([[, ]]\\)%-berok\\1%g"`'
+         if test svr4 != "$with_aix_soname"; then
+           # This is similar to how AIX traditionally builds its shared libraries.
+           _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$CC '$shared_flag_aix' -o $output_objdir/$realname.d/$soname $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$AR $AR_FLAGS $output_objdir/$libname$release.a $output_objdir/$realname.d/$soname'
+         fi
+         if test aix != "$with_aix_soname"; then
+           _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$CC '$shared_flag_svr4' -o $output_objdir/$realname.d/$shared_archive_member_spec.o $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$STRIP -e $output_objdir/$realname.d/$shared_archive_member_spec.o~( func_echo_all "#! $soname($shared_archive_member_spec.o)"; if test shr_64 = "$shared_archive_member_spec"; then func_echo_all "# 64"; else func_echo_all "# 32"; fi; cat $export_symbols ) > $output_objdir/$realname.d/$shared_archive_member_spec.imp~$AR $AR_FLAGS $output_objdir/$soname $output_objdir/$realname.d/$shared_archive_member_spec.o $output_objdir/$realname.d/$shared_archive_member_spec.imp'
+         else
+           # used by -dlpreopen to get the symbols
+           _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$MV  $output_objdir/$realname.d/$soname $output_objdir'
+         fi
+         _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$RM -r $output_objdir/$realname.d'
+       fi
+      fi
+      ;;
+
+    amigaos*)
+      case $host_cpu in
+      powerpc)
+            # see comment about AmigaOS4 .so support
+            _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+            _LT_TAGVAR(archive_expsym_cmds, $1)=''
+        ;;
+      m68k)
+            _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/a2ixlibrary.data~$ECHO "#define NAME $libname" > $output_objdir/a2ixlibrary.data~$ECHO "#define LIBRARY_ID 1" >> $output_objdir/a2ixlibrary.data~$ECHO "#define VERSION $major" >> $output_objdir/a2ixlibrary.data~$ECHO "#define REVISION $revision" >> $output_objdir/a2ixlibrary.data~$AR $AR_FLAGS $lib $libobjs~$RANLIB $lib~(cd $output_objdir && a2ixlibrary -32)'
+            _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+            _LT_TAGVAR(hardcode_minus_L, $1)=yes
+        ;;
+      esac
+      ;;
+
+    bsdi[[45]]*)
+      _LT_TAGVAR(export_dynamic_flag_spec, $1)=-rdynamic
+      ;;
+
+    cygwin* | mingw* | pw32* | cegcc*)
+      # When not using gcc, we currently assume that we are using
+      # Microsoft Visual C++.
+      # hardcode_libdir_flag_spec is actually meaningless, as there is
+      # no search path for DLLs.
+      case $cc_basename in
+      cl*)
+       # Native MSVC
+       _LT_TAGVAR(hardcode_libdir_flag_spec, $1)=' '
+       _LT_TAGVAR(allow_undefined_flag, $1)=unsupported
+       _LT_TAGVAR(always_export_symbols, $1)=yes
+       _LT_TAGVAR(file_list_spec, $1)='@'
+       # Tell ltmain to make .lib files, not .a files.
+       libext=lib
+       # Tell ltmain to make .dll files, not .so files.
+       shrext_cmds=.dll
+       # FIXME: Setting linknames here is a bad hack.
+       _LT_TAGVAR(archive_cmds, $1)='$CC -o $output_objdir/$soname $libobjs $compiler_flags $deplibs -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~linknames='
+       _LT_TAGVAR(archive_expsym_cmds, $1)='if _LT_DLL_DEF_P([$export_symbols]); then
+            cp "$export_symbols" "$output_objdir/$soname.def";
+            echo "$tool_output_objdir$soname.def" > "$output_objdir/$soname.exp";
+          else
+            $SED -e '\''s/^/-link -EXPORT:/'\'' < $export_symbols > $output_objdir/$soname.exp;
+          fi~
+          $CC -o $tool_output_objdir$soname $libobjs $compiler_flags $deplibs "@$tool_output_objdir$soname.exp" -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~
+          linknames='
+       # The linker will not automatically build a static lib if we build a DLL.
+       # _LT_TAGVAR(old_archive_from_new_cmds, $1)='true'
+       _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes
+       _LT_TAGVAR(exclude_expsyms, $1)='_NULL_IMPORT_DESCRIPTOR|_IMPORT_DESCRIPTOR_.*'
+       _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED -e '\''/^[[BCDGRS]][[ ]]/s/.*[[ ]]\([[^ ]]*\)/\1,DATA/'\'' | $SED -e '\''/^[[AITW]][[ ]]/s/.*[[ ]]//'\'' | sort | uniq > $export_symbols'
+       # Don't use ranlib
+       _LT_TAGVAR(old_postinstall_cmds, $1)='chmod 644 $oldlib'
+       _LT_TAGVAR(postlink_cmds, $1)='lt_outputfile="@OUTPUT@"~
+          lt_tool_outputfile="@TOOL_OUTPUT@"~
+          case $lt_outputfile in
+            *.exe|*.EXE) ;;
+            *)
+              lt_outputfile=$lt_outputfile.exe
+              lt_tool_outputfile=$lt_tool_outputfile.exe
+              ;;
+          esac~
+          if test : != "$MANIFEST_TOOL" && test -f "$lt_outputfile.manifest"; then
+            $MANIFEST_TOOL -manifest "$lt_tool_outputfile.manifest" -outputresource:"$lt_tool_outputfile" || exit 1;
+            $RM "$lt_outputfile.manifest";
+          fi'
+       ;;
+      *)
+       # Assume MSVC wrapper
+       _LT_TAGVAR(hardcode_libdir_flag_spec, $1)=' '
+       _LT_TAGVAR(allow_undefined_flag, $1)=unsupported
+       # Tell ltmain to make .lib files, not .a files.
+       libext=lib
+       # Tell ltmain to make .dll files, not .so files.
+       shrext_cmds=.dll
+       # FIXME: Setting linknames here is a bad hack.
+       _LT_TAGVAR(archive_cmds, $1)='$CC -o $lib $libobjs $compiler_flags `func_echo_all "$deplibs" | $SED '\''s/ -lc$//'\''` -link -dll~linknames='
+       # The linker will automatically build a .lib file if we build a DLL.
+       _LT_TAGVAR(old_archive_from_new_cmds, $1)='true'
+       # FIXME: Should let the user specify the lib program.
+       _LT_TAGVAR(old_archive_cmds, $1)='lib -OUT:$oldlib$oldobjs$old_deplibs'
+       _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes
+       ;;
+      esac
+      ;;
+
+    darwin* | rhapsody*)
+      _LT_DARWIN_LINKER_FEATURES($1)
+      ;;
+
+    dgux*)
+      _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      ;;
+
+    # FreeBSD 2.2.[012] allows us to include c++rt0.o to get C++ constructor
+    # support.  Future versions do this automatically, but an explicit c++rt0.o
+    # does not break anything, and helps significantly (at the cost of a little
+    # extra space).
+    freebsd2.2*)
+      _LT_TAGVAR(archive_cmds, $1)='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags /usr/lib/c++rt0.o'
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir'
+      _LT_TAGVAR(hardcode_direct, $1)=yes
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      ;;
+
+    # Unfortunately, older versions of FreeBSD 2 do not have this feature.
+    freebsd2.*)
+      _LT_TAGVAR(archive_cmds, $1)='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags'
+      _LT_TAGVAR(hardcode_direct, $1)=yes
+      _LT_TAGVAR(hardcode_minus_L, $1)=yes
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      ;;
+
+    # FreeBSD 3 and greater uses gcc -shared to do shared libraries.
+    freebsd* | dragonfly*)
+      _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags'
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir'
+      _LT_TAGVAR(hardcode_direct, $1)=yes
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      ;;
+
+    hpux9*)
+      if test yes = "$GCC"; then
+       _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/$soname~$CC -shared $pic_flag $wl+b $wl$install_libdir -o $output_objdir/$soname $libobjs $deplibs $compiler_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib'
+      else
+       _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/$soname~$LD -b +b $install_libdir -o $output_objdir/$soname $libobjs $deplibs $linker_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib'
+      fi
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl+b $wl$libdir'
+      _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+      _LT_TAGVAR(hardcode_direct, $1)=yes
+
+      # hardcode_minus_L: Not really in the search PATH,
+      # but as the default location of the library.
+      _LT_TAGVAR(hardcode_minus_L, $1)=yes
+      _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E'
+      ;;
+
+    hpux10*)
+      if test yes,no = "$GCC,$with_gnu_ld"; then
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags'
+      else
+       _LT_TAGVAR(archive_cmds, $1)='$LD -b +h $soname +b $install_libdir -o $lib $libobjs $deplibs $linker_flags'
+      fi
+      if test no = "$with_gnu_ld"; then
+       _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl+b $wl$libdir'
+       _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+       _LT_TAGVAR(hardcode_direct, $1)=yes
+       _LT_TAGVAR(hardcode_direct_absolute, $1)=yes
+       _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E'
+       # hardcode_minus_L: Not really in the search PATH,
+       # but as the default location of the library.
+       _LT_TAGVAR(hardcode_minus_L, $1)=yes
+      fi
+      ;;
+
+    hpux11*)
+      if test yes,no = "$GCC,$with_gnu_ld"; then
+       case $host_cpu in
+       hppa*64*)
+         _LT_TAGVAR(archive_cmds, $1)='$CC -shared $wl+h $wl$soname -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+       ia64*)
+         _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $wl+h $wl$soname $wl+nodefaultrpath -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+       *)
+         _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+       esac
+      else
+       case $host_cpu in
+       hppa*64*)
+         _LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+       ia64*)
+         _LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname $wl+nodefaultrpath -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+       *)
+       m4_if($1, [], [
+         # Older versions of the 11.00 compiler do not understand -b yet
+         # (HP92453-01 A.11.01.20 doesn't, HP92453-01 B.11.X.35175-35176.GP does)
+         _LT_LINKER_OPTION([if $CC understands -b],
+           _LT_TAGVAR(lt_cv_prog_compiler__b, $1), [-b],
+           [_LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags'],
+           [_LT_TAGVAR(archive_cmds, $1)='$LD -b +h $soname +b $install_libdir -o $lib $libobjs $deplibs $linker_flags'])],
+         [_LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags'])
+         ;;
+       esac
+      fi
+      if test no = "$with_gnu_ld"; then
+       _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl+b $wl$libdir'
+       _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+
+       case $host_cpu in
+       hppa*64*|ia64*)
+         _LT_TAGVAR(hardcode_direct, $1)=no
+         _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+         ;;
+       *)
+         _LT_TAGVAR(hardcode_direct, $1)=yes
+         _LT_TAGVAR(hardcode_direct_absolute, $1)=yes
+         _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E'
+
+         # hardcode_minus_L: Not really in the search PATH,
+         # but as the default location of the library.
+         _LT_TAGVAR(hardcode_minus_L, $1)=yes
+         ;;
+       esac
+      fi
+      ;;
+
+    irix5* | irix6* | nonstopux*)
+      if test yes = "$GCC"; then
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib'
+       # Try to use the -exported_symbol ld option, if it does not
+       # work, assume that -exports_file does not work either and
+       # implicitly export all symbols.
+       # This should be the same for all languages, so no per-tag cache variable.
+       AC_CACHE_CHECK([whether the $host_os linker accepts -exported_symbol],
+         [lt_cv_irix_exported_symbol],
+         [save_LDFLAGS=$LDFLAGS
+          LDFLAGS="$LDFLAGS -shared $wl-exported_symbol ${wl}foo $wl-update_registry $wl/dev/null"
+          AC_LINK_IFELSE(
+            [AC_LANG_SOURCE(
+               [AC_LANG_CASE([C], [[int foo (void) { return 0; }]],
+                             [C++], [[int foo (void) { return 0; }]],
+                             [Fortran 77], [[
+      subroutine foo
+      end]],
+                             [Fortran], [[
+      subroutine foo
+      end]])])],
+             [lt_cv_irix_exported_symbol=yes],
+             [lt_cv_irix_exported_symbol=no])
+           LDFLAGS=$save_LDFLAGS])
+       if test yes = "$lt_cv_irix_exported_symbol"; then
+          _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations $wl-exports_file $wl$export_symbols -o $lib'
+       fi
+      else
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -exports_file $export_symbols -o $lib'
+      fi
+      _LT_TAGVAR(archive_cmds_need_lc, $1)='no'
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+      _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+      _LT_TAGVAR(inherit_rpath, $1)=yes
+      _LT_TAGVAR(link_all_deplibs, $1)=yes
+      ;;
+
+    linux*)
+      case $cc_basename in
+      tcc*)
+       # Fabrice Bellard et al's Tiny C Compiler
+       _LT_TAGVAR(ld_shlibs, $1)=yes
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags'
+       ;;
+      esac
+      ;;
+
+    netbsd*)
+      if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then
+       _LT_TAGVAR(archive_cmds, $1)='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags'  # a.out
+      else
+       _LT_TAGVAR(archive_cmds, $1)='$LD -shared -o $lib $libobjs $deplibs $linker_flags'      # ELF
+      fi
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir'
+      _LT_TAGVAR(hardcode_direct, $1)=yes
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      ;;
+
+    newsos6)
+      _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+      _LT_TAGVAR(hardcode_direct, $1)=yes
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+      _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      ;;
+
+    *nto* | *qnx*)
+      ;;
+
+    openbsd* | bitrig*)
+      if test -f /usr/libexec/ld.so; then
+       _LT_TAGVAR(hardcode_direct, $1)=yes
+       _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+       _LT_TAGVAR(hardcode_direct_absolute, $1)=yes
+       if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then
+         _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags'
+         _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags $wl-retain-symbols-file,$export_symbols'
+         _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir'
+         _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E'
+       else
+         _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags'
+         _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir'
+       fi
+      else
+       _LT_TAGVAR(ld_shlibs, $1)=no
+      fi
+      ;;
+
+    os2*)
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+      _LT_TAGVAR(hardcode_minus_L, $1)=yes
+      _LT_TAGVAR(allow_undefined_flag, $1)=unsupported
+      shrext_cmds=.dll
+      _LT_TAGVAR(archive_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~
+       $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~
+       $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~
+       $ECHO EXPORTS >> $output_objdir/$libname.def~
+       emxexp $libobjs | $SED /"_DLL_InitTerm"/d >> $output_objdir/$libname.def~
+       $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~
+       emximp -o $lib $output_objdir/$libname.def'
+      _LT_TAGVAR(archive_expsym_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~
+       $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~
+       $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~
+       $ECHO EXPORTS >> $output_objdir/$libname.def~
+       prefix_cmds="$SED"~
+       if test EXPORTS = "`$SED 1q $export_symbols`"; then
+         prefix_cmds="$prefix_cmds -e 1d";
+       fi~
+       prefix_cmds="$prefix_cmds -e \"s/^\(.*\)$/_\1/g\""~
+       cat $export_symbols | $prefix_cmds >> $output_objdir/$libname.def~
+       $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~
+       emximp -o $lib $output_objdir/$libname.def'
+      _LT_TAGVAR(old_archive_From_new_cmds, $1)='emximp -o $output_objdir/${libname}_dll.a $output_objdir/$libname.def'
+      _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes
+      ;;
+
+    osf3*)
+      if test yes = "$GCC"; then
+       _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-expect_unresolved $wl\*'
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib'
+      else
+       _LT_TAGVAR(allow_undefined_flag, $1)=' -expect_unresolved \*'
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib'
+      fi
+      _LT_TAGVAR(archive_cmds_need_lc, $1)='no'
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+      _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+      ;;
+
+    osf4* | osf5*)     # as osf3* with the addition of -msym flag
+      if test yes = "$GCC"; then
+       _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-expect_unresolved $wl\*'
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $pic_flag $libobjs $deplibs $compiler_flags $wl-msym $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib'
+       _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+      else
+       _LT_TAGVAR(allow_undefined_flag, $1)=' -expect_unresolved \*'
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags -msym -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='for i in `cat $export_symbols`; do printf "%s %s\\n" -exported_symbol "\$i" >> $lib.exp; done; printf "%s\\n" "-hidden">> $lib.exp~
+          $CC -shared$allow_undefined_flag $wl-input $wl$lib.exp $compiler_flags $libobjs $deplibs -soname $soname `test -n "$verstring" && $ECHO "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib~$RM $lib.exp'
+
+       # Both c and cxx compiler support -rpath directly
+       _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-rpath $libdir'
+      fi
+      _LT_TAGVAR(archive_cmds_need_lc, $1)='no'
+      _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+      ;;
+
+    solaris*)
+      _LT_TAGVAR(no_undefined_flag, $1)=' -z defs'
+      if test yes = "$GCC"; then
+       wlarc='$wl'
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $wl-z ${wl}text $wl-h $wl$soname -o $lib $libobjs $deplibs $compiler_flags'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~
+          $CC -shared $pic_flag $wl-z ${wl}text $wl-M $wl$lib.exp $wl-h $wl$soname -o $lib $libobjs $deplibs $compiler_flags~$RM $lib.exp'
+      else
+       case `$CC -V 2>&1` in
+       *"Compilers 5.0"*)
+         wlarc=''
+         _LT_TAGVAR(archive_cmds, $1)='$LD -G$allow_undefined_flag -h $soname -o $lib $libobjs $deplibs $linker_flags'
+         _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~
+            $LD -G$allow_undefined_flag -M $lib.exp -h $soname -o $lib $libobjs $deplibs $linker_flags~$RM $lib.exp'
+         ;;
+       *)
+         wlarc='$wl'
+         _LT_TAGVAR(archive_cmds, $1)='$CC -G$allow_undefined_flag -h $soname -o $lib $libobjs $deplibs $compiler_flags'
+         _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~
+            $CC -G$allow_undefined_flag -M $lib.exp -h $soname -o $lib $libobjs $deplibs $compiler_flags~$RM $lib.exp'
+         ;;
+       esac
+      fi
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir'
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      case $host_os in
+      solaris2.[[0-5]] | solaris2.[[0-5]].*) ;;
+      *)
+       # The compiler driver will combine and reorder linker options,
+       # but understands '-z linker_flag'.  GCC discards it without '$wl',
+       # but is careful enough not to reorder.
+       # Supported since Solaris 2.6 (maybe 2.5.1?)
+       if test yes = "$GCC"; then
+         _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl-z ${wl}allextract$convenience $wl-z ${wl}defaultextract'
+       else
+         _LT_TAGVAR(whole_archive_flag_spec, $1)='-z allextract$convenience -z defaultextract'
+       fi
+       ;;
+      esac
+      _LT_TAGVAR(link_all_deplibs, $1)=yes
+      ;;
+
+    sunos4*)
+      if test sequent = "$host_vendor"; then
+       # Use $CC to link under sequent, because it throws in some extra .o
+       # files that make .init and .fini sections work.
+       _LT_TAGVAR(archive_cmds, $1)='$CC -G $wl-h $soname -o $lib $libobjs $deplibs $compiler_flags'
+      else
+       _LT_TAGVAR(archive_cmds, $1)='$LD -assert pure-text -Bstatic -o $lib $libobjs $deplibs $linker_flags'
+      fi
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+      _LT_TAGVAR(hardcode_direct, $1)=yes
+      _LT_TAGVAR(hardcode_minus_L, $1)=yes
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      ;;
+
+    sysv4)
+      case $host_vendor in
+       sni)
+         _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+         _LT_TAGVAR(hardcode_direct, $1)=yes # is this really true???
+       ;;
+       siemens)
+         ## LD is ld it makes a PLAMLIB
+         ## CC just makes a GrossModule.
+         _LT_TAGVAR(archive_cmds, $1)='$LD -G -o $lib $libobjs $deplibs $linker_flags'
+         _LT_TAGVAR(reload_cmds, $1)='$CC -r -o $output$reload_objs'
+         _LT_TAGVAR(hardcode_direct, $1)=no
+        ;;
+       motorola)
+         _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+         _LT_TAGVAR(hardcode_direct, $1)=no #Motorola manual says yes, but my tests say they lie
+       ;;
+      esac
+      runpath_var='LD_RUN_PATH'
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      ;;
+
+    sysv4.3*)
+      _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      _LT_TAGVAR(export_dynamic_flag_spec, $1)='-Bexport'
+      ;;
+
+    sysv4*MP*)
+      if test -d /usr/nec; then
+       _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+       _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+       runpath_var=LD_RUN_PATH
+       hardcode_runpath_var=yes
+       _LT_TAGVAR(ld_shlibs, $1)=yes
+      fi
+      ;;
+
+    sysv4*uw2* | sysv5OpenUNIX* | sysv5UnixWare7.[[01]].[[10]]* | unixware7* | sco3.2v5.0.[[024]]*)
+      _LT_TAGVAR(no_undefined_flag, $1)='$wl-z,text'
+      _LT_TAGVAR(archive_cmds_need_lc, $1)=no
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      runpath_var='LD_RUN_PATH'
+
+      if test yes = "$GCC"; then
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+      else
+       _LT_TAGVAR(archive_cmds, $1)='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+      fi
+      ;;
+
+    sysv5* | sco3.2v5* | sco5v6*)
+      # Note: We CANNOT use -z defs as we might desire, because we do not
+      # link with -lc, and that would cause any symbols used from libc to
+      # always be unresolved, which means just about no library would
+      # ever link correctly.  If we're not using GNU ld we use -z text
+      # though, which does catch some bad symbols but isn't as heavy-handed
+      # as -z defs.
+      _LT_TAGVAR(no_undefined_flag, $1)='$wl-z,text'
+      _LT_TAGVAR(allow_undefined_flag, $1)='$wl-z,nodefs'
+      _LT_TAGVAR(archive_cmds_need_lc, $1)=no
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-R,$libdir'
+      _LT_TAGVAR(hardcode_libdir_separator, $1)=':'
+      _LT_TAGVAR(link_all_deplibs, $1)=yes
+      _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-Bexport'
+      runpath_var='LD_RUN_PATH'
+
+      if test yes = "$GCC"; then
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+      else
+       _LT_TAGVAR(archive_cmds, $1)='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+      fi
+      ;;
+
+    uts4*)
+      _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags'
+      _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      ;;
+
+    *)
+      _LT_TAGVAR(ld_shlibs, $1)=no
+      ;;
+    esac
+
+    if test sni = "$host_vendor"; then
+      case $host in
+      sysv4 | sysv4.2uw2* | sysv4.3* | sysv5*)
+       _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-Blargedynsym'
+       ;;
+      esac
+    fi
+  fi
+])
+AC_MSG_RESULT([$_LT_TAGVAR(ld_shlibs, $1)])
+test no = "$_LT_TAGVAR(ld_shlibs, $1)" && can_build_shared=no
+
+_LT_TAGVAR(with_gnu_ld, $1)=$with_gnu_ld
+
+_LT_DECL([], [libext], [0], [Old archive suffix (normally "a")])dnl
+_LT_DECL([], [shrext_cmds], [1], [Shared library suffix (normally ".so")])dnl
+_LT_DECL([], [extract_expsyms_cmds], [2],
+    [The commands to extract the exported symbol list from a shared archive])
+
+#
+# Do we need to explicitly link libc?
+#
+case "x$_LT_TAGVAR(archive_cmds_need_lc, $1)" in
+x|xyes)
+  # Assume -lc should be added
+  _LT_TAGVAR(archive_cmds_need_lc, $1)=yes
+
+  if test yes,yes = "$GCC,$enable_shared"; then
+    case $_LT_TAGVAR(archive_cmds, $1) in
+    *'~'*)
+      # FIXME: we may have to deal with multi-command sequences.
+      ;;
+    '$CC '*)
+      # Test whether the compiler implicitly links with -lc since on some
+      # systems, -lgcc has to come before -lc. If gcc already passes -lc
+      # to ld, don't add -lc before -lgcc.
+      AC_CACHE_CHECK([whether -lc should be explicitly linked in],
+       [lt_cv_]_LT_TAGVAR(archive_cmds_need_lc, $1),
+       [$RM conftest*
+       echo "$lt_simple_compile_test_code" > conftest.$ac_ext
+
+       if AC_TRY_EVAL(ac_compile) 2>conftest.err; then
+         soname=conftest
+         lib=conftest
+         libobjs=conftest.$ac_objext
+         deplibs=
+         wl=$_LT_TAGVAR(lt_prog_compiler_wl, $1)
+         pic_flag=$_LT_TAGVAR(lt_prog_compiler_pic, $1)
+         compiler_flags=-v
+         linker_flags=-v
+         verstring=
+         output_objdir=.
+         libname=conftest
+         lt_save_allow_undefined_flag=$_LT_TAGVAR(allow_undefined_flag, $1)
+         _LT_TAGVAR(allow_undefined_flag, $1)=
+         if AC_TRY_EVAL(_LT_TAGVAR(archive_cmds, $1) 2\>\&1 \| $GREP \" -lc \" \>/dev/null 2\>\&1)
+         then
+           lt_cv_[]_LT_TAGVAR(archive_cmds_need_lc, $1)=no
+         else
+           lt_cv_[]_LT_TAGVAR(archive_cmds_need_lc, $1)=yes
+         fi
+         _LT_TAGVAR(allow_undefined_flag, $1)=$lt_save_allow_undefined_flag
+       else
+         cat conftest.err 1>&5
+       fi
+       $RM conftest*
+       ])
+      _LT_TAGVAR(archive_cmds_need_lc, $1)=$lt_cv_[]_LT_TAGVAR(archive_cmds_need_lc, $1)
+      ;;
+    esac
+  fi
+  ;;
+esac
+
+_LT_TAGDECL([build_libtool_need_lc], [archive_cmds_need_lc], [0],
+    [Whether or not to add -lc for building shared libraries])
+_LT_TAGDECL([allow_libtool_libs_with_static_runtimes],
+    [enable_shared_with_static_runtimes], [0],
+    [Whether or not to disallow shared libs when runtime libs are static])
+_LT_TAGDECL([], [export_dynamic_flag_spec], [1],
+    [Compiler flag to allow reflexive dlopens])
+_LT_TAGDECL([], [whole_archive_flag_spec], [1],
+    [Compiler flag to generate shared objects directly from archives])
+_LT_TAGDECL([], [compiler_needs_object], [1],
+    [Whether the compiler copes with passing no objects directly])
+_LT_TAGDECL([], [old_archive_from_new_cmds], [2],
+    [Create an old-style archive from a shared archive])
+_LT_TAGDECL([], [old_archive_from_expsyms_cmds], [2],
+    [Create a temporary old-style archive to link instead of a shared archive])
+_LT_TAGDECL([], [archive_cmds], [2], [Commands used to build a shared archive])
+_LT_TAGDECL([], [archive_expsym_cmds], [2])
+_LT_TAGDECL([], [module_cmds], [2],
+    [Commands used to build a loadable module if different from building
+    a shared archive.])
+_LT_TAGDECL([], [module_expsym_cmds], [2])
+_LT_TAGDECL([], [with_gnu_ld], [1],
+    [Whether we are building with GNU ld or not])
+_LT_TAGDECL([], [allow_undefined_flag], [1],
+    [Flag that allows shared libraries with undefined symbols to be built])
+_LT_TAGDECL([], [no_undefined_flag], [1],
+    [Flag that enforces no undefined symbols])
+_LT_TAGDECL([], [hardcode_libdir_flag_spec], [1],
+    [Flag to hardcode $libdir into a binary during linking.
+    This must work even if $libdir does not exist])
+_LT_TAGDECL([], [hardcode_libdir_separator], [1],
+    [Whether we need a single "-rpath" flag with a separated argument])
+_LT_TAGDECL([], [hardcode_direct], [0],
+    [Set to "yes" if using DIR/libNAME$shared_ext during linking hardcodes
+    DIR into the resulting binary])
+_LT_TAGDECL([], [hardcode_direct_absolute], [0],
+    [Set to "yes" if using DIR/libNAME$shared_ext during linking hardcodes
+    DIR into the resulting binary and the resulting library dependency is
+    "absolute", i.e impossible to change by setting $shlibpath_var if the
+    library is relocated])
+_LT_TAGDECL([], [hardcode_minus_L], [0],
+    [Set to "yes" if using the -LDIR flag during linking hardcodes DIR
+    into the resulting binary])
+_LT_TAGDECL([], [hardcode_shlibpath_var], [0],
+    [Set to "yes" if using SHLIBPATH_VAR=DIR during linking hardcodes DIR
+    into the resulting binary])
+_LT_TAGDECL([], [hardcode_automatic], [0],
+    [Set to "yes" if building a shared library automatically hardcodes DIR
+    into the library and all subsequent libraries and executables linked
+    against it])
+_LT_TAGDECL([], [inherit_rpath], [0],
+    [Set to yes if linker adds runtime paths of dependent libraries
+    to runtime path list])
+_LT_TAGDECL([], [link_all_deplibs], [0],
+    [Whether libtool must link a program against all its dependency libraries])
+_LT_TAGDECL([], [always_export_symbols], [0],
+    [Set to "yes" if exported symbols are required])
+_LT_TAGDECL([], [export_symbols_cmds], [2],
+    [The commands to list exported symbols])
+_LT_TAGDECL([], [exclude_expsyms], [1],
+    [Symbols that should not be listed in the preloaded symbols])
+_LT_TAGDECL([], [include_expsyms], [1],
+    [Symbols that must always be exported])
+_LT_TAGDECL([], [prelink_cmds], [2],
+    [Commands necessary for linking programs (against libraries) with templates])
+_LT_TAGDECL([], [postlink_cmds], [2],
+    [Commands necessary for finishing linking programs])
+_LT_TAGDECL([], [file_list_spec], [1],
+    [Specify filename containing input files])
+dnl FIXME: Not yet implemented
+dnl _LT_TAGDECL([], [thread_safe_flag_spec], [1],
+dnl    [Compiler flag to generate thread safe objects])
+])# _LT_LINKER_SHLIBS
+
+
+# _LT_LANG_C_CONFIG([TAG])
+# ------------------------
+# Ensure that the configuration variables for a C compiler are suitably
+# defined.  These variables are subsequently used by _LT_CONFIG to write
+# the compiler configuration to 'libtool'.
+m4_defun([_LT_LANG_C_CONFIG],
+[m4_require([_LT_DECL_EGREP])dnl
+lt_save_CC=$CC
+AC_LANG_PUSH(C)
+
+# Source file extension for C test sources.
+ac_ext=c
+
+# Object file extension for compiled C test sources.
+objext=o
+_LT_TAGVAR(objext, $1)=$objext
+
+# Code to be used in simple compile tests
+lt_simple_compile_test_code="int some_variable = 0;"
+
+# Code to be used in simple link tests
+lt_simple_link_test_code='int main(){return(0);}'
+
+_LT_TAG_COMPILER
+# Save the default compiler, since it gets overwritten when the other
+# tags are being tested, and _LT_TAGVAR(compiler, []) is a NOP.
+compiler_DEFAULT=$CC
+
+# save warnings/boilerplate of simple test code
+_LT_COMPILER_BOILERPLATE
+_LT_LINKER_BOILERPLATE
+
+## CAVEAT EMPTOR:
+## There is no encapsulation within the following macros, do not change
+## the running order or otherwise move them around unless you know exactly
+## what you are doing...
+if test -n "$compiler"; then
+  _LT_COMPILER_NO_RTTI($1)
+  _LT_COMPILER_PIC($1)
+  _LT_COMPILER_C_O($1)
+  _LT_COMPILER_FILE_LOCKS($1)
+  _LT_LINKER_SHLIBS($1)
+  _LT_SYS_DYNAMIC_LINKER($1)
+  _LT_LINKER_HARDCODE_LIBPATH($1)
+  LT_SYS_DLOPEN_SELF
+  _LT_CMD_STRIPLIB
+
+  # Report what library types will actually be built
+  AC_MSG_CHECKING([if libtool supports shared libraries])
+  AC_MSG_RESULT([$can_build_shared])
+
+  AC_MSG_CHECKING([whether to build shared libraries])
+  test no = "$can_build_shared" && enable_shared=no
+
+  # On AIX, shared libraries and static libraries use the same namespace, and
+  # are all built from PIC.
+  case $host_os in
+  aix3*)
+    test yes = "$enable_shared" && enable_static=no
+    if test -n "$RANLIB"; then
+      archive_cmds="$archive_cmds~\$RANLIB \$lib"
+      postinstall_cmds='$RANLIB $lib'
+    fi
+    ;;
+
+  aix[[4-9]]*)
+    if test ia64 != "$host_cpu"; then
+      case $enable_shared,$with_aix_soname,$aix_use_runtimelinking in
+      yes,aix,yes) ;;                  # shared object as lib.so file only
+      yes,svr4,*) ;;                   # shared object as lib.so archive member only
+      yes,*) enable_static=no ;;       # shared object in lib.a archive as well
+      esac
+    fi
+    ;;
+  esac
+  AC_MSG_RESULT([$enable_shared])
+
+  AC_MSG_CHECKING([whether to build static libraries])
+  # Make sure either enable_shared or enable_static is yes.
+  test yes = "$enable_shared" || enable_static=yes
+  AC_MSG_RESULT([$enable_static])
+
+  _LT_CONFIG($1)
+fi
+AC_LANG_POP
+CC=$lt_save_CC
+])# _LT_LANG_C_CONFIG
+
+
+# _LT_LANG_CXX_CONFIG([TAG])
+# --------------------------
+# Ensure that the configuration variables for a C++ compiler are suitably
+# defined.  These variables are subsequently used by _LT_CONFIG to write
+# the compiler configuration to 'libtool'.
+m4_defun([_LT_LANG_CXX_CONFIG],
+[m4_require([_LT_FILEUTILS_DEFAULTS])dnl
+m4_require([_LT_DECL_EGREP])dnl
+m4_require([_LT_PATH_MANIFEST_TOOL])dnl
+if test -n "$CXX" && ( test no != "$CXX" &&
+    ( (test g++ = "$CXX" && `g++ -v >/dev/null 2>&1` ) ||
+    (test g++ != "$CXX"))); then
+  AC_PROG_CXXCPP
+else
+  _lt_caught_CXX_error=yes
+fi
+
+AC_LANG_PUSH(C++)
+_LT_TAGVAR(archive_cmds_need_lc, $1)=no
+_LT_TAGVAR(allow_undefined_flag, $1)=
+_LT_TAGVAR(always_export_symbols, $1)=no
+_LT_TAGVAR(archive_expsym_cmds, $1)=
+_LT_TAGVAR(compiler_needs_object, $1)=no
+_LT_TAGVAR(export_dynamic_flag_spec, $1)=
+_LT_TAGVAR(hardcode_direct, $1)=no
+_LT_TAGVAR(hardcode_direct_absolute, $1)=no
+_LT_TAGVAR(hardcode_libdir_flag_spec, $1)=
+_LT_TAGVAR(hardcode_libdir_separator, $1)=
+_LT_TAGVAR(hardcode_minus_L, $1)=no
+_LT_TAGVAR(hardcode_shlibpath_var, $1)=unsupported
+_LT_TAGVAR(hardcode_automatic, $1)=no
+_LT_TAGVAR(inherit_rpath, $1)=no
+_LT_TAGVAR(module_cmds, $1)=
+_LT_TAGVAR(module_expsym_cmds, $1)=
+_LT_TAGVAR(link_all_deplibs, $1)=unknown
+_LT_TAGVAR(old_archive_cmds, $1)=$old_archive_cmds
+_LT_TAGVAR(reload_flag, $1)=$reload_flag
+_LT_TAGVAR(reload_cmds, $1)=$reload_cmds
+_LT_TAGVAR(no_undefined_flag, $1)=
+_LT_TAGVAR(whole_archive_flag_spec, $1)=
+_LT_TAGVAR(enable_shared_with_static_runtimes, $1)=no
+
+# Source file extension for C++ test sources.
+ac_ext=cpp
+
+# Object file extension for compiled C++ test sources.
+objext=o
+_LT_TAGVAR(objext, $1)=$objext
+
+# No sense in running all these tests if we already determined that
+# the CXX compiler isn't working.  Some variables (like enable_shared)
+# are currently assumed to apply to all compilers on this platform,
+# and will be corrupted by setting them based on a non-working compiler.
+if test yes != "$_lt_caught_CXX_error"; then
+  # Code to be used in simple compile tests
+  lt_simple_compile_test_code="int some_variable = 0;"
+
+  # Code to be used in simple link tests
+  lt_simple_link_test_code='int main(int, char *[[]]) { return(0); }'
+
+  # ltmain only uses $CC for tagged configurations so make sure $CC is set.
+  _LT_TAG_COMPILER
+
+  # save warnings/boilerplate of simple test code
+  _LT_COMPILER_BOILERPLATE
+  _LT_LINKER_BOILERPLATE
+
+  # Allow CC to be a program name with arguments.
+  lt_save_CC=$CC
+  lt_save_CFLAGS=$CFLAGS
+  lt_save_LD=$LD
+  lt_save_GCC=$GCC
+  GCC=$GXX
+  lt_save_with_gnu_ld=$with_gnu_ld
+  lt_save_path_LD=$lt_cv_path_LD
+  if test -n "${lt_cv_prog_gnu_ldcxx+set}"; then
+    lt_cv_prog_gnu_ld=$lt_cv_prog_gnu_ldcxx
+  else
+    $as_unset lt_cv_prog_gnu_ld
+  fi
+  if test -n "${lt_cv_path_LDCXX+set}"; then
+    lt_cv_path_LD=$lt_cv_path_LDCXX
+  else
+    $as_unset lt_cv_path_LD
+  fi
+  test -z "${LDCXX+set}" || LD=$LDCXX
+  CC=${CXX-"c++"}
+  CFLAGS=$CXXFLAGS
+  compiler=$CC
+  _LT_TAGVAR(compiler, $1)=$CC
+  _LT_CC_BASENAME([$compiler])
+
+  if test -n "$compiler"; then
+    # We don't want -fno-exception when compiling C++ code, so set the
+    # no_builtin_flag separately
+    if test yes = "$GXX"; then
+      _LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)=' -fno-builtin'
+    else
+      _LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)=
+    fi
+
+    if test yes = "$GXX"; then
+      # Set up default GNU C++ configuration
+
+      LT_PATH_LD
+
+      # Check if GNU C++ uses GNU ld as the underlying linker, since the
+      # archiving commands below assume that GNU ld is being used.
+      if test yes = "$with_gnu_ld"; then
+        _LT_TAGVAR(archive_cmds, $1)='$CC $pic_flag -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib'
+        _LT_TAGVAR(archive_expsym_cmds, $1)='$CC $pic_flag -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+
+        _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+        _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic'
+
+        # If archive_cmds runs LD, not CC, wlarc should be empty
+        # XXX I think wlarc can be eliminated in ltcf-cxx, but I need to
+        #     investigate it a little bit more. (MM)
+        wlarc='$wl'
+
+        # ancient GNU ld didn't support --whole-archive et. al.
+        if eval "`$CC -print-prog-name=ld` --help 2>&1" |
+         $GREP 'no-whole-archive' > /dev/null; then
+          _LT_TAGVAR(whole_archive_flag_spec, $1)=$wlarc'--whole-archive$convenience '$wlarc'--no-whole-archive'
+        else
+          _LT_TAGVAR(whole_archive_flag_spec, $1)=
+        fi
+      else
+        with_gnu_ld=no
+        wlarc=
+
+        # A generic and very simple default shared library creation
+        # command for GNU C++ for the case where it uses the native
+        # linker, instead of GNU ld.  If possible, this setting should
+        # overridden to take advantage of the native linker features on
+        # the platform it is being used on.
+        _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $lib'
+      fi
+
+      # Commands to make compiler produce verbose output that lists
+      # what "hidden" libraries, object files and flags are used when
+      # linking a shared library.
+      output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"'
+
+    else
+      GXX=no
+      with_gnu_ld=no
+      wlarc=
+    fi
+
+    # PORTME: fill in a description of your system's C++ link characteristics
+    AC_MSG_CHECKING([whether the $compiler linker ($LD) supports shared libraries])
+    _LT_TAGVAR(ld_shlibs, $1)=yes
+    case $host_os in
+      aix3*)
+        # FIXME: insert proper C++ library support
+        _LT_TAGVAR(ld_shlibs, $1)=no
+        ;;
+      aix[[4-9]]*)
+        if test ia64 = "$host_cpu"; then
+          # On IA64, the linker does run time linking by default, so we don't
+          # have to do anything special.
+          aix_use_runtimelinking=no
+          exp_sym_flag='-Bexport'
+          no_entry_flag=
+        else
+          aix_use_runtimelinking=no
+
+          # Test if we are trying to use run time linking or normal
+          # AIX style linking. If -brtl is somewhere in LDFLAGS, we
+          # have runtime linking enabled, and use it for executables.
+          # For shared libraries, we enable/disable runtime linking
+          # depending on the kind of the shared library created -
+          # when "with_aix_soname,aix_use_runtimelinking" is:
+          # "aix,no"   lib.a(lib.so.V) shared, rtl:no,  for executables
+          # "aix,yes"  lib.so          shared, rtl:yes, for executables
+          #            lib.a           static archive
+          # "both,no"  lib.so.V(shr.o) shared, rtl:yes
+          #            lib.a(lib.so.V) shared, rtl:no,  for executables
+          # "both,yes" lib.so.V(shr.o) shared, rtl:yes, for executables
+          #            lib.a(lib.so.V) shared, rtl:no
+          # "svr4,*"   lib.so.V(shr.o) shared, rtl:yes, for executables
+          #            lib.a           static archive
+          case $host_os in aix4.[[23]]|aix4.[[23]].*|aix[[5-9]]*)
+           for ld_flag in $LDFLAGS; do
+             case $ld_flag in
+             *-brtl*)
+               aix_use_runtimelinking=yes
+               break
+               ;;
+             esac
+           done
+           if test svr4,no = "$with_aix_soname,$aix_use_runtimelinking"; then
+             # With aix-soname=svr4, we create the lib.so.V shared archives only,
+             # so we don't have lib.a shared libs to link our executables.
+             # We have to force runtime linking in this case.
+             aix_use_runtimelinking=yes
+             LDFLAGS="$LDFLAGS -Wl,-brtl"
+           fi
+           ;;
+          esac
+
+          exp_sym_flag='-bexport'
+          no_entry_flag='-bnoentry'
+        fi
+
+        # When large executables or shared objects are built, AIX ld can
+        # have problems creating the table of contents.  If linking a library
+        # or program results in "error TOC overflow" add -mminimal-toc to
+        # CXXFLAGS/CFLAGS for g++/gcc.  In the cases where that is not
+        # enough to fix the problem, add -Wl,-bbigtoc to LDFLAGS.
+
+        _LT_TAGVAR(archive_cmds, $1)=''
+        _LT_TAGVAR(hardcode_direct, $1)=yes
+        _LT_TAGVAR(hardcode_direct_absolute, $1)=yes
+        _LT_TAGVAR(hardcode_libdir_separator, $1)=':'
+        _LT_TAGVAR(link_all_deplibs, $1)=yes
+        _LT_TAGVAR(file_list_spec, $1)='$wl-f,'
+        case $with_aix_soname,$aix_use_runtimelinking in
+        aix,*) ;;      # no import file
+        svr4,* | *,yes) # use import file
+          # The Import File defines what to hardcode.
+          _LT_TAGVAR(hardcode_direct, $1)=no
+          _LT_TAGVAR(hardcode_direct_absolute, $1)=no
+          ;;
+        esac
+
+        if test yes = "$GXX"; then
+          case $host_os in aix4.[[012]]|aix4.[[012]].*)
+          # We only want to do this on AIX 4.2 and lower, the check
+          # below for broken collect2 doesn't work under 4.3+
+         collect2name=`$CC -print-prog-name=collect2`
+         if test -f "$collect2name" &&
+            strings "$collect2name" | $GREP resolve_lib_name >/dev/null
+         then
+           # We have reworked collect2
+           :
+         else
+           # We have old collect2
+           _LT_TAGVAR(hardcode_direct, $1)=unsupported
+           # It fails to find uninstalled libraries when the uninstalled
+           # path is not listed in the libpath.  Setting hardcode_minus_L
+           # to unsupported forces relinking
+           _LT_TAGVAR(hardcode_minus_L, $1)=yes
+           _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+           _LT_TAGVAR(hardcode_libdir_separator, $1)=
+         fi
+          esac
+          shared_flag='-shared'
+         if test yes = "$aix_use_runtimelinking"; then
+           shared_flag=$shared_flag' $wl-G'
+         fi
+         # Need to ensure runtime linking is disabled for the traditional
+         # shared library, or the linker may eventually find shared libraries
+         # /with/ Import File - we do not want to mix them.
+         shared_flag_aix='-shared'
+         shared_flag_svr4='-shared $wl-G'
+        else
+          # not using gcc
+          if test ia64 = "$host_cpu"; then
+         # VisualAge C++, Version 5.5 for AIX 5L for IA-64, Beta 3 Release
+         # chokes on -Wl,-G. The following line is correct:
+         shared_flag='-G'
+          else
+           if test yes = "$aix_use_runtimelinking"; then
+             shared_flag='$wl-G'
+           else
+             shared_flag='$wl-bM:SRE'
+           fi
+           shared_flag_aix='$wl-bM:SRE'
+           shared_flag_svr4='$wl-G'
+          fi
+        fi
+
+        _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-bexpall'
+        # It seems that -bexpall does not export symbols beginning with
+        # underscore (_), so it is better to generate a list of symbols to
+       # export.
+        _LT_TAGVAR(always_export_symbols, $1)=yes
+       if test aix,yes = "$with_aix_soname,$aix_use_runtimelinking"; then
+          # Warning - without using the other runtime loading flags (-brtl),
+          # -berok will link without error, but may produce a broken library.
+          # The "-G" linker flag allows undefined symbols.
+          _LT_TAGVAR(no_undefined_flag, $1)='-bernotok'
+          # Determine the default libpath from the value encoded in an empty
+          # executable.
+          _LT_SYS_MODULE_PATH_AIX([$1])
+          _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-blibpath:$libdir:'"$aix_libpath"
+
+          _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -o $output_objdir/$soname $libobjs $deplibs $wl'$no_entry_flag' $compiler_flags `if test -n "$allow_undefined_flag"; then func_echo_all "$wl$allow_undefined_flag"; else :; fi` $wl'$exp_sym_flag:\$export_symbols' '$shared_flag
+        else
+          if test ia64 = "$host_cpu"; then
+           _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-R $libdir:/usr/lib:/lib'
+           _LT_TAGVAR(allow_undefined_flag, $1)="-z nodefs"
+           _LT_TAGVAR(archive_expsym_cmds, $1)="\$CC $shared_flag"' -o $output_objdir/$soname $libobjs $deplibs '"\$wl$no_entry_flag"' $compiler_flags $wl$allow_undefined_flag '"\$wl$exp_sym_flag:\$export_symbols"
+          else
+           # Determine the default libpath from the value encoded in an
+           # empty executable.
+           _LT_SYS_MODULE_PATH_AIX([$1])
+           _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-blibpath:$libdir:'"$aix_libpath"
+           # Warning - without using the other run time loading flags,
+           # -berok will link without error, but may produce a broken library.
+           _LT_TAGVAR(no_undefined_flag, $1)=' $wl-bernotok'
+           _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-berok'
+           if test yes = "$with_gnu_ld"; then
+             # We only use this code for GNU lds that support --whole-archive.
+             _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive$convenience $wl--no-whole-archive'
+           else
+             # Exported symbols can be pulled into shared objects from archives
+             _LT_TAGVAR(whole_archive_flag_spec, $1)='$convenience'
+           fi
+           _LT_TAGVAR(archive_cmds_need_lc, $1)=yes
+           _LT_TAGVAR(archive_expsym_cmds, $1)='$RM -r $output_objdir/$realname.d~$MKDIR $output_objdir/$realname.d'
+           # -brtl affects multiple linker settings, -berok does not and is overridden later
+           compiler_flags_filtered='`func_echo_all "$compiler_flags " | $SED -e "s%-brtl\\([[, ]]\\)%-berok\\1%g"`'
+           if test svr4 != "$with_aix_soname"; then
+             # This is similar to how AIX traditionally builds its shared
+             # libraries. Need -bnortl late, we may have -brtl in LDFLAGS.
+             _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$CC '$shared_flag_aix' -o $output_objdir/$realname.d/$soname $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$AR $AR_FLAGS $output_objdir/$libname$release.a $output_objdir/$realname.d/$soname'
+           fi
+           if test aix != "$with_aix_soname"; then
+             _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$CC '$shared_flag_svr4' -o $output_objdir/$realname.d/$shared_archive_member_spec.o $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$STRIP -e $output_objdir/$realname.d/$shared_archive_member_spec.o~( func_echo_all "#! $soname($shared_archive_member_spec.o)"; if test shr_64 = "$shared_archive_member_spec"; then func_echo_all "# 64"; else func_echo_all "# 32"; fi; cat $export_symbols ) > $output_objdir/$realname.d/$shared_archive_member_spec.imp~$AR $AR_FLAGS $output_objdir/$soname $output_objdir/$realname.d/$shared_archive_member_spec.o $output_objdir/$realname.d/$shared_archive_member_spec.imp'
+           else
+             # used by -dlpreopen to get the symbols
+             _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$MV  $output_objdir/$realname.d/$soname $output_objdir'
+           fi
+           _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$RM -r $output_objdir/$realname.d'
+          fi
+        fi
+        ;;
+
+      beos*)
+       if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then
+         _LT_TAGVAR(allow_undefined_flag, $1)=unsupported
+         # Joseph Beckenbach <jrb3@best.com> says some releases of gcc
+         # support --undefined.  This deserves some investigation.  FIXME
+         _LT_TAGVAR(archive_cmds, $1)='$CC -nostart $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+       else
+         _LT_TAGVAR(ld_shlibs, $1)=no
+       fi
+       ;;
+
+      chorus*)
+        case $cc_basename in
+          *)
+         # FIXME: insert proper C++ library support
+         _LT_TAGVAR(ld_shlibs, $1)=no
+         ;;
+        esac
+        ;;
+
+      cygwin* | mingw* | pw32* | cegcc*)
+       case $GXX,$cc_basename in
+       ,cl* | no,cl*)
+         # Native MSVC
+         # hardcode_libdir_flag_spec is actually meaningless, as there is
+         # no search path for DLLs.
+         _LT_TAGVAR(hardcode_libdir_flag_spec, $1)=' '
+         _LT_TAGVAR(allow_undefined_flag, $1)=unsupported
+         _LT_TAGVAR(always_export_symbols, $1)=yes
+         _LT_TAGVAR(file_list_spec, $1)='@'
+         # Tell ltmain to make .lib files, not .a files.
+         libext=lib
+         # Tell ltmain to make .dll files, not .so files.
+         shrext_cmds=.dll
+         # FIXME: Setting linknames here is a bad hack.
+         _LT_TAGVAR(archive_cmds, $1)='$CC -o $output_objdir/$soname $libobjs $compiler_flags $deplibs -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~linknames='
+         _LT_TAGVAR(archive_expsym_cmds, $1)='if _LT_DLL_DEF_P([$export_symbols]); then
+              cp "$export_symbols" "$output_objdir/$soname.def";
+              echo "$tool_output_objdir$soname.def" > "$output_objdir/$soname.exp";
+            else
+              $SED -e '\''s/^/-link -EXPORT:/'\'' < $export_symbols > $output_objdir/$soname.exp;
+            fi~
+            $CC -o $tool_output_objdir$soname $libobjs $compiler_flags $deplibs "@$tool_output_objdir$soname.exp" -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~
+            linknames='
+         # The linker will not automatically build a static lib if we build a DLL.
+         # _LT_TAGVAR(old_archive_from_new_cmds, $1)='true'
+         _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes
+         # Don't use ranlib
+         _LT_TAGVAR(old_postinstall_cmds, $1)='chmod 644 $oldlib'
+         _LT_TAGVAR(postlink_cmds, $1)='lt_outputfile="@OUTPUT@"~
+            lt_tool_outputfile="@TOOL_OUTPUT@"~
+            case $lt_outputfile in
+              *.exe|*.EXE) ;;
+              *)
+                lt_outputfile=$lt_outputfile.exe
+                lt_tool_outputfile=$lt_tool_outputfile.exe
+                ;;
+            esac~
+            func_to_tool_file "$lt_outputfile"~
+            if test : != "$MANIFEST_TOOL" && test -f "$lt_outputfile.manifest"; then
+              $MANIFEST_TOOL -manifest "$lt_tool_outputfile.manifest" -outputresource:"$lt_tool_outputfile" || exit 1;
+              $RM "$lt_outputfile.manifest";
+            fi'
+         ;;
+       *)
+         # g++
+         # _LT_TAGVAR(hardcode_libdir_flag_spec, $1) is actually meaningless,
+         # as there is no search path for DLLs.
+         _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+         _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-all-symbols'
+         _LT_TAGVAR(allow_undefined_flag, $1)=unsupported
+         _LT_TAGVAR(always_export_symbols, $1)=no
+         _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes
+
+         if $LD --help 2>&1 | $GREP 'auto-import' > /dev/null; then
+           _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib'
+           # If the export-symbols file already is a .def file, use it as
+           # is; otherwise, prepend EXPORTS...
+           _LT_TAGVAR(archive_expsym_cmds, $1)='if _LT_DLL_DEF_P([$export_symbols]); then
+              cp $export_symbols $output_objdir/$soname.def;
+            else
+              echo EXPORTS > $output_objdir/$soname.def;
+              cat $export_symbols >> $output_objdir/$soname.def;
+            fi~
+            $CC -shared -nostdlib $output_objdir/$soname.def $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib'
+         else
+           _LT_TAGVAR(ld_shlibs, $1)=no
+         fi
+         ;;
+       esac
+       ;;
+      darwin* | rhapsody*)
+        _LT_DARWIN_LINKER_FEATURES($1)
+       ;;
+
+      os2*)
+       _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir'
+       _LT_TAGVAR(hardcode_minus_L, $1)=yes
+       _LT_TAGVAR(allow_undefined_flag, $1)=unsupported
+       shrext_cmds=.dll
+       _LT_TAGVAR(archive_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~
+         $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~
+         $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~
+         $ECHO EXPORTS >> $output_objdir/$libname.def~
+         emxexp $libobjs | $SED /"_DLL_InitTerm"/d >> $output_objdir/$libname.def~
+         $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~
+         emximp -o $lib $output_objdir/$libname.def'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~
+         $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~
+         $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~
+         $ECHO EXPORTS >> $output_objdir/$libname.def~
+         prefix_cmds="$SED"~
+         if test EXPORTS = "`$SED 1q $export_symbols`"; then
+           prefix_cmds="$prefix_cmds -e 1d";
+         fi~
+         prefix_cmds="$prefix_cmds -e \"s/^\(.*\)$/_\1/g\""~
+         cat $export_symbols | $prefix_cmds >> $output_objdir/$libname.def~
+         $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~
+         emximp -o $lib $output_objdir/$libname.def'
+       _LT_TAGVAR(old_archive_From_new_cmds, $1)='emximp -o $output_objdir/${libname}_dll.a $output_objdir/$libname.def'
+       _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes
+       ;;
+
+      dgux*)
+        case $cc_basename in
+          ec++*)
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+          ghcx*)
+           # Green Hills C++ Compiler
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+          *)
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+        esac
+        ;;
+
+      freebsd2.*)
+        # C++ shared libraries reported to be fairly broken before
+       # switch to ELF
+        _LT_TAGVAR(ld_shlibs, $1)=no
+        ;;
+
+      freebsd-elf*)
+        _LT_TAGVAR(archive_cmds_need_lc, $1)=no
+        ;;
+
+      freebsd* | dragonfly*)
+        # FreeBSD 3 and later use GNU C++ and GNU ld with standard ELF
+        # conventions
+        _LT_TAGVAR(ld_shlibs, $1)=yes
+        ;;
+
+      haiku*)
+        _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+        _LT_TAGVAR(link_all_deplibs, $1)=yes
+        ;;
+
+      hpux9*)
+        _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl+b $wl$libdir'
+        _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+        _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E'
+        _LT_TAGVAR(hardcode_direct, $1)=yes
+        _LT_TAGVAR(hardcode_minus_L, $1)=yes # Not in the search PATH,
+                                            # but as the default
+                                            # location of the library.
+
+        case $cc_basename in
+          CC*)
+            # FIXME: insert proper C++ library support
+            _LT_TAGVAR(ld_shlibs, $1)=no
+            ;;
+          aCC*)
+            _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/$soname~$CC -b $wl+b $wl$install_libdir -o $output_objdir/$soname $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib'
+            # Commands to make compiler produce verbose output that lists
+            # what "hidden" libraries, object files and flags are used when
+            # linking a shared library.
+            #
+            # There doesn't appear to be a way to prevent this compiler from
+            # explicitly linking system object files so we need to strip them
+            # from the output so that they don't get included in the library
+            # dependencies.
+            output_verbose_link_cmd='templist=`($CC -b $CFLAGS -v conftest.$objext 2>&1) | $EGREP "\-L"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"'
+            ;;
+          *)
+            if test yes = "$GXX"; then
+              _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/$soname~$CC -shared -nostdlib $pic_flag $wl+b $wl$install_libdir -o $output_objdir/$soname $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib'
+            else
+              # FIXME: insert proper C++ library support
+              _LT_TAGVAR(ld_shlibs, $1)=no
+            fi
+            ;;
+        esac
+        ;;
+
+      hpux10*|hpux11*)
+        if test no = "$with_gnu_ld"; then
+         _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl+b $wl$libdir'
+         _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+
+          case $host_cpu in
+            hppa*64*|ia64*)
+              ;;
+            *)
+             _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E'
+              ;;
+          esac
+        fi
+        case $host_cpu in
+          hppa*64*|ia64*)
+            _LT_TAGVAR(hardcode_direct, $1)=no
+            _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+            ;;
+          *)
+            _LT_TAGVAR(hardcode_direct, $1)=yes
+            _LT_TAGVAR(hardcode_direct_absolute, $1)=yes
+            _LT_TAGVAR(hardcode_minus_L, $1)=yes # Not in the search PATH,
+                                                # but as the default
+                                                # location of the library.
+            ;;
+        esac
+
+        case $cc_basename in
+          CC*)
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+          aCC*)
+           case $host_cpu in
+             hppa*64*)
+               _LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags'
+               ;;
+             ia64*)
+               _LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname $wl+nodefaultrpath -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags'
+               ;;
+             *)
+               _LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags'
+               ;;
+           esac
+           # Commands to make compiler produce verbose output that lists
+           # what "hidden" libraries, object files and flags are used when
+           # linking a shared library.
+           #
+           # There doesn't appear to be a way to prevent this compiler from
+           # explicitly linking system object files so we need to strip them
+           # from the output so that they don't get included in the library
+           # dependencies.
+           output_verbose_link_cmd='templist=`($CC -b $CFLAGS -v conftest.$objext 2>&1) | $GREP "\-L"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"'
+           ;;
+          *)
+           if test yes = "$GXX"; then
+             if test no = "$with_gnu_ld"; then
+               case $host_cpu in
+                 hppa*64*)
+                   _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib -fPIC $wl+h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags'
+                   ;;
+                 ia64*)
+                   _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib $pic_flag $wl+h $wl$soname $wl+nodefaultrpath -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags'
+                   ;;
+                 *)
+                   _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib $pic_flag $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags'
+                   ;;
+               esac
+             fi
+           else
+             # FIXME: insert proper C++ library support
+             _LT_TAGVAR(ld_shlibs, $1)=no
+           fi
+           ;;
+        esac
+        ;;
+
+      interix[[3-9]]*)
+       _LT_TAGVAR(hardcode_direct, $1)=no
+       _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+       _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir'
+       _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E'
+       # Hack: On Interix 3.x, we cannot compile PIC because of a broken gcc.
+       # Instead, shared libraries are loaded at an image base (0x10000000 by
+       # default) and relocated if they conflict, which is a slow very memory
+       # consuming and fragmenting process.  To avoid this, we pick a random,
+       # 256 KiB-aligned image base between 0x50000000 and 0x6FFC0000 at link
+       # time.  Moving up from 0x10000000 also allows more sbrk(2) space.
+       _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib'
+       _LT_TAGVAR(archive_expsym_cmds, $1)='sed "s|^|_|" $export_symbols >$output_objdir/$soname.expsym~$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--retain-symbols-file,$output_objdir/$soname.expsym $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib'
+       ;;
+      irix5* | irix6*)
+        case $cc_basename in
+          CC*)
+           # SGI C++
+           _LT_TAGVAR(archive_cmds, $1)='$CC -shared -all -multigot $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib'
+
+           # Archives containing C++ object files must be created using
+           # "CC -ar", where "CC" is the IRIX C++ compiler.  This is
+           # necessary to make sure instantiated templates are included
+           # in the archive.
+           _LT_TAGVAR(old_archive_cmds, $1)='$CC -ar -WR,-u -o $oldlib $oldobjs'
+           ;;
+          *)
+           if test yes = "$GXX"; then
+             if test no = "$with_gnu_ld"; then
+               _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib'
+             else
+               _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` -o $lib'
+             fi
+           fi
+           _LT_TAGVAR(link_all_deplibs, $1)=yes
+           ;;
+        esac
+        _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+        _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+        _LT_TAGVAR(inherit_rpath, $1)=yes
+        ;;
+
+      linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*)
+        case $cc_basename in
+          KCC*)
+           # Kuck and Associates, Inc. (KAI) C++ Compiler
+
+           # KCC will only create a shared library if the output file
+           # ends with ".so" (or ".sl" for HP-UX), so rename the library
+           # to its proper name (with version) after linking.
+           _LT_TAGVAR(archive_cmds, $1)='tempext=`echo $shared_ext | $SED -e '\''s/\([[^()0-9A-Za-z{}]]\)/\\\\\1/g'\''`; templib=`echo $lib | $SED -e "s/\$tempext\..*/.so/"`; $CC $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags --soname $soname -o \$templib; mv \$templib $lib'
+           _LT_TAGVAR(archive_expsym_cmds, $1)='tempext=`echo $shared_ext | $SED -e '\''s/\([[^()0-9A-Za-z{}]]\)/\\\\\1/g'\''`; templib=`echo $lib | $SED -e "s/\$tempext\..*/.so/"`; $CC $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags --soname $soname -o \$templib $wl-retain-symbols-file,$export_symbols; mv \$templib $lib'
+           # Commands to make compiler produce verbose output that lists
+           # what "hidden" libraries, object files and flags are used when
+           # linking a shared library.
+           #
+           # There doesn't appear to be a way to prevent this compiler from
+           # explicitly linking system object files so we need to strip them
+           # from the output so that they don't get included in the library
+           # dependencies.
+           output_verbose_link_cmd='templist=`$CC $CFLAGS -v conftest.$objext -o libconftest$shared_ext 2>&1 | $GREP "ld"`; rm -f libconftest$shared_ext; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"'
+
+           _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir'
+           _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic'
+
+           # Archives containing C++ object files must be created using
+           # "CC -Bstatic", where "CC" is the KAI C++ compiler.
+           _LT_TAGVAR(old_archive_cmds, $1)='$CC -Bstatic -o $oldlib $oldobjs'
+           ;;
+         icpc* | ecpc* )
+           # Intel C++
+           with_gnu_ld=yes
+           # version 8.0 and above of icpc choke on multiply defined symbols
+           # if we add $predep_objects and $postdep_objects, however 7.1 and
+           # earlier do not add the objects themselves.
+           case `$CC -V 2>&1` in
+             *"Version 7."*)
+               _LT_TAGVAR(archive_cmds, $1)='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib'
+               _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+               ;;
+             *)  # Version 8.0 or newer
+               tmp_idyn=
+               case $host_cpu in
+                 ia64*) tmp_idyn=' -i_dynamic';;
+               esac
+               _LT_TAGVAR(archive_cmds, $1)='$CC -shared'"$tmp_idyn"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+               _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared'"$tmp_idyn"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+               ;;
+           esac
+           _LT_TAGVAR(archive_cmds_need_lc, $1)=no
+           _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir'
+           _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic'
+           _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive$convenience $wl--no-whole-archive'
+           ;;
+          pgCC* | pgcpp*)
+            # Portland Group C++ compiler
+           case `$CC -V` in
+           *pgCC\ [[1-5]].* | *pgcpp\ [[1-5]].*)
+             _LT_TAGVAR(prelink_cmds, $1)='tpldir=Template.dir~
+               rm -rf $tpldir~
+               $CC --prelink_objects --instantiation_dir $tpldir $objs $libobjs $compile_deplibs~
+               compile_command="$compile_command `find $tpldir -name \*.o | sort | $NL2SP`"'
+             _LT_TAGVAR(old_archive_cmds, $1)='tpldir=Template.dir~
+                rm -rf $tpldir~
+                $CC --prelink_objects --instantiation_dir $tpldir $oldobjs$old_deplibs~
+                $AR $AR_FLAGS $oldlib$oldobjs$old_deplibs `find $tpldir -name \*.o | sort | $NL2SP`~
+                $RANLIB $oldlib'
+             _LT_TAGVAR(archive_cmds, $1)='tpldir=Template.dir~
+                rm -rf $tpldir~
+                $CC --prelink_objects --instantiation_dir $tpldir $predep_objects $libobjs $deplibs $convenience $postdep_objects~
+                $CC -shared $pic_flag $predep_objects $libobjs $deplibs `find $tpldir -name \*.o | sort | $NL2SP` $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib'
+             _LT_TAGVAR(archive_expsym_cmds, $1)='tpldir=Template.dir~
+                rm -rf $tpldir~
+                $CC --prelink_objects --instantiation_dir $tpldir $predep_objects $libobjs $deplibs $convenience $postdep_objects~
+                $CC -shared $pic_flag $predep_objects $libobjs $deplibs `find $tpldir -name \*.o | sort | $NL2SP` $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+             ;;
+           *) # Version 6 and above use weak symbols
+             _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib'
+             _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib'
+             ;;
+           esac
+
+           _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl--rpath $wl$libdir'
+           _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic'
+           _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`for conv in $convenience\"\"; do test  -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive'
+            ;;
+         cxx*)
+           # Compaq C++
+           _LT_TAGVAR(archive_cmds, $1)='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib'
+           _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname  -o $lib $wl-retain-symbols-file $wl$export_symbols'
+
+           runpath_var=LD_RUN_PATH
+           _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-rpath $libdir'
+           _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+
+           # Commands to make compiler produce verbose output that lists
+           # what "hidden" libraries, object files and flags are used when
+           # linking a shared library.
+           #
+           # There doesn't appear to be a way to prevent this compiler from
+           # explicitly linking system object files so we need to strip them
+           # from the output so that they don't get included in the library
+           # dependencies.
+           output_verbose_link_cmd='templist=`$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP "ld"`; templist=`func_echo_all "$templist" | $SED "s/\(^.*ld.*\)\( .*ld .*$\)/\1/"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "X$list" | $Xsed'
+           ;;
+         xl* | mpixl* | bgxl*)
+           # IBM XL 8.0 on PPC, with GNU ld
+           _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+           _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic'
+           _LT_TAGVAR(archive_cmds, $1)='$CC -qmkshrobj $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib'
+           if test yes = "$supports_anon_versioning"; then
+             _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $output_objdir/$libname.ver~
+                cat $export_symbols | sed -e "s/\(.*\)/\1;/" >> $output_objdir/$libname.ver~
+                echo "local: *; };" >> $output_objdir/$libname.ver~
+                $CC -qmkshrobj $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-version-script $wl$output_objdir/$libname.ver -o $lib'
+           fi
+           ;;
+         *)
+           case `$CC -V 2>&1 | sed 5q` in
+           *Sun\ C*)
+             # Sun C++ 5.9
+             _LT_TAGVAR(no_undefined_flag, $1)=' -zdefs'
+             _LT_TAGVAR(archive_cmds, $1)='$CC -G$allow_undefined_flag -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags'
+             _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -G$allow_undefined_flag -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-retain-symbols-file $wl$export_symbols'
+             _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir'
+             _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`new_convenience=; for conv in $convenience\"\"; do test -z \"$conv\" || new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive'
+             _LT_TAGVAR(compiler_needs_object, $1)=yes
+
+             # Not sure whether something based on
+             # $CC $CFLAGS -v conftest.$objext -o libconftest$shared_ext 2>&1
+             # would be better.
+             output_verbose_link_cmd='func_echo_all'
+
+             # Archives containing C++ object files must be created using
+             # "CC -xar", where "CC" is the Sun C++ compiler.  This is
+             # necessary to make sure instantiated templates are included
+             # in the archive.
+             _LT_TAGVAR(old_archive_cmds, $1)='$CC -xar -o $oldlib $oldobjs'
+             ;;
+           esac
+           ;;
+       esac
+       ;;
+
+      lynxos*)
+        # FIXME: insert proper C++ library support
+       _LT_TAGVAR(ld_shlibs, $1)=no
+       ;;
+
+      m88k*)
+        # FIXME: insert proper C++ library support
+        _LT_TAGVAR(ld_shlibs, $1)=no
+       ;;
+
+      mvs*)
+        case $cc_basename in
+          cxx*)
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+         *)
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+       esac
+       ;;
+
+      netbsd*)
+        if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then
+         _LT_TAGVAR(archive_cmds, $1)='$LD -Bshareable  -o $lib $predep_objects $libobjs $deplibs $postdep_objects $linker_flags'
+         wlarc=
+         _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir'
+         _LT_TAGVAR(hardcode_direct, $1)=yes
+         _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+       fi
+       # Workaround some broken pre-1.5 toolchains
+       output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP conftest.$objext | $SED -e "s:-lgcc -lc -lgcc::"'
+       ;;
+
+      *nto* | *qnx*)
+        _LT_TAGVAR(ld_shlibs, $1)=yes
+       ;;
+
+      openbsd* | bitrig*)
+       if test -f /usr/libexec/ld.so; then
+         _LT_TAGVAR(hardcode_direct, $1)=yes
+         _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+         _LT_TAGVAR(hardcode_direct_absolute, $1)=yes
+         _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $lib'
+         _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir'
+         if test -z "`echo __ELF__ | $CC -E - | grep __ELF__`"; then
+           _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-retain-symbols-file,$export_symbols -o $lib'
+           _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E'
+           _LT_TAGVAR(whole_archive_flag_spec, $1)=$wlarc'--whole-archive$convenience '$wlarc'--no-whole-archive'
+         fi
+         output_verbose_link_cmd=func_echo_all
+       else
+         _LT_TAGVAR(ld_shlibs, $1)=no
+       fi
+       ;;
+
+      osf3* | osf4* | osf5*)
+        case $cc_basename in
+          KCC*)
+           # Kuck and Associates, Inc. (KAI) C++ Compiler
+
+           # KCC will only create a shared library if the output file
+           # ends with ".so" (or ".sl" for HP-UX), so rename the library
+           # to its proper name (with version) after linking.
+           _LT_TAGVAR(archive_cmds, $1)='tempext=`echo $shared_ext | $SED -e '\''s/\([[^()0-9A-Za-z{}]]\)/\\\\\1/g'\''`; templib=`echo "$lib" | $SED -e "s/\$tempext\..*/.so/"`; $CC $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags --soname $soname -o \$templib; mv \$templib $lib'
+
+           _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir'
+           _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+
+           # Archives containing C++ object files must be created using
+           # the KAI C++ compiler.
+           case $host in
+             osf3*) _LT_TAGVAR(old_archive_cmds, $1)='$CC -Bstatic -o $oldlib $oldobjs' ;;
+             *) _LT_TAGVAR(old_archive_cmds, $1)='$CC -o $oldlib $oldobjs' ;;
+           esac
+           ;;
+          RCC*)
+           # Rational C++ 2.4.1
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+          cxx*)
+           case $host in
+             osf3*)
+               _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-expect_unresolved $wl\*'
+               _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $soname `test -n "$verstring" && func_echo_all "$wl-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib'
+               _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+               ;;
+             *)
+               _LT_TAGVAR(allow_undefined_flag, $1)=' -expect_unresolved \*'
+               _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -msym -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib'
+               _LT_TAGVAR(archive_expsym_cmds, $1)='for i in `cat $export_symbols`; do printf "%s %s\\n" -exported_symbol "\$i" >> $lib.exp; done~
+                  echo "-hidden">> $lib.exp~
+                  $CC -shared$allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -msym -soname $soname $wl-input $wl$lib.exp  `test -n "$verstring" && $ECHO "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib~
+                  $RM $lib.exp'
+               _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-rpath $libdir'
+               ;;
+           esac
+
+           _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+
+           # Commands to make compiler produce verbose output that lists
+           # what "hidden" libraries, object files and flags are used when
+           # linking a shared library.
+           #
+           # There doesn't appear to be a way to prevent this compiler from
+           # explicitly linking system object files so we need to strip them
+           # from the output so that they don't get included in the library
+           # dependencies.
+           output_verbose_link_cmd='templist=`$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP "ld" | $GREP -v "ld:"`; templist=`func_echo_all "$templist" | $SED "s/\(^.*ld.*\)\( .*ld.*$\)/\1/"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"'
+           ;;
+         *)
+           if test yes,no = "$GXX,$with_gnu_ld"; then
+             _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-expect_unresolved $wl\*'
+             case $host in
+               osf3*)
+                 _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib $allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib'
+                 ;;
+               *)
+                 _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -nostdlib $allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-msym $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib'
+                 ;;
+             esac
+
+             _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir'
+             _LT_TAGVAR(hardcode_libdir_separator, $1)=:
+
+             # Commands to make compiler produce verbose output that lists
+             # what "hidden" libraries, object files and flags are used when
+             # linking a shared library.
+             output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"'
+
+           else
+             # FIXME: insert proper C++ library support
+             _LT_TAGVAR(ld_shlibs, $1)=no
+           fi
+           ;;
+        esac
+        ;;
+
+      psos*)
+        # FIXME: insert proper C++ library support
+        _LT_TAGVAR(ld_shlibs, $1)=no
+        ;;
+
+      sunos4*)
+        case $cc_basename in
+          CC*)
+           # Sun C++ 4.x
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+          lcc*)
+           # Lucid
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+          *)
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+        esac
+        ;;
+
+      solaris*)
+        case $cc_basename in
+          CC* | sunCC*)
+           # Sun C++ 4.2, 5.x and Centerline C++
+            _LT_TAGVAR(archive_cmds_need_lc,$1)=yes
+           _LT_TAGVAR(no_undefined_flag, $1)=' -zdefs'
+           _LT_TAGVAR(archive_cmds, $1)='$CC -G$allow_undefined_flag -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags'
+           _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~
+              $CC -G$allow_undefined_flag $wl-M $wl$lib.exp -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~$RM $lib.exp'
+
+           _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir'
+           _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+           case $host_os in
+             solaris2.[[0-5]] | solaris2.[[0-5]].*) ;;
+             *)
+               # The compiler driver will combine and reorder linker options,
+               # but understands '-z linker_flag'.
+               # Supported since Solaris 2.6 (maybe 2.5.1?)
+               _LT_TAGVAR(whole_archive_flag_spec, $1)='-z allextract$convenience -z defaultextract'
+               ;;
+           esac
+           _LT_TAGVAR(link_all_deplibs, $1)=yes
+
+           output_verbose_link_cmd='func_echo_all'
+
+           # Archives containing C++ object files must be created using
+           # "CC -xar", where "CC" is the Sun C++ compiler.  This is
+           # necessary to make sure instantiated templates are included
+           # in the archive.
+           _LT_TAGVAR(old_archive_cmds, $1)='$CC -xar -o $oldlib $oldobjs'
+           ;;
+          gcx*)
+           # Green Hills C++ Compiler
+           _LT_TAGVAR(archive_cmds, $1)='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-h $wl$soname -o $lib'
+
+           # The C++ compiler must be used to create the archive.
+           _LT_TAGVAR(old_archive_cmds, $1)='$CC $LDFLAGS -archive -o $oldlib $oldobjs'
+           ;;
+          *)
+           # GNU C++ compiler with Solaris linker
+           if test yes,no = "$GXX,$with_gnu_ld"; then
+             _LT_TAGVAR(no_undefined_flag, $1)=' $wl-z ${wl}defs'
+             if $CC --version | $GREP -v '^2\.7' > /dev/null; then
+               _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-h $wl$soname -o $lib'
+               _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~
+                  $CC -shared $pic_flag -nostdlib $wl-M $wl$lib.exp $wl-h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~$RM $lib.exp'
+
+               # Commands to make compiler produce verbose output that lists
+               # what "hidden" libraries, object files and flags are used when
+               # linking a shared library.
+               output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"'
+             else
+               # g++ 2.7 appears to require '-G' NOT '-shared' on this
+               # platform.
+               _LT_TAGVAR(archive_cmds, $1)='$CC -G -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-h $wl$soname -o $lib'
+               _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~
+                  $CC -G -nostdlib $wl-M $wl$lib.exp $wl-h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~$RM $lib.exp'
+
+               # Commands to make compiler produce verbose output that lists
+               # what "hidden" libraries, object files and flags are used when
+               # linking a shared library.
+               output_verbose_link_cmd='$CC -G $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"'
+             fi
+
+             _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-R $wl$libdir'
+             case $host_os in
+               solaris2.[[0-5]] | solaris2.[[0-5]].*) ;;
+               *)
+                 _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl-z ${wl}allextract$convenience $wl-z ${wl}defaultextract'
+                 ;;
+             esac
+           fi
+           ;;
+        esac
+        ;;
+
+    sysv4*uw2* | sysv5OpenUNIX* | sysv5UnixWare7.[[01]].[[10]]* | unixware7* | sco3.2v5.0.[[024]]*)
+      _LT_TAGVAR(no_undefined_flag, $1)='$wl-z,text'
+      _LT_TAGVAR(archive_cmds_need_lc, $1)=no
+      _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+      runpath_var='LD_RUN_PATH'
+
+      case $cc_basename in
+        CC*)
+         _LT_TAGVAR(archive_cmds, $1)='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+         _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+       *)
+         _LT_TAGVAR(archive_cmds, $1)='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+         _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+         ;;
+      esac
+      ;;
+
+      sysv5* | sco3.2v5* | sco5v6*)
+       # Note: We CANNOT use -z defs as we might desire, because we do not
+       # link with -lc, and that would cause any symbols used from libc to
+       # always be unresolved, which means just about no library would
+       # ever link correctly.  If we're not using GNU ld we use -z text
+       # though, which does catch some bad symbols but isn't as heavy-handed
+       # as -z defs.
+       _LT_TAGVAR(no_undefined_flag, $1)='$wl-z,text'
+       _LT_TAGVAR(allow_undefined_flag, $1)='$wl-z,nodefs'
+       _LT_TAGVAR(archive_cmds_need_lc, $1)=no
+       _LT_TAGVAR(hardcode_shlibpath_var, $1)=no
+       _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-R,$libdir'
+       _LT_TAGVAR(hardcode_libdir_separator, $1)=':'
+       _LT_TAGVAR(link_all_deplibs, $1)=yes
+       _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-Bexport'
+       runpath_var='LD_RUN_PATH'
+
+       case $cc_basename in
+          CC*)
+           _LT_TAGVAR(archive_cmds, $1)='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+           _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+           _LT_TAGVAR(old_archive_cmds, $1)='$CC -Tprelink_objects $oldobjs~
+              '"$_LT_TAGVAR(old_archive_cmds, $1)"
+           _LT_TAGVAR(reload_cmds, $1)='$CC -Tprelink_objects $reload_objs~
+              '"$_LT_TAGVAR(reload_cmds, $1)"
+           ;;
+         *)
+           _LT_TAGVAR(archive_cmds, $1)='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+           _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags'
+           ;;
+       esac
+      ;;
+
+      tandem*)
+        case $cc_basename in
+          NCC*)
+           # NonStop-UX NCC 3.20
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+          *)
+           # FIXME: insert proper C++ library support
+           _LT_TAGVAR(ld_shlibs, $1)=no
+           ;;
+        esac
+        ;;
+
+      vxworks*)
+        # FIXME: insert proper C++ library support
+        _LT_TAGVAR(ld_shlibs, $1)=no
+        ;;
+
+      *)
+        # FIXME: insert proper C++ library support
+        _LT_TAGVAR(ld_shlibs, $1)=no
+        ;;
+    esac
+
+    AC_MSG_RESULT([$_LT_TAGVAR(ld_shlibs, $1)])
+    test no = "$_LT_TAGVAR(ld_shlibs, $1)" && can_build_shared=no
+
+    _LT_TAGVAR(GCC, $1)=$GXX
+    _LT_TAGVAR(LD, $1)=$LD
+
+    ## CAVEAT EMPTOR:
+    ## There is no encapsulation within the following macros, do not change
+    ## the running order or otherwise move them around unless you know exactly
+    ## what you are doing...
+    _LT_SYS_HIDDEN_LIBDEPS($1)
+    _LT_COMPILER_PIC($1)
+    _LT_COMPILER_C_O($1)
+    _LT_COMPILER_FILE_LOCKS($1)
+    _LT_LINKER_SHLIBS($1)
+    _LT_SYS_DYNAMIC_LINKER($1)
+    _LT_LINKER_HARDCODE_LIBPATH($1)
+
+    _LT_CONFIG($1)
+  fi # test -n "$compiler"
+
+  CC=$lt_save_CC
+  CFLAGS=$lt_save_CFLAGS
+  LDCXX=$LD
+  LD=$lt_save_LD
+  GCC=$lt_save_GCC
+  with_gnu_ld=$lt_save_with_gnu_ld
+  lt_cv_path_LDCXX=$lt_cv_path_LD
+  lt_cv_path_LD=$lt_save_path_LD
+  lt_cv_prog_gnu_ldcxx=$lt_cv_prog_gnu_ld
+  lt_cv_prog_gnu_ld=$lt_save_with_gnu_ld
+fi # test yes != "$_lt_caught_CXX_error"
+
+AC_LANG_POP
+])# _LT_LANG_CXX_CONFIG
+
+
+# _LT_FUNC_STRIPNAME_CNF
+# ----------------------
+# func_stripname_cnf prefix suffix name
+# strip PREFIX and SUFFIX off of NAME.
+# PREFIX and SUFFIX must not contain globbing or regex special
+# characters, hashes, percent signs, but SUFFIX may contain a leading
+# dot (in which case that matches only a dot).
+#
+# This function is identical to the (non-XSI) version of func_stripname,
+# except this one can be used by m4 code that may be executed by configure,
+# rather than the libtool script.
+m4_defun([_LT_FUNC_STRIPNAME_CNF],[dnl
+AC_REQUIRE([_LT_DECL_SED])
+AC_REQUIRE([_LT_PROG_ECHO_BACKSLASH])
+func_stripname_cnf ()
+{
+  case @S|@2 in
+  .*) func_stripname_result=`$ECHO "@S|@3" | $SED "s%^@S|@1%%; s%\\\\@S|@2\$%%"`;;
+  *)  func_stripname_result=`$ECHO "@S|@3" | $SED "s%^@S|@1%%; s%@S|@2\$%%"`;;
+  esac
+} # func_stripname_cnf
+])# _LT_FUNC_STRIPNAME_CNF
+
+
+# _LT_SYS_HIDDEN_LIBDEPS([TAGNAME])
+# ---------------------------------
+# Figure out "hidden" library dependencies from verbose
+# compiler output when linking a shared library.
+# Parse the compiler output and extract the necessary
+# objects, libraries and library flags.
+m4_defun([_LT_SYS_HIDDEN_LIBDEPS],
+[m4_require([_LT_FILEUTILS_DEFAULTS])dnl
+AC_REQUIRE([_LT_FUNC_STRIPNAME_CNF])dnl
+# Dependencies to place before and after the object being linked:
+_LT_TAGVAR(predep_objects, $1)=
+_LT_TAGVAR(postdep_objects, $1)=
+_LT_TAGVAR(predeps, $1)=
+_LT_TAGVAR(postdeps, $1)=
+_LT_TAGVAR(compiler_lib_search_path, $1)=
+
+dnl we can't use the lt_simple_compile_test_code here,
+dnl because it contains code intended for an executable,
+dnl not a library.  It's possible we should let each
+dnl tag define a new lt_????_link_test_code variable,
+dnl but it's only used here...
+m4_if([$1], [], [cat > conftest.$ac_ext <<_LT_EOF
+int a;
+void foo (void) { a = 0; }
+_LT_EOF
+], [$1], [CXX], [cat > conftest.$ac_ext <<_LT_EOF
+class Foo
+{
+public:
+  Foo (void) { a = 0; }
+private:
+  int a;
+};
+_LT_EOF
+], [$1], [F77], [cat > conftest.$ac_ext <<_LT_EOF
+      subroutine foo
+      implicit none
+      integer*4 a
+      a=0
+      return
+      end
+_LT_EOF
+], [$1], [FC], [cat > conftest.$ac_ext <<_LT_EOF
+      subroutine foo
+      implicit none
+      integer a
+      a=0
+      return
+      end
+_LT_EOF
+], [$1], [GCJ], [cat > conftest.$ac_ext <<_LT_EOF
+public class foo {
+  private int a;
+  public void bar (void) {
+    a = 0;
+  }
+};
+_LT_EOF
+], [$1], [GO], [cat > conftest.$ac_ext <<_LT_EOF
+package foo
+func foo() {
+}
+_LT_EOF
+])
+
+_lt_libdeps_save_CFLAGS=$CFLAGS
+case "$CC $CFLAGS " in #(
+*\ -flto*\ *) CFLAGS="$CFLAGS -fno-lto" ;;
+*\ -fwhopr*\ *) CFLAGS="$CFLAGS -fno-whopr" ;;
+*\ -fuse-linker-plugin*\ *) CFLAGS="$CFLAGS -fno-use-linker-plugin" ;;
+esac
+
+dnl Parse the compiler output and extract the necessary
+dnl objects, libraries and library flags.
+if AC_TRY_EVAL(ac_compile); then
+  # Parse the compiler output and extract the necessary
+  # objects, libraries and library flags.
+
+  # Sentinel used to keep track of whether or not we are before
+  # the conftest object file.
+  pre_test_object_deps_done=no
+
+  for p in `eval "$output_verbose_link_cmd"`; do
+    case $prev$p in
+
+    -L* | -R* | -l*)
+       # Some compilers place space between "-{L,R}" and the path.
+       # Remove the space.
+       if test x-L = "$p" ||
+          test x-R = "$p"; then
+        prev=$p
+        continue
+       fi
+
+       # Expand the sysroot to ease extracting the directories later.
+       if test -z "$prev"; then
+         case $p in
+         -L*) func_stripname_cnf '-L' '' "$p"; prev=-L; p=$func_stripname_result ;;
+         -R*) func_stripname_cnf '-R' '' "$p"; prev=-R; p=$func_stripname_result ;;
+         -l*) func_stripname_cnf '-l' '' "$p"; prev=-l; p=$func_stripname_result ;;
+         esac
+       fi
+       case $p in
+       =*) func_stripname_cnf '=' '' "$p"; p=$lt_sysroot$func_stripname_result ;;
+       esac
+       if test no = "$pre_test_object_deps_done"; then
+        case $prev in
+        -L | -R)
+          # Internal compiler library paths should come after those
+          # provided the user.  The postdeps already come after the
+          # user supplied libs so there is no need to process them.
+          if test -z "$_LT_TAGVAR(compiler_lib_search_path, $1)"; then
+            _LT_TAGVAR(compiler_lib_search_path, $1)=$prev$p
+          else
+            _LT_TAGVAR(compiler_lib_search_path, $1)="${_LT_TAGVAR(compiler_lib_search_path, $1)} $prev$p"
+          fi
+          ;;
+        # The "-l" case would never come before the object being
+        # linked, so don't bother handling this case.
+        esac
+       else
+        if test -z "$_LT_TAGVAR(postdeps, $1)"; then
+          _LT_TAGVAR(postdeps, $1)=$prev$p
+        else
+          _LT_TAGVAR(postdeps, $1)="${_LT_TAGVAR(postdeps, $1)} $prev$p"
+        fi
+       fi
+       prev=
+       ;;
+
+    *.lto.$objext) ;; # Ignore GCC LTO objects
+    *.$objext)
+       # This assumes that the test object file only shows up
+       # once in the compiler output.
+       if test "$p" = "conftest.$objext"; then
+        pre_test_object_deps_done=yes
+        continue
+       fi
+
+       if test no = "$pre_test_object_deps_done"; then
+        if test -z "$_LT_TAGVAR(predep_objects, $1)"; then
+          _LT_TAGVAR(predep_objects, $1)=$p
+        else
+          _LT_TAGVAR(predep_objects, $1)="$_LT_TAGVAR(predep_objects, $1) $p"
+        fi
+       else
+        if test -z "$_LT_TAGVAR(postdep_objects, $1)"; then
+          _LT_TAGVAR(postdep_objects, $1)=$p
+        else
+          _LT_TAGVAR(postdep_objects, $1)="$_LT_TAGVAR(postdep_objects, $1) $p"
+        fi
+       fi
+       ;;
+
+    *) ;; # Ignore the rest.
+
+    esac
+  done
+
+  # Clean up.
+  rm -f a.out a.exe
+else
+  echo "libtool.m4: error: problem compiling $1 test program"
+fi
+
+$RM -f confest.$objext
+CFLAGS=$_lt_libdeps_save_CFLAGS
+
+# PORTME: override above test on systems where it is broken
+m4_if([$1], [CXX],
+[case $host_os in
+interix[[3-9]]*)
+  # Interix 3.5 installs completely hosed .la files for C++, so rather than
+  # hack all around it, let's just trust "g++" to DTRT.
+  _LT_TAGVAR(predep_objects,$1)=
+  _LT_TAGVAR(postdep_objects,$1)=
+  _LT_TAGVAR(postdeps,$1)=
+  ;;
+esac
+])
+
+case " $_LT_TAGVAR(postdeps, $1) " in
+*" -lc "*) _LT_TAGVAR(archive_cmds_need_lc, $1)=no ;;
+esac
+ _LT_TAGVAR(compiler_lib_search_dirs, $1)=
+if test -n "${_LT_TAGVAR(compiler_lib_search_path, $1)}"; then
+ _LT_TAGVAR(compiler_lib_search_dirs, $1)=`echo " ${_LT_TAGVAR(compiler_lib_search_path, $1)}" | $SED -e 's! -L! !g' -e 's!^ !!'`
+fi
+_LT_TAGDECL([], [compiler_lib_search_dirs], [1],
+    [The directories searched by this compiler when creating a shared library])
+_LT_TAGDECL([], [predep_objects], [1],
+    [Dependencies to place before and after the objects being linked to
+    create a shared library])
+_LT_TAGDECL([], [postdep_objects], [1])
+_LT_TAGDECL([], [predeps], [1])
+_LT_TAGDECL([], [postdeps], [1])
+_LT_TAGDECL([], [compiler_lib_search_path], [1],
+    [The library search path used internally by the compiler when linking
+    a shared library])
+])# _LT_SYS_HIDDEN_LIBDEPS
+
+
+# _LT_LANG_F77_CONFIG([TAG])
+# --------------------------
+# Ensure that the configuration variables for a Fortran 77 compiler are
+# suitably defined.  These variables are subsequently used by _LT_CONFIG
+# to write the compiler configuration to 'libtool'.
+m4_defun([_LT_LANG_F77_CONFIG],
+[AC_LANG_PUSH(Fortran 77)
+if test -z "$F77" || test no = "$F77"; then
+  _lt_disable_F77=yes
+fi
+
+_LT_TAGVAR(archive_cmds_need_lc, $1)=no
+_LT_TAGVAR(allow_undefined_flag, $1)=
+_LT_TAGVAR(always_export_symbols, $1)=no
+_LT_TAGVAR(archive_expsym_cmds, $1)=
+_LT_TAGVAR(export_dynamic_flag_spec, $1)=
+_LT_TAGVAR(hardcode_direct, $1)=no
+_LT_TAGVAR(hardcode_direct_absolute, $1)=no
+_LT_TAGVAR(hardcode_libdir_flag_spec, $1)=
+_LT_TAGVAR(hardcode_libdir_separator, $1)=
+_LT_TAGVAR(hardcode_minus_L, $1)=no
+_LT_TAGVAR(hardcode_automatic, $1)=no
+_LT_TAGVAR(inherit_rpath, $1)=no
+_LT_TAGVAR(module_cmds, $1)=
+_LT_TAGVAR(module_expsym_cmds, $1)=
+_LT_TAGVAR(link_all_deplibs, $1)=unknown
+_LT_TAGVAR(old_archive_cmds, $1)=$old_archive_cmds
+_LT_TAGVAR(reload_flag, $1)=$reload_flag
+_LT_TAGVAR(reload_cmds, $1)=$reload_cmds
+_LT_TAGVAR(no_undefined_flag, $1)=
+_LT_TAGVAR(whole_archive_flag_spec, $1)=
+_LT_TAGVAR(enable_shared_with_static_runtimes, $1)=no
+
+# Source file extension for f77 test sources.
+ac_ext=f
+
+# Object file extension for compiled f77 test sources.
+objext=o
+_LT_TAGVAR(objext, $1)=$objext
+
+# No sense in running all these tests if we already determined that
+# the F77 compiler isn't working.  Some variables (like enable_shared)
+# are currently assumed to apply to all compilers on this platform,
+# and will be corrupted by setting them based on a non-working compiler.
+if test yes != "$_lt_disable_F77"; then
+  # Code to be used in simple compile tests
+  lt_simple_compile_test_code="\
+      subroutine t
+      return
+      end
+"
+
+  # Code to be used in simple link tests
+  lt_simple_link_test_code="\
+      program t
+      end
+"
+
+  # ltmain only uses $CC for tagged configurations so make sure $CC is set.
+  _LT_TAG_COMPILER
+
+  # save warnings/boilerplate of simple test code
+  _LT_COMPILER_BOILERPLATE
+  _LT_LINKER_BOILERPLATE
+
+  # Allow CC to be a program name with arguments.
+  lt_save_CC=$CC
+  lt_save_GCC=$GCC
+  lt_save_CFLAGS=$CFLAGS
+  CC=${F77-"f77"}
+  CFLAGS=$FFLAGS
+  compiler=$CC
+  _LT_TAGVAR(compiler, $1)=$CC
+  _LT_CC_BASENAME([$compiler])
+  GCC=$G77
+  if test -n "$compiler"; then
+    AC_MSG_CHECKING([if libtool supports shared libraries])
+    AC_MSG_RESULT([$can_build_shared])
+
+    AC_MSG_CHECKING([whether to build shared libraries])
+    test no = "$can_build_shared" && enable_shared=no
+
+    # On AIX, shared libraries and static libraries use the same namespace, and
+    # are all built from PIC.
+    case $host_os in
+      aix3*)
+        test yes = "$enable_shared" && enable_static=no
+        if test -n "$RANLIB"; then
+          archive_cmds="$archive_cmds~\$RANLIB \$lib"
+          postinstall_cmds='$RANLIB $lib'
+        fi
+        ;;
+      aix[[4-9]]*)
+       if test ia64 != "$host_cpu"; then
+         case $enable_shared,$with_aix_soname,$aix_use_runtimelinking in
+         yes,aix,yes) ;;               # shared object as lib.so file only
+         yes,svr4,*) ;;                # shared object as lib.so archive member only
+         yes,*) enable_static=no ;;    # shared object in lib.a archive as well
+         esac
+       fi
+        ;;
+    esac
+    AC_MSG_RESULT([$enable_shared])
+
+    AC_MSG_CHECKING([whether to build static libraries])
+    # Make sure either enable_shared or enable_static is yes.
+    test yes = "$enable_shared" || enable_static=yes
+    AC_MSG_RESULT([$enable_static])
+
+    _LT_TAGVAR(GCC, $1)=$G77
+    _LT_TAGVAR(LD, $1)=$LD
+
+    ## CAVEAT EMPTOR:
+    ## There is no encapsulation within the following macros, do not change
+    ## the running order or otherwise move them around unless you know exactly
+    ## what you are doing...
+    _LT_COMPILER_PIC($1)
+    _LT_COMPILER_C_O($1)
+    _LT_COMPILER_FILE_LOCKS($1)
+    _LT_LINKER_SHLIBS($1)
+    _LT_SYS_DYNAMIC_LINKER($1)
+    _LT_LINKER_HARDCODE_LIBPATH($1)
+
+    _LT_CONFIG($1)
+  fi # test -n "$compiler"
+
+  GCC=$lt_save_GCC
+  CC=$lt_save_CC
+  CFLAGS=$lt_save_CFLAGS
+fi # test yes != "$_lt_disable_F77"
+
+AC_LANG_POP
+])# _LT_LANG_F77_CONFIG
+
+
+# _LT_LANG_FC_CONFIG([TAG])
+# -------------------------
+# Ensure that the configuration variables for a Fortran compiler are
+# suitably defined.  These variables are subsequently used by _LT_CONFIG
+# to write the compiler configuration to 'libtool'.
+m4_defun([_LT_LANG_FC_CONFIG],
+[AC_LANG_PUSH(Fortran)
+
+if test -z "$FC" || test no = "$FC"; then
+  _lt_disable_FC=yes
+fi
+
+_LT_TAGVAR(archive_cmds_need_lc, $1)=no
+_LT_TAGVAR(allow_undefined_flag, $1)=
+_LT_TAGVAR(always_export_symbols, $1)=no
+_LT_TAGVAR(archive_expsym_cmds, $1)=
+_LT_TAGVAR(export_dynamic_flag_spec, $1)=
+_LT_TAGVAR(hardcode_direct, $1)=no
+_LT_TAGVAR(hardcode_direct_absolute, $1)=no
+_LT_TAGVAR(hardcode_libdir_flag_spec, $1)=
+_LT_TAGVAR(hardcode_libdir_separator, $1)=
+_LT_TAGVAR(hardcode_minus_L, $1)=no
+_LT_TAGVAR(hardcode_automatic, $1)=no
+_LT_TAGVAR(inherit_rpath, $1)=no
+_LT_TAGVAR(module_cmds, $1)=
+_LT_TAGVAR(module_expsym_cmds, $1)=
+_LT_TAGVAR(link_all_deplibs, $1)=unknown
+_LT_TAGVAR(old_archive_cmds, $1)=$old_archive_cmds
+_LT_TAGVAR(reload_flag, $1)=$reload_flag
+_LT_TAGVAR(reload_cmds, $1)=$reload_cmds
+_LT_TAGVAR(no_undefined_flag, $1)=
+_LT_TAGVAR(whole_archive_flag_spec, $1)=
+_LT_TAGVAR(enable_shared_with_static_runtimes, $1)=no
+
+# Source file extension for fc test sources.
+ac_ext=${ac_fc_srcext-f}
+
+# Object file extension for compiled fc test sources.
+objext=o
+_LT_TAGVAR(objext, $1)=$objext
+
+# No sense in running all these tests if we already determined that
+# the FC compiler isn't working.  Some variables (like enable_shared)
+# are currently assumed to apply to all compilers on this platform,
+# and will be corrupted by setting them based on a non-working compiler.
+if test yes != "$_lt_disable_FC"; then
+  # Code to be used in simple compile tests
+  lt_simple_compile_test_code="\
+      subroutine t
+      return
+      end
+"
+
+  # Code to be used in simple link tests
+  lt_simple_link_test_code="\
+      program t
+      end
+"
+
+  # ltmain only uses $CC for tagged configurations so make sure $CC is set.
+  _LT_TAG_COMPILER
+
+  # save warnings/boilerplate of simple test code
+  _LT_COMPILER_BOILERPLATE
+  _LT_LINKER_BOILERPLATE
+
+  # Allow CC to be a program name with arguments.
+  lt_save_CC=$CC
+  lt_save_GCC=$GCC
+  lt_save_CFLAGS=$CFLAGS
+  CC=${FC-"f95"}
+  CFLAGS=$FCFLAGS
+  compiler=$CC
+  GCC=$ac_cv_fc_compiler_gnu
+
+  _LT_TAGVAR(compiler, $1)=$CC
+  _LT_CC_BASENAME([$compiler])
+
+  if test -n "$compiler"; then
+    AC_MSG_CHECKING([if libtool supports shared libraries])
+    AC_MSG_RESULT([$can_build_shared])
+
+    AC_MSG_CHECKING([whether to build shared libraries])
+    test no = "$can_build_shared" && enable_shared=no
+
+    # On AIX, shared libraries and static libraries use the same namespace, and
+    # are all built from PIC.
+    case $host_os in
+      aix3*)
+        test yes = "$enable_shared" && enable_static=no
+        if test -n "$RANLIB"; then
+          archive_cmds="$archive_cmds~\$RANLIB \$lib"
+          postinstall_cmds='$RANLIB $lib'
+        fi
+        ;;
+      aix[[4-9]]*)
+       if test ia64 != "$host_cpu"; then
+         case $enable_shared,$with_aix_soname,$aix_use_runtimelinking in
+         yes,aix,yes) ;;               # shared object as lib.so file only
+         yes,svr4,*) ;;                # shared object as lib.so archive member only
+         yes,*) enable_static=no ;;    # shared object in lib.a archive as well
+         esac
+       fi
+        ;;
+    esac
+    AC_MSG_RESULT([$enable_shared])
+
+    AC_MSG_CHECKING([whether to build static libraries])
+    # Make sure either enable_shared or enable_static is yes.
+    test yes = "$enable_shared" || enable_static=yes
+    AC_MSG_RESULT([$enable_static])
+
+    _LT_TAGVAR(GCC, $1)=$ac_cv_fc_compiler_gnu
+    _LT_TAGVAR(LD, $1)=$LD
+
+    ## CAVEAT EMPTOR:
+    ## There is no encapsulation within the following macros, do not change
+    ## the running order or otherwise move them around unless you know exactly
+    ## what you are doing...
+    _LT_SYS_HIDDEN_LIBDEPS($1)
+    _LT_COMPILER_PIC($1)
+    _LT_COMPILER_C_O($1)
+    _LT_COMPILER_FILE_LOCKS($1)
+    _LT_LINKER_SHLIBS($1)
+    _LT_SYS_DYNAMIC_LINKER($1)
+    _LT_LINKER_HARDCODE_LIBPATH($1)
+
+    _LT_CONFIG($1)
+  fi # test -n "$compiler"
+
+  GCC=$lt_save_GCC
+  CC=$lt_save_CC
+  CFLAGS=$lt_save_CFLAGS
+fi # test yes != "$_lt_disable_FC"
+
+AC_LANG_POP
+])# _LT_LANG_FC_CONFIG
+
+
+# _LT_LANG_GCJ_CONFIG([TAG])
+# --------------------------
+# Ensure that the configuration variables for the GNU Java Compiler compiler
+# are suitably defined.  These variables are subsequently used by _LT_CONFIG
+# to write the compiler configuration to 'libtool'.
+m4_defun([_LT_LANG_GCJ_CONFIG],
+[AC_REQUIRE([LT_PROG_GCJ])dnl
+AC_LANG_SAVE
+
+# Source file extension for Java test sources.
+ac_ext=java
+
+# Object file extension for compiled Java test sources.
+objext=o
+_LT_TAGVAR(objext, $1)=$objext
+
+# Code to be used in simple compile tests
+lt_simple_compile_test_code="class foo {}"
+
+# Code to be used in simple link tests
+lt_simple_link_test_code='public class conftest { public static void main(String[[]] argv) {}; }'
+
+# ltmain only uses $CC for tagged configurations so make sure $CC is set.
+_LT_TAG_COMPILER
+
+# save warnings/boilerplate of simple test code
+_LT_COMPILER_BOILERPLATE
+_LT_LINKER_BOILERPLATE
+
+# Allow CC to be a program name with arguments.
+lt_save_CC=$CC
+lt_save_CFLAGS=$CFLAGS
+lt_save_GCC=$GCC
+GCC=yes
+CC=${GCJ-"gcj"}
+CFLAGS=$GCJFLAGS
+compiler=$CC
+_LT_TAGVAR(compiler, $1)=$CC
+_LT_TAGVAR(LD, $1)=$LD
+_LT_CC_BASENAME([$compiler])
+
+# GCJ did not exist at the time GCC didn't implicitly link libc in.
+_LT_TAGVAR(archive_cmds_need_lc, $1)=no
+
+_LT_TAGVAR(old_archive_cmds, $1)=$old_archive_cmds
+_LT_TAGVAR(reload_flag, $1)=$reload_flag
+_LT_TAGVAR(reload_cmds, $1)=$reload_cmds
+
+## CAVEAT EMPTOR:
+## There is no encapsulation within the following macros, do not change
+## the running order or otherwise move them around unless you know exactly
+## what you are doing...
+if test -n "$compiler"; then
+  _LT_COMPILER_NO_RTTI($1)
+  _LT_COMPILER_PIC($1)
+  _LT_COMPILER_C_O($1)
+  _LT_COMPILER_FILE_LOCKS($1)
+  _LT_LINKER_SHLIBS($1)
+  _LT_LINKER_HARDCODE_LIBPATH($1)
+
+  _LT_CONFIG($1)
+fi
+
+AC_LANG_RESTORE
+
+GCC=$lt_save_GCC
+CC=$lt_save_CC
+CFLAGS=$lt_save_CFLAGS
+])# _LT_LANG_GCJ_CONFIG
+
+
+# _LT_LANG_GO_CONFIG([TAG])
+# --------------------------
+# Ensure that the configuration variables for the GNU Go compiler
+# are suitably defined.  These variables are subsequently used by _LT_CONFIG
+# to write the compiler configuration to 'libtool'.
+m4_defun([_LT_LANG_GO_CONFIG],
+[AC_REQUIRE([LT_PROG_GO])dnl
+AC_LANG_SAVE
+
+# Source file extension for Go test sources.
+ac_ext=go
+
+# Object file extension for compiled Go test sources.
+objext=o
+_LT_TAGVAR(objext, $1)=$objext
+
+# Code to be used in simple compile tests
+lt_simple_compile_test_code="package main; func main() { }"
+
+# Code to be used in simple link tests
+lt_simple_link_test_code='package main; func main() { }'
+
+# ltmain only uses $CC for tagged configurations so make sure $CC is set.
+_LT_TAG_COMPILER
+
+# save warnings/boilerplate of simple test code
+_LT_COMPILER_BOILERPLATE
+_LT_LINKER_BOILERPLATE
+
+# Allow CC to be a program name with arguments.
+lt_save_CC=$CC
+lt_save_CFLAGS=$CFLAGS
+lt_save_GCC=$GCC
+GCC=yes
+CC=${GOC-"gccgo"}
+CFLAGS=$GOFLAGS
+compiler=$CC
+_LT_TAGVAR(compiler, $1)=$CC
+_LT_TAGVAR(LD, $1)=$LD
+_LT_CC_BASENAME([$compiler])
+
+# Go did not exist at the time GCC didn't implicitly link libc in.
+_LT_TAGVAR(archive_cmds_need_lc, $1)=no
+
+_LT_TAGVAR(old_archive_cmds, $1)=$old_archive_cmds
+_LT_TAGVAR(reload_flag, $1)=$reload_flag
+_LT_TAGVAR(reload_cmds, $1)=$reload_cmds
+
+## CAVEAT EMPTOR:
+## There is no encapsulation within the following macros, do not change
+## the running order or otherwise move them around unless you know exactly
+## what you are doing...
+if test -n "$compiler"; then
+  _LT_COMPILER_NO_RTTI($1)
+  _LT_COMPILER_PIC($1)
+  _LT_COMPILER_C_O($1)
+  _LT_COMPILER_FILE_LOCKS($1)
+  _LT_LINKER_SHLIBS($1)
+  _LT_LINKER_HARDCODE_LIBPATH($1)
+
+  _LT_CONFIG($1)
+fi
+
+AC_LANG_RESTORE
+
+GCC=$lt_save_GCC
+CC=$lt_save_CC
+CFLAGS=$lt_save_CFLAGS
+])# _LT_LANG_GO_CONFIG
+
+
+# _LT_LANG_RC_CONFIG([TAG])
+# -------------------------
+# Ensure that the configuration variables for the Windows resource compiler
+# are suitably defined.  These variables are subsequently used by _LT_CONFIG
+# to write the compiler configuration to 'libtool'.
+m4_defun([_LT_LANG_RC_CONFIG],
+[AC_REQUIRE([LT_PROG_RC])dnl
+AC_LANG_SAVE
+
+# Source file extension for RC test sources.
+ac_ext=rc
+
+# Object file extension for compiled RC test sources.
+objext=o
+_LT_TAGVAR(objext, $1)=$objext
+
+# Code to be used in simple compile tests
+lt_simple_compile_test_code='sample MENU { MENUITEM "&Soup", 100, CHECKED }'
+
+# Code to be used in simple link tests
+lt_simple_link_test_code=$lt_simple_compile_test_code
+
+# ltmain only uses $CC for tagged configurations so make sure $CC is set.
+_LT_TAG_COMPILER
+
+# save warnings/boilerplate of simple test code
+_LT_COMPILER_BOILERPLATE
+_LT_LINKER_BOILERPLATE
+
+# Allow CC to be a program name with arguments.
+lt_save_CC=$CC
+lt_save_CFLAGS=$CFLAGS
+lt_save_GCC=$GCC
+GCC=
+CC=${RC-"windres"}
+CFLAGS=
+compiler=$CC
+_LT_TAGVAR(compiler, $1)=$CC
+_LT_CC_BASENAME([$compiler])
+_LT_TAGVAR(lt_cv_prog_compiler_c_o, $1)=yes
+
+if test -n "$compiler"; then
+  :
+  _LT_CONFIG($1)
+fi
+
+GCC=$lt_save_GCC
+AC_LANG_RESTORE
+CC=$lt_save_CC
+CFLAGS=$lt_save_CFLAGS
+])# _LT_LANG_RC_CONFIG
+
+
+# LT_PROG_GCJ
+# -----------
+AC_DEFUN([LT_PROG_GCJ],
+[m4_ifdef([AC_PROG_GCJ], [AC_PROG_GCJ],
+  [m4_ifdef([A][M_PROG_GCJ], [A][M_PROG_GCJ],
+    [AC_CHECK_TOOL(GCJ, gcj,)
+      test set = "${GCJFLAGS+set}" || GCJFLAGS="-g -O2"
+      AC_SUBST(GCJFLAGS)])])[]dnl
+])
+
+# Old name:
+AU_ALIAS([LT_AC_PROG_GCJ], [LT_PROG_GCJ])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([LT_AC_PROG_GCJ], [])
+
+
+# LT_PROG_GO
+# ----------
+AC_DEFUN([LT_PROG_GO],
+[AC_CHECK_TOOL(GOC, gccgo,)
+])
+
+
+# LT_PROG_RC
+# ----------
+AC_DEFUN([LT_PROG_RC],
+[AC_CHECK_TOOL(RC, windres,)
+])
+
+# Old name:
+AU_ALIAS([LT_AC_PROG_RC], [LT_PROG_RC])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([LT_AC_PROG_RC], [])
+
+
+# _LT_DECL_EGREP
+# --------------
+# If we don't have a new enough Autoconf to choose the best grep
+# available, choose the one first in the user's PATH.
+m4_defun([_LT_DECL_EGREP],
+[AC_REQUIRE([AC_PROG_EGREP])dnl
+AC_REQUIRE([AC_PROG_FGREP])dnl
+test -z "$GREP" && GREP=grep
+_LT_DECL([], [GREP], [1], [A grep program that handles long lines])
+_LT_DECL([], [EGREP], [1], [An ERE matcher])
+_LT_DECL([], [FGREP], [1], [A literal string matcher])
+dnl Non-bleeding-edge autoconf doesn't subst GREP, so do it here too
+AC_SUBST([GREP])
+])
+
+
+# _LT_DECL_OBJDUMP
+# --------------
+# If we don't have a new enough Autoconf to choose the best objdump
+# available, choose the one first in the user's PATH.
+m4_defun([_LT_DECL_OBJDUMP],
+[AC_CHECK_TOOL(OBJDUMP, objdump, false)
+test -z "$OBJDUMP" && OBJDUMP=objdump
+_LT_DECL([], [OBJDUMP], [1], [An object symbol dumper])
+AC_SUBST([OBJDUMP])
+])
+
+# _LT_DECL_DLLTOOL
+# ----------------
+# Ensure DLLTOOL variable is set.
+m4_defun([_LT_DECL_DLLTOOL],
+[AC_CHECK_TOOL(DLLTOOL, dlltool, false)
+test -z "$DLLTOOL" && DLLTOOL=dlltool
+_LT_DECL([], [DLLTOOL], [1], [DLL creation program])
+AC_SUBST([DLLTOOL])
+])
+
+# _LT_DECL_SED
+# ------------
+# Check for a fully-functional sed program, that truncates
+# as few characters as possible.  Prefer GNU sed if found.
+m4_defun([_LT_DECL_SED],
+[AC_PROG_SED
+test -z "$SED" && SED=sed
+Xsed="$SED -e 1s/^X//"
+_LT_DECL([], [SED], [1], [A sed program that does not truncate output])
+_LT_DECL([], [Xsed], ["\$SED -e 1s/^X//"],
+    [Sed that helps us avoid accidentally triggering echo(1) options like -n])
+])# _LT_DECL_SED
+
+m4_ifndef([AC_PROG_SED], [
+############################################################
+# NOTE: This macro has been submitted for inclusion into   #
+#  GNU Autoconf as AC_PROG_SED.  When it is available in   #
+#  a released version of Autoconf we should remove this    #
+#  macro and use it instead.                               #
+############################################################
+
+m4_defun([AC_PROG_SED],
+[AC_MSG_CHECKING([for a sed that does not truncate output])
+AC_CACHE_VAL(lt_cv_path_SED,
+[# Loop through the user's path and test for sed and gsed.
+# Then use that list of sed's as ones to test for truncation.
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+  for lt_ac_prog in sed gsed; do
+    for ac_exec_ext in '' $ac_executable_extensions; do
+      if $as_executable_p "$as_dir/$lt_ac_prog$ac_exec_ext"; then
+        lt_ac_sed_list="$lt_ac_sed_list $as_dir/$lt_ac_prog$ac_exec_ext"
+      fi
+    done
+  done
+done
+IFS=$as_save_IFS
+lt_ac_max=0
+lt_ac_count=0
+# Add /usr/xpg4/bin/sed as it is typically found on Solaris
+# along with /bin/sed that truncates output.
+for lt_ac_sed in $lt_ac_sed_list /usr/xpg4/bin/sed; do
+  test ! -f "$lt_ac_sed" && continue
+  cat /dev/null > conftest.in
+  lt_ac_count=0
+  echo $ECHO_N "0123456789$ECHO_C" >conftest.in
+  # Check for GNU sed and select it if it is found.
+  if "$lt_ac_sed" --version 2>&1 < /dev/null | grep 'GNU' > /dev/null; then
+    lt_cv_path_SED=$lt_ac_sed
+    break
+  fi
+  while true; do
+    cat conftest.in conftest.in >conftest.tmp
+    mv conftest.tmp conftest.in
+    cp conftest.in conftest.nl
+    echo >>conftest.nl
+    $lt_ac_sed -e 's/a$//' < conftest.nl >conftest.out || break
+    cmp -s conftest.out conftest.nl || break
+    # 10000 chars as input seems more than enough
+    test 10 -lt "$lt_ac_count" && break
+    lt_ac_count=`expr $lt_ac_count + 1`
+    if test "$lt_ac_count" -gt "$lt_ac_max"; then
+      lt_ac_max=$lt_ac_count
+      lt_cv_path_SED=$lt_ac_sed
+    fi
+  done
+done
+])
+SED=$lt_cv_path_SED
+AC_SUBST([SED])
+AC_MSG_RESULT([$SED])
+])#AC_PROG_SED
+])#m4_ifndef
+
+# Old name:
+AU_ALIAS([LT_AC_PROG_SED], [AC_PROG_SED])
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([LT_AC_PROG_SED], [])
+
+
+# _LT_CHECK_SHELL_FEATURES
+# ------------------------
+# Find out whether the shell is Bourne or XSI compatible,
+# or has some other useful features.
+m4_defun([_LT_CHECK_SHELL_FEATURES],
+[if ( (MAIL=60; unset MAIL) || exit) >/dev/null 2>&1; then
+  lt_unset=unset
+else
+  lt_unset=false
+fi
+_LT_DECL([], [lt_unset], [0], [whether the shell understands "unset"])dnl
+
+# test EBCDIC or ASCII
+case `echo X|tr X '\101'` in
+ A) # ASCII based system
+    # \n is not interpreted correctly by Solaris 8 /usr/ucb/tr
+  lt_SP2NL='tr \040 \012'
+  lt_NL2SP='tr \015\012 \040\040'
+  ;;
+ *) # EBCDIC based system
+  lt_SP2NL='tr \100 \n'
+  lt_NL2SP='tr \r\n \100\100'
+  ;;
+esac
+_LT_DECL([SP2NL], [lt_SP2NL], [1], [turn spaces into newlines])dnl
+_LT_DECL([NL2SP], [lt_NL2SP], [1], [turn newlines into spaces])dnl
+])# _LT_CHECK_SHELL_FEATURES
+
+
+# _LT_PATH_CONVERSION_FUNCTIONS
+# -----------------------------
+# Determine what file name conversion functions should be used by
+# func_to_host_file (and, implicitly, by func_to_host_path).  These are needed
+# for certain cross-compile configurations and native mingw.
+m4_defun([_LT_PATH_CONVERSION_FUNCTIONS],
+[AC_REQUIRE([AC_CANONICAL_HOST])dnl
+AC_REQUIRE([AC_CANONICAL_BUILD])dnl
+AC_MSG_CHECKING([how to convert $build file names to $host format])
+AC_CACHE_VAL(lt_cv_to_host_file_cmd,
+[case $host in
+  *-*-mingw* )
+    case $build in
+      *-*-mingw* ) # actually msys
+        lt_cv_to_host_file_cmd=func_convert_file_msys_to_w32
+        ;;
+      *-*-cygwin* )
+        lt_cv_to_host_file_cmd=func_convert_file_cygwin_to_w32
+        ;;
+      * ) # otherwise, assume *nix
+        lt_cv_to_host_file_cmd=func_convert_file_nix_to_w32
+        ;;
+    esac
+    ;;
+  *-*-cygwin* )
+    case $build in
+      *-*-mingw* ) # actually msys
+        lt_cv_to_host_file_cmd=func_convert_file_msys_to_cygwin
+        ;;
+      *-*-cygwin* )
+        lt_cv_to_host_file_cmd=func_convert_file_noop
+        ;;
+      * ) # otherwise, assume *nix
+        lt_cv_to_host_file_cmd=func_convert_file_nix_to_cygwin
+        ;;
+    esac
+    ;;
+  * ) # unhandled hosts (and "normal" native builds)
+    lt_cv_to_host_file_cmd=func_convert_file_noop
+    ;;
+esac
+])
+to_host_file_cmd=$lt_cv_to_host_file_cmd
+AC_MSG_RESULT([$lt_cv_to_host_file_cmd])
+_LT_DECL([to_host_file_cmd], [lt_cv_to_host_file_cmd],
+         [0], [convert $build file names to $host format])dnl
+
+AC_MSG_CHECKING([how to convert $build file names to toolchain format])
+AC_CACHE_VAL(lt_cv_to_tool_file_cmd,
+[#assume ordinary cross tools, or native build.
+lt_cv_to_tool_file_cmd=func_convert_file_noop
+case $host in
+  *-*-mingw* )
+    case $build in
+      *-*-mingw* ) # actually msys
+        lt_cv_to_tool_file_cmd=func_convert_file_msys_to_w32
+        ;;
+    esac
+    ;;
+esac
+])
+to_tool_file_cmd=$lt_cv_to_tool_file_cmd
+AC_MSG_RESULT([$lt_cv_to_tool_file_cmd])
+_LT_DECL([to_tool_file_cmd], [lt_cv_to_tool_file_cmd],
+         [0], [convert $build files to toolchain format])dnl
+])# _LT_PATH_CONVERSION_FUNCTIONS
diff --git a/m4/ln.m4 b/m4/ln.m4
new file mode 100644 (file)
index 0000000..b2ccbea
--- /dev/null
+++ b/m4/ln.m4
@@ -0,0 +1,51 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.13])
+
+AC_DEFUN([CL_PROG_LN],
+[
+  AC_CACHE_CHECK([how to make hard links], [cl_cv_prog_LN],
+    [rm -f conftestdata conftestfile
+     echo data > conftestfile
+     if ln conftestfile conftestdata 2>/dev/null; then
+       cl_cv_prog_LN=ln
+     else
+       cl_cv_prog_LN="cp -p"
+     fi
+     rm -f conftestdata conftestfile
+    ])
+  LN="$cl_cv_prog_LN"
+  AC_SUBST([LN])
+])
+
+AC_DEFUN([CL_PROG_LN_S],
+[
+  AC_REQUIRE([CL_PROG_LN])
+  dnl Make a symlink if possible; otherwise try a hard link. On filesystems
+  dnl which support neither symlink nor hard link, use a plain copy.
+  AC_CACHE_CHECK([whether ln -s works], [cl_cv_prog_LN_S_works],
+    [rm -f conftestdata
+     if ln -s X conftestdata 2>/dev/null; then
+       cl_cv_prog_LN_S_works=yes
+     else
+       cl_cv_prog_LN_S_works=no
+     fi
+     rm -f conftestdata
+    ])
+  if test $cl_cv_prog_LN_S_works = yes; then
+    LN_S="ln -s"
+  else
+    LN_S="$cl_cv_prog_LN"
+  fi
+  AC_SUBST([LN_S])
+])
diff --git a/m4/ltoptions.m4 b/m4/ltoptions.m4
new file mode 100644 (file)
index 0000000..94b0829
--- /dev/null
@@ -0,0 +1,437 @@
+# Helper functions for option handling.                    -*- Autoconf -*-
+#
+#   Copyright (C) 2004-2005, 2007-2009, 2011-2015 Free Software
+#   Foundation, Inc.
+#   Written by Gary V. Vaughan, 2004
+#
+# This file is free software; the Free Software Foundation gives
+# unlimited permission to copy and/or distribute it, with or without
+# modifications, as long as this notice is preserved.
+
+# serial 8 ltoptions.m4
+
+# This is to help aclocal find these macros, as it can't see m4_define.
+AC_DEFUN([LTOPTIONS_VERSION], [m4_if([1])])
+
+
+# _LT_MANGLE_OPTION(MACRO-NAME, OPTION-NAME)
+# ------------------------------------------
+m4_define([_LT_MANGLE_OPTION],
+[[_LT_OPTION_]m4_bpatsubst($1__$2, [[^a-zA-Z0-9_]], [_])])
+
+
+# _LT_SET_OPTION(MACRO-NAME, OPTION-NAME)
+# ---------------------------------------
+# Set option OPTION-NAME for macro MACRO-NAME, and if there is a
+# matching handler defined, dispatch to it.  Other OPTION-NAMEs are
+# saved as a flag.
+m4_define([_LT_SET_OPTION],
+[m4_define(_LT_MANGLE_OPTION([$1], [$2]))dnl
+m4_ifdef(_LT_MANGLE_DEFUN([$1], [$2]),
+        _LT_MANGLE_DEFUN([$1], [$2]),
+    [m4_warning([Unknown $1 option '$2'])])[]dnl
+])
+
+
+# _LT_IF_OPTION(MACRO-NAME, OPTION-NAME, IF-SET, [IF-NOT-SET])
+# ------------------------------------------------------------
+# Execute IF-SET if OPTION is set, IF-NOT-SET otherwise.
+m4_define([_LT_IF_OPTION],
+[m4_ifdef(_LT_MANGLE_OPTION([$1], [$2]), [$3], [$4])])
+
+
+# _LT_UNLESS_OPTIONS(MACRO-NAME, OPTION-LIST, IF-NOT-SET)
+# -------------------------------------------------------
+# Execute IF-NOT-SET unless all options in OPTION-LIST for MACRO-NAME
+# are set.
+m4_define([_LT_UNLESS_OPTIONS],
+[m4_foreach([_LT_Option], m4_split(m4_normalize([$2])),
+           [m4_ifdef(_LT_MANGLE_OPTION([$1], _LT_Option),
+                     [m4_define([$0_found])])])[]dnl
+m4_ifdef([$0_found], [m4_undefine([$0_found])], [$3
+])[]dnl
+])
+
+
+# _LT_SET_OPTIONS(MACRO-NAME, OPTION-LIST)
+# ----------------------------------------
+# OPTION-LIST is a space-separated list of Libtool options associated
+# with MACRO-NAME.  If any OPTION has a matching handler declared with
+# LT_OPTION_DEFINE, dispatch to that macro; otherwise complain about
+# the unknown option and exit.
+m4_defun([_LT_SET_OPTIONS],
+[# Set options
+m4_foreach([_LT_Option], m4_split(m4_normalize([$2])),
+    [_LT_SET_OPTION([$1], _LT_Option)])
+
+m4_if([$1],[LT_INIT],[
+  dnl
+  dnl Simply set some default values (i.e off) if boolean options were not
+  dnl specified:
+  _LT_UNLESS_OPTIONS([LT_INIT], [dlopen], [enable_dlopen=no
+  ])
+  _LT_UNLESS_OPTIONS([LT_INIT], [win32-dll], [enable_win32_dll=no
+  ])
+  dnl
+  dnl If no reference was made to various pairs of opposing options, then
+  dnl we run the default mode handler for the pair.  For example, if neither
+  dnl 'shared' nor 'disable-shared' was passed, we enable building of shared
+  dnl archives by default:
+  _LT_UNLESS_OPTIONS([LT_INIT], [shared disable-shared], [_LT_ENABLE_SHARED])
+  _LT_UNLESS_OPTIONS([LT_INIT], [static disable-static], [_LT_ENABLE_STATIC])
+  _LT_UNLESS_OPTIONS([LT_INIT], [pic-only no-pic], [_LT_WITH_PIC])
+  _LT_UNLESS_OPTIONS([LT_INIT], [fast-install disable-fast-install],
+                  [_LT_ENABLE_FAST_INSTALL])
+  _LT_UNLESS_OPTIONS([LT_INIT], [aix-soname=aix aix-soname=both aix-soname=svr4],
+                  [_LT_WITH_AIX_SONAME([aix])])
+  ])
+])# _LT_SET_OPTIONS
+
+
+## --------------------------------- ##
+## Macros to handle LT_INIT options. ##
+## --------------------------------- ##
+
+# _LT_MANGLE_DEFUN(MACRO-NAME, OPTION-NAME)
+# -----------------------------------------
+m4_define([_LT_MANGLE_DEFUN],
+[[_LT_OPTION_DEFUN_]m4_bpatsubst(m4_toupper([$1__$2]), [[^A-Z0-9_]], [_])])
+
+
+# LT_OPTION_DEFINE(MACRO-NAME, OPTION-NAME, CODE)
+# -----------------------------------------------
+m4_define([LT_OPTION_DEFINE],
+[m4_define(_LT_MANGLE_DEFUN([$1], [$2]), [$3])[]dnl
+])# LT_OPTION_DEFINE
+
+
+# dlopen
+# ------
+LT_OPTION_DEFINE([LT_INIT], [dlopen], [enable_dlopen=yes
+])
+
+AU_DEFUN([AC_LIBTOOL_DLOPEN],
+[_LT_SET_OPTION([LT_INIT], [dlopen])
+AC_DIAGNOSE([obsolete],
+[$0: Remove this warning and the call to _LT_SET_OPTION when you
+put the 'dlopen' option into LT_INIT's first parameter.])
+])
+
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_LIBTOOL_DLOPEN], [])
+
+
+# win32-dll
+# ---------
+# Declare package support for building win32 dll's.
+LT_OPTION_DEFINE([LT_INIT], [win32-dll],
+[enable_win32_dll=yes
+
+case $host in
+*-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-cegcc*)
+  AC_CHECK_TOOL(AS, as, false)
+  AC_CHECK_TOOL(DLLTOOL, dlltool, false)
+  AC_CHECK_TOOL(OBJDUMP, objdump, false)
+  ;;
+esac
+
+test -z "$AS" && AS=as
+_LT_DECL([], [AS],      [1], [Assembler program])dnl
+
+test -z "$DLLTOOL" && DLLTOOL=dlltool
+_LT_DECL([], [DLLTOOL], [1], [DLL creation program])dnl
+
+test -z "$OBJDUMP" && OBJDUMP=objdump
+_LT_DECL([], [OBJDUMP], [1], [Object dumper program])dnl
+])# win32-dll
+
+AU_DEFUN([AC_LIBTOOL_WIN32_DLL],
+[AC_REQUIRE([AC_CANONICAL_HOST])dnl
+_LT_SET_OPTION([LT_INIT], [win32-dll])
+AC_DIAGNOSE([obsolete],
+[$0: Remove this warning and the call to _LT_SET_OPTION when you
+put the 'win32-dll' option into LT_INIT's first parameter.])
+])
+
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_LIBTOOL_WIN32_DLL], [])
+
+
+# _LT_ENABLE_SHARED([DEFAULT])
+# ----------------------------
+# implement the --enable-shared flag, and supports the 'shared' and
+# 'disable-shared' LT_INIT options.
+# DEFAULT is either 'yes' or 'no'.  If omitted, it defaults to 'yes'.
+m4_define([_LT_ENABLE_SHARED],
+[m4_define([_LT_ENABLE_SHARED_DEFAULT], [m4_if($1, no, no, yes)])dnl
+AC_ARG_ENABLE([shared],
+    [AS_HELP_STRING([--enable-shared@<:@=PKGS@:>@],
+       [build shared libraries @<:@default=]_LT_ENABLE_SHARED_DEFAULT[@:>@])],
+    [p=${PACKAGE-default}
+    case $enableval in
+    yes) enable_shared=yes ;;
+    no) enable_shared=no ;;
+    *)
+      enable_shared=no
+      # Look at the argument we got.  We use all the common list separators.
+      lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR,
+      for pkg in $enableval; do
+       IFS=$lt_save_ifs
+       if test "X$pkg" = "X$p"; then
+         enable_shared=yes
+       fi
+      done
+      IFS=$lt_save_ifs
+      ;;
+    esac],
+    [enable_shared=]_LT_ENABLE_SHARED_DEFAULT)
+
+    _LT_DECL([build_libtool_libs], [enable_shared], [0],
+       [Whether or not to build shared libraries])
+])# _LT_ENABLE_SHARED
+
+LT_OPTION_DEFINE([LT_INIT], [shared], [_LT_ENABLE_SHARED([yes])])
+LT_OPTION_DEFINE([LT_INIT], [disable-shared], [_LT_ENABLE_SHARED([no])])
+
+# Old names:
+AC_DEFUN([AC_ENABLE_SHARED],
+[_LT_SET_OPTION([LT_INIT], m4_if([$1], [no], [disable-])[shared])
+])
+
+AC_DEFUN([AC_DISABLE_SHARED],
+[_LT_SET_OPTION([LT_INIT], [disable-shared])
+])
+
+AU_DEFUN([AM_ENABLE_SHARED], [AC_ENABLE_SHARED($@)])
+AU_DEFUN([AM_DISABLE_SHARED], [AC_DISABLE_SHARED($@)])
+
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AM_ENABLE_SHARED], [])
+dnl AC_DEFUN([AM_DISABLE_SHARED], [])
+
+
+
+# _LT_ENABLE_STATIC([DEFAULT])
+# ----------------------------
+# implement the --enable-static flag, and support the 'static' and
+# 'disable-static' LT_INIT options.
+# DEFAULT is either 'yes' or 'no'.  If omitted, it defaults to 'yes'.
+m4_define([_LT_ENABLE_STATIC],
+[m4_define([_LT_ENABLE_STATIC_DEFAULT], [m4_if($1, no, no, yes)])dnl
+AC_ARG_ENABLE([static],
+    [AS_HELP_STRING([--enable-static@<:@=PKGS@:>@],
+       [build static libraries @<:@default=]_LT_ENABLE_STATIC_DEFAULT[@:>@])],
+    [p=${PACKAGE-default}
+    case $enableval in
+    yes) enable_static=yes ;;
+    no) enable_static=no ;;
+    *)
+     enable_static=no
+      # Look at the argument we got.  We use all the common list separators.
+      lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR,
+      for pkg in $enableval; do
+       IFS=$lt_save_ifs
+       if test "X$pkg" = "X$p"; then
+         enable_static=yes
+       fi
+      done
+      IFS=$lt_save_ifs
+      ;;
+    esac],
+    [enable_static=]_LT_ENABLE_STATIC_DEFAULT)
+
+    _LT_DECL([build_old_libs], [enable_static], [0],
+       [Whether or not to build static libraries])
+])# _LT_ENABLE_STATIC
+
+LT_OPTION_DEFINE([LT_INIT], [static], [_LT_ENABLE_STATIC([yes])])
+LT_OPTION_DEFINE([LT_INIT], [disable-static], [_LT_ENABLE_STATIC([no])])
+
+# Old names:
+AC_DEFUN([AC_ENABLE_STATIC],
+[_LT_SET_OPTION([LT_INIT], m4_if([$1], [no], [disable-])[static])
+])
+
+AC_DEFUN([AC_DISABLE_STATIC],
+[_LT_SET_OPTION([LT_INIT], [disable-static])
+])
+
+AU_DEFUN([AM_ENABLE_STATIC], [AC_ENABLE_STATIC($@)])
+AU_DEFUN([AM_DISABLE_STATIC], [AC_DISABLE_STATIC($@)])
+
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AM_ENABLE_STATIC], [])
+dnl AC_DEFUN([AM_DISABLE_STATIC], [])
+
+
+
+# _LT_ENABLE_FAST_INSTALL([DEFAULT])
+# ----------------------------------
+# implement the --enable-fast-install flag, and support the 'fast-install'
+# and 'disable-fast-install' LT_INIT options.
+# DEFAULT is either 'yes' or 'no'.  If omitted, it defaults to 'yes'.
+m4_define([_LT_ENABLE_FAST_INSTALL],
+[m4_define([_LT_ENABLE_FAST_INSTALL_DEFAULT], [m4_if($1, no, no, yes)])dnl
+AC_ARG_ENABLE([fast-install],
+    [AS_HELP_STRING([--enable-fast-install@<:@=PKGS@:>@],
+    [optimize for fast installation @<:@default=]_LT_ENABLE_FAST_INSTALL_DEFAULT[@:>@])],
+    [p=${PACKAGE-default}
+    case $enableval in
+    yes) enable_fast_install=yes ;;
+    no) enable_fast_install=no ;;
+    *)
+      enable_fast_install=no
+      # Look at the argument we got.  We use all the common list separators.
+      lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR,
+      for pkg in $enableval; do
+       IFS=$lt_save_ifs
+       if test "X$pkg" = "X$p"; then
+         enable_fast_install=yes
+       fi
+      done
+      IFS=$lt_save_ifs
+      ;;
+    esac],
+    [enable_fast_install=]_LT_ENABLE_FAST_INSTALL_DEFAULT)
+
+_LT_DECL([fast_install], [enable_fast_install], [0],
+        [Whether or not to optimize for fast installation])dnl
+])# _LT_ENABLE_FAST_INSTALL
+
+LT_OPTION_DEFINE([LT_INIT], [fast-install], [_LT_ENABLE_FAST_INSTALL([yes])])
+LT_OPTION_DEFINE([LT_INIT], [disable-fast-install], [_LT_ENABLE_FAST_INSTALL([no])])
+
+# Old names:
+AU_DEFUN([AC_ENABLE_FAST_INSTALL],
+[_LT_SET_OPTION([LT_INIT], m4_if([$1], [no], [disable-])[fast-install])
+AC_DIAGNOSE([obsolete],
+[$0: Remove this warning and the call to _LT_SET_OPTION when you put
+the 'fast-install' option into LT_INIT's first parameter.])
+])
+
+AU_DEFUN([AC_DISABLE_FAST_INSTALL],
+[_LT_SET_OPTION([LT_INIT], [disable-fast-install])
+AC_DIAGNOSE([obsolete],
+[$0: Remove this warning and the call to _LT_SET_OPTION when you put
+the 'disable-fast-install' option into LT_INIT's first parameter.])
+])
+
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_ENABLE_FAST_INSTALL], [])
+dnl AC_DEFUN([AM_DISABLE_FAST_INSTALL], [])
+
+
+# _LT_WITH_AIX_SONAME([DEFAULT])
+# ----------------------------------
+# implement the --with-aix-soname flag, and support the `aix-soname=aix'
+# and `aix-soname=both' and `aix-soname=svr4' LT_INIT options. DEFAULT
+# is either `aix', `both' or `svr4'.  If omitted, it defaults to `aix'.
+m4_define([_LT_WITH_AIX_SONAME],
+[m4_define([_LT_WITH_AIX_SONAME_DEFAULT], [m4_if($1, svr4, svr4, m4_if($1, both, both, aix))])dnl
+shared_archive_member_spec=
+case $host,$enable_shared in
+power*-*-aix[[5-9]]*,yes)
+  AC_MSG_CHECKING([which variant of shared library versioning to provide])
+  AC_ARG_WITH([aix-soname],
+    [AS_HELP_STRING([--with-aix-soname=aix|svr4|both],
+      [shared library versioning (aka "SONAME") variant to provide on AIX, @<:@default=]_LT_WITH_AIX_SONAME_DEFAULT[@:>@.])],
+    [case $withval in
+    aix|svr4|both)
+      ;;
+    *)
+      AC_MSG_ERROR([Unknown argument to --with-aix-soname])
+      ;;
+    esac
+    lt_cv_with_aix_soname=$with_aix_soname],
+    [AC_CACHE_VAL([lt_cv_with_aix_soname],
+      [lt_cv_with_aix_soname=]_LT_WITH_AIX_SONAME_DEFAULT)
+    with_aix_soname=$lt_cv_with_aix_soname])
+  AC_MSG_RESULT([$with_aix_soname])
+  if test aix != "$with_aix_soname"; then
+    # For the AIX way of multilib, we name the shared archive member
+    # based on the bitwidth used, traditionally 'shr.o' or 'shr_64.o',
+    # and 'shr.imp' or 'shr_64.imp', respectively, for the Import File.
+    # Even when GNU compilers ignore OBJECT_MODE but need '-maix64' flag,
+    # the AIX toolchain works better with OBJECT_MODE set (default 32).
+    if test 64 = "${OBJECT_MODE-32}"; then
+      shared_archive_member_spec=shr_64
+    else
+      shared_archive_member_spec=shr
+    fi
+  fi
+  ;;
+*)
+  with_aix_soname=aix
+  ;;
+esac
+
+_LT_DECL([], [shared_archive_member_spec], [0],
+    [Shared archive member basename, for filename based shared library versioning on AIX])dnl
+])# _LT_WITH_AIX_SONAME
+
+LT_OPTION_DEFINE([LT_INIT], [aix-soname=aix], [_LT_WITH_AIX_SONAME([aix])])
+LT_OPTION_DEFINE([LT_INIT], [aix-soname=both], [_LT_WITH_AIX_SONAME([both])])
+LT_OPTION_DEFINE([LT_INIT], [aix-soname=svr4], [_LT_WITH_AIX_SONAME([svr4])])
+
+
+# _LT_WITH_PIC([MODE])
+# --------------------
+# implement the --with-pic flag, and support the 'pic-only' and 'no-pic'
+# LT_INIT options.
+# MODE is either 'yes' or 'no'.  If omitted, it defaults to 'both'.
+m4_define([_LT_WITH_PIC],
+[AC_ARG_WITH([pic],
+    [AS_HELP_STRING([--with-pic@<:@=PKGS@:>@],
+       [try to use only PIC/non-PIC objects @<:@default=use both@:>@])],
+    [lt_p=${PACKAGE-default}
+    case $withval in
+    yes|no) pic_mode=$withval ;;
+    *)
+      pic_mode=default
+      # Look at the argument we got.  We use all the common list separators.
+      lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR,
+      for lt_pkg in $withval; do
+       IFS=$lt_save_ifs
+       if test "X$lt_pkg" = "X$lt_p"; then
+         pic_mode=yes
+       fi
+      done
+      IFS=$lt_save_ifs
+      ;;
+    esac],
+    [pic_mode=m4_default([$1], [default])])
+
+_LT_DECL([], [pic_mode], [0], [What type of objects to build])dnl
+])# _LT_WITH_PIC
+
+LT_OPTION_DEFINE([LT_INIT], [pic-only], [_LT_WITH_PIC([yes])])
+LT_OPTION_DEFINE([LT_INIT], [no-pic], [_LT_WITH_PIC([no])])
+
+# Old name:
+AU_DEFUN([AC_LIBTOOL_PICMODE],
+[_LT_SET_OPTION([LT_INIT], [pic-only])
+AC_DIAGNOSE([obsolete],
+[$0: Remove this warning and the call to _LT_SET_OPTION when you
+put the 'pic-only' option into LT_INIT's first parameter.])
+])
+
+dnl aclocal-1.4 backwards compatibility:
+dnl AC_DEFUN([AC_LIBTOOL_PICMODE], [])
+
+## ----------------- ##
+## LTDL_INIT Options ##
+## ----------------- ##
+
+m4_define([_LTDL_MODE], [])
+LT_OPTION_DEFINE([LTDL_INIT], [nonrecursive],
+                [m4_define([_LTDL_MODE], [nonrecursive])])
+LT_OPTION_DEFINE([LTDL_INIT], [recursive],
+                [m4_define([_LTDL_MODE], [recursive])])
+LT_OPTION_DEFINE([LTDL_INIT], [subproject],
+                [m4_define([_LTDL_MODE], [subproject])])
+
+m4_define([_LTDL_TYPE], [])
+LT_OPTION_DEFINE([LTDL_INIT], [installable],
+                [m4_define([_LTDL_TYPE], [installable])])
+LT_OPTION_DEFINE([LTDL_INIT], [convenience],
+                [m4_define([_LTDL_TYPE], [convenience])])
diff --git a/m4/ltsugar.m4 b/m4/ltsugar.m4
new file mode 100644 (file)
index 0000000..48bc934
--- /dev/null
@@ -0,0 +1,124 @@
+# ltsugar.m4 -- libtool m4 base layer.                         -*-Autoconf-*-
+#
+# Copyright (C) 2004-2005, 2007-2008, 2011-2015 Free Software
+# Foundation, Inc.
+# Written by Gary V. Vaughan, 2004
+#
+# This file is free software; the Free Software Foundation gives
+# unlimited permission to copy and/or distribute it, with or without
+# modifications, as long as this notice is preserved.
+
+# serial 6 ltsugar.m4
+
+# This is to help aclocal find these macros, as it can't see m4_define.
+AC_DEFUN([LTSUGAR_VERSION], [m4_if([0.1])])
+
+
+# lt_join(SEP, ARG1, [ARG2...])
+# -----------------------------
+# Produce ARG1SEPARG2...SEPARGn, omitting [] arguments and their
+# associated separator.
+# Needed until we can rely on m4_join from Autoconf 2.62, since all earlier
+# versions in m4sugar had bugs.
+m4_define([lt_join],
+[m4_if([$#], [1], [],
+       [$#], [2], [[$2]],
+       [m4_if([$2], [], [], [[$2]_])$0([$1], m4_shift(m4_shift($@)))])])
+m4_define([_lt_join],
+[m4_if([$#$2], [2], [],
+       [m4_if([$2], [], [], [[$1$2]])$0([$1], m4_shift(m4_shift($@)))])])
+
+
+# lt_car(LIST)
+# lt_cdr(LIST)
+# ------------
+# Manipulate m4 lists.
+# These macros are necessary as long as will still need to support
+# Autoconf-2.59, which quotes differently.
+m4_define([lt_car], [[$1]])
+m4_define([lt_cdr],
+[m4_if([$#], 0, [m4_fatal([$0: cannot be called without arguments])],
+       [$#], 1, [],
+       [m4_dquote(m4_shift($@))])])
+m4_define([lt_unquote], $1)
+
+
+# lt_append(MACRO-NAME, STRING, [SEPARATOR])
+# ------------------------------------------
+# Redefine MACRO-NAME to hold its former content plus 'SEPARATOR''STRING'.
+# Note that neither SEPARATOR nor STRING are expanded; they are appended
+# to MACRO-NAME as is (leaving the expansion for when MACRO-NAME is invoked).
+# No SEPARATOR is output if MACRO-NAME was previously undefined (different
+# than defined and empty).
+#
+# This macro is needed until we can rely on Autoconf 2.62, since earlier
+# versions of m4sugar mistakenly expanded SEPARATOR but not STRING.
+m4_define([lt_append],
+[m4_define([$1],
+          m4_ifdef([$1], [m4_defn([$1])[$3]])[$2])])
+
+
+
+# lt_combine(SEP, PREFIX-LIST, INFIX, SUFFIX1, [SUFFIX2...])
+# ----------------------------------------------------------
+# Produce a SEP delimited list of all paired combinations of elements of
+# PREFIX-LIST with SUFFIX1 through SUFFIXn.  Each element of the list
+# has the form PREFIXmINFIXSUFFIXn.
+# Needed until we can rely on m4_combine added in Autoconf 2.62.
+m4_define([lt_combine],
+[m4_if(m4_eval([$# > 3]), [1],
+       [m4_pushdef([_Lt_sep], [m4_define([_Lt_sep], m4_defn([lt_car]))])]]dnl
+[[m4_foreach([_Lt_prefix], [$2],
+            [m4_foreach([_Lt_suffix],
+               ]m4_dquote(m4_dquote(m4_shift(m4_shift(m4_shift($@)))))[,
+       [_Lt_sep([$1])[]m4_defn([_Lt_prefix])[$3]m4_defn([_Lt_suffix])])])])])
+
+
+# lt_if_append_uniq(MACRO-NAME, VARNAME, [SEPARATOR], [UNIQ], [NOT-UNIQ])
+# -----------------------------------------------------------------------
+# Iff MACRO-NAME does not yet contain VARNAME, then append it (delimited
+# by SEPARATOR if supplied) and expand UNIQ, else NOT-UNIQ.
+m4_define([lt_if_append_uniq],
+[m4_ifdef([$1],
+         [m4_if(m4_index([$3]m4_defn([$1])[$3], [$3$2$3]), [-1],
+                [lt_append([$1], [$2], [$3])$4],
+                [$5])],
+         [lt_append([$1], [$2], [$3])$4])])
+
+
+# lt_dict_add(DICT, KEY, VALUE)
+# -----------------------------
+m4_define([lt_dict_add],
+[m4_define([$1($2)], [$3])])
+
+
+# lt_dict_add_subkey(DICT, KEY, SUBKEY, VALUE)
+# --------------------------------------------
+m4_define([lt_dict_add_subkey],
+[m4_define([$1($2:$3)], [$4])])
+
+
+# lt_dict_fetch(DICT, KEY, [SUBKEY])
+# ----------------------------------
+m4_define([lt_dict_fetch],
+[m4_ifval([$3],
+       m4_ifdef([$1($2:$3)], [m4_defn([$1($2:$3)])]),
+    m4_ifdef([$1($2)], [m4_defn([$1($2)])]))])
+
+
+# lt_if_dict_fetch(DICT, KEY, [SUBKEY], VALUE, IF-TRUE, [IF-FALSE])
+# -----------------------------------------------------------------
+m4_define([lt_if_dict_fetch],
+[m4_if(lt_dict_fetch([$1], [$2], [$3]), [$4],
+       [$5],
+    [$6])])
+
+
+# lt_dict_filter(DICT, [SUBKEY], VALUE, [SEPARATOR], KEY, [...])
+# --------------------------------------------------------------
+m4_define([lt_dict_filter],
+[m4_if([$5], [], [],
+  [lt_join(m4_quote(m4_default([$4], [[, ]])),
+           lt_unquote(m4_split(m4_normalize(m4_foreach(_Lt_key, lt_car([m4_shiftn(4, $@)]),
+                     [lt_if_dict_fetch([$1], _Lt_key, [$2], [$3], [_Lt_key ])])))))])[]dnl
+])
diff --git a/m4/ltversion.m4 b/m4/ltversion.m4
new file mode 100644 (file)
index 0000000..fa04b52
--- /dev/null
@@ -0,0 +1,23 @@
+# ltversion.m4 -- version numbers                      -*- Autoconf -*-
+#
+#   Copyright (C) 2004, 2011-2015 Free Software Foundation, Inc.
+#   Written by Scott James Remnant, 2004
+#
+# This file is free software; the Free Software Foundation gives
+# unlimited permission to copy and/or distribute it, with or without
+# modifications, as long as this notice is preserved.
+
+# @configure_input@
+
+# serial 4179 ltversion.m4
+# This file is part of GNU Libtool
+
+m4_define([LT_PACKAGE_VERSION], [2.4.6])
+m4_define([LT_PACKAGE_REVISION], [2.4.6])
+
+AC_DEFUN([LTVERSION_VERSION],
+[macro_version='2.4.6'
+macro_revision='2.4.6'
+_LT_DECL(, macro_version, 0, [Which release of libtool.m4 was used?])
+_LT_DECL(, macro_revision, 0)
+])
diff --git a/m4/lt~obsolete.m4 b/m4/lt~obsolete.m4
new file mode 100644 (file)
index 0000000..c6b26f8
--- /dev/null
@@ -0,0 +1,99 @@
+# lt~obsolete.m4 -- aclocal satisfying obsolete definitions.    -*-Autoconf-*-
+#
+#   Copyright (C) 2004-2005, 2007, 2009, 2011-2015 Free Software
+#   Foundation, Inc.
+#   Written by Scott James Remnant, 2004.
+#
+# This file is free software; the Free Software Foundation gives
+# unlimited permission to copy and/or distribute it, with or without
+# modifications, as long as this notice is preserved.
+
+# serial 5 lt~obsolete.m4
+
+# These exist entirely to fool aclocal when bootstrapping libtool.
+#
+# In the past libtool.m4 has provided macros via AC_DEFUN (or AU_DEFUN),
+# which have later been changed to m4_define as they aren't part of the
+# exported API, or moved to Autoconf or Automake where they belong.
+#
+# The trouble is, aclocal is a bit thick.  It'll see the old AC_DEFUN
+# in /usr/share/aclocal/libtool.m4 and remember it, then when it sees us
+# using a macro with the same name in our local m4/libtool.m4 it'll
+# pull the old libtool.m4 in (it doesn't see our shiny new m4_define
+# and doesn't know about Autoconf macros at all.)
+#
+# So we provide this file, which has a silly filename so it's always
+# included after everything else.  This provides aclocal with the
+# AC_DEFUNs it wants, but when m4 processes it, it doesn't do anything
+# because those macros already exist, or will be overwritten later.
+# We use AC_DEFUN over AU_DEFUN for compatibility with aclocal-1.6.
+#
+# Anytime we withdraw an AC_DEFUN or AU_DEFUN, remember to add it here.
+# Yes, that means every name once taken will need to remain here until
+# we give up compatibility with versions before 1.7, at which point
+# we need to keep only those names which we still refer to.
+
+# This is to help aclocal find these macros, as it can't see m4_define.
+AC_DEFUN([LTOBSOLETE_VERSION], [m4_if([1])])
+
+m4_ifndef([AC_LIBTOOL_LINKER_OPTION],  [AC_DEFUN([AC_LIBTOOL_LINKER_OPTION])])
+m4_ifndef([AC_PROG_EGREP],             [AC_DEFUN([AC_PROG_EGREP])])
+m4_ifndef([_LT_AC_PROG_ECHO_BACKSLASH],        [AC_DEFUN([_LT_AC_PROG_ECHO_BACKSLASH])])
+m4_ifndef([_LT_AC_SHELL_INIT],         [AC_DEFUN([_LT_AC_SHELL_INIT])])
+m4_ifndef([_LT_AC_SYS_LIBPATH_AIX],    [AC_DEFUN([_LT_AC_SYS_LIBPATH_AIX])])
+m4_ifndef([_LT_PROG_LTMAIN],           [AC_DEFUN([_LT_PROG_LTMAIN])])
+m4_ifndef([_LT_AC_TAGVAR],             [AC_DEFUN([_LT_AC_TAGVAR])])
+m4_ifndef([AC_LTDL_ENABLE_INSTALL],    [AC_DEFUN([AC_LTDL_ENABLE_INSTALL])])
+m4_ifndef([AC_LTDL_PREOPEN],           [AC_DEFUN([AC_LTDL_PREOPEN])])
+m4_ifndef([_LT_AC_SYS_COMPILER],       [AC_DEFUN([_LT_AC_SYS_COMPILER])])
+m4_ifndef([_LT_AC_LOCK],               [AC_DEFUN([_LT_AC_LOCK])])
+m4_ifndef([AC_LIBTOOL_SYS_OLD_ARCHIVE],        [AC_DEFUN([AC_LIBTOOL_SYS_OLD_ARCHIVE])])
+m4_ifndef([_LT_AC_TRY_DLOPEN_SELF],    [AC_DEFUN([_LT_AC_TRY_DLOPEN_SELF])])
+m4_ifndef([AC_LIBTOOL_PROG_CC_C_O],    [AC_DEFUN([AC_LIBTOOL_PROG_CC_C_O])])
+m4_ifndef([AC_LIBTOOL_SYS_HARD_LINK_LOCKS], [AC_DEFUN([AC_LIBTOOL_SYS_HARD_LINK_LOCKS])])
+m4_ifndef([AC_LIBTOOL_OBJDIR],         [AC_DEFUN([AC_LIBTOOL_OBJDIR])])
+m4_ifndef([AC_LTDL_OBJDIR],            [AC_DEFUN([AC_LTDL_OBJDIR])])
+m4_ifndef([AC_LIBTOOL_PROG_LD_HARDCODE_LIBPATH], [AC_DEFUN([AC_LIBTOOL_PROG_LD_HARDCODE_LIBPATH])])
+m4_ifndef([AC_LIBTOOL_SYS_LIB_STRIP],  [AC_DEFUN([AC_LIBTOOL_SYS_LIB_STRIP])])
+m4_ifndef([AC_PATH_MAGIC],             [AC_DEFUN([AC_PATH_MAGIC])])
+m4_ifndef([AC_PROG_LD_GNU],            [AC_DEFUN([AC_PROG_LD_GNU])])
+m4_ifndef([AC_PROG_LD_RELOAD_FLAG],    [AC_DEFUN([AC_PROG_LD_RELOAD_FLAG])])
+m4_ifndef([AC_DEPLIBS_CHECK_METHOD],   [AC_DEFUN([AC_DEPLIBS_CHECK_METHOD])])
+m4_ifndef([AC_LIBTOOL_PROG_COMPILER_NO_RTTI], [AC_DEFUN([AC_LIBTOOL_PROG_COMPILER_NO_RTTI])])
+m4_ifndef([AC_LIBTOOL_SYS_GLOBAL_SYMBOL_PIPE], [AC_DEFUN([AC_LIBTOOL_SYS_GLOBAL_SYMBOL_PIPE])])
+m4_ifndef([AC_LIBTOOL_PROG_COMPILER_PIC], [AC_DEFUN([AC_LIBTOOL_PROG_COMPILER_PIC])])
+m4_ifndef([AC_LIBTOOL_PROG_LD_SHLIBS], [AC_DEFUN([AC_LIBTOOL_PROG_LD_SHLIBS])])
+m4_ifndef([AC_LIBTOOL_POSTDEP_PREDEP], [AC_DEFUN([AC_LIBTOOL_POSTDEP_PREDEP])])
+m4_ifndef([LT_AC_PROG_EGREP],          [AC_DEFUN([LT_AC_PROG_EGREP])])
+m4_ifndef([LT_AC_PROG_SED],            [AC_DEFUN([LT_AC_PROG_SED])])
+m4_ifndef([_LT_CC_BASENAME],           [AC_DEFUN([_LT_CC_BASENAME])])
+m4_ifndef([_LT_COMPILER_BOILERPLATE],  [AC_DEFUN([_LT_COMPILER_BOILERPLATE])])
+m4_ifndef([_LT_LINKER_BOILERPLATE],    [AC_DEFUN([_LT_LINKER_BOILERPLATE])])
+m4_ifndef([_AC_PROG_LIBTOOL],          [AC_DEFUN([_AC_PROG_LIBTOOL])])
+m4_ifndef([AC_LIBTOOL_SETUP],          [AC_DEFUN([AC_LIBTOOL_SETUP])])
+m4_ifndef([_LT_AC_CHECK_DLFCN],                [AC_DEFUN([_LT_AC_CHECK_DLFCN])])
+m4_ifndef([AC_LIBTOOL_SYS_DYNAMIC_LINKER],     [AC_DEFUN([AC_LIBTOOL_SYS_DYNAMIC_LINKER])])
+m4_ifndef([_LT_AC_TAGCONFIG],          [AC_DEFUN([_LT_AC_TAGCONFIG])])
+m4_ifndef([AC_DISABLE_FAST_INSTALL],   [AC_DEFUN([AC_DISABLE_FAST_INSTALL])])
+m4_ifndef([_LT_AC_LANG_CXX],           [AC_DEFUN([_LT_AC_LANG_CXX])])
+m4_ifndef([_LT_AC_LANG_F77],           [AC_DEFUN([_LT_AC_LANG_F77])])
+m4_ifndef([_LT_AC_LANG_GCJ],           [AC_DEFUN([_LT_AC_LANG_GCJ])])
+m4_ifndef([AC_LIBTOOL_LANG_C_CONFIG],  [AC_DEFUN([AC_LIBTOOL_LANG_C_CONFIG])])
+m4_ifndef([_LT_AC_LANG_C_CONFIG],      [AC_DEFUN([_LT_AC_LANG_C_CONFIG])])
+m4_ifndef([AC_LIBTOOL_LANG_CXX_CONFIG],        [AC_DEFUN([AC_LIBTOOL_LANG_CXX_CONFIG])])
+m4_ifndef([_LT_AC_LANG_CXX_CONFIG],    [AC_DEFUN([_LT_AC_LANG_CXX_CONFIG])])
+m4_ifndef([AC_LIBTOOL_LANG_F77_CONFIG],        [AC_DEFUN([AC_LIBTOOL_LANG_F77_CONFIG])])
+m4_ifndef([_LT_AC_LANG_F77_CONFIG],    [AC_DEFUN([_LT_AC_LANG_F77_CONFIG])])
+m4_ifndef([AC_LIBTOOL_LANG_GCJ_CONFIG],        [AC_DEFUN([AC_LIBTOOL_LANG_GCJ_CONFIG])])
+m4_ifndef([_LT_AC_LANG_GCJ_CONFIG],    [AC_DEFUN([_LT_AC_LANG_GCJ_CONFIG])])
+m4_ifndef([AC_LIBTOOL_LANG_RC_CONFIG], [AC_DEFUN([AC_LIBTOOL_LANG_RC_CONFIG])])
+m4_ifndef([_LT_AC_LANG_RC_CONFIG],     [AC_DEFUN([_LT_AC_LANG_RC_CONFIG])])
+m4_ifndef([AC_LIBTOOL_CONFIG],         [AC_DEFUN([AC_LIBTOOL_CONFIG])])
+m4_ifndef([_LT_AC_FILE_LTDLL_C],       [AC_DEFUN([_LT_AC_FILE_LTDLL_C])])
+m4_ifndef([_LT_REQUIRED_DARWIN_CHECKS],        [AC_DEFUN([_LT_REQUIRED_DARWIN_CHECKS])])
+m4_ifndef([_LT_AC_PROG_CXXCPP],                [AC_DEFUN([_LT_AC_PROG_CXXCPP])])
+m4_ifndef([_LT_PREPARE_SED_QUOTE_VARS],        [AC_DEFUN([_LT_PREPARE_SED_QUOTE_VARS])])
+m4_ifndef([_LT_PROG_ECHO_BACKSLASH],   [AC_DEFUN([_LT_PROG_ECHO_BACKSLASH])])
+m4_ifndef([_LT_PROG_F77],              [AC_DEFUN([_LT_PROG_F77])])
+m4_ifndef([_LT_PROG_FC],               [AC_DEFUN([_LT_PROG_FC])])
+m4_ifndef([_LT_PROG_CXX],              [AC_DEFUN([_LT_PROG_CXX])])
diff --git a/m4/mach-vm.m4 b/m4/mach-vm.m4
new file mode 100644 (file)
index 0000000..bb376a1
--- /dev/null
@@ -0,0 +1,22 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.57])
+
+AC_DEFUN([CL_MACH_VM],
+[
+  CL_LINK_CHECK([vm_allocate],
+    [cl_cv_func_vm],
+    [],
+    [vm_allocate(); task_self();],
+    [AC_DEFINE([HAVE_MACH_VM],[],[have vm_allocate() and task_self() functions])])
+])
diff --git a/m4/mmap.m4 b/m4/mmap.m4
new file mode 100644 (file)
index 0000000..d149052
--- /dev/null
@@ -0,0 +1,140 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.57])
+
+AC_DEFUN([FFCALL_MMAP],
+[
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  AC_CHECK_HEADER([sys/mman.h], [], [no_mmap=1])
+  if test -z "$no_mmap"; then
+    AC_CHECK_FUNC([mmap], [], [no_mmap=1])
+    if test -z "$no_mmap"; then
+      AC_DEFINE([HAVE_MMAP], [], [have <sys/mmap.h> and the mmap() function])
+      AC_CACHE_CHECK([for working mmap], [ffcall_cv_func_mmap_works],
+        [if test $cross_compiling = no; then
+           mmap_prog_1='
+             #include <stdlib.h>
+             #ifdef HAVE_UNISTD_H
+              #include <unistd.h>
+             #endif
+             #include <fcntl.h>
+             #include <sys/types.h>
+             #include <sys/mman.h>
+             int main ()
+             {
+           '
+           mmap_prog_2='
+               if (mmap(NULL,0x100000,PROT_READ|PROT_WRITE,flags,fd,0) == (void*)-1)
+                 exit(1);
+               exit(0);
+             }
+           '
+           AC_TRY_RUN(GL_NOCRASH
+             [$mmap_prog_1
+              int flags = MAP_ANON | MAP_PRIVATE;
+              int fd = -1;
+              nocrash_init();
+              $mmap_prog_2
+             ],
+             [have_mmap_anon=1
+              ffcall_cv_func_mmap_anon=yes],
+             [],
+             [dnl When cross-compiling, don't assume anything.
+              :
+             ])
+           AC_TRY_RUN(GL_NOCRASH
+             [$mmap_prog_1
+              int flags = MAP_ANONYMOUS | MAP_PRIVATE;
+              int fd = -1;
+              nocrash_init();
+              $mmap_prog_2
+             ],
+             [have_mmap_anon=1
+              ffcall_cv_func_mmap_anonymous=yes],
+             [],
+             [dnl When cross-compiling, don't assume anything.
+              :
+             ])
+           AC_TRY_RUN(GL_NOCRASH
+             [$mmap_prog_1
+              #ifndef MAP_FILE
+               #define MAP_FILE 0
+              #endif
+              int flags = MAP_FILE | MAP_PRIVATE;
+              int fd = open("/dev/zero",O_RDONLY,0666);
+              if (fd<0)
+                exit(1);
+              nocrash_init();
+              $mmap_prog_2
+             ],
+             [have_mmap_devzero=1
+              ffcall_cv_func_mmap_devzero=yes],
+             [],
+             [dnl When cross-compiling, don't assume anything.
+              :
+             ])
+           if test -n "$have_mmap_anon" -o -n "$have_mmap_devzero"; then
+             ffcall_cv_func_mmap_works=yes
+           else
+             ffcall_cv_func_mmap_works=no
+           fi
+         else
+           dnl When cross-compiling, assume the known behaviour.
+           dnl If we don't know, don't assume anything.
+           case "$host_os" in
+             aix* | cygwin* | darwin* | hpux* | irix* | linux* | solaris*)
+               ffcall_cv_func_mmap_works="guessing yes" ;;
+             *)
+               ffcall_cv_func_mmap_works="guessing no" ;;
+           esac
+           case "$host_os" in
+             aix* | cygwin* | darwin* | linux* | solaris*)
+               ffcall_cv_func_mmap_anon="guessing yes" ;;
+             *)
+               ffcall_cv_func_mmap_anon="guessing no" ;;
+           esac
+           case "$host_os" in
+             aix* | cygwin* | hpux* | linux* | solaris*)
+               ffcall_cv_func_mmap_anonymous="guessing yes" ;;
+             *)
+               ffcall_cv_func_mmap_anonymous="guessing no" ;;
+           esac
+           case "$host_os" in
+             aix* | cygwin* | hpux* | irix* | linux* | solaris*)
+               ffcall_cv_func_mmap_devzero="guessing yes" ;;
+             *)
+               ffcall_cv_func_mmap_devzero="guessing no" ;;
+           esac
+         fi
+        ])
+      case "$ffcall_cv_func_mmap_anon" in
+        *yes)
+          AC_DEFINE([HAVE_MMAP_ANON], [],
+            [<sys/mman.h> defines MAP_ANON and mmaping with MAP_ANON works])
+          ;;
+      esac
+      case "$ffcall_cv_func_mmap_anonymous" in
+        *yes)
+          AC_DEFINE([HAVE_MMAP_ANONYMOUS], [],
+            [<sys/mman.h> defines MAP_ANONYMOUS and mmaping with MAP_ANONYMOUS works])
+          ;;
+      esac
+      case "$ffcall_cv_func_mmap_devzero" in
+        *yes)
+          AC_DEFINE([HAVE_MMAP_DEVZERO], [],
+            [mmaping of the special device /dev/zero works])
+          ;;
+      esac
+    fi
+  fi
+])
diff --git a/m4/mprotect.m4 b/m4/mprotect.m4
new file mode 100644 (file)
index 0000000..6836ed9
--- /dev/null
@@ -0,0 +1,152 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.57])
+
+AC_DEFUN([FFCALL_MPROTECT],
+[
+  AC_REQUIRE([CL_GETPAGESIZE])
+  AC_REQUIRE([FFCALL_MMAP])
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  AC_CHECK_FUNCS([mprotect])
+  if test $ac_cv_func_mprotect = yes; then
+    AC_CACHE_CHECK([for working mprotect], [cl_cv_func_mprotect_works],
+      [if test $cross_compiling = no; then
+         mprotect_prog='
+           #include <sys/types.h>
+           /* declare malloc() */
+           #include <stdlib.h>
+           #ifdef HAVE_UNISTD_H
+            #include <unistd.h>
+           #endif
+           /* declare getpagesize() and mprotect() */
+           #include <sys/mman.h>
+           #ifndef HAVE_GETPAGESIZE
+            #include <sys/param.h>
+            #define getpagesize() PAGESIZE
+           #else
+            ]AC_LANG_EXTERN[
+            RETGETPAGESIZETYPE getpagesize (void);
+           #endif
+           char foo;
+           int main ()
+           {
+             unsigned long pagesize = getpagesize();
+           #define page_align(address)  (char*)((unsigned long)(address) & -pagesize)
+         '
+         AC_TRY_RUN(
+           [$mprotect_prog
+              if ((pagesize-1) & pagesize) exit(1);
+              exit(0);
+            }
+           ],
+           [],
+           [no_mprotect=1],
+           [dnl When cross-compiling, don't assume anything.
+            no_mprotect=1
+           ])
+         mprotect_prog="$mprotect_prog"'
+           char* area = (char*) malloc(6*pagesize);
+           char* fault_address = area + pagesize*7/2;
+         '
+         if test -z "$no_mprotect"; then
+           AC_TRY_RUN(GL_NOCRASH
+             [$mprotect_prog
+                nocrash_init();
+                if (mprotect(page_align(fault_address),pagesize,PROT_NONE) < 0)
+                  exit(0);
+                foo = *fault_address; /* this should cause an exception or signal */
+                exit(0);
+              }
+             ],
+             [no_mprotect=1],
+             [],
+             [dnl When cross-compiling, don't assume anything.
+              :
+             ])
+         fi
+         if test -z "$no_mprotect"; then
+           AC_TRY_RUN(GL_NOCRASH
+             [$mprotect_prog
+                nocrash_init();
+                if (mprotect(page_align(fault_address),pagesize,PROT_NONE) < 0)
+                  exit(0);
+                *fault_address = 'z'; /* this should cause an exception or signal */
+                exit(0);
+              }
+             ],
+             [no_mprotect=1],
+             [],
+             [dnl When cross-compiling, don't assume anything.
+              :
+             ])
+         fi
+         if test -z "$no_mprotect"; then
+           AC_TRY_RUN(GL_NOCRASH
+             [$mprotect_prog
+                nocrash_init();
+                if (mprotect(page_align(fault_address),pagesize,PROT_READ) < 0)
+                  exit(0);
+                *fault_address = 'z'; /* this should cause an exception or signal */
+                exit(0);
+              }
+             ],
+             [no_mprotect=1],
+             [],
+             [dnl When cross-compiling, don't assume anything.
+              :
+             ])
+         fi
+         if test -z "$no_mprotect"; then
+           AC_TRY_RUN(GL_NOCRASH
+             [$mprotect_prog
+                nocrash_init();
+                if (mprotect(page_align(fault_address),pagesize,PROT_READ) < 0)
+                  exit(1);
+                if (mprotect(page_align(fault_address),pagesize,PROT_READ|PROT_WRITE) < 0)
+                  exit(1);
+                *fault_address = 'z'; /* this should not cause an exception or signal */
+                exit(0);
+              }
+             ],
+             [],
+             [no_mprotect=1],
+             [dnl When cross-compiling, don't assume anything.
+              :
+             ])
+         fi
+         if test -z "$no_mprotect"; then
+           cl_cv_func_mprotect_works=yes
+         else
+           cl_cv_func_mprotect_works=no
+         fi
+       else
+         dnl When cross-compiling, assume the known behaviour.
+         dnl If we don't know, don't assume anything.
+         case "$host_os" in
+           aix* | cygwin* | darwin* | hpux* | irix* | linux* | solaris*)
+             cl_cv_func_mprotect_works="guessing yes" ;;
+           mingw*)
+             cl_cv_func_mprotect_works="guessing no" ;;
+           *)
+             cl_cv_func_mprotect_works="guessing no" ;;
+         esac
+       fi
+      ])
+    case "$cl_cv_func_mprotect_works" in
+      *yes)
+        AC_DEFINE([HAVE_WORKING_MPROTECT], [],
+          [have a working mprotect() function])
+        ;;
+    esac
+  fi
+])
diff --git a/m4/proto.m4 b/m4/proto.m4
new file mode 100644 (file)
index 0000000..6c38419
--- /dev/null
@@ -0,0 +1,33 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.13])
+
+dnl CL_PROTO(IDENTIFIER, ACTION-IF-NOT-FOUND, FINAL-PROTOTYPE)
+AC_DEFUN([CL_PROTO],
+[
+  AC_MSG_CHECKING([for $1 declaration])
+  AC_CACHE_VAL([cl_cv_proto_$1], [$2
+    cl_cv_proto_$1="$3"])
+  cl_cv_proto_$1=`echo "[$]cl_cv_proto_$1" | tr -s ' ' | sed -e 's/( /(/'`
+  AC_MSG_RESULT([$]{ac_t:-
+         }[$][cl_cv_proto_$1])
+])
+
+dnl CL_PROTO_RET(INCLUDES, DECL, CACHE-ID, TYPE-IF-OK, TYPE-IF-FAILS)
+AC_DEFUN([CL_PROTO_RET],
+[
+  AC_TRY_COMPILE([$1]
+AC_LANG_EXTERN
+[$2
+], [], [$3="$4"], [$3="$5"])
+])
diff --git a/m4/shm.m4 b/m4/shm.m4
new file mode 100644 (file)
index 0000000..8a34b19
--- /dev/null
+++ b/m4/shm.m4
@@ -0,0 +1,80 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.57])
+
+AC_DEFUN([CL_SHM_H],
+[
+  AC_BEFORE([$0], [CL_SHM_RMID])
+  AC_CHECK_HEADERS([sys/shm.h])
+  if test $ac_cv_header_sys_shm_h = yes; then
+    AC_CHECK_HEADERS([sys/ipc.h])
+  fi
+])
+
+AC_DEFUN([CL_SHM],
+[
+  AC_BEFORE([$0], [CL_SHM_RMID])
+  AC_REQUIRE([CL_SHM_H])
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  if test $ac_cv_header_sys_shm_h = yes -a "$ac_cv_header_sys_ipc_h" = yes; then
+    # This test is from Marcus Daniels
+    AC_CACHE_CHECK([for working shared memory], [cl_cv_sys_shm_works],
+      [AC_TRY_RUN(
+         [#include <stdlib.h>
+          #include <sys/types.h>
+          #include <sys/ipc.h>
+          #include <sys/shm.h>
+          /* try attaching a single segment to multiple addresses */
+          #define segsize 0x10000
+          #define attaches 128
+          #define base_addr 0x01000000
+          int main ()
+          {
+            int shmid;
+            int i;
+            char* addr;
+            char* result;
+            if ((shmid = shmget(IPC_PRIVATE,segsize,0400)) < 0)
+              exit(1);
+            for (i=0, addr = (char*)0x01000000; i<attaches; i++, addr += segsize)
+              if ((result = (char*)shmat(shmid,addr,SHM_RDONLY)) == (char*)(-1))
+                break;
+            for (i=0, addr = (char*)0x01000000; i<attaches; i++, addr += segsize)
+              shmdt(addr);
+            shmctl(shmid,IPC_RMID,0);
+            exit(result == (char*)(-1));
+          }
+         ],
+         [cl_cv_sys_shm_works=yes],
+         [cl_cv_sys_shm_works=no],
+         [dnl When cross-compiling, guess yes on Linux (except on mips),
+          dnl on Solaris, and on IRIX. Otherwise, don't assume anything.
+          case "$host" in
+            mips*-*-linux*) cl_cv_sys_shm_works="guessing no" ;;
+            *-*-linux*)     cl_cv_sys_shm_works="guessing yes" ;;
+            *-*-solaris*)   cl_cv_sys_shm_works="guessing yes" ;;
+            *-*-irix*)      cl_cv_sys_shm_works="guessing yes" ;;
+            *)              cl_cv_sys_shm_works="guessing no" ;;
+          esac
+         ])
+      ])
+  fi
+  case "$cl_cv_sys_shm_works" in
+    *yes)
+      have_shm=1
+      AC_DEFINE([HAVE_SHM],[],[have <sys/shm.h> and <sys/ipc.h> and shared memory works])
+      AC_CHECK_HEADERS([sys/sysmacros.h])
+      ;;
+    *) ;;
+  esac
+])
diff --git a/m4/smallstruct.m4 b/m4/smallstruct.m4
new file mode 100644 (file)
index 0000000..48e2dc9
--- /dev/null
@@ -0,0 +1,66 @@
+dnl -*- Autoconf -*-
+dnl Copyright (C) 1993-2017 Free Software Foundation, Inc.
+dnl This file is free software, distributed under the terms of the GNU
+dnl General Public License as published by the Free Software Foundation;
+dnl either version 2 of the License, or (at your option) any later version.
+dnl As a special exception to the GNU General Public License, this file
+dnl may be distributed as part of a program that contains a configuration
+dnl script generated by Autoconf, under the same distribution terms as
+dnl the rest of that program.
+
+dnl From Bruno Haible, Marcus Daniels, Sam Steingold.
+
+AC_PREREQ([2.13])
+
+AC_DEFUN([SSR_DOC],[whether small structs are returned in registers])
+AC_DEFUN([FFCALL_SMALL_STRUCT_RETURN],
+[
+  AC_REQUIRE([AC_CANONICAL_HOST])
+  AC_REQUIRE([gl_HOST_CPU_C_ABI])
+  AC_CACHE_CHECK([SSR_DOC], [ffcall_cv_c_struct_return_small],
+    [AC_TRY_RUN(GL_NOCRASH
+       [typedef struct { long x; } foo;
+        long y;
+        foo foofun () { foo f; f.x = y; return f; }
+        long (*fun) () = (long (*) ()) foofun;
+        int main()
+        { nocrash_init();
+          y = 37; if ((*fun)() != 37) return 1;
+          y = 55; if ((*fun)() != 55) return 1;
+          return 0;
+        }
+       ],
+       [ffcall_cv_c_struct_return_small=yes],
+       [ffcall_cv_c_struct_return_small=no],
+       [dnl When cross-compiling, guess depending on the ABI.
+        dnl If we don't know, don't assume anything. There are even weirder
+        dnl return value passing conventions than pcc.
+        case "$HOST_CPU_C_ABI" in
+          alpha)               ffcall_cv_c_struct_return_small="guessing no" ;;
+          arm | armhf | arm64) ffcall_cv_c_struct_return_small="guessing yes" ;;
+          hppa | hppa64)       ffcall_cv_c_struct_return_small="guessing yes" ;;
+          i386)
+            case "$host_os" in
+              cygwin* | darwin* | mingw*) ffcall_cv_c_struct_return_small="guessing yes" ;;
+              linux* | solaris*)          ffcall_cv_c_struct_return_small="guessing no" ;;
+              *)                          ffcall_cv_c_struct_return_small="guessing no" ;;
+            esac
+            ;;
+          ia64)                ffcall_cv_c_struct_return_small="guessing yes" ;;
+          mips | mipsn32)      ffcall_cv_c_struct_return_small="guessing no" ;;
+          mips64)              ffcall_cv_c_struct_return_small="guessing yes" ;;
+          powerpc | powerpc64) ffcall_cv_c_struct_return_small="guessing no" ;;
+          powerpc64-elfv2)     ffcall_cv_c_struct_return_small="guessing yes" ;;
+          s390 | s390x)        ffcall_cv_c_struct_return_small="guessing no" ;;
+          sparc)               ffcall_cv_c_struct_return_small="guessing no" ;;
+          sparc64)             ffcall_cv_c_struct_return_small="guessing yes" ;;
+          x86_64)              ffcall_cv_c_struct_return_small="guessing yes" ;;
+          *)                   ffcall_cv_c_struct_return_small="guessing no" ;;
+        esac
+       ])
+    ])
+  case "$ffcall_cv_c_struct_return_small" in
+    *yes) AC_DEFINE([__SMALL_STRUCT_RETURN__], [], SSR_DOC) ;;
+    *no) ;;
+  esac
+])
diff --git a/testcases.c b/testcases.c
new file mode 100644 (file)
index 0000000..084693c
--- /dev/null
@@ -0,0 +1,807 @@
+/*
+ * Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/* This file defines test functions of selected signatures, that exercise
+   dark corners of the various ABIs. */
+
+#include <stdio.h>
+
+FILE* out;
+
+#define uchar unsigned char
+#define ushort unsigned short
+#define uint unsigned int
+#define ulong unsigned long
+
+typedef struct { char x; } Char;
+typedef struct { short x; } Short;
+typedef struct { int x; } Int;
+typedef struct { long x; } Long;
+typedef struct { float x; } Float;
+typedef struct { double x; } Double;
+typedef struct { char c; float f; } A;
+typedef struct { double d; int i[3]; } B;
+typedef struct { long l1; long l2; } J;
+typedef struct { long l1; long l2; long l3; long l4; } K;
+typedef struct { long l1; long l2; long l3; long l4; long l5; long l6; } L;
+typedef struct { char x1; } Size1;
+typedef struct { char x1; char x2; } Size2;
+typedef struct { char x1; char x2; char x3; } Size3;
+typedef struct { char x1; char x2; char x3; char x4; } Size4;
+typedef struct {
+  char x1; char x2; char x3; char x4; char x5; char x6; char x7;
+} Size7;
+typedef struct {
+  char x1; char x2; char x3; char x4; char x5; char x6; char x7; char x8;
+} Size8;
+typedef struct {
+  char x1; char x2; char x3; char x4; char x5; char x6; char x7; char x8;
+  char x9; char x10; char x11; char x12;
+} Size12;
+typedef struct {
+  char x1; char x2; char x3; char x4; char x5; char x6; char x7; char x8;
+  char x9; char x10; char x11; char x12; char x13; char x14; char x15;
+} Size15;
+typedef struct {
+  char x1; char x2; char x3; char x4; char x5; char x6; char x7; char x8;
+  char x9; char x10; char x11; char x12; char x13; char x14; char x15; char x16;
+} Size16;
+typedef struct { char c[3]; } T;
+typedef struct { char c[33],c1; } X;
+
+char c1='a', c2=127, c3=(char)128, c4=(char)255, c5=-1;
+short s1=32767, s2=(short)32768, s3=3, s4=4, s5=5, s6=6, s7=7, s8=8, s9=9;
+int i1=1, i2=2, i3=3, i4=4, i5=5, i6=6, i7=7, i8=8, i9=9, i10=11, i11=12,
+    i12=13, i13=14, i14=15, i15=16, i16=17, i17=18, i18=19, i19=20, i20=21,
+    i21=22, i22=23, i23=24, i24=25, i25=26, i26=27, i27=28, i28=29, i29=30,
+    i30=31, i31=32, i32=33;
+long l1=1, l2=2, l3=3, l4=4, l5=5, l6=6, l7=7, l8=8, l9=9;
+long long ll1 = 3875056143130689530LL;
+float f1=0.1, f2=0.2, f3=0.3, f4=0.4, f5=0.5, f6=0.6, f7=0.7, f8=0.8, f9=0.9,
+      f10=1.1, f11=1.2, f12=1.3, f13=1.4, f14=1.5, f15=1.6, f16=1.7, f17=1.8,
+      f18=1.9, f19=2.1, f20=2.2, f21=2.3, f22=2.4, f23=2.5, f24=2.6;
+double d1=0.1, d2=0.2, d3=0.3, d4=0.4, d5=0.5, d6=0.6, d7=0.7, d8=0.8, d9=0.9,
+       d10=1.1, d11=1.2, d12=1.3, d13=1.4, d14=1.5, d15=1.6, d16=1.7, d17=1.8;
+
+uchar uc1='a', uc2=127, uc3=128, uc4=255, uc5=(uchar)-1;
+ushort us1=1, us2=2, us3=3, us4=4, us5=5, us6=6, us7=7, us8=8, us9=9;
+uint ui1=1, ui2=2, ui3=3, ui4=4, ui5=5, ui6=6, ui7=7, ui8=8, ui9=9;
+ulong ul1=1, ul2=2, ul3=3, ul4=4, ul5=5, ul6=6, ul7=7, ul8=8, ul9=9;
+
+char *str1="hello",str2[]="goodbye",*str3="still here?";
+Char C1={'A'}, C2={'B'}, C3={'C'}, C4={'\377'}, C5={(char)(-1)};
+Short S1={1}, S2={2}, S3={3}, S4={4}, S5={5}, S6={6}, S7={7}, S8={8}, S9={9};
+Int I1={1}, I2={2}, I3={3}, I4={4}, I5={5}, I6={6}, I7={7}, I8={8}, I9={9};
+Float F1={0.1}, F2={0.2}, F3={0.3}, F4={0.4}, F5={0.5}, F6={0.6}, F7={0.7}, F8={0.8}, F9={0.9};
+Double D1={0.1}, D2={0.2}, D3={0.3}, D4={0.4}, D5={0.5}, D6={0.6}, D7={0.7}, D8={0.8}, D9={0.9};
+
+A A1={'a',0.1},A2={'b',0.2},A3={'\377',0.3};
+B B1={0.1,{1,2,3}},B2={0.2,{5,4,3}};
+J J1={47,11},J2={73,55};
+K K1={19,69,12,28};
+L L1={561,1105,1729,2465,2821,6601}; /* A002997 */
+Size1 Size1_1={'a'};
+Size2 Size2_1={'a','b'};
+Size3 Size3_1={'a','b','c'};
+Size4 Size4_1={'a','b','c','d'};
+Size7 Size7_1={'a','b','c','d','e','f','g'};
+Size8 Size8_1={'a','b','c','d','e','f','g','h'};
+Size12 Size12_1={'a','b','c','d','e','f','g','h','i','j','k','l'};
+Size15 Size15_1={'a','b','c','d','e','f','g','h','i','j','k','l','m','n','o'};
+Size16 Size16_1={'a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p'};
+T T1={'t','h','e'},T2={'f','o','x'};
+X X1={"abcdefghijklmnopqrstuvwxyzABCDEF",'G'}, X2={"123",'9'}, X3={"return-return-return",'R'};
+
+/* void tests */
+void v_v (void)
+{
+  fprintf(out,"void f(void):\n");
+  fflush(out);
+}
+
+/* int tests */
+int i_v (void)
+{
+  int r=99;
+  fprintf(out,"int f(void):");
+  fflush(out);
+  return r;
+}
+int i_i (int a)
+{
+  int r=a+1;
+  fprintf(out,"int f(int):(%d)",a);
+  fflush(out);
+  return r;
+}
+int i_i2 (int a, int b)
+{
+  int r=a+b;
+  fprintf(out,"int f(2*int):(%d,%d)",a,b);
+  fflush(out);
+  return r;
+}
+int i_i4 (int a, int b, int c, int d)
+{
+  int r=a+b+c+d;
+  fprintf(out,"int f(4*int):(%d,%d,%d,%d)",a,b,c,d);
+  fflush(out);
+  return r;
+}
+int i_i8 (int a, int b, int c, int d, int e, int f, int g, int h)
+{
+  int r=a+b+c+d+e+f+g+h;
+  fprintf(out,"int f(8*int):(%d,%d,%d,%d,%d,%d,%d,%d)",a,b,c,d,e,f,g,h);
+  fflush(out);
+  return r;
+}
+int i_i16 (int a, int b, int c, int d, int e, int f, int g, int h,
+           int i, int j, int k, int l, int m, int n, int o, int p)
+{
+  int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p;
+  fprintf(out,"int f(16*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)",
+          a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p);
+  fflush(out);
+  return r;
+}
+int i_i32 (int a, int b, int c, int d, int e, int f, int g, int h,
+           int i, int j, int k, int l, int m, int n, int o, int p,
+           int aa, int ab, int ac, int ad, int ae, int af, int ag, int ah,
+           int ai, int aj, int ak, int al, int am, int an, int ao, int ap)
+{
+  int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+aa+ab+ac+ad+ae+af+ag+ah+ai+aj+ak+al+am+an+ao+ap;
+  fprintf(out,"int f(32*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)",
+          a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,aa,ab,ac,ad,ae,af,ag,ah,ai,aj,ak,al,am,an,ao,ap);
+  fflush(out);
+  return r;
+}
+
+/* float tests */
+float f_f (float a)
+{
+  float r=a+1.0;
+  fprintf(out,"float f(float):(%g)",a);
+  fflush(out);
+  return r;
+}
+float f_f2 (float a, float b)
+{
+  float r=a+b;
+  fprintf(out,"float f(2*float):(%g,%g)",a,b);
+  fflush(out);
+  return r;
+}
+float f_f4 (float a, float b, float c, float d)
+{
+  float r=a+b+c+d;
+  fprintf(out,"float f(4*float):(%g,%g,%g,%g)",a,b,c,d);
+  fflush(out);
+  return r;
+}
+float f_f8 (float a, float b, float c, float d, float e, float f,
+            float g, float h)
+{
+  float r=a+b+c+d+e+f+g+h;
+  fprintf(out,"float f(8*float):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h);
+  fflush(out);
+  return r;
+}
+float f_f16 (float a, float b, float c, float d, float e, float f, float g, float h,
+             float i, float j, float k, float l, float m, float n, float o, float p)
+{
+  float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p;
+  fprintf(out,"float f(16*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p);
+  fflush(out);
+  return r;
+}
+float f_f24 (float a, float b, float c, float d, float e, float f, float g, float h,
+             float i, float j, float k, float l, float m, float n, float o, float p,
+             float q, float s, float t, float u, float v, float w, float x, float y)
+{
+  float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+v+w+x+y;
+  fprintf(out,"float f(24*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,v,w,x,y);
+  fflush(out);
+  return r;
+}
+
+/* double tests */
+double d_d (double a)
+{
+  double r=a+1.0;
+  fprintf(out,"double f(double):(%g)",a);
+  fflush(out);
+  return r;
+}
+double d_d2 (double a, double b)
+{
+  double r=a+b;
+  fprintf(out,"double f(2*double):(%g,%g)",a,b);
+  fflush(out);
+  return r;
+}
+double d_d4 (double a, double b, double c, double d)
+{
+  double r=a+b+c+d;
+  fprintf(out,"double f(4*double):(%g,%g,%g,%g)",a,b,c,d);
+  fflush(out);
+  return r;
+}
+double d_d8 (double a, double b, double c, double d, double e, double f,
+             double g, double h)
+{
+  double r=a+b+c+d+e+f+g+h;
+  fprintf(out,"double f(8*double):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h);
+  fflush(out);
+  return r;
+}
+double d_d16 (double a, double b, double c, double d, double e, double f,
+              double g, double h, double i, double j, double k, double l,
+              double m, double n, double o, double p)
+{
+  double r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p;
+  fprintf(out,"double f(16*double):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p);
+  fflush(out);
+  return r;
+}
+
+/* pointer tests */
+void* vp_vpdpcpsp (void* a, double* b, char* c, Int* d)
+{
+  void* ret = (char*)b + 1;
+  fprintf(out,"void* f(void*,double*,char*,Int*):(0x%p,0x%p,0x%p,0x%p)",a,b,c,d);
+  fflush(out);
+  return ret;
+}
+
+/* mixed number tests */
+uchar uc_ucsil (uchar a, ushort b, uint c, ulong d)
+{
+  uchar r = (uchar)-1;
+  fprintf(out,"uchar f(uchar,ushort,uint,ulong):(%u,%u,%u,%lu)",a,b,c,d);
+  fflush(out);
+  return r;
+}
+double d_iidd (int a, int b, double c, double d)
+{
+  double r = a+b+c+d;
+  fprintf(out,"double f(int,int,double,double):(%d,%d,%g,%g)",a,b,c,d);
+  fflush(out);
+  return r;
+}
+double d_iiidi (int a, int b, int c, double d, int e)
+{
+  double r = a+b+c+d+e;
+  fprintf(out,"double f(int,int,int,double,int):(%d,%d,%d,%g,%d)",a,b,c,d,e);
+  fflush(out);
+  return r;
+}
+double d_idid (int a, double b, int c, double d)
+{
+  double r = a+b+c+d;
+  fprintf(out,"double f(int,double,int,double):(%d,%g,%d,%g)",a,b,c,d);
+  fflush(out);
+  return r;
+}
+double d_fdi (float a, double b, int c)
+{
+  double r = a+b+c;
+  fprintf(out,"double f(float,double,int):(%g,%g,%d)",a,b,c);
+  fflush(out);
+  return r;
+}
+ushort us_cdcd (char a, double b, char c, double d)
+{
+  ushort r = (ushort)(a + b + c + d);
+  fprintf(out,"ushort f(char,double,char,double):('%c',%g,'%c',%g)",a,b,c,d);
+  fflush(out);
+  return r;
+}
+
+long long ll_iiilli (int a, int b, int c, long long d, int e)
+{
+  long long r = (long long)(int)a+(long long)(int)b+(long long)(int)c+d+(long long)(int)e;
+  fprintf(out,"long long f(int,int,int,long long,int):(%d,%d,%d,0x%lx%08lx,%d)",a,b,c,(long)(d>>32),(long)(d&0xffffffff),e);
+  fflush(out);
+  return r;
+}
+long long ll_flli (float a, long long b, int c)
+{
+  long long r = (long long)(int)a + b + (long long)c;
+  fprintf(out,"long long f(float,long long,int):(%g,0x%lx%08lx,0x%lx)",a,(long)(b>>32),(long)(b&0xffffffff),(long)c);
+  fflush(out);
+  return r;
+}
+
+float f_fi (float a, int z)
+{
+  float r = a+z;
+  fprintf(out,"float f(float,int):(%g,%d)",a,z);
+  fflush(out);
+  return r;
+}
+float f_f2i (float a, float b, int z)
+{
+  float r = a+b+z;
+  fprintf(out,"float f(2*float,int):(%g,%g,%d)",a,b,z);
+  fflush(out);
+  return r;
+}
+float f_f3i (float a, float b, float c, int z)
+{
+  float r = a+b+c+z;
+  fprintf(out,"float f(3*float,int):(%g,%g,%g,%d)",a,b,c,z);
+  fflush(out);
+  return r;
+}
+float f_f4i (float a, float b, float c, float d, int z)
+{
+  float r = a+b+c+d+z;
+  fprintf(out,"float f(4*float,int):(%g,%g,%g,%g,%d)",a,b,c,d,z);
+  fflush(out);
+  return r;
+}
+float f_f7i (float a, float b, float c, float d, float e, float f, float g,
+             int z)
+{
+  float r = a+b+c+d+e+f+g+z;
+  fprintf(out,"float f(7*float,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z);
+  fflush(out);
+  return r;
+}
+float f_f8i (float a, float b, float c, float d, float e, float f, float g,
+             float h, int z)
+{
+  float r = a+b+c+d+e+f+g+h+z;
+  fprintf(out,"float f(8*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z);
+  fflush(out);
+  return r;
+}
+float f_f12i (float a, float b, float c, float d, float e, float f, float g,
+              float h, float i, float j, float k, float l, int z)
+{
+  float r = a+b+c+d+e+f+g+h+i+j+k+l+z;
+  fprintf(out,"float f(12*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z);
+  fflush(out);
+  return r;
+}
+float f_f13i (float a, float b, float c, float d, float e, float f, float g,
+              float h, float i, float j, float k, float l, float m, int z)
+{
+  float r = a+b+c+d+e+f+g+h+i+j+k+l+m+z;
+  fprintf(out,"float f(13*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z);
+  fflush(out);
+  return r;
+}
+
+double d_di (double a, int z)
+{
+  double r = a+z;
+  fprintf(out,"double f(double,int):(%g,%d)",a,z);
+  fflush(out);
+  return r;
+}
+double d_d2i (double a, double b, int z)
+{
+  double r = a+b+z;
+  fprintf(out,"double f(2*double,int):(%g,%g,%d)",a,b,z);
+  fflush(out);
+  return r;
+}
+double d_d3i (double a, double b, double c, int z)
+{
+  double r = a+b+c+z;
+  fprintf(out,"double f(3*double,int):(%g,%g,%g,%d)",a,b,c,z);
+  fflush(out);
+  return r;
+}
+double d_d4i (double a, double b, double c, double d, int z)
+{
+  double r = a+b+c+d+z;
+  fprintf(out,"double f(4*double,int):(%g,%g,%g,%g,%d)",a,b,c,d,z);
+  fflush(out);
+  return r;
+}
+double d_d7i (double a, double b, double c, double d, double e, double f,
+              double g, int z)
+{
+  double r = a+b+c+d+e+f+g+z;
+  fprintf(out,"double f(7*double,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z);
+  fflush(out);
+  return r;
+}
+double d_d8i (double a, double b, double c, double d, double e, double f,
+              double g, double h, int z)
+{
+  double r = a+b+c+d+e+f+g+h+z;
+  fprintf(out,"double f(8*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z);
+  fflush(out);
+  return r;
+}
+double d_d12i (double a, double b, double c, double d, double e, double f,
+               double g, double h, double i, double j, double k, double l,
+               int z)
+{
+  double r = a+b+c+d+e+f+g+h+i+j+k+l+z;
+  fprintf(out,"double f(12*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z);
+  fflush(out);
+  return r;
+}
+double d_d13i (double a, double b, double c, double d, double e, double f,
+               double g, double h, double i, double j, double k, double l,
+               double m, int z)
+{
+  double r = a+b+c+d+e+f+g+h+i+j+k+l+m+z;
+  fprintf(out,"double f(13*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z);
+  fflush(out);
+  return r;
+}
+
+/* small structure return tests */
+Size1 S1_v (void)
+{
+  fprintf(out,"Size1 f(void):");
+  fflush(out);
+  return Size1_1;
+}
+Size2 S2_v (void)
+{
+  fprintf(out,"Size2 f(void):");
+  fflush(out);
+  return Size2_1;
+}
+Size3 S3_v (void)
+{
+  fprintf(out,"Size3 f(void):");
+  fflush(out);
+  return Size3_1;
+}
+Size4 S4_v (void)
+{
+  fprintf(out,"Size4 f(void):");
+  fflush(out);
+  return Size4_1;
+}
+Size7 S7_v (void)
+{
+  fprintf(out,"Size7 f(void):");
+  fflush(out);
+  return Size7_1;
+}
+Size8 S8_v (void)
+{
+  fprintf(out,"Size8 f(void):");
+  fflush(out);
+  return Size8_1;
+}
+Size12 S12_v (void)
+{
+  fprintf(out,"Size12 f(void):");
+  fflush(out);
+  return Size12_1;
+}
+Size15 S15_v (void)
+{
+  fprintf(out,"Size15 f(void):");
+  fflush(out);
+  return Size15_1;
+}
+Size16 S16_v (void)
+{
+  fprintf(out,"Size16 f(void):");
+  fflush(out);
+  return Size16_1;
+}
+
+/* structure tests */
+Int I_III (Int a, Int b, Int c)
+{
+  Int r;
+  r.x = a.x + b.x + c.x;
+  fprintf(out,"Int f(Int,Int,Int):({%d},{%d},{%d})",a.x,b.x,c.x);
+  fflush(out);
+  return r;
+}
+Char C_CdC (Char a, double b, Char c)
+{
+  Char r;
+  r.x = (a.x + c.x)/2;
+  fprintf(out,"Char f(Char,double,Char):({'%c'},%g,{'%c'})",a.x,b,c.x);
+  fflush(out);
+  return r;
+}
+Float F_Ffd (Float a, float b, double c)
+{
+  Float r;
+  r.x = a.x + b + c;
+  fprintf(out,"Float f(Float,float,double):({%g},%g,%g)",a.x,b,c);
+  fflush(out);
+  return r;
+}
+Double D_fDd (float a, Double b, double c)
+{
+  Double r;
+  r.x = a + b.x + c;
+  fprintf(out,"Double f(float,Double,double):(%g,{%g},%g)",a,b.x,c);
+  fflush(out);
+  return r;
+}
+Double D_Dfd (Double a, float b, double c)
+{
+  Double r;
+  r.x = a.x + b + c;
+  fprintf(out,"Double f(Double,float,double):({%g},%g,%g)",a.x,b,c);
+  fflush(out);
+  return r;
+}
+J J_JiJ (J a, int b, J c)
+{
+  J r;
+  r.l1 = a.l1+c.l1; r.l2 = a.l2+b+c.l2;
+  fprintf(out,"J f(J,int,J):({%ld,%ld},%d,{%ld,%ld})",a.l1,a.l2,b,c.l1,c.l2);
+  fflush(out);
+  return r;
+}
+T T_TcT (T a, char b, T c)
+{
+  T r;
+  r.c[0]='b'; r.c[1]=c.c[1]; r.c[2]=c.c[2];
+  fprintf(out,"T f(T,char,T):({\"%c%c%c\"},'%c',{\"%c%c%c\"})",a.c[0],a.c[1],a.c[2],b,c.c[0],c.c[1],c.c[2]);
+  fflush(out);
+  return r;
+}
+X X_BcdB (B a, char b, double c, B d)
+{
+  static X xr={"return val",'R'};
+  X r;
+  r = xr;
+  r.c1 = b;
+  fprintf(out,"X f(B,char,double,B):({%g,{%d,%d,%d}},'%c',%g,{%g,{%d,%d,%d}})",
+          a.d,a.i[0],a.i[1],a.i[2],b,c,d.d,d.i[0],d.i[1],d.i[2]);
+  fflush(out);
+  return r;
+}
+
+/* Test for cases where some argument (especially structure, 'long long', or
+   'double') may be passed partially in general-purpose argument registers
+   and partially on the stack. Different ABIs pass between 4 and 8 arguments
+   (or none) in general-purpose argument registers. */
+
+long l_l0J (J b, long c)
+{
+  long r = b.l1 + b.l2 + c;
+  fprintf(out,"long f(J,long):(%ld,%ld,%ld)",b.l1,b.l2,c);
+  fflush(out);
+  return r;
+}
+long l_l1J (long a1, J b, long c)
+{
+  long r = a1 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(long,J,long):(%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,c);
+  fflush(out);
+  return r;
+}
+long l_l2J (long a1, long a2, J b, long c)
+{
+  long r = a1 + a2 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(2*long,J,long):(%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,c);
+  fflush(out);
+  return r;
+}
+long l_l3J (long a1, long a2, long a3, J b, long c)
+{
+  long r = a1 + a2 + a3 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(3*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,c);
+  fflush(out);
+  return r;
+}
+long l_l4J (long a1, long a2, long a3, long a4, J b, long c)
+{
+  long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(4*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,c);
+  fflush(out);
+  return r;
+}
+long l_l5J (long a1, long a2, long a3, long a4, long a5, J b, long c)
+{
+  long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(5*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,c);
+  fflush(out);
+  return r;
+}
+long l_l6J (long a1, long a2, long a3, long a4, long a5, long a6, J b, long c)
+{
+  long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(6*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,c);
+  fflush(out);
+  return r;
+}
+long l_l7J (long a1, long a2, long a3, long a4, long a5, long a6, long a7, J b, long c)
+{
+  long r = a1 + a2 + a3 + a4 + a5 + a6 + a7 + b.l1 + b.l2 + c;
+  fprintf(out,"long f(7*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,a7,b.l1,b.l2,c);
+  fflush(out);
+  return r;
+}
+long l_l0K (K b, long c)
+{
+  long r = b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(K,long):(%ld,%ld,%ld,%ld,%ld)",b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  return r;
+}
+long l_l1K (long a1, K b, long c)
+{
+  long r = a1 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  return r;
+}
+long l_l2K (long a1, long a2, K b, long c)
+{
+  long r = a1 + a2 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(2*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  return r;
+}
+long l_l3K (long a1, long a2, long a3, K b, long c)
+{
+  long r = a1 + a2 + a3 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(3*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  return r;
+}
+long l_l4K (long a1, long a2, long a3, long a4, K b, long c)
+{
+  long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(4*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  return r;
+}
+long l_l5K (long a1, long a2, long a3, long a4, long a5, K b, long c)
+{
+  long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(5*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  return r;
+}
+long l_l6K (long a1, long a2, long a3, long a4, long a5, long a6, K b, long c)
+{
+  long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+  fprintf(out,"long f(6*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,b.l3,b.l4,c);
+  fflush(out);
+  return r;
+}
+/* These tests is crafted on the knowledge that for all known ABIs:
+   * 17 > number of floating-point argument registers,
+   * 3 < number of general-purpose argument registers < 3 + 6. */
+float f_f17l3L (float a, float b, float c, float d, float e, float f, float g,
+                float h, float i, float j, float k, float l, float m, float n,
+                float o, float p, float q,
+                long s, long t, long u, L z)
+{
+  float r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6;
+  fprintf(out,"float f(17*float,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6);
+  fflush(out);
+  return r;
+}
+double d_d17l3L (double a, double b, double c, double d, double e, double f,
+                 double g, double h, double i, double j, double k, double l,
+                 double m, double n, double o, double p, double q,
+                 long s, long t, long u, L z)
+{
+  double r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6;
+  fprintf(out,"double f(17*double,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6);
+  fflush(out);
+  return r;
+}
+
+long long ll_l2ll (long a1, long a2, long long b, long c)
+{
+  long long r = (long long) (a1 + a2) + b + c;
+  fprintf(out,"long long f(2*long,long long,long):(%ld,%ld,0x%lx%08lx,%ld)",a1,a2,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  return r;
+}
+long long ll_l3ll (long a1, long a2, long a3, long long b, long c)
+{
+  long long r = (long long) (a1 + a2 + a3) + b + c;
+  fprintf(out,"long long f(3*long,long long,long):(%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  return r;
+}
+long long ll_l4ll (long a1, long a2, long a3, long a4, long long b, long c)
+{
+  long long r = (long long) (a1 + a2 + a3 + a4) + b + c;
+  fprintf(out,"long long f(4*long,long long,long):(%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  return r;
+}
+long long ll_l5ll (long a1, long a2, long a3, long a4, long a5, long long b, long c)
+{
+  long long r = (long long) (a1 + a2 + a3 + a4 + a5) + b + c;
+  fprintf(out,"long long f(5*long,long long,long):(%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  return r;
+}
+long long ll_l6ll (long a1, long a2, long a3, long a4, long a5, long a6, long long b, long c)
+{
+  long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6) + b + c;
+  fprintf(out,"long long f(6*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  return r;
+}
+long long ll_l7ll (long a1, long a2, long a3, long a4, long a5, long a6, long a7, long long b, long c)
+{
+  long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c;
+  fprintf(out,"long long f(7*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,a7,(long)(b>>32),(long)(b&0xffffffff),c);
+  fflush(out);
+  return r;
+}
+
+double d_l2d (long a1, long a2, double b, long c)
+{
+  double r = (double) (a1 + a2) + b + c;
+  fprintf(out,"double f(2*long,double,long):(%ld,%ld,%g,%ld)",a1,a2,b,c);
+  fflush(out);
+  return r;
+}
+double d_l3d (long a1, long a2, long a3, double b, long c)
+{
+  double r = (double) (a1 + a2 + a3) + b + c;
+  fprintf(out,"double f(3*long,double,long):(%ld,%ld,%ld,%g,%ld)",a1,a2,a3,b,c);
+  fflush(out);
+  return r;
+}
+double d_l4d (long a1, long a2, long a3, long a4, double b, long c)
+{
+  double r = (double) (a1 + a2 + a3 + a4) + b + c;
+  fprintf(out,"double f(4*long,double,long):(%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,b,c);
+  fflush(out);
+  return r;
+}
+double d_l5d (long a1, long a2, long a3, long a4, long a5, double b, long c)
+{
+  double r = (double) (a1 + a2 + a3 + a4 + a5) + b + c;
+  fprintf(out,"double f(5*long,double,long):(%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,b,c);
+  fflush(out);
+  return r;
+}
+double d_l6d (long a1, long a2, long a3, long a4, long a5, long a6, double b, long c)
+{
+  double r = (double) (a1 + a2 + a3 + a4 + a5 + a6) + b + c;
+  fprintf(out,"double f(6*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,b,c);
+  fflush(out);
+  return r;
+}
+double d_l7d (long a1, long a2, long a3, long a4, long a5, long a6, long a7, double b, long c)
+{
+  double r = (double) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c;
+  fprintf(out,"double f(7*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,a7,b,c);
+  fflush(out);
+  return r;
+}
+
+/* This function is used to verify that structs larger than 2 words are really
+   passed by value, not accidentally by reference.  */
+void v_clobber_K (K k)
+{
+  k.l1 += 1;
+  k.l2 += 10;
+  k.l3 += 100;
+  k.l4 += 1000;
+}
diff --git a/trampoline/COPYING b/trampoline/COPYING
new file mode 100644 (file)
index 0000000..a3d1815
--- /dev/null
@@ -0,0 +1,340 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+                          51 Franklin Street, Fifth Floor,
+                          Boston, MA 02110-1301, USA.
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The licenses for most software are designed to take away your
+freedom to share and change it.  By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users.  This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it.  (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.)  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+  To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have.  You must make sure that they, too, receive or can get the
+source code.  And you must show them these terms so they know their
+rights.
+
+  We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+  Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software.  If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+  Finally, any free program is threatened constantly by software
+patents.  We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary.  To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+\f
+                    GNU GENERAL PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License.  The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language.  (Hereinafter, translation is included without limitation in
+the term "modification".)  Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope.  The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+  1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+  2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+    a) You must cause the modified files to carry prominent notices
+    stating that you changed the files and the date of any change.
+
+    b) You must cause any work that you distribute or publish, that in
+    whole or in part contains or is derived from the Program or any
+    part thereof, to be licensed as a whole at no charge to all third
+    parties under the terms of this License.
+
+    c) If the modified program normally reads commands interactively
+    when run, you must cause it, when started running for such
+    interactive use in the most ordinary way, to print or display an
+    announcement including an appropriate copyright notice and a
+    notice that there is no warranty (or else, saying that you provide
+    a warranty) and that users may redistribute the program under
+    these conditions, and telling the user how to view a copy of this
+    License.  (Exception: if the Program itself is interactive but
+    does not normally print such an announcement, your work based on
+    the Program is not required to print an announcement.)
+\f
+These requirements apply to the modified work as a whole.  If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works.  But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+  3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+    a) Accompany it with the complete corresponding machine-readable
+    source code, which must be distributed under the terms of Sections
+    1 and 2 above on a medium customarily used for software interchange; or,
+
+    b) Accompany it with a written offer, valid for at least three
+    years, to give any third party, for a charge no more than your
+    cost of physically performing source distribution, a complete
+    machine-readable copy of the corresponding source code, to be
+    distributed under the terms of Sections 1 and 2 above on a medium
+    customarily used for software interchange; or,
+
+    c) Accompany it with the information you received as to the offer
+    to distribute corresponding source code.  (This alternative is
+    allowed only for noncommercial distribution and only if you
+    received the program in object code or executable form with such
+    an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it.  For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable.  However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+\f
+  4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License.  Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+  5. You are not required to accept this License, since you have not
+signed it.  However, nothing else grants you permission to modify or
+distribute the Program or its derivative works.  These actions are
+prohibited by law if you do not accept this License.  Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+  6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions.  You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+  7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all.  For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices.  Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+\f
+  8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded.  In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+  9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number.  If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation.  If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+  10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission.  For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this.  Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+                            NO WARRANTY
+
+  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+                     END OF TERMS AND CONDITIONS
+\f
+        Appendix: How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software Foundation,
+    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+    Gnomovision version 69, Copyright (C) year  name of author
+    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  Here is a sample; alter the names:
+
+  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+  `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+  <signature of Ty Coon>, 1 April 1989
+  Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs.  If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library.  If this is what you want to do, use the GNU Library General
+Public License instead of this License.
diff --git a/trampoline/Makefile.devel b/trampoline/Makefile.devel
new file mode 100644 (file)
index 0000000..ec9e0ae
--- /dev/null
@@ -0,0 +1,217 @@
+# This is the developer's -*-Makefile-*-, not the user's makefile.
+# Do not use it unless you know exactly what you do!
+
+THISFILE = Makefile.devel
+RM = rm -f
+
+# ============ Rules that require cross-compilation tools ============
+
+GCC = gcc
+GCCFLAGS = -O2 -fomit-frame-pointer -fPIC
+CPP = $(GCC) -E
+CROSS_TOOL = cross
+
+precompiled : \
+  cache-sparc-macro.S cache-sparc64-macro.S \
+  cache-alpha-macro.S \
+  cache-hppa-macro.S cache-hppa64-macro.S \
+  cache-powerpc-linux-macro.S cache-powerpc-macos.s \
+  cache-powerpc64-elfv2-macro.S
+
+
+cache-sparc-linux.s : cache-sparc.c $(THISFILE)
+       $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -D__sparc__ -S cache-sparc.c -o cache-sparc-linux.s
+
+cache-sparc-macro.S : cache-sparc-linux.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-sparc.h"' ; ../common/asm-sparc.sh < cache-sparc-linux.s ; cat ../common/noexecstack.h) > cache-sparc-macro.S
+
+cache-sparc64-linux.s : cache-sparc.c $(THISFILE)
+       $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 $(GCCFLAGS) -D__sparc64__ -S cache-sparc.c -o cache-sparc64-linux.s
+
+cache-sparc64-macro.S : cache-sparc64-linux.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-sparc.h"' ; ../common/asm-sparc.sh < cache-sparc64-linux.s ; cat ../common/noexecstack.h) > cache-sparc64-macro.S
+
+
+cache-alpha-linux.s : cache-alpha.c $(THISFILE)
+       $(CROSS_TOOL) alpha-linux gcc -V 4.0.2 $(GCCFLAGS) -D__alpha__ -S cache-alpha.c -o cache-alpha-linux.s
+
+cache-alpha-macro.S : cache-alpha-linux.s ../common/asm-alpha.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-alpha.sh < cache-alpha-linux.s ; cat ../common/noexecstack.h) > cache-alpha-macro.S
+
+
+cache-hppa-linux.s : cache-hppa.c $(THISFILE)
+       $(CROSS_TOOL) hppa-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa__ -S cache-hppa.c -o cache-hppa-linux.s
+
+cache-hppa-macro.S : cache-hppa-linux.s ../common/asm-hppa.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-hppa.h"' ; ../common/asm-hppa.sh < cache-hppa-linux.s ; cat ../common/noexecstack.h) > cache-hppa-macro.S
+
+
+cache-hppa64-linux.s : cache-hppa.c $(THISFILE)
+       $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa64__ -S cache-hppa.c -o cache-hppa64-linux.s
+
+cache-hppa64-macro.S : cache-hppa64-linux.s ../common/asm-hppa64.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-hppa64.h"' ; ../common/asm-hppa64.sh < cache-hppa64-linux.s ; cat ../common/noexecstack.h) > cache-hppa64-macro.S
+
+
+cache-powerpc-linux.s : cache-powerpc.c $(THISFILE)
+       $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S cache-powerpc.c -o cache-powerpc-linux.s
+
+cache-powerpc-linux-macro.S : cache-powerpc-linux.s ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-powerpc.sh < cache-powerpc-linux.s ; cat ../common/noexecstack.h) > cache-powerpc-linux-macro.S
+
+cache-powerpc-macos.s : cache-powerpc.c $(THISFILE)
+       $(CROSS_TOOL) powerpc-darwin gcc -V 3.3.6 $(GCCFLAGS) -D__powerpc__ -S cache-powerpc.c -o cache-powerpc-macos.s
+
+
+cache-powerpc64-elfv2-linux.s : cache-powerpc64.c $(THISFILE)
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -S cache-powerpc64.c -o cache-powerpc64-elfv2-linux-le.s
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -S cache-powerpc64.c -o cache-powerpc64-elfv2-linux-be.s
+       cmp cache-powerpc64-elfv2-linux-le.s cache-powerpc64-elfv2-linux-be.s > /dev/null
+       mv cache-powerpc64-elfv2-linux-le.s cache-powerpc64-elfv2-linux.s
+       $(RM) cache-powerpc64-elfv2-linux-be.s
+
+cache-powerpc64-elfv2-macro.S : cache-powerpc64-elfv2-linux.s ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-powerpc.sh < cache-powerpc64-elfv2-linux.s ; cat ../common/noexecstack.h) > cache-powerpc64-elfv2-macro.S
+
+
+# --------------- Older rules ---------------
+
+OLDGCCFLAGS = -O2 -fomit-frame-pointer
+ASPREFIX = /usr1/gnu/lib
+
+proto-precompiled : proto-i386.s proto-m68k.s proto-mips.s proto-mipsn32.s proto-mips64.s proto-sparc.s proto-sparc64.s proto-alpha.s proto-hppa.s proto-hppa64.s proto-arm.s proto-arm64.s proto-powerpc-aix.s proto-powerpc-sysv4.s proto-powerpc-macos.s proto-powerpc64-aix.s proto-powerpc64-elfv2.s proto-ia64.s proto-x86_64.s proto-x86_64-x32.s proto-s390.s proto-s390x.s proto-riscv32.s proto-riscv64.s
+
+proto-i386.s : proto.c
+       $(GCC) -V 2.7.2 -b i486-linuxaout $(OLDGCCFLAGS) -D__i386__ -S proto.c -o $@
+
+proto-m68k.s : proto.c
+       $(GCC) -V egcs-2.91.57 -b m68k-sun $(OLDGCCFLAGS) -D__m68k__ -S proto.c -o $@
+
+proto-mips.s : proto.c
+       $(GCC) -V 2.95.2 -b mips-sgi $(OLDGCCFLAGS) -D__mips__ -S proto.c -o $@ -mabicalls
+
+proto-mipsn32.s : proto.c
+       $(GCC) -V 2.95.2 -b mips-sgi-irix6 $(OLDGCCFLAGS) -D__mipsn32__ -S proto.c -o $@ -mabicalls
+
+proto-mips64.s : proto64.c
+       $(GCC) -V 2.95.2 -b mips-sgi -mips3 -mlong64 $(OLDGCCFLAGS) -D__mips64__ -S proto64.c -o $@ -mabicalls
+
+proto-sparc.s : proto.c
+       $(GCC) -V 2.95.2 -b sparc-sun $(OLDGCCFLAGS) -D__sparc__ -S proto.c -o $@
+
+proto-sparc64.s : proto64.c
+       sparc64-linux-gcc -V 2.95.2 -b sparc64-linux $(OLDGCCFLAGS) -D__sparc64__ -S proto64.c -o $@
+
+proto-alpha.s : proto64.c
+       $(GCC) -V 2.7.2 -b alpha-dec-osf $(OLDGCCFLAGS) -D__alpha__ -S proto64.c -o $@
+
+proto-hppa.s : proto.c
+       $(GCC) -V 2.6.3 -b hppa1.0-hpux $(OLDGCCFLAGS) -D__hppa__ -S proto.c -o $@
+
+proto-hppa64.s : proto64.c
+       $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(OLDGCCFLAGS) -D__hppa64__ -S proto64.c -o $@
+
+proto-arm.s : proto.c
+       $(GCC) -V 2.6.3 -b arm-acorn-riscix $(OLDGCCFLAGS) -D__arm__ -S proto.c -o $@
+
+proto-arm64.s : proto64.c
+       $(CROSS_TOOL) aarch64-linux gcc-5.4.0 $(OLDGCCFLAGS) -D__arm64__ -S proto64.c -o $@
+
+proto-powerpc-aix.s : proto.c
+       $(GCC) -V 2.95.2 -b rs6000 -mno-power -mno-power2 -mno-powerpc -mnew-mnemonics $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@
+
+proto-powerpc-sysv4.s : proto.c
+       $(GCC) -V 2.95.2 -b ppc-linux -mno-power -mno-power2 -mno-powerpc $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@
+
+proto-powerpc-macos.s : proto.c
+       $(GCC) -V 3.3.2 -b powerpc-darwin $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@
+
+proto-powerpc64-aix.s : proto64.c
+       $(CROSS_TOOL) powerpc64-linux gcc $(OLDGCCFLAGS) -D__powerpc64__ -S proto64.c -o $@
+
+proto-powerpc64-elfv2.s : proto64.c
+       $(CROSS_TOOL) powerpc64le-linux gcc -mabi=elfv2 $(OLDGCCFLAGS) -D__powerpc64__ -S proto64.c -o $@
+
+proto-ia64.s : proto64.c
+       $(GCC) -V 2.9-ia64-000216 -b ia64-hp-linux $(OLDGCCFLAGS) -D__ia64__ -S proto64.c -o $@
+
+proto-x86_64.s : proto64.c
+       $(GCC) -V 3.2.2 -b x86_64-suse-linux $(OLDGCCFLAGS) -D__x86_64__ -S proto64.c -o $@
+
+proto-x86_64-x32.s : proto.c
+       $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mx32 $(OLDGCCFLAGS) -fno-asynchronous-unwind-tables -D__x86_64__ -D__x86_64_x32__ -S proto.c -o $@
+
+proto-s390.s : proto.c
+       $(CROSS_TOOL) s390-linux gcc -V 3.1 $(OLDGCCFLAGS) -D__s390__ -S proto.c -o $@
+
+proto-s390x.s : proto64.c
+       $(CROSS_TOOL) s390x-linux gcc-5.4.0 $(OLDGCCFLAGS) -D__s390x__ -S proto64.c -o $@
+
+proto-riscv32.s : proto.c
+       $(CROSS_TOOL) riscv32-linux gcc-7.3.0 $(OLDGCCFLAGS) -D__riscv32__ -S proto.c -o $@
+
+proto-riscv64.s : proto64.c
+       $(CROSS_TOOL) riscv64-linux gcc-7.3.0 $(OLDGCCFLAGS) -D__riscv64__ -S proto64.c -o $@
+
+tramp-i386.o : tramp-i386.s
+       $(ASPREFIX)/i486-linux/bin/as tramp-i386.s -o $@
+
+tramp-m68k.o : tramp-m68k.s
+       $(ASPREFIX)/m68k-sun/bin/as tramp-m68k.s -o $@
+
+tramp-mips.o : tramp-mips.s
+       $(ASPREFIX)/mips-sgi/bin/as tramp-mips.s -o $@
+
+tramp-mips64.o : tramp-mips64.s
+       $(ASPREFIX)/mips-sgi/bin/as -mips3 -membedded-pic tramp-mips64.s -o $@
+
+tramp-sparc.o : tramp-sparc.s
+       $(ASPREFIX)/sparc-sun/bin/as tramp-sparc.s -o $@
+
+tramp-sparc64.o : tramp-sparc64.s
+       $(ASPREFIX)/sparc64-linux/bin/as tramp-sparc64.s -o $@
+
+tramp-alpha.o : tramp-alpha.s
+       $(ASPREFIX)/alpha-dec-osf/bin/as tramp-alpha.s -o $@
+
+tramp-hppa.o : tramp-hppa.s
+       $(ASPREFIX)/hppa1.0-hpux/bin/as tramp-hppa.s -o $@
+
+tramp-hppa64.o : tramp-hppa64.s
+       $(CROSS_TOOL) hppa64-linux as tramp-hppa64.s -o $@
+
+tramp-arm.o : tramp-arm.s
+       $(ASPREFIX)/arm-acorn-riscix/bin/as tramp-arm.s -o $@
+
+tramp-arm64.o : tramp-arm64.s
+       $(CROSS_TOOL) aarch64-linux as tramp-arm64.s -o $@
+
+tramp-powerpc-old.o : tramp-powerpc-old.s
+       $(ASPREFIX)/rs6000/bin/as tramp-powerpc-old.s -o $@
+
+tramp-powerpc-sysv4.o : tramp-powerpc-sysv4.s
+       $(ASPREFIX)/ppc-linux/bin/as tramp-powerpc-sysv4.s -o $@
+
+tramp-powerpc64-elfv2.o : tramp-powerpc64-elfv2.s
+       $(CROSS_TOOL) powerpc64le-linux as tramp-powerpc64-elfv2.s -o $@
+
+tramp-ia64.o : tramp-ia64.s
+       /nue/usr/ia64-hp-linux/bin/as tramp-ia64.s -o $@
+
+tramp-x86_64.o : tramp-x86_64.s
+       $(ASPREFIX)/x86_64-suse-linux/bin/as tramp-x86_64.s -o $@
+
+tramp-x86_64-x32.o : tramp-x86_64-x32.s
+       $(CROSS_TOOL) x86_64-linux as tramp-x86_64-x32.s -o $@
+
+tramp-s390.o : tramp-s390.s
+       $(CROSS_TOOL) s390-linux as tramp-s390.s -o $@
+
+tramp-s390x.o : tramp-s390x.s
+       $(CROSS_TOOL) s390x-linux as tramp-s390x.s -o $@
+
+tramp-riscv32.o : tramp-riscv32.s
+       $(CROSS_TOOL) riscv32-linux as tramp-riscv32.s -o $@
+
+tramp-riscv64.o : tramp-riscv64.s
+       $(CROSS_TOOL) riscv64-linux as tramp-riscv64.s -o $@
diff --git a/trampoline/Makefile.in b/trampoline/Makefile.in
new file mode 100644 (file)
index 0000000..529f977
--- /dev/null
@@ -0,0 +1,272 @@
+# Makefile for trampoline
+
+#### Start of system configuration section. ####
+
+HOST = @host@
+CPU = @HOST_CPU_C_ABI@
+OS = @host_os@
+
+# Directories used by "make":
+srcdir = @srcdir@
+
+# Directories used by "make install":
+prefix = @prefix@
+local_prefix = /usr/local
+exec_prefix = @exec_prefix@
+libdir = @libdir@
+includedir = @includedir@
+mandir = @mandir@
+datadir = @datadir@
+datarootdir = @datarootdir@
+htmldir = $(datadir)/html
+
+# Programs used by "make":
+# C compiler
+CC = @CC@
+CFLAGS = @CFLAGS@
+CPP = @CPP@
+# C++ compiler
+CXX = @CXX@
+CXXFLAGS = @CXXFLAGS@
+# Both C and C++ compiler
+CPPFLAGS = @CPPFLAGS@
+INCLUDES = -I. -I$(srcdir) -I..
+INCLUDES_WITH_GNULIB = $(INCLUDES) -I../gnulib-lib -I$(srcdir)/../gnulib-lib
+ASPFLAGS = `if test @AS_UNDERSCORE@ = true; then echo '-DASM_UNDERSCORE'; fi`
+LDFLAGS = @LDFLAGS@
+LIBTOOL = @LIBTOOL@
+LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile
+LIBTOOL_LINK = $(LIBTOOL) --mode=link
+LIBTOOL_INSTALL = $(LIBTOOL) --mode=install
+LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall
+AR = @AR@
+AR_FLAGS = rc
+RANLIB = @RANLIB@
+RM = rm -f
+@SET_MAKE@
+
+# Programs used by "make install":
+INSTALL = @INSTALL@
+INSTALL_PROGRAM = @INSTALL_PROGRAM@
+INSTALL_DATA = @INSTALL_DATA@
+
+# Libtool options for linking with the thread library.
+LTLIBTHREAD = @LTLIBTHREAD@
+
+#### End of system configuration section. ####
+
+SHELL = /bin/sh
+
+# Needed by $(LIBTOOL).
+top_builddir = ..
+
+OBJECTS = trampoline.lo @CPU_OBJECTS@
+
+# Limit the set of exported symbols, on those platforms where libtool supports it.
+# Currently this excludes the symbols from gnulib modules.
+LIBTRAMPOLINE_EXPORTED_SYMBOLS_REGEX = 'trampoline'
+
+# Before making a release, change this according to the libtool documentation,
+# section "Library interface versions".
+LIBTRAMPOLINE_VERSION_INFO = 1:2:0
+
+all : $(OBJECTS) libtrampoline.la $(srcdir)/trampoline.3 $(srcdir)/trampoline.html
+
+trampoline.lo : $(srcdir)/trampoline.c $(srcdir)/trampoline.h
+       $(LIBTOOL_COMPILE) $(CC) $(INCLUDES_WITH_GNULIB) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/trampoline.c
+
+tramp-hppa.lo : tramp-hppa.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-hppa.s
+
+tramp-hppa.s : $(srcdir)/tramp-hppa-macro.S $(srcdir)/../common/noexecstack.h
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/tramp-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > tramp-hppa.s
+
+tramp-hppa64.lo : tramp-hppa64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-hppa64.s
+
+tramp-hppa64.s : $(srcdir)/tramp-hppa64-macro.S $(srcdir)/../common/noexecstack.h
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/tramp-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > tramp-hppa64.s
+
+tramp-powerpc.lo : tramp-powerpc.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-powerpc.s
+
+tramp-powerpc.s : $(srcdir)/tramp-powerpc-aix.S
+       $(CPP) $(srcdir)/tramp-powerpc-aix.S > tramp-powerpc.s
+
+tramp-powerpc64.lo : tramp-powerpc64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-powerpc64.s
+
+tramp-powerpc64.s : $(srcdir)/tramp-powerpc64-aix.S $(srcdir)/../common/noexecstack.h
+       $(CPP) -I$(srcdir)/../common $(srcdir)/tramp-powerpc64-aix.S > tramp-powerpc64.s
+
+tramp-ia64.lo : tramp-ia64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-ia64.s
+
+tramp-ia64.s : $(srcdir)/tramp-ia64-macro.S $(srcdir)/../common/noexecstack.h
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/tramp-ia64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > tramp-ia64.s
+
+cache-sparc.lo : cache-sparc.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-sparc.s
+
+cache-sparc.s : $(srcdir)/cache-sparc-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/cache-sparc-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > cache-sparc.s
+
+cache-sparc64.lo : cache-sparc64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-sparc64.s
+
+cache-sparc64.s : $(srcdir)/cache-sparc64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/cache-sparc64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > cache-sparc64.s
+
+cache-alpha.lo : cache-alpha.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-alpha.s
+
+cache-alpha.s : $(srcdir)/cache-alpha-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/cache-alpha-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-alpha.s
+
+cache-hppa.lo : cache-hppa.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-hppa.s
+
+cache-hppa.s : $(srcdir)/cache-hppa-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/cache-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > cache-hppa.s
+
+cache-hppa64.lo : cache-hppa64.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-hppa64.s
+
+cache-hppa64.s : $(srcdir)/cache-hppa64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/cache-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > cache-hppa64.s
+
+cache-powerpc.lo : cache-powerpc.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-powerpc.s
+
+cache-powerpc.s : $(srcdir)/cache-powerpc-linux-macro.S $(srcdir)/cache-powerpc-macos.s
+       case "$(OS)" in \
+         macos* | darwin*) syntax=macos;; \
+         *) syntax=linux;; \
+       esac; \
+       case $${syntax} in \
+         macos) \
+           grep -v '\.machine' $(srcdir)/cache-powerpc-$${syntax}.s > cache-powerpc.s || exit 1 ;; \
+         linux) \
+           $(CPP) $(ASPFLAGS) $(srcdir)/cache-powerpc-$${syntax}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-powerpc.s || exit 1 ;; \
+         *) \
+           cp $(srcdir)/cache-powerpc-$${syntax}.s cache-powerpc.s || exit 1 ;; \
+       esac
+
+cache-powerpc64-elfv2.lo : cache-powerpc64-elfv2.s
+       $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-powerpc64-elfv2.s
+
+cache-powerpc64-elfv2.s : $(srcdir)/cache-powerpc64-elfv2-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/cache-powerpc64-elfv2-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-powerpc64-elfv2.s
+
+libtrampoline.la : $(OBJECTS) ../gnulib-lib/libgnu.la
+       $(LIBTOOL_LINK) $(CC) -o libtrampoline.la -rpath $(libdir) -no-undefined -export-symbols-regex $(LIBTRAMPOLINE_EXPORTED_SYMBOLS_REGEX) -version-info $(LIBTRAMPOLINE_VERSION_INFO) $(OBJECTS) ../gnulib-lib/libgnu.la $(LDFLAGS) $(LTLIBTHREAD)
+
+install : all force
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(exec_prefix)
+       mkdir -p $(DESTDIR)$(libdir)
+       $(LIBTOOL_INSTALL) $(INSTALL_DATA) libtrampoline.la $(DESTDIR)$(libdir)/libtrampoline.la
+       mkdir -p $(DESTDIR)$(includedir)
+       $(INSTALL_DATA) $(srcdir)/trampoline.h $(DESTDIR)$(includedir)/trampoline.h
+       mkdir -p $(DESTDIR)$(mandir)
+       mkdir -p $(DESTDIR)$(mandir)/man3
+       $(INSTALL_DATA) $(srcdir)/trampoline.3 $(DESTDIR)$(mandir)/man3/trampoline.3
+       mkdir -p $(DESTDIR)$(datadir)
+       mkdir -p $(DESTDIR)$(htmldir)
+       $(INSTALL_DATA) $(srcdir)/trampoline.html $(DESTDIR)$(htmldir)/trampoline.html
+
+installdirs : force
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(exec_prefix)
+       mkdir -p $(DESTDIR)$(libdir)
+       mkdir -p $(DESTDIR)$(includedir)
+       mkdir -p $(DESTDIR)$(mandir)
+       mkdir -p $(DESTDIR)$(mandir)/man3
+       mkdir -p $(DESTDIR)$(datadir)
+       mkdir -p $(DESTDIR)$(htmldir)
+
+uninstall : force
+       $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libtrampoline.la
+       $(RM) $(DESTDIR)$(includedir)/trampoline.h
+       $(RM) $(DESTDIR)$(mandir)/man3/trampoline.3
+       $(RM) $(DESTDIR)$(htmldir)/trampoline.html
+
+test1.@OBJEXT@ : $(srcdir)/test1.c $(srcdir)/trampoline.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/test1.c
+
+test1 : test1.@OBJEXT@ libtrampoline.la
+       $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ test1.@OBJEXT@ libtrampoline.la $(LDFLAGS) -o test1
+
+test2.@OBJEXT@ : $(srcdir)/test2.c $(srcdir)/trampoline.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/test2.c
+
+test2 : test2.@OBJEXT@ libtrampoline.la
+       $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ test2.@OBJEXT@ libtrampoline.la $(LDFLAGS) -o test2
+
+test2-c++.@OBJEXT@ : $(srcdir)/test2-c++.cc $(srcdir)/test2.c $(srcdir)/trampoline.h
+       $(CXX) $(INCLUDES) $(CPPFLAGS) $(CXXFLAGS) -c $(srcdir)/test2-c++.cc
+
+test2-c++ : test2-c++.@OBJEXT@ libtrampoline.la
+       $(LIBTOOL_LINK) $(CXX) $(CXXFLAGS) @GCC_X_NONE@ test2-c++.@OBJEXT@ libtrampoline.la $(LDFLAGS) -o test2-c++
+
+check1 : all test1
+       ./test1
+
+check : all test1 test2
+       ./test1
+       ./test2
+@IF_CXX@       ./test2-c++
+       touch tests.passed.$(HOST)
+@IF_CXX@check : test2-c++
+
+extracheck : check
+
+mostlyclean : clean
+
+clean : force
+       $(RM) $(OBJECTS) `echo $(OBJECTS) | sed -e 's/\.lo/.@OBJEXT@/g'` tramp-hppa.s tramp-hppa64.s tramp-powerpc.s tramp-powerpc64.s tramp-ia64.s cache-sparc.s cache-sparc64.s cache-alpha.s cache-hppa.s cache-hppa64.s cache-powerpc.s cache-powerpc64-elfv2.s libtrampoline.* core
+       $(RM) -r .libs _libs
+       $(RM) test1.@OBJEXT@ test1 test2.@OBJEXT@ test2 test2-c++.@OBJEXT@ test2-c++
+
+distclean : clean
+       $(RM) Makefile tests.passed.*
+
+maintainer-clean : distclean
+
+
+# List of source files (committed in version control or generated by Makefile.devel).
+SOURCE_FILES = \
+  COPYING \
+  PLATFORMS PORTING README trampoline.3 trampoline.html \
+  Makefile.devel \
+  Makefile.maint \
+  Makefile.in \
+  trampoline.h \
+  trampoline.c \
+  tramp-hppa-macro.S \
+  tramp-hppa64-macro.S \
+  tramp-powerpc-aix.S \
+  tramp-powerpc64-aix.S \
+  tramp-ia64-macro.S \
+  cache.c \
+  cache-alpha.c cache-alpha-linux.s cache-alpha-macro.S \
+  cache-hppa.c cache-hppa-linux.s cache-hppa-macro.S cache-hppa64-linux.s cache-hppa64-macro.S \
+  cache-powerpc.c cache-powerpc-linux.s cache-powerpc-linux-macro.S cache-powerpc-macos.s \
+  cache-powerpc64.c cache-powerpc64-elfv2-linux.s cache-powerpc64-elfv2-macro.S \
+  cache-sparc.c cache-sparc-linux.s cache-sparc-macro.S cache-sparc64-linux.s cache-sparc64-macro.S \
+  test1.c \
+  test2.c test2-c++.cc
+# List of distributed files generated by Makefile.maint.
+GENERATED_FILES = \
+  trampoline.man
+# List of distributed files.
+DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES)
+
+distdir : $(DISTFILES)
+       for file in $(DISTFILES); do \
+         if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \
+         cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \
+       done
+
+
+force :
diff --git a/trampoline/Makefile.maint b/trampoline/Makefile.maint
new file mode 100644 (file)
index 0000000..7356d20
--- /dev/null
@@ -0,0 +1,18 @@
+# maintainer -*-Makefile-*-
+
+RM = rm -f
+
+# ==================== Easily regeneratable files ====================
+
+ROFF_MAN = groff -Tutf8 -mandoc
+
+all : trampoline.man
+
+trampoline.man : trampoline.3
+       $(ROFF_MAN) trampoline.3 > trampoline.man
+
+totally-clean : force
+       $(RM) trampoline.man
+
+
+force :
diff --git a/trampoline/PLATFORMS b/trampoline/PLATFORMS
new file mode 100644 (file)
index 0000000..c4108d4
--- /dev/null
@@ -0,0 +1,40 @@
+Supported CPUs:  (Put the GNU config.guess values here.)
+     i386       i486-unknown-linux, i686-unknown-gnu0.9, i386-unknown-sysv4.0,
+                i386-pc-solaris2.6, i386-pc-solaris2.10,
+                i486-unknown-sco3.2v4.2, i386-pc-cygwin32, i386-w64-mingw32,
+                i586-unknown-freebsd11.0, i386-unknown-dragonfly3.8,
+                i386-unknown-netbsdelf7.0, i386-unknown-openbsd6.0,
+                i586-pc-haiku, i386-pc-minix
+     m68k       m68k-next-bsd, m68k-next-nextstep3, m68k-sun-sunos4.0,
+                m68k-unknown-linux
+     mips       mips-sgi-irix4.0.5, mips-sgi-irix5.2, mips-sgi-irix5.3,
+                mips-sgi-irix6.2, mips-sgi-irix6.4, mips-sgi-irix6.5,
+                mips-unknown-linux, mips64-unknown-linux
+     sparc      sparc-sun-sunos4.1.1, sparc-sun-solaris2.3,
+                sparc-sun-solaris2.4, sparc-sun-solaris2.10,
+                sparc64-sun-solaris2.10, sparc-unknown-linux,
+                sparc64-unknown-linux,
+                sparc-unknown-netbsdelf7.1, sparc64-unknown-netbsd8.0
+     alpha      alpha-dec-osf3.0, alpha-dec-osf4.0, alphaev67-unknown-linux
+     hppa       hppa1.0-hp-hpux8.00, hppa1.1-hp-hpux9.05, hppa1.1-hp-hpux10.01,
+                hppa2.0-hp-hpux10.20, hppa2.0w-hp-hpux11.31, hppa-unknown-linux
+     hppa64     hppa64-hp-hpux11.31
+     arm        armv5tejl-unknown-linux, armv6l-unknown-linux,
+                armv7l-unknown-linux
+     arm64      aarch64-unknown-linux
+     powerpc    powerpc-ibm-aix4.1.4.0, powerpc-ibm-aix7.1.3.0,
+                powerpc-unknown-linux, powerpc-apple-darwin6.8,
+                powerpc-apple-darwin9.8.0
+     powerpc64  powerpc-ibm-aix7.1.3.0 (gcc -maix64, xlc -q64; AR="ar -X 64"),
+                powerpc64-unknown-linux (gcc -m64),
+                powerpc64le-unknown-linux (gcc)
+     ia64       ia64-unknown-linux
+     x86_64     x86_64-suse-linux, x86_64-unknown-linux (gcc -mx32),
+                x86_64-pc-solaris2.10, x86_64-pc-cygwin, x86_64-w64-mingw32,
+                x86_64-unknown-freebsd11.0, x86_64-unknown-netbsd7.0,
+                x86_64-unknown-openbsd6.0
+     s390       s390x-ibm-linux
+     s390x      s390x-ibm-linux
+     riscv32    riscv32-unknown-linux
+     riscv64    riscv64-unknown-linux
+
diff --git a/trampoline/PORTING b/trampoline/PORTING
new file mode 100644 (file)
index 0000000..46b6042
--- /dev/null
@@ -0,0 +1,95 @@
+The list of CPUs and platforms TRAMPOLINE has been ported to can be found
+at the top of file trampoline.c.
+
+To port TRAMPOLINE to a new platform, three issues may have to be resolved:
+A. a new CPU - how to build the trampoline?
+B. a new OS - how to make code in malloc'ed memory executable?
+C. a new CPU or OS - how to flush the instruction cache?
+
+
+A. a new CPU - how to build the trampoline?
+
+   The trampoline is a short sequence of machine instructions which puts
+   the constant <data> into <variable>, then jumps to <address>. The only
+   registers that are allowed to be modified are call-used registers. No
+   stack manipulations are allowed since the trampoline has to pass its
+   arguments along to the function at <address>.
+
+   1. To find out which instructions are available for "move"/"store" and
+      "jump", compile proto.c for your CPU:
+
+          make -f Makefile.devel proto-${CPU}.s
+      or
+          gcc -O2 -fomit-frame-pointer -S proto.c -o proto-${CPU}.s
+
+   2. Write down the instructions for the trampoline in a file tramp-${CPU}.s,
+      using constants for <data>, <variable>, <address>. Assemble it:
+
+          gcc -c tramp-${CPU}.s
+
+      Verify that the jump actually goes to <address>. (Beware: Some CPUs have
+      program-counter relative jumps.)
+
+          gdb tramp-${CPU}.o
+          disassemble tramp
+
+   3. Take a hex dump of tramp-${CPU}.o
+
+          hexdump -e '"%06.6_ax " 16/1 " %02X" "\n"' < tramp-${CPU}.o
+      or
+          od -tx1 -Ax < tramp-${CPU}.o
+      or
+          od -x +x < tramp-${CPU}.o
+
+      Look out for the magic numbers you used for <data>, <variable> and
+      <address>.
+
+   4. Write the code which builds up a trampoline in memory, in trampoline.c.
+
+   5. Try it:
+
+          make
+          make check1
+
+   6. Write the is_tramp() macro and the tramp_xxx() accessor macros
+      in trampoline.c.
+
+   7. Try it:
+
+          make
+          make check
+
+
+B. a new OS - how to make code in malloc'ed memory executable?
+
+   ‘configure’ will find out whether code stored in malloc'ed memory is
+   executable, or whether virtual memory protections have to be set in order
+   to allow this. (The test is pretty simple: it copies a small function
+   to malloc'ed memory and tries to executed it. The test could also fail
+   because the compiler produced non-position-independent code or because
+   of alignment issues.)
+
+   To set virtual memory protections on a page of memory, your system should
+   provide the mprotect() and getpagesize() functions. If it does not, find
+   a substitute.
+
+
+C. a new CPU or OS - how to flush the instruction cache?
+
+   CPUs which have separate data and instruction caches need to flush
+   (part of) the instruction cache when alloc_trampoline() is called.
+   (There may have been an old trampoline at the same location, and the
+   instruction cache is not updated when the new trampoline is built.
+   The effect can be that when the new trampoline is called, the old one
+   will still be executed.)
+
+   To flush the instruction cache, some CPUs have special instruction which
+   can be put into gcc "asm" statements. On some CPUs these instructions are
+   privileged, you therefore need to call some system or library function.
+   On other CPUs, the only way to flush the instruction cache is to execute
+   a long sequence of "nop" or "jump" instructions. This is hairy.
+
+
+When you are done with porting to a new platform, or even if TRAMPOLINE
+passes the "make check" out of the box without modifications, please report
+your results to the author of TRAMPOLINE, for inclusion in the next release.
diff --git a/trampoline/README b/trampoline/README
new file mode 100644 (file)
index 0000000..01595c7
--- /dev/null
@@ -0,0 +1,70 @@
+trampoline - closures as first-class C functions.
+
+This library implements closures as first-class C functions. A closure
+consists of a regular C function and a piece of data which gets passed to
+the C function when the closure is called.
+
+Typical uses of closures are nested functions in programming languages,
+and call-back functions passed to other libraries.
+
+
+Installation instructions:
+
+    Configure the parent directory. Then:
+        cd trampoline
+        make
+        make check
+        make install
+
+
+Files in this package:
+
+    Documentation:
+
+        README           this text
+        COPYING          free software license
+        PLATFORMS        list of supported platforms
+        trampoline.3     manual page in Unix man format
+        trampoline.html  manual page in HTML format
+
+    Source:
+
+        trampoline.h     include file
+        trampoline.c     implementation of the library functions
+        tramp-hppa.s     the trampoline for hppa, in assembly language
+        tramp-powerpc.S  the trampoline for powerpc, in assembly language
+        cache.c          how to flush the instruction cache, now unused
+        test1.c          test program
+        test2.c          test program
+
+    Building:
+
+        Makefile.in      Makefile master
+
+    Porting:
+
+        PORTING          porting instructions
+        Makefile.devel   developer's Makefile
+        proto.c          sample source containing assignment and jumping
+        proto-*.s        its translation to assembly language
+        tramp-*.s        the trampoline, in assembly language
+        tramp-*.o        the trampoline, in binary form
+
+
+Copyright notice:
+
+Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+This program is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
diff --git a/trampoline/cache-alpha-linux.s b/trampoline/cache-alpha-linux.s
new file mode 100644 (file)
index 0000000..6754a16
--- /dev/null
@@ -0,0 +1,20 @@
+       .set noreorder
+       .set volatile
+       .set noat
+       .set nomacro
+       .text
+       .align 2
+       .align 4
+       .globl __TR_clear_cache
+       .ent __TR_clear_cache
+$__TR_clear_cache..ng:
+__TR_clear_cache:
+       .frame $30,0,$26,0
+       .prologue 0
+       .set    macro
+       call_pal 0x86
+       .set    nomacro
+       ret $31,($26),1
+       .end __TR_clear_cache
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/trampoline/cache-alpha-macro.S b/trampoline/cache-alpha-macro.S
new file mode 100644 (file)
index 0000000..e350f4c
--- /dev/null
@@ -0,0 +1,21 @@
+       .set noreorder
+       .set volatile
+       .set noat
+       .set nomacro
+       .text
+       .align 2
+       .align 4
+       .globl __TR_clear_cache
+       .ent __TR_clear_cache
+$__TR_clear_cache..ng:
+__TR_clear_cache:
+       .frame $30,0,$26,0
+       .prologue 0
+       .set    macro
+       call_pal 0x86
+       .set    nomacro
+       ret $31,($26),1
+       .end __TR_clear_cache
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/trampoline/cache-alpha.c b/trampoline/cache-alpha.c
new file mode 100644 (file)
index 0000000..ad20947
--- /dev/null
@@ -0,0 +1,24 @@
+/* Instruction cache flushing for alpha */
+
+/*
+ * Copyright 1997 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+void __TR_clear_cache (void)
+{
+  /* Taken from gforth-0.3.0. */
+  asm volatile ("call_pal 0x86"); /* imb (instruction-memory barrier) */
+}
diff --git a/trampoline/cache-hppa-linux.s b/trampoline/cache-hppa-linux.s
new file mode 100644 (file)
index 0000000..b9c9a6d
--- /dev/null
@@ -0,0 +1,33 @@
+       .LEVEL 1.1
+       .text
+       .align 4
+.globl __TR_clear_cache
+               .type            __TR_clear_cache,@function
+__TR_clear_cache:
+       .PROC
+       .CALLINFO FRAME=0,NO_CALLS
+       .ENTRY
+#APP
+       fdc 0(0,%r26)
+       fdc 0(0,%r25)
+       sync
+       mfsp %sr0,%r20
+       ldsid (0,%r26),%r26
+       mtsp %r26,%sr0
+       fic 0(%sr0,%r26)
+       fic 0(%sr0,%r25)
+       sync
+       mtsp %r20,%sr0
+       nop
+       nop
+       nop
+       nop
+       nop
+       nop
+#NO_APP
+       bv,n %r0(%r2)
+       .EXIT
+       .PROCEND
+.Lfe1:
+       .size   __TR_clear_cache,.Lfe1-__TR_clear_cache
+       .ident  "GCC: (GNU) 3.1"
diff --git a/trampoline/cache-hppa-macro.S b/trampoline/cache-hppa-macro.S
new file mode 100644 (file)
index 0000000..7c39646
--- /dev/null
@@ -0,0 +1,36 @@
+#include "asm-hppa.h"
+       .LEVEL 1.1
+       IMPORT_MILLICODE($$dyncall)
+       TEXT1()
+       TEXT2()
+       .align 4
+GLOBL(__TR_clear_cache)
+               DECLARE_FUNCTION(__TR_clear_cache)
+DEF(__TR_clear_cache)
+       .PROC
+       .CALLINFO FRAME=0,NO_CALLS
+       .ENTRY
+       fdc 0(0,%r26)
+       fdc 0(0,%r25)
+       sync
+       mfsp %sr0,%r20
+       ldsid (0,%r26),%r26
+       mtsp %r26,%sr0
+       fic 0(%sr0,%r26)
+       fic 0(%sr0,%r25)
+       sync
+       mtsp %r20,%sr0
+       nop
+       nop
+       nop
+       nop
+       nop
+       nop
+       bv,n %r0(%r2)
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(__TR_clear_cache)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/trampoline/cache-hppa.c b/trampoline/cache-hppa.c
new file mode 100644 (file)
index 0000000..2174716
--- /dev/null
@@ -0,0 +1,65 @@
+/* Instruction cache flushing for hppa */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#ifdef __hppa64__
+/* Tell GCC not to clobber the registers that are call-saved in the HP C
+   calling convention. */
+register long arg0 __asm__("r26");
+register long arg1 __asm__("r25");
+register long arg2 __asm__("r24");
+register long arg3 __asm__("r23");
+register long arg4 __asm__("r22");
+register long arg5 __asm__("r21");
+register long arg6 __asm__("r20");
+register long arg7 __asm__("r19");
+#endif
+
+/*
+ * This assumes that the range [first_addr..last_addr] lies in at most two
+ * cache lines.
+ */
+void __TR_clear_cache (char* first_addr, char* last_addr)
+{
+  register int tmp1;
+  register int tmp2;
+  /* Flush the relevant data cache lines. (Yes, this is needed. I tried it.) */
+  asm volatile ("fdc 0(0,%0)"
+         "\n\t" "fdc 0(0,%1)"
+         "\n\t" "sync"
+                :
+                : "r" (first_addr), "r" (last_addr)
+               );
+  /* Flush the relevant instruction cache lines. */
+  asm volatile ("mfsp %%sr0,%1"
+         "\n\t" "ldsid (0,%4),%0"
+         "\n\t" "mtsp %0,%%sr0"
+         "\n\t" "fic 0(%%sr0,%2)"
+         "\n\t" "fic 0(%%sr0,%3)"
+         "\n\t" "sync"
+         "\n\t" "mtsp %1,%%sr0"
+         "\n\t" "nop"
+         "\n\t" "nop"
+         "\n\t" "nop"
+         "\n\t" "nop"
+         "\n\t" "nop"
+         "\n\t" "nop"
+                : "=r" (tmp1), "=r" (tmp2)
+                : "r" (first_addr), "r" (last_addr), "r" (first_addr)
+               );
+}
diff --git a/trampoline/cache-hppa64-linux.s b/trampoline/cache-hppa64-linux.s
new file mode 100644 (file)
index 0000000..928f35f
--- /dev/null
@@ -0,0 +1,35 @@
+       .LEVEL 2.0w
+       .text
+       .align 8
+.globl __TR_clear_cache
+               .type            __TR_clear_cache,@function
+__TR_clear_cache:
+       .PROC
+       .CALLINFO FRAME=128,NO_CALLS
+       .ENTRY
+       ldo 128(%r30),%r30
+#APP
+       fdc 0(0,%r26)
+       fdc 0(0,%r25)
+       sync
+       mfsp %sr0,%r31
+       ldsid (0,%r26),%r28
+       mtsp %r28,%sr0
+       fic 0(%sr0,%r26)
+       fic 0(%sr0,%r25)
+       sync
+       mtsp %r31,%sr0
+       nop
+       nop
+       nop
+       nop
+       nop
+       nop
+#NO_APP
+       bve (%r2)
+       ldo -128(%r30),%r30
+       .EXIT
+       .PROCEND
+.Lfe1:
+       .size   __TR_clear_cache,.Lfe1-__TR_clear_cache
+       .ident  "GCC: (GNU) 3.1"
diff --git a/trampoline/cache-hppa64-macro.S b/trampoline/cache-hppa64-macro.S
new file mode 100644 (file)
index 0000000..e5344ae
--- /dev/null
@@ -0,0 +1,37 @@
+#include "asm-hppa64.h"
+       .LEVEL 2.0w
+       TEXT1()
+       TEXT2()
+       .align 8
+GLOBL(__TR_clear_cache)
+               DECLARE_FUNCTION(__TR_clear_cache)
+DEF(__TR_clear_cache)
+       .PROC
+       .CALLINFO FRAME=128,NO_CALLS
+       .ENTRY
+       ldo 128(%r30),%r30
+       fdc 0(0,%r26)
+       fdc 0(0,%r25)
+       sync
+       mfsp %sr0,%r31
+       ldsid (0,%r26),%r28
+       mtsp %r28,%sr0
+       fic 0(%sr0,%r26)
+       fic 0(%sr0,%r25)
+       sync
+       mtsp %r31,%sr0
+       nop
+       nop
+       nop
+       nop
+       nop
+       nop
+       bve (%r2)
+       ldo -128(%r30),%r30
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(__TR_clear_cache)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/trampoline/cache-powerpc-linux-macro.S b/trampoline/cache-powerpc-linux-macro.S
new file mode 100644 (file)
index 0000000..6dc7e1a
--- /dev/null
@@ -0,0 +1,37 @@
+       .file   "cache-powerpc.c"
+       .section        ".text"
+       .align 2
+       .globl __TR_clear_cache
+       .type   __TR_clear_cache, @function
+__TR_clear_cache:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-32(1)
+       icbi 0,3; dcbf 0,3
+       addi 0,3,4
+       icbi 0,0; dcbf 0,0
+       addi 9,3,8
+       icbi 0,9; dcbf 0,9
+       addi 0,3,12
+       icbi 0,0; dcbf 0,0
+       addi 9,3,16
+       icbi 0,9; dcbf 0,9
+       addi 0,3,20
+       icbi 0,0; dcbf 0,0
+       addi 9,3,24
+       icbi 0,9; dcbf 0,9
+       addi 0,3,28
+       icbi 0,0; dcbf 0,0
+       addi 3,3,32
+       icbi 0,3; dcbf 0,3
+       sync; isync
+       addi 1,1,32
+       blr
+       .size   __TR_clear_cache, .-__TR_clear_cache
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/trampoline/cache-powerpc-linux.s b/trampoline/cache-powerpc-linux.s
new file mode 100644 (file)
index 0000000..0fb871e
--- /dev/null
@@ -0,0 +1,54 @@
+       .file   "cache-powerpc.c"
+       .section        ".text"
+       .align 2
+       .globl __TR_clear_cache
+       .type   __TR_clear_cache, @function
+__TR_clear_cache:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-32(1)
+#APP
+       icbi 0,3; dcbf 0,3
+#NO_APP
+       addi 0,3,4
+#APP
+       icbi 0,0; dcbf 0,0
+#NO_APP
+       addi 9,3,8
+#APP
+       icbi 0,9; dcbf 0,9
+#NO_APP
+       addi 0,3,12
+#APP
+       icbi 0,0; dcbf 0,0
+#NO_APP
+       addi 9,3,16
+#APP
+       icbi 0,9; dcbf 0,9
+#NO_APP
+       addi 0,3,20
+#APP
+       icbi 0,0; dcbf 0,0
+#NO_APP
+       addi 9,3,24
+#APP
+       icbi 0,9; dcbf 0,9
+#NO_APP
+       addi 0,3,28
+#APP
+       icbi 0,0; dcbf 0,0
+#NO_APP
+       addi 3,3,32
+#APP
+       icbi 0,3; dcbf 0,3
+       sync; isync
+#NO_APP
+       addi 1,1,32
+       blr
+       .size   __TR_clear_cache, .-__TR_clear_cache
+       .section        .note.GNU-stack,"",@progbits
+       .ident  "GCC: (GNU) 3.3.6"
diff --git a/trampoline/cache-powerpc-macos.s b/trampoline/cache-powerpc-macos.s
new file mode 100644 (file)
index 0000000..ba869fb
--- /dev/null
@@ -0,0 +1,23 @@
+.text
+       .align 2
+       .globl ___TR_clear_cache
+___TR_clear_cache:
+       icbi 0,r3; dcbf 0,r3
+       addi r0,r3,4
+       icbi 0,r0; dcbf 0,r0
+       addi r9,r3,8
+       icbi 0,r9; dcbf 0,r9
+       addi r0,r3,12
+       icbi 0,r0; dcbf 0,r0
+       addi r9,r3,16
+       icbi 0,r9; dcbf 0,r9
+       addi r0,r3,20
+       icbi 0,r0; dcbf 0,r0
+       addi r9,r3,24
+       icbi 0,r9; dcbf 0,r9
+       addi r0,r3,28
+       icbi 0,r0; dcbf 0,r0
+       addi r3,r3,32
+       icbi 0,r3; dcbf 0,r3
+       sync; isync
+       blr
diff --git a/trampoline/cache-powerpc.c b/trampoline/cache-powerpc.c
new file mode 100644 (file)
index 0000000..b204d22
--- /dev/null
@@ -0,0 +1,35 @@
+/* Instruction cache flushing for powerpc, not on AIX */
+
+/*
+ * Copyright 1997-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+void __TR_clear_cache (char* first_addr)
+{
+  /* Taken from egcs-1.1.2/gcc/config/rs6000/tramp.asm. */
+  /* The number of asm statements here depends on the value of TRAMP_LENGTH
+     for __powerpcsysv4__. */
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+4));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+8));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+12));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+16));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+20));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+24));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+28));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+32));
+  asm volatile ("sync; isync");
+}
diff --git a/trampoline/cache-powerpc64-elfv2-linux.s b/trampoline/cache-powerpc64-elfv2-linux.s
new file mode 100644 (file)
index 0000000..2cc82f5
--- /dev/null
@@ -0,0 +1,54 @@
+       .file   "cache-powerpc64.c"
+       .machine power4
+       .abiversion 2
+       .section        ".toc","aw"
+       .section        ".text"
+       .align 2
+       .p2align 4,,15
+       .globl __TR_clear_cache
+       .type   __TR_clear_cache, @function
+__TR_clear_cache:
+#APP
+ # 25 "cache-powerpc64.c" 1
+       icbi 0,3; dcbf 0,3
+ # 0 "" 2
+#NO_APP
+       addi 9,3,4
+#APP
+ # 26 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+#NO_APP
+       addi 9,3,8
+#APP
+ # 27 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+#NO_APP
+       addi 9,3,12
+#APP
+ # 28 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+#NO_APP
+       addi 9,3,16
+#APP
+ # 29 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+#NO_APP
+       addi 3,3,20
+#APP
+ # 30 "cache-powerpc64.c" 1
+       icbi 0,3; dcbf 0,3
+ # 0 "" 2
+ # 31 "cache-powerpc64.c" 1
+       sync; isync
+ # 0 "" 2
+#NO_APP
+       blr
+       .long 0
+       .byte 0,0,0,0,0,0,0,0
+       .size   __TR_clear_cache,.-__TR_clear_cache
+       .ident  "GCC: (GNU) 5.4.0"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/trampoline/cache-powerpc64-elfv2-macro.S b/trampoline/cache-powerpc64-elfv2-macro.S
new file mode 100644 (file)
index 0000000..98cb970
--- /dev/null
@@ -0,0 +1,43 @@
+       .file   "cache-powerpc64.c"
+       .machine power4
+       .abiversion 2
+       .section        ".toc","aw"
+       .section        ".text"
+       .align 2
+       .p2align 4,,15
+       .globl __TR_clear_cache
+       .type   __TR_clear_cache, @function
+__TR_clear_cache:
+ # 25 "cache-powerpc64.c" 1
+       icbi 0,3; dcbf 0,3
+ # 0 "" 2
+       addi 9,3,4
+ # 26 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+       addi 9,3,8
+ # 27 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+       addi 9,3,12
+ # 28 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+       addi 9,3,16
+ # 29 "cache-powerpc64.c" 1
+       icbi 0,9; dcbf 0,9
+ # 0 "" 2
+       addi 3,3,20
+ # 30 "cache-powerpc64.c" 1
+       icbi 0,3; dcbf 0,3
+ # 0 "" 2
+ # 31 "cache-powerpc64.c" 1
+       sync; isync
+ # 0 "" 2
+       blr
+       .long 0
+       .byte 0,0,0,0,0,0,0,0
+       .size   __TR_clear_cache,.-__TR_clear_cache
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/trampoline/cache-powerpc64.c b/trampoline/cache-powerpc64.c
new file mode 100644 (file)
index 0000000..8baba8c
--- /dev/null
@@ -0,0 +1,32 @@
+/* Instruction cache flushing for powerpc64, not the AIX ABI */
+
+/*
+ * Copyright 1997-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+void __TR_clear_cache (char* first_addr)
+{
+  /* Taken from egcs-1.1.2/gcc/config/rs6000/tramp.asm. */
+  /* The number of asm statements here depends on the value of TRAMP_LENGTH-3*8
+     for __powerpc64_elfv2__. */
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+4));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+8));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+12));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+16));
+  asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+20));
+  asm volatile ("sync; isync");
+}
diff --git a/trampoline/cache-sparc-linux.s b/trampoline/cache-sparc-linux.s
new file mode 100644 (file)
index 0000000..a59943c
--- /dev/null
@@ -0,0 +1,15 @@
+       .file   "cache-sparc.c"
+       .section        ".text"
+       .align 4
+       .global __TR_clear_cache_4
+       .type   __TR_clear_cache_4,#function
+       .proc   020
+__TR_clear_cache_4:
+       !#PROLOGUE# 0
+       iflush %o0+0;iflush %o0+8;iflush %o0+16;iflush %o0+24
+       nop
+       retl
+       nop
+.LLfe1:
+       .size   __TR_clear_cache_4,.LLfe1-__TR_clear_cache_4
+       .ident  "GCC: (GNU) 3.1"
diff --git a/trampoline/cache-sparc-macro.S b/trampoline/cache-sparc-macro.S
new file mode 100644 (file)
index 0000000..d9ec5bc
--- /dev/null
@@ -0,0 +1,17 @@
+#include "asm-sparc.h"
+       .section        ".text"
+       .align 4
+       .global C(__TR_clear_cache_4)
+       DECLARE_FUNCTION(__TR_clear_cache_4)
+       .proc   020
+FUNBEGIN(__TR_clear_cache_4)
+       !$PROLOGUE$ 0
+       iflush %o0+0;iflush %o0+8;iflush %o0+16;iflush %o0+24
+       nop
+       retl
+       nop
+L(Lfe1):
+       FUNEND(__TR_clear_cache_4)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/trampoline/cache-sparc.c b/trampoline/cache-sparc.c
new file mode 100644 (file)
index 0000000..83981e2
--- /dev/null
@@ -0,0 +1,31 @@
+/* Instruction cache flushing for sparc */
+
+/*
+ * Copyright 1996-1999 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/*
+ * This assumes that the range [first_addr..last_addr] lies in at most four
+ * cache lines.
+ */
+void __TR_clear_cache_4 (char* first_addr, char* last_addr)
+{
+  asm volatile ("iflush %0+0;" /* the +0 is needed by gas, says gforth-0.3.0 */
+                "iflush %0+8;"
+                "iflush %0+16;"
+                "iflush %0+24"
+                : : "r" (first_addr));
+}
diff --git a/trampoline/cache-sparc64-linux.s b/trampoline/cache-sparc64-linux.s
new file mode 100644 (file)
index 0000000..2951612
--- /dev/null
@@ -0,0 +1,13 @@
+       .file   "cache-sparc.c"
+       .section        ".text"
+       .align 4
+       .global __TR_clear_cache_4
+       .type   __TR_clear_cache_4, #function
+       .proc   020
+__TR_clear_cache_4:
+       iflush %o0+0;iflush %o0+8;iflush %o0+16;iflush %o0+24
+       jmp     %o7+8
+        nop
+       .size   __TR_clear_cache_4, .-__TR_clear_cache_4
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        ".note.GNU-stack"
diff --git a/trampoline/cache-sparc64-macro.S b/trampoline/cache-sparc64-macro.S
new file mode 100644 (file)
index 0000000..5e5da94
--- /dev/null
@@ -0,0 +1,14 @@
+#include "asm-sparc.h"
+       .section        ".text"
+       .align 4
+       .global C(__TR_clear_cache_4)
+       DECLARE_FUNCTION(__TR_clear_cache_4)
+       .proc   020
+FUNBEGIN(__TR_clear_cache_4)
+       iflush %o0+0;iflush %o0+8;iflush %o0+16;iflush %o0+24
+       jmp     %o7+8
+        nop
+       FUNEND(__TR_clear_cache_4)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/trampoline/cache.c b/trampoline/cache.c
new file mode 100644 (file)
index 0000000..7d34af9
--- /dev/null
@@ -0,0 +1,143 @@
+/* This file is derived from gcc-2.6.3/libgcc2.c, section L_clear_cache */
+
+/* Copyright (C) 1989-2017 Free Software Foundation, Inc.
+
+   This program is free software: you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 2 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
+
+
+/* Clear part of an instruction cache. */
+
+/* Our emphasis here is _not_ to clear as few cache lines as possible
+ * or with as few machine instructions as possible, but to do it _right_.
+ */
+
+
+
+/* This code is apparently untested!! */
+
+/* This is from Andreas Stolcke <stolcke@ICSI.Berkeley.EDU>. */
+#if defined(__mips__) || defined(__mips64__)
+#include <sys/cachectl.h>
+#define CLEAR_INSN_CACHE(BEG, END)   \
+   cacheflush (BEG, END - BEG, BCACHE)
+#endif
+
+void
+__TR_clear_cache (beg, end)
+     char *beg, *end;
+{
+#ifdef CLEAR_INSN_CACHE 
+  CLEAR_INSN_CACHE (beg, end);
+#else
+#ifdef INSN_CACHE_SIZE /* This is actually dead code!! */
+#define INSN_CACHE_PLANE_SIZE (INSN_CACHE_SIZE / INSN_CACHE_DEPTH)
+  static char array[INSN_CACHE_SIZE + INSN_CACHE_PLANE_SIZE + INSN_CACHE_LINE_WIDTH];
+  static int initialized = 0;
+  int offset;
+  void *start_addr;
+  void *end_addr;
+  typedef (*function_ptr) ();
+
+#if (INSN_CACHE_SIZE / INSN_CACHE_LINE_WIDTH) < 16
+  /* It's cheaper to clear the whole cache.
+     Put in a series of jump instructions so that calling the beginning
+     of the cache will clear the whole thing.  */
+
+  if (! initialized)
+    {
+      int ptr = (((int) array + INSN_CACHE_LINE_WIDTH - 1)
+                & -INSN_CACHE_LINE_WIDTH);
+      int end_ptr = ptr + INSN_CACHE_SIZE;
+
+      while (ptr < end_ptr)
+       {
+         *(INSTRUCTION_TYPE *)ptr
+           = JUMP_AHEAD_INSTRUCTION + INSN_CACHE_LINE_WIDTH;
+         ptr += INSN_CACHE_LINE_WIDTH;
+       }
+      *(INSTRUCTION_TYPE *)(ptr - INSN_CACHE_LINE_WIDTH) = RETURN_INSTRUCTION;
+
+      initialized = 1;
+    }
+
+  /* Call the beginning of the sequence.  */
+  (((function_ptr) (((int) array + INSN_CACHE_LINE_WIDTH - 1)
+                   & -INSN_CACHE_LINE_WIDTH))
+   ());
+
+#else /* Cache is large.  */
+
+  if (! initialized)
+    {
+      int ptr = (((int) array + INSN_CACHE_LINE_WIDTH - 1)
+                & -INSN_CACHE_LINE_WIDTH);
+
+      while (ptr < (int) array + sizeof array)
+       {
+         *(INSTRUCTION_TYPE *)ptr = RETURN_INSTRUCTION;
+         ptr += INSN_CACHE_LINE_WIDTH;
+       }
+
+      initialized = 1;
+    }
+
+  /* Find the location in array that occupies the same cache line as BEG.  */
+
+  offset = ((int) beg & -INSN_CACHE_LINE_WIDTH) & (INSN_CACHE_PLANE_SIZE - 1);
+  start_addr = (((int) (array + INSN_CACHE_PLANE_SIZE - 1)
+                & -INSN_CACHE_PLANE_SIZE)
+               + offset);
+
+  /* Compute the cache alignment of the place to stop clearing.  */
+#if 0  /* This is not needed for gcc's purposes.  */
+  /* If the block to clear is bigger than a cache plane,
+     we clear the entire cache, and OFFSET is already correct.  */ 
+  if (end < beg + INSN_CACHE_PLANE_SIZE)
+#endif
+    offset = (((int) (end + INSN_CACHE_LINE_WIDTH - 1)
+              & -INSN_CACHE_LINE_WIDTH)
+             & (INSN_CACHE_PLANE_SIZE - 1));
+
+#if INSN_CACHE_DEPTH > 1
+  end_addr = (start_addr & -INSN_CACHE_PLANE_SIZE) + offset;
+  if (end_addr <= start_addr)
+    end_addr += INSN_CACHE_PLANE_SIZE;
+
+  for (plane = 0; plane < INSN_CACHE_DEPTH; plane++)
+    {
+      int addr = start_addr + plane * INSN_CACHE_PLANE_SIZE;
+      int stop = end_addr + plane * INSN_CACHE_PLANE_SIZE;
+
+      while (addr != stop)
+       {
+         /* Call the return instruction at ADDR.  */
+         ((function_ptr) addr) ();
+
+         addr += INSN_CACHE_LINE_WIDTH;
+       }
+    }
+#else /* just one plane */
+  do
+    {
+      /* Call the return instruction at START_ADDR.  */
+      ((function_ptr) start_addr) ();
+
+      start_addr += INSN_CACHE_LINE_WIDTH;
+    }
+  while ((start_addr % INSN_CACHE_SIZE) != offset);
+#endif /* just one plane */
+#endif /* Cache is large */
+#endif /* Cache exists */
+#endif /* CLEAR_INSN_CACHE */
+}
diff --git a/trampoline/test1.c b/trampoline/test1.c
new file mode 100644 (file)
index 0000000..d447ac3
--- /dev/null
@@ -0,0 +1,45 @@
+/* Trampoline test */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "trampoline.h"
+
+#define MAGIC1  0x9db9af42
+#define MAGIC2  0x614a13c9
+
+static int magic = MAGIC1;
+
+void* function_data;
+
+int f (int x)
+{ return *(int*)function_data + x; }
+
+int main ()
+{
+  trampoline_function_t cf = alloc_trampoline((trampoline_function_t)&f, &function_data, &magic);
+  /* calling cf shall set  function_data = &magic  and then call f(x),
+   * thus returning  magic + x.
+   */
+  if (((*cf)(MAGIC2) == MAGIC1+MAGIC2) && (function_data == &magic))
+    { free_trampoline(cf); printf("Works, test1 passed.\n"); exit(0); }
+  else
+    { printf("Doesn't work!\n"); exit(1); }
+}
diff --git a/trampoline/test2-c++.cc b/trampoline/test2-c++.cc
new file mode 100644 (file)
index 0000000..6c7dfff
--- /dev/null
@@ -0,0 +1,18 @@
+/*
+ * Copyright 2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "test2.c"
diff --git a/trampoline/test2.c b/trampoline/test2.c
new file mode 100644 (file)
index 0000000..2ee55da
--- /dev/null
@@ -0,0 +1,51 @@
+/* Trampoline accessor test */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "trampoline.h"
+
+int f (int x)
+{ return x; }
+
+void* variable;
+
+static int data;
+
+int main ()
+{
+  trampoline_function_t cf = alloc_trampoline((trampoline_function_t)&f, &variable, &data);
+  if (is_trampoline((void*)&f))
+    { printf("is_trampoline(&f) returns true!\n"); exit(1); }
+#if !defined(__cplusplus)
+  if (is_trampoline((void*)&main))
+    { printf("is_trampoline(&main) returns true!\n"); exit(1); }
+#endif
+  if (!is_trampoline((void*)cf))
+    { printf("is_trampoline() returns false!\n"); exit(1); }
+  if (trampoline_address(cf) != (trampoline_function_t)&f)
+    { printf("trampoline_address() doesn't work!\n"); exit(1); }
+  if (trampoline_variable(cf) != &variable)
+    { printf("trampoline_variable() doesn't work!\n"); exit(1); }
+  if (trampoline_data(cf) != &data)
+    { printf("trampoline_data() doesn't work!\n"); exit(1); }
+  printf("test2 passed.\n");
+  exit(0);
+}
diff --git a/trampoline/tramp-hppa-macro.S b/trampoline/tramp-hppa-macro.S
new file mode 100644 (file)
index 0000000..4cc60ad
--- /dev/null
@@ -0,0 +1,53 @@
+; Trampoline for hppa CPU
+
+; Copyright 1997-2017 Bruno Haible <bruno@clisp.org>
+;
+; This program is free software: you can redistribute it and/or modify
+; it under the terms of the GNU General Public License as published by
+; the Free Software Foundation; either version 2 of the License, or
+; (at your option) any later version.
+;
+; This program is distributed in the hope that it will be useful,
+; but WITHOUT ANY WARRANTY; without even the implied warranty of
+; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+; GNU General Public License for more details.
+;
+; You should have received a copy of the GNU General Public License
+; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+; Available registers: %r1, %r19, %r20, %r21, %r22, %r29, %r31.
+
+       .code
+       .IMPORT $global$,DATA
+       .IMPORT $$dyncall,MILLICODE
+       .code
+
+       .align 4
+       .EXPORT tramp,ENTRY,PRIV_LEV=3,ARGW0=GR,ARGW1=GR
+       .label tramp
+       .PROC
+       .CALLINFO FRAME=0,NO_CALLS
+       .ENTRY
+; The closure pointer is already in register %r19.
+; Move <variable> into register %r20.
+       ldw 0(0,%r19),%r20
+; Move <data> into register %r22
+       ldw 4(0,%r19),%r22
+; Move <address> into register %r21.
+       ldw 8(0,%r19),%r21
+; Store <data> into <variable>.
+       stw %r22,0(0,%r20)
+; Jump to %r21.
+       bb,>=,n %r21,30,tramp_2
+       depi 0,31,2,%r21
+       ldw 4(0,%r21),%r19
+       ldw 0(0,%r21),%r21
+       .label tramp_2
+       ldsid (0,%r21),%r1
+       mtsp %r1,%sr0
+       be,n 0(%sr0,%r21)
+       nop
+       .EXIT
+       .PROCEND
+
+#include "noexecstack.h"
diff --git a/trampoline/tramp-hppa64-macro.S b/trampoline/tramp-hppa64-macro.S
new file mode 100644 (file)
index 0000000..2f7b8af
--- /dev/null
@@ -0,0 +1,50 @@
+; Trampoline for hppa64 CPU
+
+; Copyright 2017 Bruno Haible <bruno@clisp.org>
+;
+; This program is free software: you can redistribute it and/or modify
+; it under the terms of the GNU General Public License as published by
+; the Free Software Foundation; either version 2 of the License, or
+; (at your option) any later version.
+;
+; This program is distributed in the hope that it will be useful,
+; but WITHOUT ANY WARRANTY; without even the implied warranty of
+; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+; GNU General Public License for more details.
+;
+; You should have received a copy of the GNU General Public License
+; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+; Available registers: %r1, %r27, %r31.
+; %r27 has a fixed meaning at function calls: pic_base (a.k.a. gp or dp).
+; %r31 has a fixed meaning as millicode return pointer (mrp).
+
+#include "asm-hppa64.h"
+
+       .LEVEL 2.0w
+       TEXT1()
+       TEXT2()
+       .align 8
+       GLOBL(tramp)
+       DECLARE_FUNCTION(tramp)
+DEF(tramp)
+       .PROC
+       .CALLINFO FRAME=0,NO_CALLS
+       .ENTRY
+; The closure pointer is already in register %r27.
+; Move <data> into <variable>.
+       ldd 0(%r27),%r31                ; get <variable>
+       ldd 8(%r27),%r1                 ; get <data>
+       std %r1,0(%r31)                 ; store <data> in <variable>
+; Jump to <function>.
+       ldd 16(%r27),%r27               ; get <function>
+       ldd 16(%r27),%r1
+       ldd 24(%r27),%r27
+       bve (%r1)                       ; jump to <function>
+        nop
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(tramp)
+
+#include "noexecstack.h"
diff --git a/trampoline/tramp-ia64-macro.S b/trampoline/tramp-ia64-macro.S
new file mode 100644 (file)
index 0000000..1b694b8
--- /dev/null
@@ -0,0 +1,46 @@
+/* Trampoline for ia64 CPU */
+
+/*
+ * Copyright 2001-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/* Available registers: r14 ... r31, r9 ... r11, r2 ... r3. */
+
+       .text
+       .align 16
+       .global tramp#
+       .proc tramp#
+tramp:
+       /* The closure pointer is already in register r1. */
+       ld8 r14 = [r1]          /* Move <address> into register r14. */
+       adds r15 = 8, r1
+       adds r16 = 16, r1
+       ;;
+       /* Jump to r14. */
+       ld8 r18 = [r14]
+       ld8 r15 = [r15]         /* Move <variable> into register r15. */
+       adds r17 = 8, r14
+       ;;
+       ld8 r16 = [r16]         /* Move <data> into register r16. */
+       ld8 r1 = [r17]
+       mov b6 = r18
+       ;;
+       st8 [r15] = r16         /* Store <data> into <variable>. */
+       br b6
+       ;;
+       .endp tramp#
+
+#include "noexecstack.h"
diff --git a/trampoline/tramp-powerpc-aix.S b/trampoline/tramp-powerpc-aix.S
new file mode 100644 (file)
index 0000000..a36634b
--- /dev/null
@@ -0,0 +1,51 @@
+/* Trampoline for powerpc CPU with AIX calling convention */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/* Available registers: r0, r11, r12. */
+/* However, r0 is special in that it cannot be used as a base register. */
+
+       .globl tramp
+       .globl .tramp
+.csect tramp[DS]
+tramp:
+       .long .tramp, 0, 0
+.csect .text[PR]
+.tramp:
+/* Move <data> into <variable> */
+       lwz 11,0(2)     /* get <variable> */
+       lwz 12,4(2)     /* get <data> */
+       stw 12,0(11)
+/* Get <function> */
+       lwz 12,8(2)
+/*
+ * gcc-2.6.3 source says:
+ * A function pointer is a pointer to a data area whose first word contains
+ * the actual address of the function, whose second word contains a pointer
+ * to its TOC, and whose third word contains a value to place in the static
+ * chain register (r11).
+ */
+       lwz 11,8(12)    /* pass static chain in r11 */
+       lwz 2,4(12)     /* pass TOC in r2 */
+       lwz 0,0(12)     /* actual code address */
+       mtctr 0
+       bctr
+
+_section_.text:
+.csect .data[RW]
+       .long _section_.text
diff --git a/trampoline/tramp-powerpc64-aix.S b/trampoline/tramp-powerpc64-aix.S
new file mode 100644 (file)
index 0000000..7fd0f66
--- /dev/null
@@ -0,0 +1,57 @@
+/* Trampoline for powerpc64 CPU with AIX calling convention */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/* Available registers: r0, r11, r12. */
+/* However, r0 is special in that it cannot be used as a base register. */
+
+       .machine "ppc64"
+
+#ifdef _AIX
+       .rename H.4.NO_SYMBOL{PR},""
+       .lglobl H.4.NO_SYMBOL{PR}
+
+       .globl .tramp
+       .csect  H.4.NO_SYMBOL{PR},7
+#else
+       .globl tramp
+       .globl .tramp
+tramp:
+       .quad .tramp
+#endif
+.tramp:
+/* Move <data> into <variable> */
+       ld 11,0(2)      /* get <variable> */
+       ld 12,8(2)      /* get <data> */
+       std 12,0(11)
+/* Get <function> */
+       ld 12,16(2)
+/*
+ * gcc-2.6.3 source says:
+ * A function pointer is a pointer to a data area whose first word contains
+ * the actual address of the function, whose second word contains a pointer
+ * to its TOC, and whose third word contains a value to place in the static
+ * chain register (r11).
+ */
+       ld 11,16(12)    /* pass static chain in r11 */
+       ld 2,8(12)      /* pass TOC in r2 */
+       ld 0,0(12)      /* actual code address */
+       mtctr 0
+       bctr
+
+#include "noexecstack.h"
diff --git a/trampoline/trampoline.3 b/trampoline/trampoline.3
new file mode 100644 (file)
index 0000000..09d33ac
--- /dev/null
@@ -0,0 +1,124 @@
+.\" Copyright (C) 1995-2017 Bruno Haible
+.\"
+.\" This manual is free documentation.  It is dually licensed under the
+.\" GNU FDL and the GNU GPL.  This means that you can redistribute this
+.\" manual under either of these two licenses, at your choice.
+.\"
+.\" This manual is covered by the GNU FDL.  Permission is granted to copy,
+.\" distribute and/or modify this document under the terms of the
+.\" GNU Free Documentation License (FDL), either version 1.2 of the
+.\" License, or (at your option) any later version published by the
+.\" Free Software Foundation (FSF); with no Invariant Sections, with no
+.\" Front-Cover Text, and with no Back-Cover Texts.
+.\" A copy of the license is at <https://www.gnu.org/licenses/old-licenses/fdl-1.2>.
+.\"
+.\" This manual is covered by the GNU GPL.  You can redistribute it and/or
+.\" modify it under the terms of the GNU General Public License (GPL), either
+.\" version 2 of the License, or (at your option) any later version published
+.\" by the Free Software Foundation (FSF).
+.\" A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
+.\"
+.TH TRAMPOLINE 3 "1 January 2017"
+.SH NAME
+trampoline \- closures as first-class C functions
+.SH SYNOPSIS
+.B #include <trampoline.h>
+.LP
+.B function = alloc_trampoline(address, variable, data);
+.LP
+.B free_trampoline(function);
+.LP
+.nf
+.B is_trampoline(function)
+.B trampoline_address(function)
+.B trampoline_variable(function)
+.B trampoline_data(function)
+.fi
+.SH DESCRIPTION
+.LP
+These functions implement
+.I closures
+as first-class C functions.
+A closure consists of a regular C function and a piece of data
+which gets passed to the C function when the closure is called.
+
+Closures as
+.I first-class C functions
+means that they fit into a function
+pointer and can be called exactly like any other C function.
+.IB function " = alloc_trampoline(" address ", " variable ", " data ")"
+allocates a closure. When
+.I function
+gets called, it stores
+.I data
+in the variable
+.I variable
+and calls the C function at
+.IR address .
+The function at
+.I address
+is responsible for fetching
+.I data
+out of
+.I variable
+immediately, before execution of any other function call.
+
+This is much like
+.BR gcc "'s"
+local functions, except that the GNU C local functions have dynamic extent
+(i.e. are deallocated when the creating function returns), while
+.I trampoline
+provides functions with indefinite extent:
+.I function
+is only deallocated when
+.BI free_trampoline( function )
+is called.
+
+.BI "is_trampoline(" function ")"
+checks whether the C function
+.I function
+was produced by a call to
+.IR alloc_trampoline .
+If this returns true, the arguments given to
+.I alloc_trampoline
+can be retrieved:
+.RS 4
+.LP
+.BI "trampoline_address(" function ")"
+returns
+.IR address ,
+.LP
+.BI "trampoline_variable(" function ")"
+returns
+.IR variable ,
+.LP
+.BI "trampoline_data(" function ")"
+returns
+.IR data .
+.RE
+
+.SH SEE ALSO
+.BR gcc (1),
+.BR stdarg (3),
+.BR callback (3)
+
+.SH BUGS
+Passing the data through a global variable is not reentrant. Don't call
+trampoline functions from within signal handlers. This is fixed in the
+.BR callback (3)
+package.
+
+.SH PORTING
+The way
+.B gcc
+builds local functions is described in the gcc source, file
+.RI gcc-2.6.3/config/ cpu / cpu .h.
+
+.SH AUTHOR
+
+Bruno Haible <bruno@clisp.org>
+
+.SH ACKNOWLEDGEMENTS
+
+Many ideas were cribbed from the gcc source.
+
diff --git a/trampoline/trampoline.c b/trampoline/trampoline.c
new file mode 100644 (file)
index 0000000..79f2c92
--- /dev/null
@@ -0,0 +1,1741 @@
+/* Trampoline construction */
+
+/*
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+
+#include "config.h"
+#include "trampoline.h"
+
+#if defined(__hppa__) && !defined(__hppa64__)
+#if 0
+#define __hppaold__  /* Old trampoline, real machine code. */
+#else
+#define __hppanew__  /* New trampoline, just a closure. */
+#endif
+#endif
+#if defined(__hppa64__)
+#if 0
+#define __hppa64old__  /* Old trampoline, real machine code. */
+#else
+#define __hppa64new__  /* New trampoline, just a closure. */
+#endif
+#endif
+#if defined(__powerpc__) && !defined(__powerpc64__)
+#if !defined(_AIX)
+#define __powerpcsysv4__  /* SysV.4 ABI, real machine code. */
+#else
+#define __powerpcaix__  /* AIX ABI, just a closure. */
+#endif
+#endif
+#if defined(__powerpc64__) && !defined(__powerpc64_elfv2__)
+#define __powerpc64aix__  /* AIX ABI, just a closure. */
+#endif
+#if defined(__hppanew__) || defined(__hppa64new__)
+/*
+ * A function pointer is a biased pointer to a data area whose first word
+ * (hppa) or third word (hppa64) contains the actual address of the function.
+ */
+extern void tramp (); /* trampoline prototype */
+/* We don't need to take any special measures to make the code executable
+ * since the actual instructions are in the text segment.
+ */
+#ifndef CODE_EXECUTABLE
+#define CODE_EXECUTABLE
+#endif
+#endif
+#if defined(__powerpcaix__) || defined(__powerpc64aix__) || defined(__ia64__)
+/*
+ * A function pointer is a pointer to a data area whose first word contains
+ * the actual address of the function.
+ */
+extern void (*tramp) (); /* trampoline prototype */
+/* We don't need to take any special measures to make the code executable
+ * since the actual instructions are in the text segment.
+ */
+#ifndef CODE_EXECUTABLE
+#define CODE_EXECUTABLE
+#endif
+#endif
+
+#ifndef CODE_EXECUTABLE
+  /* How do we make the trampoline's code executable? */
+  #if defined(HAVE_MACH_VM) || defined(HAVE_WORKING_MPROTECT)
+    #if HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC > 0
+      /* mprotect() [or equivalent] the malloc'ed area. */
+      #define EXECUTABLE_VIA_MALLOC_THEN_MPROTECT
+    #elif HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC > 0
+      /* mprotect() [or equivalent] the mmap'ed area. */
+      #define EXECUTABLE_VIA_MMAP_THEN_MPROTECT
+    #elif defined(HAVE_MMAP_SHARED_CAN_EXEC)
+      #define EXECUTABLE_VIA_MMAP_FILE_SHARED
+    #else
+      #error "Don't know how to make memory pages executable."
+    #endif
+  #else
+    #ifdef HAVE_MMAP
+      /* Use an mmap'ed page. */
+      #define EXECUTABLE_VIA_MMAP
+    #else
+      #ifdef HAVE_SHM
+        /* Use an shmat'ed page. */
+        #define EXECUTABLE_VIA_SHM
+      #else
+        #if defined(_WIN32) && ! defined(__CYGWIN__) /* native Windows */
+          #define EXECUTABLE_VIA_VIRTUALALLOC
+        #else
+          ??
+        #endif
+      #endif
+    #endif
+  #endif
+#endif
+
+#include <stdio.h> /* declares fprintf() */
+
+#include <sys/types.h>
+#include <stdlib.h> /* declares abort(), malloc(), free() */
+#ifdef HAVE_UNISTD_H
+#include <unistd.h>
+#endif
+
+/* Define intptr_t, uintptr_t. */
+#include <stdint.h>
+
+/* Declare getpagesize(). */
+#ifdef HAVE_GETPAGESIZE
+#ifdef __cplusplus
+extern "C" RETGETPAGESIZETYPE getpagesize (void);
+#else
+extern RETGETPAGESIZETYPE getpagesize (void);
+#endif
+#else
+#ifdef HAVE_SYS_PARAM_H
+#include <sys/param.h>
+#else
+/* Not Unix, e.g. mingw32 */
+#define PAGESIZE 4096
+#endif
+#define getpagesize() PAGESIZE
+#endif
+
+/* Declare mprotect() or equivalent. */
+#if defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) || defined(EXECUTABLE_VIA_MMAP_THEN_MPROTECT)
+#ifdef HAVE_MACH_VM
+#include <sys/resource.h>
+#include <mach/mach_interface.h>
+#ifdef __osf__
+#include <mach_init.h>
+#endif
+#include <mach/machine/vm_param.h>
+#else
+#include <sys/types.h>
+#include <sys/mman.h>
+#endif
+#endif
+
+/* Declare mmap(). */
+#if defined(EXECUTABLE_VIA_MMAP) || defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+#include <sys/types.h>
+#include <sys/mman.h>
+#if !defined(PROT_EXEC) && defined(PROT_EXECUTE) /* Irix 4.0.5 needs this */
+#define PROT_EXEC PROT_EXECUTE
+#endif
+#endif
+
+/* Declare open(). */
+#if defined(EXECUTABLE_VIA_MMAP_DEVZERO) || defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+#include <sys/types.h>
+#include <unistd.h>
+#include <fcntl.h>
+#endif
+
+/* Declare shmget(), shmat(), shmctl(). */
+#ifdef EXECUTABLE_VIA_SHM
+#include <sys/types.h>
+#include <sys/ipc.h>
+#include <sys/shm.h>
+#ifdef HAVE_SYS_SYSMACROS_H
+#include <sys/sysmacros.h>
+#endif
+#endif
+
+/* Declare VirtualAlloc(), GetSystemInfo. */
+#ifdef EXECUTABLE_VIA_VIRTUALALLOC
+#define WIN32_LEAN_AND_MEAN
+#define WIN32_EXTRA_LEAN
+#include <windows.h>
+#endif
+
+/* Some old mmap() implementations require the flag MAP_FILE whenever you pass
+   an fd >= 0. */
+#ifndef MAP_FILE
+#define MAP_FILE 0
+#endif
+/* Some old mmap() implementations require the flag MAP_VARIABLE whenever you
+   pass an addr == NULL. */
+#ifndef MAP_VARIABLE
+#define MAP_VARIABLE 0
+#endif
+
+/* Support for instruction cache flush. */
+#ifdef __i386__
+#if defined(_WIN32) && ! defined(__CYGWIN__) /* native Windows */
+#define WIN32_LEAN_AND_MEAN
+#define WIN32_EXTRA_LEAN
+#include <windows.h>
+#endif
+#endif
+#if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__riscv32__) || defined(__riscv64__)
+#ifdef HAVE_SYS_CACHECTL_H /* IRIX, Linux */
+#include <sys/cachectl.h>
+#else
+#ifdef __OpenBSD__
+#include <machine/sysarch.h>
+#endif
+#endif
+#endif
+/* Inline assembly function for instruction cache flush. */
+#if defined(__sparc__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppaold__) || defined(__hppa64old__) || defined(__powerpcsysv4__) || defined(__powerpc64_elfv2__)
+#if defined(__sparc__) || defined(__sparc64__)
+extern void __TR_clear_cache_4();
+#else
+extern void __TR_clear_cache();
+#endif
+#endif
+
+/* Support for multithread-safe coding. */
+#include "glthread/lock.h"
+
+#if !defined(CODE_EXECUTABLE) && defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+/* Opens a file descriptor and attempts to make it non-inheritable. */
+static int open_noinherit (const char *filename, int flags, int mode)
+{
+# if O_CLOEXEC
+  return open (filename, flags | O_CLOEXEC, mode);
+# else
+  int fd = open (filename, flags, mode);
+#  ifdef F_SETFD
+  if (fd >= 0)
+    {
+      int flags = fcntl (fd, F_GETFD, 0);
+      if (flags >= 0)
+        fcntl (fd, F_SETFD, flags | FD_CLOEXEC);
+    }
+#  endif
+  return fd;
+# endif
+}
+#endif
+
+/* Length and alignment of trampoline */
+#ifdef __i386__
+#define TRAMP_LENGTH 15
+#define TRAMP_ALIGN 16  /* 4 for a i386, 16 for a i486 */
+#endif
+#ifdef __m68k__
+#define TRAMP_LENGTH 18
+#define TRAMP_ALIGN 16
+#endif
+#if defined(__mipsold__) && !defined(__mipsn32__)
+#define TRAMP_LENGTH 32
+#define TRAMP_ALIGN 4
+#endif
+#if (defined(__mips__) || defined(__mipsn32__)) && !defined(__mips64__)
+#define TRAMP_LENGTH 36
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __mips64old__
+#define TRAMP_LENGTH 84
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __mips64__
+#define TRAMP_LENGTH 48
+#define TRAMP_ALIGN 8
+#endif
+#if defined(__sparc__) && !defined(__sparc64__)
+#define TRAMP_LENGTH 28
+#define TRAMP_ALIGN 16
+#endif
+#ifdef __sparc64__
+#define TRAMP_LENGTH 48
+#define TRAMP_ALIGN 16
+#endif
+#ifdef __alpha__
+#define TRAMP_LENGTH 48
+#define TRAMP_ALIGN 8
+#endif
+#ifdef __hppaold__
+#define TRAMP_LENGTH 56
+#define TRAMP_ALIGN 16
+#endif
+#ifdef __hppanew__
+#define TRAMP_LENGTH 20
+#define TRAMP_ALIGN 16
+#define TRAMP_BIAS 2
+#endif
+#ifdef __hppa64old__
+#define TRAMP_LENGTH 96
+#define TRAMP_ALIGN 8
+#define TRAMP_BIAS 64
+#endif
+#ifdef __hppa64new__
+#define TRAMP_LENGTH 56
+#define TRAMP_ALIGN 8
+#endif
+#if defined(__arm__) || defined(__armhf__)
+#define TRAMP_LENGTH 36
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __arm64__
+#define TRAMP_LENGTH 48
+#define TRAMP_ALIGN 8
+#endif
+#ifdef __powerpcsysv4__
+#define TRAMP_LENGTH 36
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __powerpcaix__
+#define TRAMP_LENGTH 24
+#define TRAMP_ALIGN 4
+#endif
+#ifdef __powerpc64_elfv2__
+#define TRAMP_LENGTH 48
+#define TRAMP_ALIGN 8
+#endif
+#ifdef __powerpc64aix__
+#define TRAMP_LENGTH 48
+#define TRAMP_ALIGN 8
+#endif
+#ifdef __ia64__
+#define TRAMP_LENGTH 40
+#define TRAMP_ALIGN 16
+#endif
+#ifdef __x86_64__
+#ifdef __x86_64_x32__
+#define TRAMP_LENGTH 18
+#define TRAMP_ALIGN 4
+#else
+#define TRAMP_LENGTH 32
+#define TRAMP_ALIGN 16
+#endif
+#endif
+#if defined(__s390__) && !defined(__s390x__)
+#define TRAMP_LENGTH 40
+#define TRAMP_ALIGN 4
+#endif
+#if defined(__s390x__)
+#define TRAMP_LENGTH 64
+#define TRAMP_ALIGN 8
+#endif
+#if defined(__riscv32__)
+#define TRAMP_LENGTH 36
+#define TRAMP_ALIGN 4
+#endif
+#if defined(__riscv64__)
+#define TRAMP_LENGTH 48
+#define TRAMP_ALIGN 8
+#endif
+
+#ifndef TRAMP_BIAS
+#define TRAMP_BIAS 0
+#endif
+
+#if !defined(CODE_EXECUTABLE)
+static long pagesize = 0;
+#endif
+
+#if !defined(CODE_EXECUTABLE) && (defined(EXECUTABLE_VIA_MMAP_DEVZERO) || defined(EXECUTABLE_VIA_MMAP_FILE_SHARED))
+
+/* Variables needed for obtaining memory pages via mmap(). */
+#if defined(EXECUTABLE_VIA_MMAP_DEVZERO)
+static int zero_fd;
+#endif
+#if defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+static int file_fd;
+static long file_length;
+#endif
+
+/* Initialization of these variables. */
+static void for_mmap_init (void)
+{
+#if defined(EXECUTABLE_VIA_MMAP_DEVZERO)
+  zero_fd = open("/dev/zero",O_RDONLY,0644);
+  if (zero_fd < 0)
+    { fprintf(stderr,"trampoline: Cannot open /dev/zero!\n"); abort(); }
+#endif
+#if defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+  {
+    char filename[100];
+    sprintf(filename, "%s/trampdata-%d-%ld", "/tmp", getpid (), random ());
+    file_fd = open_noinherit (filename, O_CREAT | O_RDWR | O_TRUNC, 0700);
+    if (file_fd < 0)
+      { fprintf(stderr,"trampoline: Cannot open %s!\n",filename); abort(); }
+    /* Remove the file from the file system as soon as possible, to make
+       sure there is no leftover after this process terminates or crashes. */
+    unlink(filename);
+  }
+  file_length = 0;
+#endif
+}
+
+/* Once-only initializer for these variables. */
+gl_once_define(static, for_mmap_once)
+
+#endif
+
+#if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT)
+/* AIX doesn't support mprotect() in malloc'ed memory. Must get pages of
+ * memory with execute permission via mmap(). Then keep a free list of
+ * free trampolines.
+ */
+static char* freelist = NULL;
+/* Lock that protects the freelist from simultaneous access from multiple
+   threads. */
+gl_lock_define_initialized(static, freelist_lock)
+#endif
+
+trampoline_function_t alloc_trampoline (trampoline_function_t address, void** variable, void* data)
+{
+  char* function;
+  char* function_x;
+
+#if !defined(CODE_EXECUTABLE)
+  /* First, get the page size once and for all. */
+  if (!pagesize)
+    {
+      /* Simultaneous execution of this initialization in multiple threads
+         is OK. */
+#if defined(EXECUTABLE_VIA_VIRTUALALLOC)
+      /* GetSystemInfo
+         <https://msdn.microsoft.com/en-us/library/ms724381.aspx>
+         <https://msdn.microsoft.com/en-us/library/ms724958.aspx> */
+      SYSTEM_INFO info;
+      GetSystemInfo(&info);
+      pagesize = info.dwPageSize;
+#elif defined(HAVE_MACH_VM)
+      pagesize = vm_page_size;
+#else
+      pagesize = getpagesize();
+#endif
+#if defined(EXECUTABLE_VIA_MMAP_DEVZERO) || defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+      /* Use a once-only initializer here, since simultaneous execution of
+         for_mmap_init() in multiple threads must be avoided. */
+      gl_once (for_mmap_once, for_mmap_init);
+#endif
+    }
+#endif
+
+  /* 1. Allocate room */
+
+#if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT)
+  gl_lock_lock(freelist_lock);
+  if (freelist == NULL)
+    { /* Get a new page. */
+      char* page;
+      char* page_end;
+#ifdef EXECUTABLE_VIA_VIRTUALALLOC
+      /* VirtualAlloc
+         <https://msdn.microsoft.com/en-us/library/aa366887.aspx>
+         <https://msdn.microsoft.com/en-us/library/aa366786.aspx> */
+      page = VirtualAlloc(NULL,pagesize,MEM_COMMIT,PAGE_EXECUTE_READWRITE);
+      if (page == NULL)
+        { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); }
+      page_end = page + pagesize;
+#else
+#ifdef EXECUTABLE_VIA_MMAP_FILE_SHARED
+      char* page_x;
+      /* Extend the file by one page. */
+      long new_file_length = file_length + pagesize;
+      if (ftruncate(file_fd,new_file_length) < 0)
+        { fprintf(stderr,"trampoline: Cannot extend backing file!\n"); abort(); }
+      /* Create separate mappings for writing and for executing. */
+      page = (char*)mmap(NULL,pagesize,PROT_READ|PROT_WRITE,MAP_SHARED,file_fd,file_length);
+      page_x = (char*)mmap(NULL,pagesize,PROT_READ|PROT_EXEC,MAP_SHARED,file_fd,file_length);
+      if (page == (char*)(-1) || page_x == (char*)(-1))
+        { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); }
+      file_length = new_file_length;
+      page_end = page + pagesize;
+      /* Link the two pages together. */
+      ((intptr_t*)page)[0] = page_x - page;
+      page = (char*)(((uintptr_t)page + sizeof(intptr_t) + TRAMP_ALIGN-1) & -TRAMP_ALIGN);
+#else
+#ifdef EXECUTABLE_VIA_MMAP_THEN_MPROTECT
+#ifdef HAVE_MMAP_ANONYMOUS
+      /* Use mmap with the MAP_ANONYMOUS or MAP_ANON flag. */
+      page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0);
+#else
+      /* Use mmap on /dev/zero. */
+      page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_FILE | MAP_VARIABLE, zero_fd, 0);
+#endif
+#endif
+#ifdef EXECUTABLE_VIA_MMAP
+#ifdef HAVE_MMAP_ANONYMOUS
+      /* Use mmap with the MAP_ANONYMOUS or MAP_ANON flag. */
+      page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE | PROT_EXEC, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0);
+#else
+      /* Use mmap on /dev/zero. */
+      page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE | PROT_EXEC, MAP_PRIVATE | MAP_FILE | MAP_VARIABLE, zero_fd, 0);
+#endif
+#endif
+#ifdef EXECUTABLE_VIA_SHM
+      int shmid = shmget(IPC_PRIVATE, pagesize, 0700|IPC_CREAT);
+      if (shmid<0)
+        { page = (char*)(-1); }
+      else
+        { page = shmat(shmid, 0, 0); shmctl(shmid, IPC_RMID, 0); }
+#endif
+      if (page == (char*)(-1))
+        { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); }
+      page_end = page + pagesize;
+#endif
+#endif
+      /* Fill it with free trampolines. */
+      { char** last = &freelist;
+        while (page+TRAMP_LENGTH <= page_end)
+          { *last = page; last = (char**)page;
+            page = (char*)(((uintptr_t)page + TRAMP_LENGTH + TRAMP_ALIGN-1) & -TRAMP_ALIGN);
+          }
+        *last = NULL;
+    } }
+  function = freelist; freelist = *(char**)freelist;
+  gl_lock_unlock(freelist_lock);
+#else
+  { char* room = (char*) malloc(sizeof(void*) + TRAMP_LENGTH + TRAMP_ALIGN-1);
+    if (!room)
+      { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); }
+    function = (char*)(((uintptr_t)room + sizeof(void*) + TRAMP_ALIGN-1) & -TRAMP_ALIGN);
+    ((char**)function)[-1] = room; /* backpointer for free_trampoline() */
+  }
+#endif
+
+#if !defined(CODE_EXECUTABLE) && defined(EXECUTABLE_VIA_MMAP_FILE_SHARED)
+  /* Find the executable address corresponding to the writable address. */
+  { uintptr_t page = (uintptr_t) function & -(intptr_t)pagesize;
+    function_x = function + ((intptr_t*)page)[0];
+  }
+#else
+  function_x = function;
+#endif
+
+  /* 2. Fill out the trampoline */
+#ifdef __i386__
+  /* function:
+   *    movl $<data>,<variable>                C7 05 <variable> <data>
+   *    jmp <address>                  E9 <address>-<here>
+   * here:
+   */
+  *(short *) (function + 0) = 0x05C7;
+  *(long *)  (function + 2) = (long) variable;
+  *(long *)  (function + 6) = (long) data;
+  *(char *)  (function +10) = 0xE9;
+  *(long *)  (function +11) = (long) address - (long) (function_x + 15);
+#define is_tramp(function)  \
+  *(unsigned short *) (function + 0) == 0x05C7 && \
+  *(unsigned char *)  (function +10) == 0xE9
+#define tramp_address(function)  \
+  *(long *)  (function +11) + (long) (function + 15)
+#define tramp_variable(function)  \
+  *(long *)  (function + 2)
+#define tramp_data(function)  \
+  *(long *)  (function + 6)
+#endif
+#ifdef __m68k__
+  /* function:
+   *    movel #<data>,<variable>       23 FC <data> <variable>
+   *    jmp <address>                  4E F9 <address>
+   *    nop                            4E 71
+   */
+  *(short *) (function + 0) = 0x23FC;
+  *(long *)  (function + 2) = (long) data;
+  *(long *)  (function + 6) = (long) variable;
+  *(short *) (function +10) = 0x4EF9;
+  *(long *)  (function +12) = (long) address;
+  *(short *) (function +16) = 0x4E71;
+#define is_tramp(function)  \
+  *(unsigned short *) (function + 0) == 0x23FC && \
+  *(unsigned short *) (function +10) == 0x4EF9 && \
+  *(unsigned short *) (function +16) == 0x4E71
+#define tramp_address(function)  \
+  *(long *)  (function +12)
+#define tramp_variable(function)  \
+  *(long *)  (function + 6)
+#define tramp_data(function)  \
+  *(long *)  (function + 2)
+#endif
+#if defined(__mipsold__) && !defined(__mipsn32__)
+  /* function:
+   *    li $2,<data>&0xffff0000                3C 02 hi16(<data>)
+   *    ori $2,$2,<data>&0xffff                34 42 lo16(<data>)
+   *    sw $2,<variable>               3C 01 hi16(<variable>)
+   *                                   AC 22 lo16(<variable>)
+   *    li $25,<address>&0xffff0000    3C 19 hi16(<address>)
+   *    ori $25,$25,<address>&0xffff   37 39 lo16(<address>)
+   *    j $25                          03 20 00 08
+   *    nop                            00 00 00 00
+   */
+  /* What about big endian / little endian ?? */
+  *(short *) (function + 0) = 0x3C02;
+  *(short *) (function + 2) = (unsigned long) data >> 16;
+  *(short *) (function + 4) = 0x3442;
+  *(short *) (function + 6) = (unsigned long) data & 0xffff;
+  *(short *) (function + 8) = 0x3C01;
+  *(short *) (function +10) = (unsigned long) variable >> 16;
+  *(short *) (function +12) = 0xAC22;
+  *(short *) (function +14) = (unsigned long) variable & 0xffff;
+  *(short *) (function +16) = 0x3C19;
+  *(short *) (function +18) = (unsigned long) address >> 16;
+  *(short *) (function +20) = 0x3739;
+  *(short *) (function +22) = (unsigned long) address & 0xffff;
+  *(long *)  (function +24) = 0x03200008;
+  *(long *)  (function +28) = 0x00000000;
+#define is_tramp(function)  \
+  *(unsigned short *) (function + 0) == 0x3C02 && \
+  *(unsigned short *) (function + 4) == 0x3442 && \
+  *(unsigned short *) (function + 8) == 0x3C01 && \
+  *(unsigned short *) (function +12) == 0xAC22 && \
+  *(unsigned short *) (function +16) == 0x3C19 && \
+  *(unsigned short *) (function +20) == 0x3739 && \
+  *(unsigned long *)  (function +24) == 0x03200008 && \
+  *(unsigned long *)  (function +28) == 0x00000000
+#define hilo(hiword,loword)  \
+  (((unsigned long) (hiword) << 16) | (unsigned long) (loword))
+#define tramp_address(function)  \
+  hilo(*(unsigned short *) (function +18), *(unsigned short *) (function +22))
+#define tramp_variable(function)  \
+  hilo(*(unsigned short *) (function +10), *(unsigned short *) (function +14))
+#define tramp_data(function)  \
+  hilo(*(unsigned short *) (function + 2), *(unsigned short *) (function + 6))
+#endif
+#if (defined(__mips__) || defined(__mipsn32__)) && !defined(__mips64__)
+  /* function:
+   *    lw $2,24($25)                  8F 22 00 18
+   *    lw $3,28($25)                  8F 23 00 1C
+   *    sw $3,0($2)                    AC 43 00 00
+   *    lw $25,32($25)                 8F 39 00 20
+   *    j $25                          03 20 00 08
+   *    nop                            00 00 00 00
+   *    .word <variable>               <variable>
+   *    .word <data>                   <data>
+   *    .word <address>                        <address>
+   */
+  *(unsigned int *) (function + 0) = 0x8F220018;
+  *(unsigned int *) (function + 4) = 0x8F23001C;
+  *(unsigned int *) (function + 8) = 0xAC430000;
+  *(unsigned int *) (function +12) = 0x8F390020;
+  *(unsigned int *) (function +16) = 0x03200008;
+  *(unsigned int *) (function +20) = 0x00000000;
+  *(unsigned int *) (function +24) = (unsigned int) variable;
+  *(unsigned int *) (function +28) = (unsigned int) data;
+  *(unsigned int *) (function +32) = (unsigned int) address;
+#define TRAMP_CODE_LENGTH  24
+#define is_tramp(function)  \
+  *(int *)          (function + 0) == 0x8F220018 && \
+  *(int *)          (function + 4) == 0x8F23001C && \
+  *(int *)          (function + 8) == 0xAC430000 && \
+  *(int *)          (function +12) == 0x8F390020 && \
+  *(int *)          (function +16) == 0x03200008 && \
+  *(int *)          (function +20) == 0x00000000
+#define tramp_address(function)  \
+  *(unsigned int *) (function +32)
+#define tramp_variable(function)  \
+  *(unsigned int *) (function +24)
+#define tramp_data(function)  \
+  *(unsigned int *) (function +28)
+#endif
+#ifdef __mips64old__
+  /* function:
+   *    dli $2,<variable>              3C 02 hi16(hi32(<variable>))
+   *                                   34 42 lo16(hi32(<variable>))
+   *                                   00 02 14 38
+   *                                   34 42 hi16(lo32(<variable>))
+   *                                   00 02 14 38
+   *                                   34 42 lo16(lo32(<variable>))
+   *    dli $3,<data>                  3C 03 hi16(hi32(<data>))
+   *                                   34 63 lo16(hi32(<data>))
+   *                                   00 03 1C 38
+   *                                   34 63 hi16(lo32(<data>))
+   *                                   00 03 1C 38
+   *                                   34 63 lo16(lo32(<data>))
+   *    sd $3,0($2)                    FC 43 00 00
+   *    dli $25,<address>              3C 19 hi16(hi32(<address>))
+   *                                   37 39 lo16(hi32(<address>))
+   *                                   00 19 CC 38
+   *                                   37 39 hi16(lo32(<address>))
+   *                                   00 19 CC 38
+   *                                   37 39 lo16(lo32(<address>))
+   *    j $25                          03 20 00 08
+   *    nop                            00 00 00 00
+   */
+  /* What about big endian / little endian ?? */
+  *(short *) (function + 0) = 0x3C02;
+  *(short *) (function + 2) = (unsigned long) variable >> 48;
+  *(short *) (function + 4) = 0x3442;
+  *(short *) (function + 6) = ((unsigned long) variable >> 32) & 0xffff;
+  *(int *)   (function + 8) = 0x00021438;
+  *(short *) (function +12) = 0x3442;
+  *(short *) (function +14) = ((unsigned long) variable >> 16) & 0xffff;
+  *(int *)   (function +16) = 0x00021438;
+  *(short *) (function +20) = 0x3442;
+  *(short *) (function +22) = (unsigned long) variable & 0xffff;
+  *(short *) (function +24) = 0x3C03;
+  *(short *) (function +26) = (unsigned long) data >> 48;
+  *(short *) (function +28) = 0x3463;
+  *(short *) (function +30) = ((unsigned long) data >> 32) & 0xffff;
+  *(int *)   (function +32) = 0x00031C38;
+  *(short *) (function +36) = 0x3463;
+  *(short *) (function +38) = ((unsigned long) data >> 16) & 0xffff;
+  *(int *)   (function +40) = 0x00031C38;
+  *(short *) (function +44) = 0x3463;
+  *(short *) (function +46) = (unsigned long) data & 0xffff;
+  *(int *)   (function +48) = 0xFC430000;
+  *(short *) (function +52) = 0x3C19;
+  *(short *) (function +54) = (unsigned long) address >> 48;
+  *(short *) (function +56) = 0x3739;
+  *(short *) (function +58) = ((unsigned long) address >> 32) & 0xffff;
+  *(int *)   (function +60) = 0x0019CC38;
+  *(short *) (function +64) = 0x3739;
+  *(short *) (function +66) = ((unsigned long) address >> 16) & 0xffff;
+  *(int *)   (function +68) = 0x0019CC38;
+  *(short *) (function +72) = 0x3739;
+  *(short *) (function +74) = (unsigned long) address & 0xffff;
+  *(int *)   (function +76) = 0x03200008;
+  *(int *)   (function +80) = 0x00000000;
+#define is_tramp(function)  \
+  *(unsigned short *) (function + 0) == 0x3C02 && \
+  *(unsigned short *) (function + 4) == 0x3442 && \
+  *(unsigned int *)   (function + 8) == 0x00021438 && \
+  *(unsigned short *) (function +12) == 0x3442 && \
+  *(unsigned int *)   (function +16) == 0x00021438 && \
+  *(unsigned short *) (function +20) == 0x3442 && \
+  *(unsigned short *) (function +24) == 0x3C03 && \
+  *(unsigned short *) (function +28) == 0x3463 && \
+  *(unsigned int *)   (function +32) == 0x00031C38 && \
+  *(unsigned short *) (function +36) == 0x3463 && \
+  *(unsigned int *)   (function +40) == 0x00031C38 && \
+  *(unsigned short *) (function +44) == 0x3463 && \
+  *(unsigned int *)   (function +48) == 0xFC430000 && \
+  *(unsigned short *) (function +52) == 0x3C19 && \
+  *(unsigned short *) (function +56) == 0x3739 && \
+  *(unsigned int *)   (function +60) == 0x0019CC38 && \
+  *(unsigned short *) (function +64) == 0x3739 && \
+  *(unsigned int *)   (function +68) == 0x0019CC38 && \
+  *(unsigned short *) (function +72) == 0x3739 && \
+  *(unsigned int *)   (function +76) == 0x03200008 && \
+  *(unsigned int *)   (function +80) == 0x00000000
+#define hilo(word3,word2,word1,word0)  \
+  (((unsigned long) (word3) << 48) | ((unsigned long) (word2) << 32) | \
+   ((unsigned long) (word1) << 16) | (unsigned long) (word0))
+#define tramp_address(function)  \
+  hilo(*(unsigned short *) (function +54), \
+       *(unsigned short *) (function +58), \
+       *(unsigned short *) (function +66), \
+       *(unsigned short *) (function +74))
+#define tramp_variable(function)  \
+  hilo(*(unsigned short *) (function + 2), \
+       *(unsigned short *) (function + 6), \
+       *(unsigned short *) (function +14), \
+       *(unsigned short *) (function +22))
+#define tramp_data(function)  \
+  hilo(*(unsigned short *) (function +26), \
+       *(unsigned short *) (function +30), \
+       *(unsigned short *) (function +38), \
+       *(unsigned short *) (function +46))
+#endif
+#ifdef __mips64__
+  /* function:
+   *    ld $2,24($25)                  DF 22 00 18
+   *    ld $3,32($25)                  DF 23 00 20
+   *    sd $3,0($2)                    FC 43 00 00
+   *    ld $25,40($25)                 DF 39 00 28
+   *    j $25                          03 20 00 08
+   *    nop                            00 00 00 00
+   *    .dword <variable>              <variable>
+   *    .dword <data>                  <data>
+   *    .dword <address>               <address>
+   */
+  *(unsigned int *)  (function + 0) = 0xDF220018;
+  *(unsigned int *)  (function + 4) = 0xDF230020;
+  *(unsigned int *)  (function + 8) = 0xFC430000;
+  *(unsigned int *)  (function +12) = 0xDF390028;
+  *(unsigned int *)  (function +16) = 0x03200008;
+  *(unsigned int *)  (function +20) = 0x00000000;
+  *(unsigned long *) (function +24) = (unsigned long) variable;
+  *(unsigned long *) (function +32) = (unsigned long) data;
+  *(unsigned long *) (function +40) = (unsigned long) address;
+#define TRAMP_CODE_LENGTH  24
+#define is_tramp(function)  \
+  *(unsigned int *)  (function + 0) == 0xDF220018 && \
+  *(unsigned int *)  (function + 4) == 0xDF230020 && \
+  *(unsigned int *)  (function + 8) == 0xFC430000 && \
+  *(unsigned int *)  (function +12) == 0xDF390028 && \
+  *(unsigned int *)  (function +16) == 0x03200008 && \
+  *(unsigned int *)  (function +20) == 0x00000000
+#define tramp_address(function)  \
+  *(unsigned long *) (function +40)
+#define tramp_variable(function)  \
+  *(unsigned long *) (function +24)
+#define tramp_data(function)  \
+  *(unsigned long *) (function +32)
+#endif
+#if defined(__sparc__) && !defined(__sparc64__)
+  /* function:
+   *    sethi %hi(<variable>),%g1      03000000 | (<variable> >> 10)
+   *    sethi %hi(<data>),%g2          05000000 | (<data> >> 10)
+   *    or %g2,%lo(<data>),%g2         8410A000 | (<data> & 0x3ff)
+   *    st %g2,[%g1+%lo(<variable>)]   C4206000 | (<variable> & 0x3ff)
+   *    sethi %hi(<address>),%g1       03000000 | (<address> >> 10)
+   *    jmp %g1+%lo(<address>)         81C06000 | (<address> & 0x3ff)
+   *    nop                            01000000
+   */
+#define hi(word)  ((unsigned long) (word) >> 10)
+#define lo(word)  ((unsigned long) (word) & 0x3ff)
+  *(long *) (function + 0) = 0x03000000 | hi(variable);
+  *(long *) (function + 4) = 0x05000000 | hi(data);
+  *(long *) (function + 8) = 0x8410A000 | lo(data);
+  *(long *) (function +12) = 0xC4206000 | lo(variable);
+  *(long *) (function +16) = 0x03000000 | hi(address);
+  *(long *) (function +20) = 0x81C06000 | lo(address);
+  *(long *) (function +24) = 0x01000000;
+#define is_tramp(function)  \
+  (*(long *) (function + 0) & 0xffc00000) == 0x03000000 && \
+  (*(long *) (function + 4) & 0xffc00000) == 0x05000000 && \
+  (*(long *) (function + 8) & 0xfffffc00) == 0x8410A000 && \
+  (*(long *) (function +12) & 0xfffffc00) == 0xC4206000 && \
+  (*(long *) (function +16) & 0xffc00000) == 0x03000000 && \
+  (*(long *) (function +20) & 0xfffffc00) == 0x81C06000 && \
+   *(long *) (function +24)               == 0x01000000
+#define hilo(hiword,loword)  (((hiword) << 10) | ((loword) & 0x3ff))
+#define tramp_address(function)  \
+  hilo(*(long *) (function +16), *(long *) (function +20))
+#define tramp_variable(function)  \
+  hilo(*(long *) (function + 0), *(long *) (function +12))
+#define tramp_data(function)  \
+  hilo(*(long *) (function + 4), *(long *) (function + 8))
+#endif
+#ifdef __sparc64__
+  /* function:
+   *    rd %pc,%g1                     83414000
+   *    ldx [%g1+24],%g2               C4586018
+   *    ldx [%g1+32],%g3               C6586020
+   *    ldx [%g1+40],%g1               C2586028
+   *    jmp %g1                                81C04000
+   *    stx %g3,[%g2]                  C6708000
+   *    .long high32(<variable>)       <variable> >> 32
+   *    .long low32(<variable>)                <variable> & 0xffffffff
+   *    .long high32(<data>)           <data> >> 32
+   *    .long low32(<data>)            <data> & 0xffffffff
+   *    .long high32(<address>)                <address> >> 32
+   *    .long low32(<address>)         <address> & 0xffffffff
+   */
+  *(int *)  (function + 0) = 0x83414000;
+  *(int *)  (function + 4) = 0xC4586018;
+  *(int *)  (function + 8) = 0xC6586020;
+  *(int *)  (function +12) = 0xC2586028;
+  *(int *)  (function +16) = 0x81C04000;
+  *(int *)  (function +20) = 0xC6708000;
+  *(long *) (function +24) = (long) variable;
+  *(long *) (function +32) = (long) data;
+  *(long *) (function +40) = (long) address;
+#define TRAMP_CODE_LENGTH  24
+#define is_tramp(function)  \
+  *(int *)  (function + 0) == 0x83414000 && \
+  *(int *)  (function + 4) == 0xC4586018 && \
+  *(int *)  (function + 8) == 0xC6586020 && \
+  *(int *)  (function +12) == 0xC2586028 && \
+  *(int *)  (function +16) == 0x81C04000 && \
+  *(int *)  (function +20) == 0xC6708000
+#define tramp_address(function)  \
+  *(long *) (function +40)
+#define tramp_variable(function)  \
+  *(long *) (function +24)
+#define tramp_data(function)  \
+  *(long *) (function +32)
+#endif
+#ifdef __alpha__
+  /* function:
+   *    br $1,function..ng     00 00 20 C0
+   * function..ng:
+   *    ldq $2,20($1)          14 00 41 A4
+   *    ldq $3,28($1)          1C 00 61 A4
+   *    ldq $27,36($1)         24 00 61 A7
+   *    stq $2,0($3)           00 00 43 B4
+   *    jmp $31,($27),0                00 00 FB 6B
+   *    .quad <data>           <data>
+   *    .quad <variable>       <variable>
+   *    .quad <address>                <address>
+   */
+  { static int code [6] =
+      { 0xC0200000, 0xA4410014, 0xA461001C, 0xA7610024, 0xB4430000, 0x6BFB0000 };
+    int i;
+    for (i=0; i<6; i++) { ((int *) function)[i] = code[i]; }
+    ((long *) function)[3] = (long) data;
+    ((long *) function)[4] = (long) variable;
+    ((long *) function)[5] = (long) address;
+  }
+#define TRAMP_CODE_LENGTH  24
+#define is_tramp(function)  \
+  ((int *) function)[0] == 0xC0200000 && \
+  ((int *) function)[1] == 0xA4410014 && \
+  ((int *) function)[2] == 0xA461001C && \
+  ((int *) function)[3] == 0xA7610024 && \
+  ((int *) function)[4] == 0xB4430000 && \
+  ((int *) function)[5] == 0x6BFB0000
+#define tramp_address(function)  \
+  ((long *) function)[5]
+#define tramp_variable(function)  \
+  ((long *) function)[4]
+#define tramp_data(function)  \
+  ((long *) function)[3]
+#endif
+#ifdef __hppaold__
+  /* function:
+   *    ldil L'<data>,%r20             22800000 | hi(<data>)
+   *    ldil L'<variable>,%r19         22600000 | hi(<variable>)
+   *    ldo R'<data>(%r20),%r20                36940000 | lo(<data>)
+   *    stw %r20,R'<variable>(%r19)    6A740000 | lo(<variable>)
+   *    ldil L'<address>,%r21          22A00000 | hi(<address>)
+   *    ldo R'<address>(%r21),%r21     36B50000 | lo(<address>)
+   *    bb,>=,n %r21,30,function2      C7D5C012
+   *    depi 0,31,2,%r21               D6A01C1E
+   *    ldw 4(0,%r21),%r19             4AB30008
+   *    ldw 0(0,%r21),%r21             4AB50000
+   * function2:
+   *    ldsid (0,%r21),%r1             02A010A1
+   *    mtsp %r1,%sr0                  00011820
+   *    be,n 0(%sr0,%r21)              E2A00002
+   *    nop                            08000240
+   */
+  /* When decoding a 21-bit argument in an instruction, the hppa performs
+   * the following bit manipulation:
+   * assemble21: x[20]...x[0]
+   *       --> x[0] x[11]...x[1] x[15]..x[14] x[20]...x[16] x[13]..x[12]
+   * When encoding a 21-bit argument into an instruction, we need the
+   * to perform the reverse permutation:
+   * permute21:  y[20]...y[0]
+   *       --> y[6]...y[2] y[8]..y[7] y[1]..y[0] y[19]...y[9] y[20]
+   */
+#define assemble21(x)  \
+  ((((x) & 0x1) << 20) | (((x) & 0xFFE) << 8) | \
+   (((x) & 0xC000) >> 7) | (((x) & 0x1F0000) >> 14) | (((x) & 0x3000) >> 12))
+#define permute21(y)  \
+  ((((y) & 0x7C) << 14) | (((y) & 0x180) << 7) | (((y) & 0x3) << 12) | \
+   (((y) & 0xFFE00) >> 8) | (((y) & 0x100000) >> 20))
+#define hi(word)  permute21((unsigned long) (word) >> 11)
+#define lo(word)  (((unsigned long) (word) & 0x7FF) << 1)
+  *(long *) (function + 0) = 0x22800000 | hi(data);
+  *(long *) (function + 4) = 0x22600000 | hi(variable);
+  *(long *) (function + 8) = 0x36940000 | lo(data);
+  *(long *) (function +12) = 0x6A740000 | lo(variable);
+  *(long *) (function +16) = 0x22A00000 | hi(address);
+  *(long *) (function +20) = 0x36B50000 | lo(address);
+  *(long *) (function +24) = 0xC7D5C012;
+  *(long *) (function +28) = 0xD6A01C1E;
+  *(long *) (function +32) = 0x4AB30008;
+  *(long *) (function +36) = 0x4AB50000;
+  *(long *) (function +40) = 0x02A010A1;
+  *(long *) (function +44) = 0x00011820;
+  *(long *) (function +48) = 0xE2A00002;
+  *(long *) (function +52) = 0x08000240;
+#define is_tramp(function)  \
+  ((long) function & 3) == 0 && \
+  (*(long *) (function + 0) & 0xffe00000) == 0x22800000 && \
+  (*(long *) (function + 4) & 0xffe00000) == 0x22600000 && \
+  (*(long *) (function + 8) & 0xfffff000) == 0x36940000 && \
+  (*(long *) (function +12) & 0xfffff000) == 0x6A740000 && \
+  (*(long *) (function +16) & 0xffe00000) == 0x22A00000 && \
+  (*(long *) (function +20) & 0xfffff000) == 0x36B50000 && \
+  *(long *) (function +24) == 0xC7D5C012 && \
+  *(long *) (function +28) == 0xD6A01C1E && \
+  *(long *) (function +32) == 0x4AB30008 && \
+  *(long *) (function +36) == 0x4AB50000 && \
+  *(long *) (function +40) == 0x02A010A1 && \
+  *(long *) (function +44) == 0x00011820 && \
+  *(long *) (function +48) == 0xE2A00002 && \
+  *(long *) (function +52) == 0x08000240
+#define hilo(hiword,loword)  \
+  ((assemble21((unsigned long) (hiword)) << 11) | \
+   (((unsigned long) (loword) & 0xFFE) >> 1) \
+  )
+#define tramp_address(function)  \
+  hilo(*(long *) (function +16), *(long *) (function +20))
+#define tramp_variable(function)  \
+  hilo(*(long *) (function + 4), *(long *) (function +12))
+#define tramp_data(function)  \
+  hilo(*(long *) (function + 0), *(long *) (function + 8))
+#endif
+#ifdef __hppanew__
+  /* function:
+   *    .long   tramp
+   *    .long   closure
+   * closure:
+   *    .long   <variable>
+   *    .long   <data>
+   *    .long   <address>
+   */
+  { /* work around a bug in gcc 3.* */
+    void* tramp_address = &tramp;
+    *(long *) (function + 0) = ((long *) ((char*)tramp_address-2))[0];
+    *(long *) (function + 4) = (long) (function + 8);
+    *(long *) (function + 8) = (long) variable;
+    *(long *) (function +12) = (long) data;
+    *(long *) (function +16) = (long) address;
+  }
+#define TRAMP_CODE_LENGTH  0
+#define is_tramp(function)  \
+  ((long *) function)[0] == ((long *) ((char*)tramp_address-2))[0]
+#define tramp_address(function)  \
+  ((long *) function)[4]
+#define tramp_variable(function)  \
+  ((long *) function)[2]
+#define tramp_data(function)  \
+  ((long *) function)[3]
+#endif
+#ifdef __hppa64old__
+  /* function:
+   *    mfia %r27                      000014BB
+   *    ldd 40(%r27),%r31              537F0050
+   *    ldd 48(%r27),%r1               53610060
+   *    std %r1,0(%r31)                        0FE112C0
+   *    ldd 56(%r27),%r27              537B0070
+   *    ldd 16(%r27),%r1               53610020
+   *    ldd 24(%r27),%r27              537B0030
+   *    bve (%r1)                      E820D000
+   *     nop                           08000240
+   *    .align 8
+   *    .dword <variable>
+   *    .dword <data>
+   *    .dword <address>
+   * function_pointer:
+   *    .dword 0
+   *    .dword 0
+   *    .dword function
+   *    .dword 0
+   */
+  *(int *)  (function + 0) = 0x000014BB;
+  *(int *)  (function + 4) = 0x537F0050;
+  *(int *)  (function + 8) = 0x53610060;
+  *(int *)  (function +12) = 0x0FE112C0;
+  *(int *)  (function +16) = 0x537B0070;
+  *(int *)  (function +20) = 0x53610020;
+  *(int *)  (function +24) = 0x537B0030;
+  *(int *)  (function +28) = 0xE820D000;
+  *(int *)  (function +32) = 0x08000240;
+  *(long *) (function +40) = (long)variable;
+  *(long *) (function +48) = (long)data;
+  *(long *) (function +56) = (long)address;
+  *(long *) (function +64) = (long)0;
+  *(long *) (function +72) = (long)0;
+  *(long *) (function +80) = (long)function;
+  *(long *) (function +88) = (long)0;
+#define TRAMP_CODE_LENGTH  36
+#define is_tramp(function)  \
+  *(int *) (function + 0) == 0x000014BB && \
+  *(int *) (function + 4) == 0x537F0050 && \
+  *(int *) (function + 8) == 0x53610060 && \
+  *(int *) (function +12) == 0x0FE112C0 && \
+  *(int *) (function +16) == 0x537B0070 && \
+  *(int *) (function +20) == 0x53610020 && \
+  *(int *) (function +24) == 0x537B0030 && \
+  *(int *) (function +28) == 0xE820D000 && \
+  *(int *) (function +32) == 0x08000240
+#define tramp_address(function)  \
+  (*(unsigned long *) (function +56))
+#define tramp_variable(function)  \
+  (*(unsigned long *) (function +40))
+#define tramp_data(function)  \
+  (*(unsigned long *) (function +48))
+#endif
+#ifdef __hppa64new__
+  /* function:
+   *    .dword 0
+   *    .dword 0
+   *    .dword tramp
+   *    .dword closure
+   * closure:
+   *    .dword <variable>
+   *    .dword <data>
+   *    .dword <address>
+   */
+  *(long *) (function + 0) = 0;
+  *(long *) (function + 8) = 0;
+  *(long *) (function +16) = ((long *) (void*) &tramp)[2];
+  *(long *) (function +24) = (long) (function + 32);
+  *(long *) (function +32) = (long) variable;
+  *(long *) (function +40) = (long) data;
+  *(long *) (function +48) = (long) address;
+#define TRAMP_CODE_LENGTH  0
+#define is_tramp(function)  \
+  ((long *) function)[2] == ((long *) (void*) &tramp)[2] && \
+  ((long *) function)[3] == (long) (function + 32)
+#define tramp_address(function)  \
+  ((long *) function)[6]
+#define tramp_variable(function)  \
+  ((long *) function)[4]
+#define tramp_data(function)  \
+  ((long *) function)[5]
+#endif
+#if defined(__arm__) || defined(__armhf__)
+  /* function:
+   *   stmfd   sp!,{r0}                E92D0001
+   *   ldr     r0,[pc,#16]             E59F000C
+   *   ldr     ip,[pc,#16]             E59FC00C
+   *   str     r0,[ip]                 E58C0000
+   *   ldmfd   sp!,{r0}                E8BD0001
+   *   ldr     pc,[pc,#4]              E59FF004
+   * _data:
+   *   .word   <data>
+   * _variable:
+   *   .word   <variable>
+   * _address:
+   *   .word   <address>
+   */
+  {
+    ((long *) function)[0] = 0xE92D0001;
+    ((long *) function)[1] = 0xE59F000C;
+    ((long *) function)[2] = 0xE59FC00C;
+    ((long *) function)[3] = 0xE58C0000;
+    ((long *) function)[4] = 0xE8BD0001;
+    ((long *) function)[5] = 0xE59FF004;
+    ((long *) function)[6] = (long)data;
+    ((long *) function)[7] = (long)variable;
+    ((long *) function)[8] = (long)address;
+  }
+#define TRAMP_CODE_LENGTH  24
+#define is_tramp(function)  \
+    ((long *) function)[0] == 0xE92D0001 && \
+    ((long *) function)[1] == 0xE59F000C && \
+    ((long *) function)[2] == 0xE59FC00C && \
+    ((long *) function)[3] == 0xE58C0000 && \
+    ((long *) function)[4] == 0xE8BD0001 && \
+    ((long *) function)[5] == 0xE59FF004
+#define tramp_address(function)  \
+  ((long *) function)[8]
+#define tramp_variable(function)  \
+  ((long *) function)[7]
+#define tramp_data(function)  \
+  ((long *) function)[6]
+#endif
+#ifdef __arm64__
+  /* function:
+   *    ldr x9,.+24            580000C9
+   *    ldr x10,.+28           580000EA
+   *    ldr x11,.+32           5800010B
+   *    str x9,[x10]           F9000149
+   *    br x11                 D61F0160
+   *    nop                    D503201F
+   *    .xword <data>          <data>
+   *    .xword <variable>      <variable>
+   *    .xword <address>       <address>
+   */
+  *(int *)   (function + 0) = 0x580000C9;
+  *(int *)   (function + 4) = 0x580000EA;
+  *(int *)   (function + 8) = 0x5800010B;
+  *(int *)   (function +12) = 0xF9000149;
+  *(int *)   (function +16) = 0xD61F0160;
+  *(int *)   (function +20) = 0xD503201F;
+  *(long *)  (function +24) = (unsigned long) data;
+  *(long *)  (function +32) = (unsigned long) variable;
+  *(long *)  (function +40) = (unsigned long) address;
+#define TRAMP_CODE_LENGTH  24
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0x580000C9 && \
+  *(unsigned int *) (function + 4) == 0x580000EA && \
+  *(unsigned int *) (function + 8) == 0x5800010B && \
+  *(unsigned int *) (function +12) == 0xF9000149 && \
+  *(unsigned int *) (function +16) == 0xD61F0160 && \
+  *(unsigned int *) (function +20) == 0xD503201F
+#define tramp_address(function)  \
+  (*(unsigned long *) (function +40))
+#define tramp_variable(function)  \
+  (*(unsigned long *) (function +32))
+#define tramp_data(function)  \
+  (*(unsigned long *) (function +24))
+#endif
+#ifdef __powerpcsysv4__
+  /* function:
+   *    {liu|lis} 11,hi16(<variable>)          3D 60 hi16(<variable>)
+   *    {oril|ori} 11,11,lo16(<variable>)      61 6B lo16(<variable>)
+   *    {liu|lis} 12,hi16(<data>)              3D 80 hi16(<data>)
+   *    {oril|ori} 12,12,lo16(<data>)          61 8C lo16(<data>)
+   *    {st|stw} 12,0(11)                      91 8B 00 00
+   *    {liu|lis} 0,hi16(<address>)            3C 00 hi16(<address>)
+   *    {oril|ori} 0,0,lo16(<address>)         60 00 lo16(<address>)
+   *    mtctr 0                                        7C 09 03 A6
+   *    bctr                                   4E 80 04 20
+   */
+  *(short *) (function + 0) = 0x3D60;
+  *(short *) (function + 2) = (unsigned long) variable >> 16;
+  *(short *) (function + 4) = 0x616B;
+  *(short *) (function + 6) = (unsigned long) variable & 0xffff;
+  *(short *) (function + 8) = 0x3D80;
+  *(short *) (function +10) = (unsigned long) data >> 16;
+  *(short *) (function +12) = 0x618C;
+  *(short *) (function +14) = (unsigned long) data & 0xffff;
+  *(long *)  (function +16) = 0x918B0000;
+  *(short *) (function +20) = 0x3C00;
+  *(short *) (function +22) = (unsigned long) address >> 16;
+  *(short *) (function +24) = 0x6000;
+  *(short *) (function +26) = (unsigned long) address & 0xffff;
+  *(long *)  (function +28) = 0x7C0903A6;
+  *(long *)  (function +32) = 0x4E800420;
+#define is_tramp(function)  \
+  *(unsigned short *) (function + 0) == 0x3D60 && \
+  *(unsigned short *) (function + 4) == 0x616B && \
+  *(unsigned short *) (function + 8) == 0x3D80 && \
+  *(unsigned short *) (function +12) == 0x618C && \
+  *(unsigned long *)  (function +16) == 0x918B0000 && \
+  *(unsigned short *) (function +20) == 0x3C00 && \
+  *(unsigned short *) (function +24) == 0x6000 && \
+  *(unsigned long *)  (function +28) == 0x7C0903A6 && \
+  *(unsigned long *)  (function +32) == 0x4E800420
+#define hilo(hiword,loword)  \
+  (((unsigned long) (hiword) << 16) | (unsigned long) (loword))
+#define tramp_address(function)  \
+  hilo(*(unsigned short *) (function +22), *(unsigned short *) (function +26))
+#define tramp_variable(function)  \
+  hilo(*(unsigned short *) (function + 2), *(unsigned short *) (function + 6))
+#define tramp_data(function)  \
+  hilo(*(unsigned short *) (function +10), *(unsigned short *) (function +14))
+#endif
+#ifdef __powerpcaix__
+  /* function:
+   *    .long .tramp
+   *    .long .mytoc
+   *    .long 0
+   * .mytoc:
+   *    .long <variable>
+   *    .long <data>
+   *    .long <address>
+   */
+  *(long *)  (function + 0) = ((long *) &tramp)[0];
+  *(long *)  (function + 4) = (long) (function + 12);
+  *(long *)  (function + 8) = 0;
+  *(long *)  (function +12) = (long) variable;
+  *(long *)  (function +16) = (long) data;
+  *(long *)  (function +20) = (long) address;
+#define TRAMP_CODE_LENGTH  0
+#define is_tramp(function)  \
+  ((long *) function)[0] == ((long *) &tramp)[0]
+#define tramp_address(function)  \
+  ((long *) function)[5]
+#define tramp_variable(function)  \
+  ((long *) function)[3]
+#define tramp_data(function)  \
+  ((long *) function)[4]
+#endif
+#ifdef __powerpc64_elfv2__
+  /* function:
+   *    ld 11,24(12)           18 00 6C E9
+   *    ld 0,32(12)            20 00 0C E8
+   *    std 0,0(11)            00 00 0B F8
+   *    ld 12,40(12)           28 00 8C E9
+   *    mtctr 12               A6 03 89 7D
+   *    bctr                   20 04 80 4E
+   *    .quad <variable>
+   *    .quad <data>
+   *    .quad <address>
+   */
+  *(int *)   (function + 0) = 0xE96C0018;
+  *(int *)   (function + 4) = 0xE80C0020;
+  *(int *)   (function + 8) = 0xF80B0000;
+  *(int *)   (function +12) = 0xE98C0028;
+  *(int *)   (function +16) = 0x7D8903A6;
+  *(int *)   (function +20) = 0x4E800420;
+  *(long *)  (function +24) = (unsigned long) variable;
+  *(long *)  (function +32) = (unsigned long) data;
+  *(long *)  (function +40) = (unsigned long) address;
+#define TRAMP_CODE_LENGTH  24
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0xE96C0018 && \
+  *(unsigned int *) (function + 4) == 0xE80C0020 && \
+  *(unsigned int *) (function + 8) == 0xF80B0000 && \
+  *(unsigned int *) (function +12) == 0xE98C0028 && \
+  *(unsigned int *) (function +16) == 0x7D8903A6 && \
+  *(unsigned int *) (function +20) == 0x4E800420
+#define tramp_address(function)  \
+  (*(unsigned long *) (function +40))
+#define tramp_variable(function)  \
+  (*(unsigned long *) (function +24))
+#define tramp_data(function)  \
+  (*(unsigned long *) (function +32))
+#endif
+#ifdef __powerpc64aix__
+  /* function:
+   *    .quad .tramp
+   *    .quad .mytoc
+   *    .quad 0
+   * .mytoc:
+   *    .quad <variable>
+   *    .quad <data>
+   *    .quad <address>
+   */
+  *(long *)  (function + 0) = ((long *) &tramp)[0];
+  *(long *)  (function + 8) = (long) (function + 24);
+  *(long *)  (function +16) = 0;
+  *(long *)  (function +24) = (long) variable;
+  *(long *)  (function +32) = (long) data;
+  *(long *)  (function +40) = (long) address;
+#define TRAMP_CODE_LENGTH  0
+#define is_tramp(function)  \
+  ((long *) function)[0] == ((long *) &tramp)[0]
+#define tramp_address(function)  \
+  ((long *) function)[5]
+#define tramp_variable(function)  \
+  ((long *) function)[3]
+#define tramp_data(function)  \
+  ((long *) function)[4]
+#endif
+#ifdef __ia64__
+  /* function:
+   *    data8   tramp
+   *    data8   closure
+   * closure:
+   *    data8   <address>
+   *    data8   <variable>
+   *    data8   <data>
+   */
+  *(long *) (function + 0) = (long) &tramp;
+  *(long *) (function + 8) = (long) (function + 16);
+  *(long *) (function +16) = (long) address;
+  *(long *) (function +24) = (long) variable;
+  *(long *) (function +32) = (long) data;
+#define TRAMP_CODE_LENGTH  0
+#define is_tramp(function)  \
+  ((long *) function)[0] == (long) &tramp
+#define tramp_address(function)  \
+  ((long *) function)[2]
+#define tramp_variable(function)  \
+  ((long *) function)[3]
+#define tramp_data(function)  \
+  ((long *) function)[4]
+#endif
+#ifdef __x86_64__
+#ifdef __x86_64_x32__
+  /* function:
+   *    movl $<data>,<variable>                C7 04 25 <variable> <data>
+   *    movl $<address>,%eax           B8 <address>
+   *    jmp *%rax                      FF E0
+   */
+  *(int *)   (function + 0) = ((unsigned long) variable << 24) | 0x2504C7;
+  *(int *)   (function + 4) = ((unsigned long) data << 24) | ((unsigned long) variable >> 8);
+  *(int *)   (function + 8) = 0xB8000000 | ((unsigned long) data >> 8);
+  *(int *)   (function +12) = (unsigned long) address;
+  *(short *) (function +16) = 0xE0FF;
+#define is_tramp(function)  \
+  (*(unsigned long *) (function + 0) & 0x00FFFFFF) == 0x2504C7 && \
+  (*(unsigned long *) (function + 8) & 0xFF000000) == 0xB8000000 && \
+  *(unsigned short *) (function +16) == 0xE0FF
+#define tramp_address(function)  \
+  (*(unsigned int *) (function +12))
+#define tramp_variable(function)  \
+  ((*(unsigned long *) (function + 0) >> 24) | \
+   (*(unsigned long *) (function + 4) << 8))
+#define tramp_data(function)  \
+  ((*(unsigned long *) (function + 4) >> 24) | \
+   (*(unsigned long *) (function + 8) << 8))
+#else
+  /* function:
+   *    movabsq $<data>,%rax           48 B8 <data>
+   *    movabsq %rax, <variable>       48 A3 <variable>
+   *    movabsq $<address>,%rax                48 B8 <address>
+   *    jmp *%rax                      FF E0
+   */
+  *(short *) (function + 0) = 0xB848;
+  *(short *) (function + 2) = (unsigned long long) data & 0xffff;
+  *(int *)   (function + 4) = ((unsigned long long) data >> 16) & 0xffffffff;
+  *(short *) (function + 8) = ((unsigned long long) data >> 48) & 0xffff;
+  *(short *) (function +10) = 0xA348;
+  *(int *)   (function +12) = (unsigned long long) variable & 0xffffffff;
+  *(int *)   (function +16) = ((unsigned long long) variable >> 32) & 0xffffffff;
+  *(short *) (function +20) = 0xB848;
+  *(short *) (function +22) = (unsigned long long) address & 0xffff;
+  *(int *)   (function +24) = ((unsigned long long) address >> 16) & 0xffffffff;
+  *(short *) (function +28) = ((unsigned long long) address >> 48) & 0xffff;
+  *(short *) (function +30) = 0xE0FF;
+#define is_tramp(function)  \
+  *(unsigned short *) (function + 0) == 0xB848 && \
+  *(unsigned short *) (function +10) == 0xA348 && \
+  *(unsigned short *) (function +20) == 0xB848 && \
+  *(unsigned short *) (function +30) == 0xE0FF
+#define hilo(hiword,loword)  \
+  (((unsigned long long) (hiword) << 32) | (unsigned long long) (loword))
+#define himidlo(hishort,midword,loshort)  \
+  (((unsigned long long) (hishort) << 48) | (unsigned long long) (midword) << 16 \
+   | (unsigned long long) (loshort))
+#define tramp_address(function)  \
+  himidlo(*(unsigned short *) (function +28), \
+          *(unsigned int *)   (function +24), \
+          *(unsigned short *) (function +22))
+#define tramp_variable(function)  \
+  hilo(*(unsigned int *) (function +16), *(unsigned int *) (function +12))
+#define tramp_data(function)  \
+  himidlo(*(unsigned short *) (function + 8), \
+          *(unsigned int *)   (function + 4), \
+          *(unsigned short *) (function + 2))
+#endif
+#endif
+#if defined(__s390__) && !defined(__s390x__)
+  /* function:
+   *    bras %r1,.L1                   A7150002
+   * .L1:
+   *    l %r0,data-.L1(%r1)            58001018
+   *    l %r1,variable-.L1(%r1)                5810101C
+   *    st %r0,0(%r1)                  50001000
+   *    bras %r1,.L2                   A7150002
+   * .L2:
+   *    l %r1,function-.L2(%r1)                58101010
+   *    br %r1                         07F1
+   *    nop                            0707
+   * data:     .long <data>
+   * variable: .long <variable>
+   * address:  .long <address>
+   */
+  *(int *)   (function + 0) = 0xA7150002;
+  *(int *)   (function + 4) = 0x58001018;
+  *(int *)   (function + 8) = 0x5810101C;
+  *(int *)   (function +12) = 0x50001000;
+  *(int *)   (function +16) = 0xA7150002;
+  *(int *)   (function +20) = 0x58101010;
+  *(int *)   (function +24) = 0x07F10707;
+  *(int *)   (function +28) = (unsigned int) data;
+  *(int *)   (function +32) = (unsigned int) variable;
+  *(int *)   (function +36) = (unsigned int) address;
+#define TRAMP_CODE_LENGTH  28
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0xA7150002 && \
+  *(unsigned int *) (function + 4) == 0x58001018 && \
+  *(unsigned int *) (function + 8) == 0x5810101C && \
+  *(unsigned int *) (function +12) == 0x50001000 && \
+  *(unsigned int *) (function +16) == 0xA7150002 && \
+  *(unsigned int *) (function +20) == 0x58101010 && \
+  *(unsigned int *) (function +24) == 0x07F10707
+#define tramp_address(function)  \
+  *(unsigned int *) (function +36)
+#define tramp_variable(function)  \
+  *(unsigned int *) (function +32)
+#define tramp_data(function)  \
+  *(unsigned int *) (function +28)
+#endif
+#ifdef __s390x__
+  /* function:
+   *    larl %r1,.L1                   C01000000003
+   * .L1:
+   *    lg %r0,data-.L1(%r1)           E30010220004
+   *    lg %r1,variable-.L1(%r1)       E310102A0004
+   *    stg %r0,0(%r1)                 E30010000024
+   *    larl %r1,.L2                   C01000000003
+   * .L2:
+   *    lg %r1,function-.L2(%r1)       E310101A0004
+   *    br %r1                         07F1
+   *    nop                            0707
+   * data:     .quad <data>
+   * variable: .quad <variable>
+   * address:  .quad <address>
+   */
+  *(int *)   (function + 0) = 0xC0100000;
+  *(int *)   (function + 4) = 0x0003E300;
+  *(int *)   (function + 8) = 0x10220004;
+  *(int *)   (function +12) = 0xE310102A;
+  *(int *)   (function +16) = 0x0004E300;
+  *(int *)   (function +20) = 0x10000024;
+  *(int *)   (function +24) = 0xC0100000;
+  *(int *)   (function +28) = 0x0003E310;
+  *(int *)   (function +32) = 0x101A0004;
+  *(int *)   (function +36) = 0x07F10707;
+  *(long *)  (function +40) = (unsigned long) data;
+  *(long *)  (function +48) = (unsigned long) variable;
+  *(long *)  (function +56) = (unsigned long) address;
+#define TRAMP_CODE_LENGTH  40
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0xC0100000 && \
+  *(unsigned int *) (function + 4) == 0x0003E300 && \
+  *(unsigned int *) (function + 8) == 0x10220004 && \
+  *(unsigned int *) (function +12) == 0xE310102A && \
+  *(unsigned int *) (function +16) == 0x0004E300 && \
+  *(unsigned int *) (function +20) == 0x10000024 && \
+  *(unsigned int *) (function +24) == 0xC0100000 && \
+  *(unsigned int *) (function +28) == 0x0003E310 && \
+  *(unsigned int *) (function +32) == 0x101A0004 && \
+  *(unsigned int *) (function +36) == 0x07F10707
+#define tramp_address(function)  \
+  (*(unsigned long *) (function +56))
+#define tramp_variable(function)  \
+  (*(unsigned long *) (function +48))
+#define tramp_data(function)  \
+  (*(unsigned long *) (function +40))
+#endif
+#ifdef __riscv32__
+  /* function:
+   *    auipc t3,0                     00000E17
+   *    lw t0,24(t3)                   018E2283
+   *    lw t1,28(t3)                   01CE2303
+   *    lw t2,32(t3)                   020E2383
+   *    sw t0,(t1)                     00532023
+   *    jr t2                          00038067
+   * data:     .word <data>
+   * variable: .word <variable>
+   * address:  .word <address>
+   */
+  *(int *)   (function + 0) = 0x00000E17;
+  *(int *)   (function + 4) = 0x018E2283;
+  *(int *)   (function + 8) = 0x01CE2303;
+  *(int *)   (function +12) = 0x020E2383;
+  *(int *)   (function +16) = 0x00532023;
+  *(int *)   (function +20) = 0x00038067;
+  *(int *)   (function +24) = (unsigned int) data;
+  *(int *)   (function +28) = (unsigned int) variable;
+  *(int *)   (function +32) = (unsigned int) address;
+#define TRAMP_CODE_LENGTH  24
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0x00000E17 && \
+  *(unsigned int *) (function + 4) == 0x018E2283 && \
+  *(unsigned int *) (function + 8) == 0x01CE2303 && \
+  *(unsigned int *) (function +12) == 0x020E2383 && \
+  *(unsigned int *) (function +16) == 0x00532023 && \
+  *(unsigned int *) (function +20) == 0x00038067
+#define tramp_address(function)  \
+  (*(unsigned int *) (function +32))
+#define tramp_variable(function)  \
+  (*(unsigned int *) (function +28))
+#define tramp_data(function)  \
+  (*(unsigned int *) (function +24))
+#endif
+#ifdef __riscv64__
+  /* function:
+   *    auipc t3,0                     00000E17
+   *    ld t0,24(t3)                   018E3283
+   *    ld t1,32(t3)                   020E3303
+   *    ld t2,40(t3)                   028E3383
+   *    sd t0,(t1)                     00533023
+   *    jr t2                          00038067
+   * data:     .quad <data>
+   * variable: .quad <variable>
+   * address:  .quad <address>
+   */
+  *(int *)   (function + 0) = 0x00000E17;
+  *(int *)   (function + 4) = 0x018E3283;
+  *(int *)   (function + 8) = 0x020E3303;
+  *(int *)   (function +12) = 0x028E3383;
+  *(int *)   (function +16) = 0x00533023;
+  *(int *)   (function +20) = 0x00038067;
+  *(long *)  (function +24) = (unsigned long) data;
+  *(long *)  (function +32) = (unsigned long) variable;
+  *(long *)  (function +40) = (unsigned long) address;
+#define TRAMP_CODE_LENGTH  24
+#define is_tramp(function)  \
+  *(unsigned int *) (function + 0) == 0x00000E17 && \
+  *(unsigned int *) (function + 4) == 0x018E3283 && \
+  *(unsigned int *) (function + 8) == 0x020E3303 && \
+  *(unsigned int *) (function +12) == 0x028E3383 && \
+  *(unsigned int *) (function +16) == 0x00533023 && \
+  *(unsigned int *) (function +20) == 0x00038067
+#define tramp_address(function)  \
+  (*(unsigned long *) (function +40))
+#define tramp_variable(function)  \
+  (*(unsigned long *) (function +32))
+#define tramp_data(function)  \
+  (*(unsigned long *) (function +24))
+#endif
+
+  /* 3. Set memory protection to "executable" */
+
+#if !defined(CODE_EXECUTABLE)
+#if defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) || defined(EXECUTABLE_VIA_MMAP_THEN_MPROTECT)
+  /* Call mprotect on the pages that contain the range. */
+  { uintptr_t start_addr = (uintptr_t) function;
+    uintptr_t end_addr = (uintptr_t) (function + TRAMP_LENGTH);
+    start_addr = start_addr & -pagesize;
+    end_addr = (end_addr + pagesize-1) & -pagesize;
+   {uintptr_t len = end_addr - start_addr;
+#if defined(HAVE_MACH_VM)
+    if (vm_protect(task_self(),start_addr,len,0,VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE) != KERN_SUCCESS)
+#else
+    if (mprotect((void*)start_addr, len, PROT_READ|PROT_WRITE|PROT_EXEC) < 0)
+#endif
+      { fprintf(stderr,"trampoline: cannot make memory executable\n"); abort(); }
+  }}
+#endif
+#endif
+
+  /* 4. Flush instruction cache */
+  /* We need this because some CPUs have separate data cache and instruction
+   * cache. The freshly built trampoline is visible to the data cache, but not
+   * maybe not to the instruction cache. This is hairy.
+   */
+  /* TRAMP_CODE_LENGTH = length of the machine instructions. */
+#ifndef TRAMP_CODE_LENGTH
+#define TRAMP_CODE_LENGTH TRAMP_LENGTH
+#endif
+#if !(defined(__hppanew__) || defined(__hppa64new__) || defined(__powerpcaix__) || defined(__powerpc64aix__) || defined(__ia64__))
+  /* Only needed if we really set up machine instructions. */
+#ifdef __i386__
+#if defined(_WIN32)
+  while (!FlushInstructionCache(GetCurrentProcess(),function_x,TRAMP_CODE_LENGTH))
+    continue;
+#endif
+#endif
+#ifdef __m68k__
+#if defined(__NetBSD__) && defined(__GNUC__)
+  { register uintptr_t _beg __asm__ ("%a1") = (uintptr_t) function_x;
+    register uintptr_t _len __asm__ ("%d1") = TRAMP_CODE_LENGTH;
+    __asm__ __volatile__ (
+      "move%.l %#0x80000004,%/d0\n\t" /* CC_EXTPURGE | C_IPURGE */
+      "trap #12"                      /* kernel call ‘cachectl’ */
+      :
+      : "a" (_beg), "d" (_len)
+      : "%a0", "%a1", "%d0", "%d1"    /* call-used registers */
+      );
+  }
+#endif
+#if defined(__linux__) && defined(__GNUC__)
+  { register uintptr_t _beg __asm__ ("%d1") = (uintptr_t) function_x;
+    register uintptr_t _len __asm__ ("%d4") = TRAMP_CODE_LENGTH + 32;
+    __asm__ __volatile__ (
+      "move%.l %#123,%/d0\n\t"
+      "move%.l %#1,%/d2\n\t"
+      "move%.l %#3,%/d3\n\t"
+      "trap %#0"
+      :
+      : "d" (_beg), "d" (_len)
+      : "%d0", "%d2", "%d3"
+      );
+  }
+#endif
+#if defined(AUX) && defined(__GNUC__)
+  /* sysm68k(105, addr, scope, cache, len) */
+  __asm__ __volatile__ (
+    "move%.l %1,%/sp@-\n\t"
+    "move%.l %#3,%/sp@-\n\t"
+    "move%.l %#1,%/sp@-\n\t"
+    "move%.l %0,%/sp@-\n\t"
+    "move%.l %#105,%/sp@-\n\t"
+    "move%.l %#0,%/sp@-\n\t"
+    "move%.l %#38,%/sp@-\n\t"
+    "trap %#0\n\t"
+    "add%.l %#24,%/sp"
+    :
+    : "r" (function_x), "g" ((int)TRAMP_CODE_LENGTH)
+    : "%d0"
+    );
+#endif
+#endif
+#if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__)
+  cacheflush(function_x,TRAMP_CODE_LENGTH,ICACHE);
+  /* gforth-0.3.0 uses BCACHE instead of ICACHE. Why?? */
+#endif
+#if defined(__sparc__) || defined(__sparc64__)
+  /* This assumes that the trampoline fits in at most four cache lines. */
+  __TR_clear_cache_4(function_x,function_x+TRAMP_CODE_LENGTH-1);
+#endif
+#ifdef __alpha__
+  __TR_clear_cache();
+#endif
+#if defined(__hppa__) || defined(__hppa64__)
+  /* This assumes that the trampoline fits in at most two cache lines. */
+  __TR_clear_cache(function_x,function_x+TRAMP_CODE_LENGTH-1);
+#endif
+#if defined(__arm__) || defined(__armhf__) || defined(__arm64__)
+  /* On ARM, cache flushing can only be done through a system call.
+     GCC implements it for Linux with EABI, through an "swi 0" with code
+     0xf0002. For other systems, it may be an "swi 0x9f0002",
+     an "swi 0xf00000", or similar.  */
+  /* On ARM64, cache flushing is done through special instructions,
+     and the length of the cache lines must be determined at runtime.
+     See gcc/libgcc/config/aarch64/sync-cache.c. */
+#if defined(__GNUC__)
+  /* Use the GCC built-in. */
+  __clear_cache((void*)function_x,(void*)(function_x+TRAMP_CODE_LENGTH));
+#else
+  #error "Don't know how to implement clear_cache on this platform."
+#endif
+#endif
+#if defined(__powerpc__) || defined(__powerpc64__)
+  __TR_clear_cache(function_x);
+#endif
+#if defined(__riscv32__) || defined(__riscv64__)
+#if defined(__linux__)
+  /* Use the libc function. */
+  __riscv_flush_icache((void*)function_x,(void*)(function_x+TRAMP_CODE_LENGTH),0);
+#elif defined(__GNUC__)
+  __asm__ __volatile__ ("fence.i");
+#endif
+#endif
+#endif
+
+  /* 5. Return. */
+  return (trampoline_function_t) (function_x + TRAMP_BIAS);
+}
+
+void free_trampoline (trampoline_function_t function)
+{
+#if TRAMP_BIAS
+  function = (trampoline_function_t)((char*)function - TRAMP_BIAS);
+#endif
+#if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT)
+#ifdef EXECUTABLE_VIA_MMAP_FILE_SHARED
+  /* Find the writable address corresponding to the executable address. */
+  { uintptr_t page_x = (uintptr_t) function & -(intptr_t)pagesize;
+    function -= ((intptr_t*)page_x)[0];
+  }
+#endif
+  *(char**)function = freelist; freelist = (char*)function;
+  /* It is probably not worth calling munmap() for entirely freed pages. */
+#else
+  free(((char**)function)[-1]);
+#endif
+}
+
+int is_trampoline (void* function)
+{
+#ifdef is_tramp
+#ifdef __hppanew__
+  void* tramp_address = &tramp;
+  if (!(((uintptr_t)function & 3) == (TRAMP_BIAS & 3))) return 0;
+#endif
+  return ((is_tramp(((char*)function - TRAMP_BIAS))) ? 1 : 0);
+#else
+  abort();
+#endif
+}
+
+trampoline_function_t trampoline_address (trampoline_function_t function)
+{
+#ifdef tramp_address
+  return (trampoline_function_t)(tramp_address(((char*)function - TRAMP_BIAS)));
+#else
+  abort();
+#endif
+}
+
+void** trampoline_variable (trampoline_function_t function)
+{
+#ifdef tramp_variable
+  return (void**)(tramp_variable(((char*)function - TRAMP_BIAS)));
+#else
+  abort();
+#endif
+}
+
+void* trampoline_data (trampoline_function_t function)
+{
+#ifdef tramp_data
+  return (void*)(tramp_data(((char*)function - TRAMP_BIAS)));
+#else
+  abort();
+#endif
+}
diff --git a/trampoline/trampoline.h b/trampoline/trampoline.h
new file mode 100644 (file)
index 0000000..3e93ae3
--- /dev/null
@@ -0,0 +1,85 @@
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#ifndef _TRAMPOLINE_H
+#define _TRAMPOLINE_H
+
+#include "ffcall-version.h"
+
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+       
+/* This type denotes an opaque function pointer.
+   You need to cast it to an actual function pointer type (with correct return
+   type) before you can actually invoke it. */
+#ifdef __cplusplus
+typedef int (*trampoline_function_t) (...);
+#else
+typedef int (*trampoline_function_t) ();
+#endif
+
+
+/* Allocates a trampoline.
+   It returns a function pointer that takes the same parameters and returns the
+   same type as ADDRESS.
+   When invoked, it first stores DATA at the location pointed to by VARIABLE,
+   then invokes ADDRESS with the same arguments. It returns the value returned
+   by ADDRESS.
+   The trampoline has indefinite extent. It can be accessed until a call to
+   free_trampoline().
+ */
+extern trampoline_function_t alloc_trampoline (trampoline_function_t /* ADDRESS */, void** /* VARIABLE */, void* /* DATA */);
+
+/* Frees the memory used by a trampoline.
+   FUNCTION must be the result of an alloc_trampoline() invocation.
+   After this call, FUNCTION must not be used any more - neither invoked,
+   not used as an argument to other functions.
+ */
+extern void free_trampoline (trampoline_function_t /* FUNCTION */);
+
+
+/* Tests whether a given pointer is a function pointer returned by
+   alloc_trampoline(). Returns 1 for yes, 0 for no.
+   If yes, it can be cast to trampoline_function_t.
+ */
+extern int is_trampoline (void* /* FUNCTION */);
+
+/* Returns the ADDRESS argument passed to the alloc_trampoline() invocation.
+   FUNCTION must be the result of an alloc_trampoline() invocation.
+ */
+extern trampoline_function_t trampoline_address (trampoline_function_t /* FUNCTION */);
+
+/* Returns the VARIABLE argument passed to the alloc_trampoline() invocation.
+   FUNCTION must be the result of an alloc_trampoline() invocation.
+ */
+extern void** trampoline_variable (trampoline_function_t /* FUNCTION */);
+
+/* Returns the DATA argument passed to the alloc_trampoline() invocation.
+   FUNCTION must be the result of an alloc_trampoline() invocation.
+ */
+extern void* trampoline_data (trampoline_function_t /* FUNCTION */);
+
+
+#ifdef __cplusplus
+}
+#endif
+
+
+#endif /* _TRAMPOLINE_H */
diff --git a/trampoline/trampoline.html b/trampoline/trampoline.html
new file mode 100644 (file)
index 0000000..ab4be00
--- /dev/null
@@ -0,0 +1,144 @@
+<HTML>
+<HEAD>
+<!--
+Copyright (C) 1995-2017 Bruno Haible
+
+This manual is free documentation.  It is dually licensed under the
+GNU FDL and the GNU GPL.  This means that you can redistribute this
+manual under either of these two licenses, at your choice.
+
+This manual is covered by the GNU FDL.  Permission is granted to copy,
+distribute and/or modify this document under the terms of the
+GNU Free Documentation License (FDL), either version 1.2 of the
+License, or (at your option) any later version published by the
+Free Software Foundation (FSF); with no Invariant Sections, with no
+Front-Cover Text, and with no Back-Cover Texts.
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/fdl-1.2>.
+
+This manual is covered by the GNU GPL.  You can redistribute it and/or
+modify it under the terms of the GNU General Public License (GPL), either
+version 2 of the License, or (at your option) any later version published
+by the Free Software Foundation (FSF).
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
+-->
+<TITLE> TRAMPOLINE manual page </TITLE>
+</HEAD>
+<BODY>
+<H1>TRAMPOLINE manual page</H1>
+
+<UL>
+<LI> <A HREF="#Name">Name</A>
+<LI> <A HREF="#Synopsis">Synopsis</A>
+<LI> <A HREF="#Description">Description</A>
+<LI> <A HREF="#See also">See also</A>
+<LI> <A HREF="#Bugs">Bugs</A>
+<LI> <A HREF="#Porting">Porting</A>
+<LI> <A HREF="#Author">Author</A>
+<LI> <A HREF="#Acknowledgements">Acknowledgements</A>
+</UL>
+<P>
+
+<HR>
+
+<A NAME="Name">
+<H2>Name</H2>
+</A>
+
+trampoline -  closures as first-class C functions
+
+<A NAME="Synopsis">
+<H2>Synopsis</H2>
+</A>
+
+<PRE>
+<CODE>#include &lt;trampoline.h&gt;</CODE>
+<CODE><VAR>function</VAR> = alloc_trampoline(<VAR>address</VAR>, <VAR>variable</VAR>, <VAR>data</VAR>);</CODE>
+<CODE>free_trampoline(<VAR>function</VAR>);</CODE>
+<CODE>is_trampoline(<VAR>function</VAR>)</CODE>
+<CODE>trampoline_address(<VAR>function</VAR>)</CODE>
+<CODE>trampoline_variable(<VAR>function</VAR>)</CODE>
+<CODE>trampoline_data(<VAR>function</VAR>)</CODE>
+</PRE>
+
+<A NAME="Description">
+<H2>Description</H2>
+</A>
+
+These  functions implement <EM>closures</EM>  as first-class
+C functions.  A closure consists of a regular C function  and  a
+piece of data which gets passed to the C function when the
+closure is called.
+<P>
+Closures as <EM>first-class C functions</EM> means  that  they  fit
+into  a  function  pointer  and can be called exactly like any
+other C function.
+<CODE><VAR>function</VAR> = alloc_trampoline(<VAR>address</VAR>, <VAR>variable</VAR>, <VAR>data</VAR>)</CODE>
+allocates  a closure.
+When <VAR>function</VAR>  gets  called,  it  stores
+<VAR>data</VAR>  in the variable <VAR>variable</VAR>
+ and calls the C function at <VAR>address</VAR>.
+The  function  at <VAR>address</VAR>  is  responsible  for
+fetching <VAR>data</VAR>  out of <VAR>variable</VAR>
+ immediately, before execution of any other function call.
+<P>
+This is much like gcc's local functions, except  that  the
+GNU  C local functions have dynamic extent (i.e. are
+deallocated when the creating function returns), while <EM>trampoline</EM>
+  provides  functions with indefinite extent: <CODE><VAR>function</VAR></CODE>
+is  only  deallocated  when  <CODE>free_trampoline(<VAR>function</VAR>)</CODE>  is
+called.
+<P>
+<CODE>is_trampoline(<VAR>function</VAR>)</CODE>
+checks  whether  the  C  function <CODE><VAR>function</VAR></CODE>
+was  produced by a call to <CODE>alloc_trampoline</CODE>.
+If this returns true, the arguments given to <CODE>alloc_trampoline</CODE>
+can  be  retrieved:
+<UL>
+<LI> <CODE>trampoline_address(<VAR>function</VAR>)</CODE> returns <VAR>address</VAR>,
+<LI> <CODE>trampoline_variable(<VAR>function</VAR>)</CODE> returns <VAR>variable</VAR>,
+<LI> <CODE>trampoline_data(<VAR>function</VAR>)</CODE> returns <VAR>data</VAR>.
+</UL>
+
+<A NAME="See also">
+<H2>See also</H2>
+</A>
+<A HREF="gcc(1)"><CODE><B>gcc</B></CODE></A>(1), <A HREF="stdarg(3)"><CODE><B>stdarg</B></CODE></A>(3), <A HREF="callback(3)"><CODE><B>callback</B></CODE></A>(3)
+
+<A NAME="Bugs">
+<H2>Bugs</H2>
+</A>
+
+Passing  the  data  through a global variable is not reentrant. Don't
+call trampoline functions from within  signal
+handlers. This is fixed in the <A HREF="callback(3)"><CODE><B>callback</B></CODE></A>(3) package.
+
+<A NAME="Porting">
+<H2>Porting</H2>
+</A>
+
+The way gcc builds local functions is described in the gcc
+source, file <SAMP>gcc-2.6.3/config/<VAR>cpu</VAR>/<VAR>cpu</VAR>.h</SAMP>.
+
+<A NAME="Author">
+<H2>Author</H2>
+</A>
+
+Bruno Haible &lt;bruno@clisp.org&gt;
+
+<A NAME="Acknowledgements">
+<H2>Acknowledgements</H2>
+</A>
+
+Many ideas were cribbed from the gcc source.
+<P>
+
+<HR>
+
+<ADDRESS>TRAMPOLINE manual page<BR>
+Bruno Haible &lt;bruno@clisp.org&gt;
+</ADDRESS>
+<P>
+Last modified: 1 January 2017.
+
+</BODY>
+</HTML>
diff --git a/trampoline/trampoline.man b/trampoline/trampoline.man
new file mode 100644 (file)
index 0000000..2262814
--- /dev/null
@@ -0,0 +1,75 @@
+TRAMPOLINE(3)              Library Functions Manual              TRAMPOLINE(3)
+
+
+
+\e[1mNAME\e[0m
+       trampoline - closures as first-class C functions
+
+\e[1mSYNOPSIS\e[0m
+       \e[1m#include <trampoline.h>\e[0m
+
+       \e[1mfunction = alloc_trampoline(address, variable, data);\e[0m
+
+       \e[1mfree_trampoline(function);\e[0m
+
+       \e[1mis_trampoline(function)\e[0m
+       \e[1mtrampoline_address(function)\e[0m
+       \e[1mtrampoline_variable(function)\e[0m
+       \e[1mtrampoline_data(function)\e[0m
+
+\e[1mDESCRIPTION\e[0m
+       These  functions implement \e[4mclosures\e[24m as first-class C functions.  A clo‐
+       sure consists of a regular C function and a piece of  data  which  gets
+       passed to the C function when the closure is called.
+
+       Closures as \e[4mfirst-class\e[24m \e[4mC\e[24m \e[4mfunctions\e[24m means that they fit into a function
+       pointer and can be called exactly like any other C function.   \e[4mfunction\e[0m
+       \e[1m=  alloc_trampoline(\e[4m\e[22maddress\e[24m\e[1m,  \e[4m\e[22mvariable\e[24m\e[1m, \e[4m\e[22mdata\e[24m\e[1m) \e[22mallocates a closure. When
+       \e[4mfunction\e[24m gets called, it stores \e[4mdata\e[24m in the variable \e[4mvariable\e[24m and calls
+       the  C function at \e[4maddress\e[24m.  The function at \e[4maddress\e[24m is responsible for
+       fetching \e[4mdata\e[24m out of \e[4mvariable\e[24m  immediately,  before  execution  of  any
+       other function call.
+
+       This  is  much  like \e[1mgcc\e[22m's local functions, except that the GNU C local
+       functions have dynamic extent (i.e. are deallocated when  the  creating
+       function  returns), while \e[4mtrampoline\e[24m provides functions with indefinite
+       extent: \e[4mfunction\e[24m is only deallocated when \e[1mfree_trampoline(\e[4m\e[22mfunction\e[24m\e[1m)  \e[22mis
+       called.
+
+       \e[1mis_trampoline(\e[4m\e[22mfunction\e[24m\e[1m) \e[22mchecks whether the C function \e[4mfunction\e[24m was pro‐
+       duced by a call to \e[4malloc_trampoline\e[24m.  If this returns true,  the  argu‐
+       ments given to \e[4malloc_trampoline\e[24m can be retrieved:
+
+           \e[1mtrampoline_address(\e[4m\e[22mfunction\e[24m\e[1m) \e[22mreturns \e[4maddress\e[24m,
+
+           \e[1mtrampoline_variable(\e[4m\e[22mfunction\e[24m\e[1m) \e[22mreturns \e[4mvariable\e[24m,
+
+           \e[1mtrampoline_data(\e[4m\e[22mfunction\e[24m\e[1m) \e[22mreturns \e[4mdata\e[24m.
+
+
+\e[1mSEE ALSO\e[0m
+       \e[1mgcc\e[22m(1), \e[1mstdarg\e[22m(3), \e[1mcallback\e[22m(3)
+
+
+\e[1mBUGS\e[0m
+       Passing the data through a global variable is not reentrant. Don't call
+       trampoline functions from within signal handlers. This is fixed in  the
+       \e[1mcallback\e[22m(3) package.
+
+
+\e[1mPORTING\e[0m
+       The way \e[1mgcc \e[22mbuilds local functions is described in the gcc source, file
+       gcc-2.6.3/config/\e[4mcpu\e[24m/\e[4mcpu\e[24m.h.
+
+
+\e[1mAUTHOR\e[0m
+       Bruno Haible <bruno@clisp.org>
+
+
+\e[1mACKNOWLEDGEMENTS\e[0m
+       Many ideas were cribbed from the gcc source.
+
+
+
+
+                                1 January 2017                   TRAMPOLINE(3)
diff --git a/vacall/COPYING b/vacall/COPYING
new file mode 100644 (file)
index 0000000..a3d1815
--- /dev/null
@@ -0,0 +1,340 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+                          51 Franklin Street, Fifth Floor,
+                          Boston, MA 02110-1301, USA.
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The licenses for most software are designed to take away your
+freedom to share and change it.  By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users.  This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it.  (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.)  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+  To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have.  You must make sure that they, too, receive or can get the
+source code.  And you must show them these terms so they know their
+rights.
+
+  We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+  Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software.  If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+  Finally, any free program is threatened constantly by software
+patents.  We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary.  To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+\f
+                    GNU GENERAL PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License.  The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language.  (Hereinafter, translation is included without limitation in
+the term "modification".)  Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope.  The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+  1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+  2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+    a) You must cause the modified files to carry prominent notices
+    stating that you changed the files and the date of any change.
+
+    b) You must cause any work that you distribute or publish, that in
+    whole or in part contains or is derived from the Program or any
+    part thereof, to be licensed as a whole at no charge to all third
+    parties under the terms of this License.
+
+    c) If the modified program normally reads commands interactively
+    when run, you must cause it, when started running for such
+    interactive use in the most ordinary way, to print or display an
+    announcement including an appropriate copyright notice and a
+    notice that there is no warranty (or else, saying that you provide
+    a warranty) and that users may redistribute the program under
+    these conditions, and telling the user how to view a copy of this
+    License.  (Exception: if the Program itself is interactive but
+    does not normally print such an announcement, your work based on
+    the Program is not required to print an announcement.)
+\f
+These requirements apply to the modified work as a whole.  If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works.  But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+  3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+    a) Accompany it with the complete corresponding machine-readable
+    source code, which must be distributed under the terms of Sections
+    1 and 2 above on a medium customarily used for software interchange; or,
+
+    b) Accompany it with a written offer, valid for at least three
+    years, to give any third party, for a charge no more than your
+    cost of physically performing source distribution, a complete
+    machine-readable copy of the corresponding source code, to be
+    distributed under the terms of Sections 1 and 2 above on a medium
+    customarily used for software interchange; or,
+
+    c) Accompany it with the information you received as to the offer
+    to distribute corresponding source code.  (This alternative is
+    allowed only for noncommercial distribution and only if you
+    received the program in object code or executable form with such
+    an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it.  For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable.  However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+\f
+  4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License.  Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+  5. You are not required to accept this License, since you have not
+signed it.  However, nothing else grants you permission to modify or
+distribute the Program or its derivative works.  These actions are
+prohibited by law if you do not accept this License.  Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+  6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions.  You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+  7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all.  For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices.  Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+\f
+  8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded.  In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+  9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number.  If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation.  If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+  10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission.  For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this.  Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+                            NO WARRANTY
+
+  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+                     END OF TERMS AND CONDITIONS
+\f
+        Appendix: How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software Foundation,
+    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+    Gnomovision version 69, Copyright (C) year  name of author
+    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  Here is a sample; alter the names:
+
+  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+  `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+  <signature of Ty Coon>, 1 April 1989
+  Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs.  If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library.  If this is what you want to do, use the GNU Library General
+Public License instead of this License.
diff --git a/vacall/Makefile.devel b/vacall/Makefile.devel
new file mode 100644 (file)
index 0000000..3b76a44
--- /dev/null
@@ -0,0 +1,308 @@
+# This is the developer's -*-Makefile-*-, not the user's makefile.
+# Do not use it unless you know exactly what you do!
+
+THISFILE = Makefile.devel
+LN = ln -s
+RM = rm -f
+
+# ============ Rules that require cross-compilation tools ============
+
+GCC = gcc
+GCCFLAGS = -I.. -I../dummy -O2 -fno-omit-frame-pointer
+SED = sed
+CROSS_TOOL = cross
+
+precompiled : \
+  vacall-i386-macro.S \
+  vacall-m68k.mit.S vacall-m68k.motorola.S \
+  vacall-mipseb-macro.S vacall-mipsel-macro.S vacall-mipsn32eb-macro.S vacall-mipsn32el-macro.S vacall-mips64eb-macro.S vacall-mips64el-macro.S \
+  vacall-sparc-macro.S vacall-sparc64-macro.S \
+  vacall-alpha-macro.S \
+  vacall-hppa-macro.S vacall-hppa64-macro.S \
+  vacall-arm-macro.S vacall-armhf-macro.S \
+  vacall-arm64-macro.S \
+  vacall-powerpc-aix.s vacall-powerpc-linux-macro.S vacall-powerpc-sysv4-macro.S vacall-powerpc-macos.s vacall-powerpc64-aix.s vacall-powerpc64-linux.S vacall-powerpc64-elfv2-linux.S \
+  vacall-ia64-macro.S \
+  vacall-x86_64-macro.S vacall-x86_64-x32-linux.s vacall-x86_64-windows-macro.S \
+  vacall-s390-macro.S vacall-s390x-macro.S \
+  vacall-riscv32-ilp32d-macro.S vacall-riscv64-lp64d-macro.S
+
+
+vacall-i386-linux.s : vacall-i386.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) i386-linux gcc -V 3.1 $(GCCFLAGS) -D__i386__ -S vacall-i386.c -o vacall-i386-linux.s
+
+vacall-i386-linux-pic.s : vacall-i386.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) i386-linux gcc -V 3.1 $(GCCFLAGS) -fPIC -D__i386__ -S vacall-i386.c -o vacall-i386-linux-pic.s
+
+vacall-i386-macro.S : vacall-i386-linux.s vacall-i386-linux-pic.s ../common/asm-i386.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-i386.h"' ; echo '#ifdef __PIC__' ; sed -e '/\.align.*,0x90$$/d' < vacall-i386-linux-pic.s | sed -e 's/vacall_function/C(vacall_function)/g' | ../common/asm-i386.sh ; echo '#else' ; sed -e '/\.align.*,0x90$$/d' < vacall-i386-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' | ../common/asm-i386.sh ; echo '#endif' ; cat ../common/noexecstack.h) > vacall-i386-macro.S
+
+
+vacall-m68k-linux.s : vacall-m68k.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) m68k-linux gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S vacall-m68k.c -o vacall-m68k-linux.s
+
+vacall-m68k-sun.s : vacall-m68k.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) m68k-sun gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S vacall-m68k.c -o vacall-m68k-sun.s
+
+vacall-m68k.mit.S : vacall-m68k-sun.s ../common/asm-m68k.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-m68k.h"' ; ../common/asm-m68k.sh mit < vacall-m68k-sun.s ; cat ../common/noexecstack.h) > vacall-m68k.mit.S
+
+vacall-m68k.motorola.S : vacall-m68k-linux.s ../common/asm-m68k.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-m68k.h"' ; ../common/asm-m68k.sh motorola < vacall-m68k-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' ; cat ../common/noexecstack.h) > vacall-m68k.motorola.S
+
+
+vacall-mipseb-linux.s : vacall-mips.c vacall-internal.h vacall.h $(THISFILE)
+# For references to global symbols: -mno-explicit-relocs ensures a syntax that the IRIX assembler understands.
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -meb -mno-explicit-relocs $(GCCFLAGS) -D__mips__ -S vacall-mips.c -o vacall-mipseb-linux.s
+
+vacall-mipseb-macro.S : vacall-mipseb-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mipseb-linux.s) > vacall-mipseb-macro.S
+
+vacall-mipsel-linux.s : vacall-mips.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -mel -mno-explicit-relocs $(GCCFLAGS) -D__mips__ -S vacall-mips.c -o vacall-mipsel-linux.s
+
+vacall-mipsel-macro.S : vacall-mipsel-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mipsel-linux.s) > vacall-mipsel-macro.S
+
+vacall-mipsn32eb-linux.s : vacall-mipsn32.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -meb $(GCCFLAGS) -D__mipsn32__ -S vacall-mipsn32.c -o vacall-mipsn32eb-linux.s
+
+vacall-mipsn32eb-macro.S : vacall-mipsn32eb-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mipsn32eb-linux.s) > vacall-mipsn32eb-macro.S
+
+vacall-mipsn32el-linux.s : vacall-mipsn32.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -mel $(GCCFLAGS) -D__mipsn32__ -S vacall-mipsn32.c -o vacall-mipsn32el-linux.s
+
+vacall-mipsn32el-macro.S : vacall-mipsn32el-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mipsn32el-linux.s) > vacall-mipsn32el-macro.S
+
+vacall-mips64eb-linux.s : vacall-mips64.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -meb $(GCCFLAGS) -D__mips64__ -S vacall-mips64.c -o vacall-mips64eb-linux.s
+
+vacall-mips64eb-macro.S : vacall-mips64eb-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mips64eb-linux.s) > vacall-mips64eb-macro.S
+
+vacall-mips64el-linux.s : vacall-mips64.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -mel $(GCCFLAGS) -D__mips64__ -S vacall-mips64.c -o vacall-mips64el-linux.s
+
+vacall-mips64el-macro.S : vacall-mips64el-linux.s ../common/asm-mips.sh $(THISFILE)
+       (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mips64el-linux.s) > vacall-mips64el-macro.S
+
+
+vacall-sparc-linux.s : vacall-sparc.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -D__sparc__ -S vacall-sparc.c -o vacall-sparc-linux.s
+
+vacall-sparc-linux-pic.s : vacall-sparc.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -fPIC -D__sparc__ -S vacall-sparc.c -o vacall-sparc-linux-pic.s
+
+vacall-sparc-macro.S : vacall-sparc-linux.s vacall-sparc-linux-pic.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE)
+# For references to global symbols, we need to distinguish the PIC and non-PIC case.
+# See https://gcc.gnu.org/bugzilla/show_bug.cgi?id=81653
+       (echo '#include "asm-sparc.h"' ; echo '#ifdef __PIC__' ; ../common/asm-sparc.sh < vacall-sparc-linux-pic.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#else' ; ../common/asm-sparc.sh < vacall-sparc-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#endif' ; cat ../common/noexecstack.h) > vacall-sparc-macro.S
+
+vacall-sparc64-linux.s : vacall-sparc64.c vacall-internal.h vacall.h $(THISFILE)
+# For references to global symbols in non-PIC mode:
+# - -mcmodel=medlow uses 2 instructions, but the code does not work on Solaris (error "ld: fatal: relocation error: R_SPARC_HI22").
+# - -mcmodel=medmid uses 3 instructions, but the code still makes some assumptions about the address space.
+# - -mcmodel=medany uses 4 instructions.
+       $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 -mcmodel=medany $(GCCFLAGS) -D__sparc64__ -S vacall-sparc64.c -o vacall-sparc64-linux.s
+
+vacall-sparc64-linux-pic.s : vacall-sparc64.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 $(GCCFLAGS) -fPIC -D__sparc64__ -S vacall-sparc64.c -o vacall-sparc64-linux-pic.s
+
+vacall-sparc64-macro.S : vacall-sparc64-linux.s vacall-sparc64-linux-pic.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE)
+# For references to global symbols, we need to distinguish the PIC and non-PIC case.
+# See https://gcc.gnu.org/bugzilla/show_bug.cgi?id=81653
+       (echo '#include "asm-sparc.h"' ; echo '#ifdef __PIC__' ; ../common/asm-sparc.sh < vacall-sparc64-linux-pic.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#else' ; ../common/asm-sparc.sh < vacall-sparc64-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#endif' ; cat ../common/noexecstack.h) > vacall-sparc64-macro.S
+
+
+vacall-alpha-linux.s : vacall-alpha.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) alpha-linux gcc -V 4.0.2 $(GCCFLAGS) -D__alpha__ -S vacall-alpha.c -o vacall-alpha-linux.s
+
+vacall-alpha-macro.S : vacall-alpha-linux.s ../common/asm-alpha.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-alpha.sh < vacall-alpha-linux.s ; cat ../common/noexecstack.h) > vacall-alpha-macro.S
+
+
+vacall-hppa-linux.s : vacall-hppa.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) hppa-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa__ -S vacall-hppa.c -o vacall-hppa-linux.s
+
+vacall-hppa-macro.S : vacall-hppa-linux.s ../common/asm-hppa.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-hppa.h"' ; ../common/asm-hppa.sh < vacall-hppa-linux.s ; echo 'IMPORT_DATA(vacall_function)' ; cat ../common/noexecstack.h) > vacall-hppa-macro.S
+
+vacall-hppa64-linux.s : vacall-hppa64.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa64__ -S vacall-hppa64.c -o vacall-hppa64-linux.s
+
+vacall-hppa64-macro.S : vacall-hppa64-linux.s ../common/asm-hppa64.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-hppa64.h"' ; ../common/asm-hppa64.sh < vacall-hppa64-linux.s ; echo 'IMPORT_DATA(vacall_function)' ; cat ../common/noexecstack.h) > vacall-hppa64-macro.S
+
+
+vacall-arm-linux.s : vacall-arm.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) arm-linux gcc -V 3.1 -mlittle-endian $(GCCFLAGS) -D__arm__ -S vacall-arm.c -o vacall-armel.s
+       $(CROSS_TOOL) arm-linux gcc -V 3.1 -mbig-endian $(GCCFLAGS) -D__arm__ -S vacall-arm.c -o vacall-armeb.s
+       cmp vacall-armel.s vacall-armeb.s > /dev/null
+       cp vacall-armel.s vacall-arm-linux.s
+       $(RM) vacall-armel.s vacall-armeb.s
+
+vacall-arm-linux-pic.s : vacall-arm.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) arm-linux gcc -V 3.1 -mlittle-endian $(GCCFLAGS) -fPIC -D__arm__ -S vacall-arm.c -o vacall-armel-pic.s
+       $(CROSS_TOOL) arm-linux gcc -V 3.1 -mbig-endian $(GCCFLAGS) -fPIC -D__arm__ -S vacall-arm.c -o vacall-armeb-pic.s
+       cmp vacall-armel-pic.s vacall-armeb-pic.s > /dev/null
+       cp vacall-armel-pic.s vacall-arm-linux-pic.s
+       $(RM) vacall-armel-pic.s vacall-armeb-pic.s
+
+vacall-arm-macro.S : vacall-arm-linux.s vacall-arm-linux-pic.s ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE)
+       (echo '#include "asm-arm.h"' ; echo '#ifdef __PIC__' ; ../common/asm-arm.sh < vacall-arm-linux-pic.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#else' ; ../common/asm-arm.sh < vacall-arm-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#endif' ; cat ../common/noexecstack-arm.h) > vacall-arm-macro.S
+
+vacall-armhf-linux.s : vacall-armhf.c vacall-internal.h vacall.h $(THISFILE)
+# The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer.
+       $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.3.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -mlittle-endian $(GCCFLAGS) -D__armhf__ -S vacall-armhf.c -o vacall-armhfel.s
+       $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.3.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -mbig-endian $(GCCFLAGS) -D__armhf__ -S vacall-armhf.c -o vacall-armhfeb.s
+       cmp vacall-armhfel.s vacall-armhfeb.s > /dev/null
+       cp vacall-armhfel.s vacall-armhf-linux.s
+       $(RM) vacall-armhfel.s vacall-armhfeb.s
+
+vacall-armhf-linux-pic.s : vacall-armhf.c vacall-internal.h vacall.h $(THISFILE)
+# The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer.
+       $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.3.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -mlittle-endian $(GCCFLAGS) -fPIC -D__armhf__ -S vacall-armhf.c -o vacall-armhfel-pic.s
+       $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.3.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -mbig-endian $(GCCFLAGS) -fPIC -D__armhf__ -S vacall-armhf.c -o vacall-armhfeb-pic.s
+       cmp vacall-armhfel-pic.s vacall-armhfeb-pic.s > /dev/null
+       cp vacall-armhfel-pic.s vacall-armhf-linux-pic.s
+       $(RM) vacall-armhfel-pic.s vacall-armhfeb-pic.s
+
+vacall-armhf-macro.S : vacall-armhf-linux.s vacall-armhf-linux-pic.s ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE)
+       (echo '#include "asm-arm.h"' ; echo '#ifdef __PIC__' ; ../common/asm-arm.sh < vacall-armhf-linux-pic.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#else' ; ../common/asm-arm.sh < vacall-armhf-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#endif' ; cat ../common/noexecstack-arm.h) > vacall-armhf-macro.S
+
+
+vacall-arm64-macro.S : vacall-arm64.c vacall-internal.h vacall.h ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE)
+       $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mlittle-endian $(GCCFLAGS) -D__arm64__ -S vacall-arm64.c -o vacall-arm64el.s
+       $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mbig-endian $(GCCFLAGS) -D__arm64__ -S vacall-arm64.c -o vacall-arm64eb.s
+       cmp vacall-arm64el.s vacall-arm64eb.s > /dev/null
+       (echo '#include "asm-arm.h"' ; ../common/asm-arm.sh < vacall-arm64el.s ; cat ../common/noexecstack-arm.h) > vacall-arm64-macro.S
+       $(RM) vacall-arm64el.s vacall-arm64eb.s
+
+
+vacall-powerpc-aix.s : vacall-powerpc.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) rs6000-aix gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc -mnew-mnemonics $(GCCFLAGS) -D__powerpc__ -S vacall-powerpc.c -o vacall-powerpc-aix.s
+       echo '  .extern vacall_function[RW]' >> vacall-powerpc-aix.s
+
+vacall-powerpc-linux.s : vacall-powerpc.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S vacall-powerpc.c -o vacall-powerpc-linux.s
+
+vacall-powerpc-linux-macro.S : vacall-powerpc-linux.s ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-powerpc.sh < vacall-powerpc-linux.s ; cat ../common/noexecstack.h) > vacall-powerpc-linux-macro.S
+
+vacall-powerpc-sysv4-macro.S : vacall-powerpc.c vacall-internal.h vacall.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE)
+       $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S vacall-powerpc.c -o vacall-powerpc-sysv4.s
+       (../common/asm-powerpc.sh < vacall-powerpc-sysv4.s ; cat ../common/noexecstack.h) > vacall-powerpc-sysv4-macro.S
+       $(RM) vacall-powerpc-sysv4.s
+
+vacall-powerpc-macos.s : vacall-powerpc.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) powerpc-darwin gcc -V 3.3.6 $(GCCFLAGS) -D__powerpc__ -S vacall-powerpc.c -o vacall-powerpc-macos.s
+
+vacall-powerpc64-aix.s : vacall-powerpc64.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) rs6000-aix6.1 gcc-5.4.0 -maix64 $(GCCFLAGS) -D__powerpc64__ -S vacall-powerpc64.c -o vacall-powerpc64-aix.s
+       echo '  .extern vacall_function[UA]' >> vacall-powerpc64-aix.s
+
+vacall-powerpc64-linux.S : vacall-powerpc64.c vacall-internal.h vacall.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE)
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -S vacall-powerpc64.c -o vacall-powerpc64-linux-le.s
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -S vacall-powerpc64.c -o vacall-powerpc64-linux-be.s
+       cmp vacall-powerpc64-linux-le.s vacall-powerpc64-linux-be.s > /dev/null
+       (../common/asm-powerpc.sh < vacall-powerpc64-linux-be.s ; cat ../common/noexecstack.h) > vacall-powerpc64-linux.S
+       $(RM) vacall-powerpc64-linux-le.s vacall-powerpc64-linux-be.s
+
+vacall-powerpc64-elfv2-linux.S : vacall-powerpc64.c vacall-internal.h vacall.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE)
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S vacall-powerpc64.c -o vacall-powerpc64-elfv2-linux-le.s
+       $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S vacall-powerpc64.c -o vacall-powerpc64-elfv2-linux-be.s
+# vacall-powerpc64-elfv2-linux-be.s contains endianness specific optimizations.
+       (../common/asm-powerpc.sh < vacall-powerpc64-elfv2-linux-le.s ; cat ../common/noexecstack.h) > vacall-powerpc64-elfv2-linux.S
+       $(RM) vacall-powerpc64-elfv2-linux-le.s vacall-powerpc64-elfv2-linux-be.s
+
+
+vacall-ia64-linux.s : vacall-ia64.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) ia64-linux gcc -V 4.0.1 $(GCCFLAGS) -D__ia64__ -S vacall-ia64.c -o vacall-ia64-linux.s
+
+vacall-ia64-macro.S : vacall-ia64-linux.s ../common/noexecstack.h $(THISFILE)
+       cat vacall-ia64-linux.s ../common/noexecstack.h > vacall-ia64-macro.S
+
+
+vacall-x86_64-linux.s : vacall-x86_64.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) x86_64-linux gcc-4.0.2 $(GCCFLAGS) -D__x86_64__ -S vacall-x86_64.c -o vacall-x86_64-linux.s
+
+vacall-x86_64-macro.S : vacall-x86_64-linux.s ../common/asm-x86_64.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-x86_64.h"' ; ../common/asm-x86_64.sh < vacall-x86_64-linux.s ; cat ../common/noexecstack.h) > vacall-x86_64-macro.S
+
+vacall-x86_64-x32-linux.s : vacall-x86_64.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mx32 $(GCCFLAGS) -D__x86_64__ -D__x86_64_x32__ -S vacall-x86_64.c -o vacall-x86_64-x32-linux.s
+
+vacall-x86_64-windows.s : vacall-x86_64-windows.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mabi=ms $(GCCFLAGS) -fno-reorder-blocks-and-partition -D__x86_64__ -D_WIN32 -S vacall-x86_64-windows.c -o vacall-x86_64-windows.s
+
+vacall-x86_64-windows-macro.S : vacall-x86_64-windows.s ../common/asm-x86_64.sh ../common/noexecstack.h $(THISFILE)
+       (echo '#include "asm-x86_64.h"' ; ../common/asm-x86_64.sh < vacall-x86_64-windows.s ; cat ../common/noexecstack.h) > vacall-x86_64-windows-macro.S
+
+
+vacall-s390-linux.s : vacall-s390.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) s390-linux gcc -V 3.1 $(GCCFLAGS) -D__s390__ -S vacall-s390.c -o vacall-s390-linux.s
+
+vacall-s390-macro.S : vacall-s390-linux.s ../common/asm-s390.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-s390.sh < vacall-s390-linux.s ; cat ../common/noexecstack.h) > vacall-s390-macro.S
+
+
+vacall-s390x-linux.s : vacall-s390x.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) s390x-linux gcc-5.4.0 $(GCCFLAGS) -D__s390x__ -S vacall-s390x.c -o vacall-s390x-linux.s
+
+vacall-s390x-macro.S : vacall-s390x-linux.s ../common/asm-s390.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-s390.sh < vacall-s390x-linux.s ; cat ../common/noexecstack.h) > vacall-s390x-macro.S
+
+
+vacall-riscv32-ilp32d-linux.s : vacall-riscv32.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) riscv32-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv32__ -S vacall-riscv32.c -o vacall-riscv32-ilp32d-linux.s
+
+vacall-riscv32-ilp32d-macro.S : vacall-riscv32-ilp32d-linux.s ../common/asm-riscv.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-riscv.sh < vacall-riscv32-ilp32d-linux.s ; cat ../common/noexecstack.h) > vacall-riscv32-ilp32d-macro.S
+
+
+vacall-riscv64-lp64d-linux.s : vacall-riscv64.c vacall-internal.h vacall.h $(THISFILE)
+       $(CROSS_TOOL) riscv64-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv64__ -S vacall-riscv64.c -o vacall-riscv64-lp64d-linux.s
+
+vacall-riscv64-lp64d-macro.S : vacall-riscv64-lp64d-linux.s ../common/asm-riscv.sh ../common/noexecstack.h $(THISFILE)
+       (../common/asm-riscv.sh < vacall-riscv64-lp64d-linux.s ; cat ../common/noexecstack.h) > vacall-riscv64-lp64d-macro.S
+
+
+# --------------- Rules for debugging test failures ---------------
+
+tests : tests-i386.s tests-m68k.s tests-mips.s tests-sparc.s tests-alpha.s tests-hppa.s tests-arm.s tests-powerpc.s tests-powerpc64.s tests-ia64.s tests-x86_64.s
+       true
+
+tests-i386.s : tests.c vacall.h
+       $(GCC) -V 2.7.2 -b i486-linuxaout $(GCCFLAGS) -I/usr/include -D__i386__ -S tests.c -o tests-i386.s
+
+tests-m68k.s : tests.c vacall.h
+       $(GCC) -V 2.95.2 -b m68k-sun $(GCCFLAGS) -I/usr/include -D__m68k__ -S tests.c -o tests-m68k.s
+
+tests-mips.s : tests.c vacall.h
+       $(GCC) -V 2.95.2 -b mips-sgi $(GCCFLAGS) -I/usr/include -D__mips__ -S tests.c -o tests-mips.s
+
+tests-sparc.s : tests.c vacall.h
+       $(GCC) -V 2.95.2 -b sparc-sun $(GCCFLAGS) -I/usr/include -D__sparc__ -S tests.c -o tests-sparc.s
+
+tests-alpha.s : tests.c vacall.h
+       $(GCC) -V 2.7.2 -b alpha-dec-osf $(GCCFLAGS) -I/usr/include -D__alpha__ -S tests.c -o tests-alpha.s
+
+tests-hppa.s : tests.c vacall.h
+       $(GCC) -V 2.6.3 -b hppa1.0-hpux $(GCCFLAGS) -I/usr/include -D__hppa__ -S tests.c -o tests-hppa.s
+
+tests-arm.s : tests.c vacall.h
+       $(GCC) -V 2.6.3 -b arm-acorn-riscix $(GCCFLAGS) -I/usr/include -D__arm__ -S tests.c -o tests-arm.s
+
+tests-powerpc.s : tests.c vacall.h
+       $(GCC) -V 2.95.2 -b rs6000 $(GCCFLAGS) -I/usr/include -D__powerpc__ -S tests.c -o tests-powerpc.s
+
+tests-powerpc64.s : tests.c vacall.h
+       /cross/powerpc64-linux-tools/bin/powerpc64-linux-gcc $(GCCFLAGS) -I/usr/include -D__powerpc64__ -S tests.c -o tests-powerpc64.s
+
+tests-ia64.s : tests.c vacall.h
+       $(GCC) -V 2.9-ia64-000216 -b ia64-hp-linux $(GCCFLAGS) -I/usr/include -D__ia64__ -S tests.c -o tests-ia64.s
+
+tests-x86_64.s : tests.c vacall.h
+       $(GCC) -V 3.2.2 -b x86_64-suse-linux $(GCCFLAGS) -I/usr/include -D__x86_64__ -S tests.c -o tests-x86_64.s
diff --git a/vacall/Makefile.in b/vacall/Makefile.in
new file mode 100644 (file)
index 0000000..bd6d4bd
--- /dev/null
@@ -0,0 +1,380 @@
+# Makefile for vacall
+
+#### Start of system configuration section. ####
+
+HOST = @host@
+CPU = @HOST_CPU_C_ABI@
+OS = @host_os@
+
+# Directories used by "make":
+srcdir = @srcdir@
+
+# Directories used by "make install":
+prefix = @prefix@
+local_prefix = /usr/local
+exec_prefix = @exec_prefix@
+libdir = @libdir@
+includedir = @includedir@
+mandir = @mandir@
+datadir = @datadir@
+datarootdir = @datarootdir@
+htmldir = $(datadir)/html
+
+# Programs used by "make":
+# C compiler
+CC = @CC@
+CFLAGS = @CFLAGS@
+CPP = @CPP@
+# C++ compiler
+CXX = @CXX@
+CXXFLAGS = @CXXFLAGS@
+# Both C and C++ compiler
+CPPFLAGS = @CPPFLAGS@
+INCLUDES = -I. -I$(srcdir) -I.. -I$(srcdir)/..
+INCLUDES_WITH_GNULIB = $(INCLUDES) -I../gnulib-lib -I$(srcdir)/../gnulib-lib
+ASPFLAGS = `if test @AS_UNDERSCORE@ = true; then echo '-DASM_UNDERSCORE'; fi`
+LDFLAGS = @LDFLAGS@
+AR = @AR@
+AR_FLAGS = rc
+RANLIB = @RANLIB@
+MV = mv
+LN = @LN@
+RM = rm -f
+@SET_MAKE@
+
+# Programs used by "make install":
+INSTALL = @INSTALL@
+INSTALL_PROGRAM = @INSTALL_PROGRAM@
+INSTALL_DATA = @INSTALL_DATA@
+
+#### End of system configuration section. ####
+
+SHELL = /bin/sh
+
+OBJECTS = vacall.@OBJEXT@ vacall-libapi.@OBJEXT@ vacall-structcpy.@OBJEXT@
+
+all : $(OBJECTS) libvacall.a $(srcdir)/vacall.3 $(srcdir)/vacall.html
+
+vacall.@OBJEXT@ : vacall-$(CPU).@OBJEXT@
+       $(RM) vacall.@OBJEXT@
+       $(LN) vacall-$(CPU).@OBJEXT@ vacall.@OBJEXT@
+
+@IFNOT_MSVC@vacall-i386.@OBJEXT@ : vacall-i386.s
+@IFNOT_MSVC@   $(CC) @GCC_X_NONE@ -c vacall-i386.s
+
+@IFNOT_MSVC@vacall-i386.s : $(srcdir)/vacall-i386-macro.S
+@IFNOT_MSVC@   $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/vacall-i386-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > vacall-i386.s
+
+@IF_MSVC@vacall-i386.@OBJEXT@ : $(srcdir)/vacall-i386-msvc.c
+@IF_MSVC@      $(CC) $(INCLUDES) -I$(srcdir)/../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/vacall-i386-msvc.c -o vacall-i386.@OBJEXT@
+
+vacall-sparc.@OBJEXT@ : vacall-sparc.s
+       $(CC) @WORKAROUND_BUG_81653@ @GCC_X_NONE@ -c vacall-sparc.s
+
+vacall-sparc.s : $(srcdir)/vacall-sparc-macro.S
+       $(CPP) @WORKAROUND_BUG_81653@ $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/vacall-sparc-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > vacall-sparc.s
+
+vacall-sparc64.@OBJEXT@ : vacall-sparc64.s
+       $(CC) @GCC_X_NONE@ -c vacall-sparc64.s
+
+vacall-sparc64.s : $(srcdir)/vacall-sparc64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/vacall-sparc64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > vacall-sparc64.s
+
+vacall-m68k.@OBJEXT@ : vacall-m68k.s
+       $(CC) @GCC_X_NONE@ -c vacall-m68k.s
+
+vacall-m68k.s : $(srcdir)/vacall-m68k.mit.S $(srcdir)/vacall-m68k.motorola.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-m68k.motorola.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' | if test @AS_UNDERSCORE@ = true; then sed -e 's/\$$//g'; else sed -e 's/\$$/%/g'; fi > vacall-m68k.s
+
+vacall-mips.@OBJEXT@ : vacall-mips.s
+       $(CC) @GCC_X_NONE@ -c vacall-mips.s
+
+vacall-mips.s : $(srcdir)/vacall-mips@ENDIANNESS@-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-mips@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mips.s
+
+vacall-mipsn32.@OBJEXT@ : vacall-mipsn32.s
+       $(CC) @GCC_X_NONE@ -c vacall-mipsn32.s
+
+vacall-mipsn32.s : $(srcdir)/vacall-mipsn32@ENDIANNESS@-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-mipsn32@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mipsn32.s
+
+vacall-mips64.@OBJEXT@ : vacall-mips64.s
+       $(CC) @GCC_X_NONE@ -c vacall-mips64.s
+
+vacall-mips64.s : $(srcdir)/vacall-mips64@ENDIANNESS@-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-mips64@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mips64.s
+
+vacall-alpha.@OBJEXT@ : vacall-alpha.s
+       $(CC) @GCC_X_NONE@ -c vacall-alpha.s
+
+vacall-alpha.s : $(srcdir)/vacall-alpha-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/vacall-alpha-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-alpha.s
+
+vacall-hppa.@OBJEXT@ : vacall-hppa.s
+       $(CC) @GCC_X_NONE@ -c vacall-hppa.s
+
+vacall-hppa.s : $(srcdir)/vacall-hppa-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > vacall-hppa.s
+
+vacall-hppa64.@OBJEXT@ : vacall-hppa64.s
+       $(CC) @GCC_X_NONE@ -c vacall-hppa64.s
+
+vacall-hppa64.s : $(srcdir)/vacall-hppa64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > vacall-hppa64.s
+
+vacall-arm.@OBJEXT@ : vacall-arm.s
+       $(CC) @GCC_X_NONE@ -c vacall-arm.s
+
+vacall-arm.s : $(srcdir)/vacall-arm-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-arm-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-arm.s
+
+vacall-armhf.@OBJEXT@ : vacall-armhf.s
+       $(CC) @GCC_X_NONE@ -c vacall-armhf.s
+
+vacall-armhf.s : $(srcdir)/vacall-armhf-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-armhf-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-armhf.s
+
+vacall-arm64.@OBJEXT@ : vacall-arm64.s
+       $(CC) @GCC_X_NONE@ -c vacall-arm64.s
+
+vacall-arm64.s : $(srcdir)/vacall-arm64-macro.S
+       $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-arm64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-arm64.s
+
+vacall-powerpc.@OBJEXT@ : vacall-powerpc.s
+       $(CC) @GCC_X_NONE@ -c vacall-powerpc.s
+
+vacall-powerpc.s : $(srcdir)/vacall-powerpc-aix.s $(srcdir)/vacall-powerpc-linux-macro.S $(srcdir)/vacall-powerpc-macos.s $(srcdir)/vacall-powerpc-sysv4-macro.S
+       case "$(OS)" in \
+         aix*) syntax=aix;; \
+         linux* | netbsd* | openbsd*) syntax=linux;; \
+         macos* | darwin*) syntax=macos;; \
+         *) syntax=sysv4;; \
+       esac; \
+       case $${syntax} in \
+         macos) \
+           grep -v '\.machine' $(srcdir)/vacall-powerpc-$${syntax}.s > vacall-powerpc.s || exit 1 ;; \
+         linux | sysv4) \
+           $(CPP) $(ASPFLAGS) $(srcdir)/vacall-powerpc-$${syntax}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-powerpc.s || exit 1 ;; \
+         *) \
+           cp $(srcdir)/vacall-powerpc-$${syntax}.s vacall-powerpc.s || exit 1 ;; \
+       esac
+
+vacall-powerpc64.@OBJEXT@ : vacall-powerpc64.s
+       $(CC) @GCC_X_NONE@ -c vacall-powerpc64.s
+
+vacall-powerpc64.s : $(srcdir)/vacall-powerpc64-aix.s $(srcdir)/vacall-powerpc64-linux.S
+       case "$(OS)" in \
+         aix*) syntax=aix;; \
+         *) syntax=linux;; \
+       esac; \
+       case $${syntax} in \
+         linux) \
+           $(CPP) $(ASPFLAGS) $(srcdir)/vacall-powerpc64-$${syntax}.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-powerpc64.s || exit 1 ;; \
+         *) \
+           cp $(srcdir)/vacall-powerpc64-$${syntax}.s vacall-powerpc64.s || exit 1 ;; \
+       esac
+
+vacall-powerpc64-elfv2.@OBJEXT@ : vacall-powerpc64-elfv2.s
+       $(CC) @GCC_X_NONE@ -c vacall-powerpc64-elfv2.s
+
+vacall-powerpc64-elfv2.s : $(srcdir)/vacall-powerpc64-elfv2-linux.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/vacall-powerpc64-elfv2-linux.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-powerpc64-elfv2.s
+
+vacall-ia64.@OBJEXT@ : vacall-ia64.s
+       $(CC) @GCC_X_NONE@ -c vacall-ia64.s
+
+vacall-ia64.s : $(srcdir)/vacall-ia64-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/vacall-ia64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-ia64.s
+
+@IFNOT_MSVC@vacall-x86_64.@OBJEXT@ : vacall-x86_64.s
+@IFNOT_MSVC@   $(CC) @GCC_X_NONE@ -c vacall-x86_64.s
+
+@IFNOT_MSVC@vacall-x86_64.s : $(srcdir)/vacall-x86_64-macro.S $(srcdir)/vacall-x86_64-windows-macro.S
+@IFNOT_MSVC@   case "$(OS)" in \
+@IFNOT_MSVC@     cygwin* | mingw*) variant='-windows';; \
+@IFNOT_MSVC@     *) variant='';; \
+@IFNOT_MSVC@   esac; \
+@IFNOT_MSVC@   $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/vacall-x86_64$${variant}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > vacall-x86_64.s
+
+@IF_MSVC@vacall-x86_64.@OBJEXT@ : vacall-x86_64.asm
+@IF_MSVC@      ml64 -c -nologo vacall-x86_64.asm
+
+@IF_MSVC@vacall-x86_64.asm : $(srcdir)/vacall-x86_64-windows-macro.S
+@IF_MSVC@      { echo 'EXTERNDEF vacall_function:QWORD'; $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-x86_64-windows-macro.S | grep -v '^#'; echo 'END'; } > vacall-x86_64.asm
+
+vacall-x86_64-x32.@OBJEXT@ : vacall-x86_64-x32.s
+       $(CC) @GCC_X_NONE@ -c vacall-x86_64-x32.s
+
+vacall-x86_64-x32.s : $(srcdir)/vacall-x86_64-x32-linux.s
+       cp $(srcdir)/vacall-x86_64-x32-linux.s vacall-x86_64-x32.s
+
+vacall-s390.@OBJEXT@ : vacall-s390.s
+       $(CC) @GCC_X_NONE@ -c vacall-s390.s
+
+vacall-s390.s : $(srcdir)/vacall-s390-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/vacall-s390-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-s390.s
+
+vacall-s390x.@OBJEXT@ : vacall-s390x.s
+       $(CC) @GCC_X_NONE@ -c vacall-s390x.s
+
+vacall-s390x.s : $(srcdir)/vacall-s390x-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/vacall-s390x-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-s390x.s
+
+vacall-riscv32-ilp32d.@OBJEXT@ : vacall-riscv32-ilp32d.s
+       $(CC) @GCC_X_NONE@ -c vacall-riscv32-ilp32d.s
+
+vacall-riscv32-ilp32d.s : $(srcdir)/vacall-riscv32-ilp32d-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/vacall-riscv32-ilp32d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-riscv32-ilp32d.s
+
+vacall-riscv64-lp64d.@OBJEXT@ : vacall-riscv64-lp64d.s
+       $(CC) @GCC_X_NONE@ -c vacall-riscv64-lp64d.s
+
+vacall-riscv64-lp64d.s : $(srcdir)/vacall-riscv64-lp64d-macro.S
+       $(CPP) $(ASPFLAGS) $(srcdir)/vacall-riscv64-lp64d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-riscv64-lp64d.s
+
+vacall-libapi.@OBJEXT@ : $(srcdir)/vacall-libapi.c $(srcdir)/vacall-internal.h $(srcdir)/vacall.h ../config.h
+       $(CC) $(INCLUDES_WITH_GNULIB) $(CPPFLAGS) $(CFLAGS) @DISABLE_TYPE_BASED_ALIASING@ -c $(srcdir)/vacall-libapi.c
+
+vacall-structcpy.@OBJEXT@ : $(srcdir)/vacall-structcpy.c $(srcdir)/../common/structcpy.c
+       $(CC) -I$(srcdir)/../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/vacall-structcpy.c
+
+libvacall.a : $(OBJECTS)
+       $(RM) libvacall.a
+       $(AR) $(AR_FLAGS) libvacall.a $(OBJECTS)
+       $(RANLIB) libvacall.a
+
+install : all force
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(exec_prefix)
+       mkdir -p $(DESTDIR)$(libdir)
+       $(INSTALL_DATA) libvacall.a $(DESTDIR)$(libdir)/libvacall.a
+       mkdir -p $(DESTDIR)$(includedir)
+       $(INSTALL_DATA) $(srcdir)/vacall.h $(DESTDIR)$(includedir)/vacall.h
+       mkdir -p $(DESTDIR)$(mandir)
+       mkdir -p $(DESTDIR)$(mandir)/man3
+       $(INSTALL_DATA) $(srcdir)/vacall.3 $(DESTDIR)$(mandir)/man3/vacall.3
+       mkdir -p $(DESTDIR)$(datadir)
+       mkdir -p $(DESTDIR)$(htmldir)
+       $(INSTALL_DATA) $(srcdir)/vacall.html $(DESTDIR)$(htmldir)/vacall.html
+
+installdirs : force
+       mkdir -p $(DESTDIR)$(prefix)
+       mkdir -p $(DESTDIR)$(exec_prefix)
+       mkdir -p $(DESTDIR)$(libdir)
+       mkdir -p $(DESTDIR)$(includedir)
+       mkdir -p $(DESTDIR)$(mandir)
+       mkdir -p $(DESTDIR)$(mandir)/man3
+       mkdir -p $(DESTDIR)$(datadir)
+       mkdir -p $(DESTDIR)$(htmldir)
+
+uninstall : force
+       $(RM) $(DESTDIR)$(libdir)/libvacall.a
+       $(RM) $(DESTDIR)$(includedir)/vacall.h
+       $(RM) $(DESTDIR)$(mandir)/man3/vacall.3
+       $(RM) $(DESTDIR)$(htmldir)/vacall.html
+
+minitests.@OBJEXT@ : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/vacall.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/minitests.c
+
+minitests.s : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/vacall.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/minitests.c
+
+minitests : minitests.@OBJEXT@ libvacall.a
+       $(CC) $(CFLAGS) @GCC_X_NONE@ minitests.@OBJEXT@ libvacall.a $(LDFLAGS) -o minitests
+
+minitests-c++.@OBJEXT@ : $(srcdir)/minitests-c++.cc $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/vacall.h
+       $(CXX) $(INCLUDES) $(CPPFLAGS) $(CXXFLAGS) -c $(srcdir)/minitests-c++.cc
+
+minitests-c++ : minitests-c++.@OBJEXT@ libvacall.a
+       $(CXX) $(CXXFLAGS) @GCC_X_NONE@ minitests-c++.@OBJEXT@ libvacall.a $(LDFLAGS) -o minitests-c++
+
+check : all minitests
+       ./minitests > minitests.out
+       LC_ALL=C uniq -u < minitests.out > minitests.output.$(HOST)
+       test '!' -s minitests.output.$(HOST)
+@IF_CXX@       ./minitests-c++ > minitests-c++.out
+@IF_CXX@       LC_ALL=C uniq -u < minitests-c++.out > minitests-c++.output.$(HOST)
+@IF_CXX@       test '!' -s minitests-c++.output.$(HOST)
+@IF_CXX@check : minitests-c++
+
+tests.@OBJEXT@ : $(srcdir)/tests.c $(srcdir)/vacall.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/tests.c
+
+tests.s : $(srcdir)/tests.c $(srcdir)/vacall.h
+       $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/tests.c
+
+tests : tests.@OBJEXT@ libvacall.a
+       $(CC) $(CFLAGS) @GCC_X_NONE@ tests.@OBJEXT@ libvacall.a $(LDFLAGS) -o tests
+
+extracheck : all tests
+       ./tests > tests.out
+       LC_ALL=C uniq -u < tests.out > tests.output.$(HOST)
+       test '!' -s tests.output.$(HOST)
+
+mostlyclean : clean
+
+clean : force
+       $(RM) *.@OBJEXT@ *.a core
+       $(RM) vacall-i386.s vacall-sparc.s vacall-sparc64.s vacall-m68k.s vacall-mips.s vacall-mipsn32.s vacall-mips64.s vacall-alpha.s vacall-hppa.s vacall-hppa64.s vacall-arm.s vacall-armhf.s vacall-arm64.s vacall-powerpc.s vacall-powerpc64.s vacall-powerpc64-elfv2.s vacall-ia64.s vacall-x86_64.s vacall-x86_64.asm vacall-x86_64-x32.s vacall-s390.s vacall-s390x.s vacall-riscv32-ilp32d.s vacall-riscv64-lp64d.s
+       $(RM) minitests.@OBJEXT@ minitests.s minitests minitests.out
+       $(RM) minitests-c++.@OBJEXT@ minitests-c++ minitests-c++.out
+       $(RM) tests.@OBJEXT@ tests.s tests tests.out
+
+distclean : clean
+       $(RM) Makefile minitests.output.* minitests-c++.output.* tests.output.*
+
+maintainer-clean : distclean
+
+
+# List of source files (committed in version control or generated by Makefile.devel).
+SOURCE_FILES = \
+  COPYING \
+  PLATFORMS README vacall.3 vacall.html \
+  Makefile.devel \
+  Makefile.maint \
+  Makefile.in \
+  vacall.h vacall-internal.h \
+  vacall-alpha.c vacall-alpha-linux.s vacall-alpha-macro.S \
+  vacall-arm.c vacall-arm-linux.s vacall-arm-linux-pic.s vacall-arm-macro.S \
+  vacall-armhf.c vacall-armhf-linux.s vacall-armhf-linux-pic.s vacall-armhf-macro.S \
+  vacall-arm64.c vacall-arm64-macro.S \
+  vacall-hppa.c vacall-hppa-linux.s vacall-hppa-macro.S \
+  vacall-hppa64.c vacall-hppa64-linux.s vacall-hppa64-macro.S \
+  vacall-i386.c vacall-i386-linux.s vacall-i386-linux-pic.s vacall-i386-macro.S \
+  vacall-ia64.c vacall-ia64-linux.s vacall-ia64-macro.S \
+  vacall-m68k.c vacall-m68k-linux.s vacall-m68k-sun.s vacall-m68k.mit.S vacall-m68k.motorola.S \
+  vacall-mips.c vacall-mipseb-linux.s vacall-mipsel-linux.s vacall-mipseb-macro.S vacall-mipsel-macro.S \
+  vacall-mipsn32.c vacall-mipsn32eb-linux.s vacall-mipsn32el-linux.s vacall-mipsn32eb-macro.S vacall-mipsn32el-macro.S \
+  vacall-mips64.c vacall-mips64eb-linux.s vacall-mips64el-linux.s vacall-mips64eb-macro.S vacall-mips64el-macro.S \
+  vacall-powerpc.c \
+  vacall-powerpc-aix.s \
+  vacall-powerpc-linux.s vacall-powerpc-linux-macro.S vacall-powerpc-macos.s vacall-powerpc-sysv4-macro.S \
+  vacall-powerpc64.c vacall-powerpc64-aix.s vacall-powerpc64-linux.S vacall-powerpc64-elfv2-linux.S \
+  vacall-riscv32.c vacall-riscv32-ilp32d-linux.s vacall-riscv32-ilp32d-macro.S \
+  vacall-riscv64.c vacall-riscv64-lp64d-linux.s vacall-riscv64-lp64d-macro.S \
+  vacall-s390.c vacall-s390-linux.s vacall-s390-macro.S \
+  vacall-s390x.c vacall-s390x-linux.s vacall-s390x-macro.S \
+  vacall-sparc.c vacall-sparc-linux.s vacall-sparc-linux-pic.s vacall-sparc-macro.S \
+  vacall-sparc64.c vacall-sparc64-linux.s vacall-sparc64-linux-pic.s vacall-sparc64-macro.S \
+  vacall-x86_64.c vacall-x86_64-linux.s vacall-x86_64-macro.S vacall-x86_64-x32-linux.s \
+  vacall-x86_64-windows.c vacall-x86_64-windows.s vacall-x86_64-windows-macro.S \
+  vacall-libapi.c \
+  vacall-structcpy.c \
+  minitests.c minitests-c++.cc \
+  tests.c
+# List of distributed files generated by Makefile.maint.
+GENERATED_FILES = \
+  vacall.man \
+  vacall-i386-msvc.c
+# List of distributed files.
+DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES)
+
+distdir : $(DISTFILES)
+       for file in $(DISTFILES); do \
+         if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \
+         cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \
+       done
+
+
+force :
+
diff --git a/vacall/Makefile.maint b/vacall/Makefile.maint
new file mode 100644 (file)
index 0000000..51789a9
--- /dev/null
@@ -0,0 +1,24 @@
+# maintainer -*-Makefile-*-
+
+LN = ln -s
+RM = rm -f
+
+# ==================== Easily regeneratable files ====================
+
+ROFF_MAN = groff -Tutf8 -mandoc
+
+all : vacall.man \
+      vacall-i386-msvc.c
+
+vacall.man : vacall.3
+       $(ROFF_MAN) vacall.3 > vacall.man
+
+vacall-i386-msvc.c : vacall-i386-macro.S
+       (echo '#ifdef _MSC_VER' ; echo '#include "vacall.h"' ; echo '#endif' ; cat vacall-i386-macro.S) > vacall-i386-msvc.c
+
+totally-clean : force
+       $(RM) vacall.man
+       $(RM) vacall-i386-msvc.c
+
+
+force :
diff --git a/vacall/PLATFORMS b/vacall/PLATFORMS
new file mode 100644 (file)
index 0000000..f60ac57
--- /dev/null
@@ -0,0 +1,51 @@
+Supported CPUs:  (Put the GNU config.guess values here.)
+     i386       i486-unknown-linux (gcc), i686-unknown-gnu0.9 (gcc),
+                i386-unknown-sysv4.0 (gcc, /usr/bin/cc, /usr/ucb/cc),
+                i386-pc-solaris2.6 (gcc), i386-pc-solaris2.10 (gcc, cc),
+                i486-unknown-sco3.2v4.2 (gcc, cc -Of), i386-pc-cygwin32 (gcc),
+                i386-w64-mingw32 (gcc, MSVC 14),
+                i586-unknown-freebsd11.0 (cc), i386-unknown-dragonfly3.8 (gcc),
+                i386-unknown-netbsdelf7.0 (gcc), i386-unknown-openbsd6.0 (gcc),
+                i586-pc-haiku (gcc-x86), i386-pc-minix (clang)
+     m68k       m68k-next-nextstep3 (cc), m68k-sun-sunos4.0 (cc),
+                m68k-unknown-linux (gcc)
+     mips       mips-sgi-irix4.0.5 (gcc, cc -ansi, cc -D__STDC__, cc -cckr),
+                mips-sgi-irix5.2 (gcc, cc -ansi, cc -D__STDC__, cc -cckr),
+                mips-sgi-irix5.2 (gcc, cc -ansi, cc -D__STDC__, cc -cckr),
+                mips-sgi-irix6.2 (cc -32),
+                mips-sgi-irix6.4 (cc -32, cc -n32, cc -64),
+                mips-sgi-irix6.5 (cc -32, cc -n32, gcc -mabi=n32),
+                mips-unknown-linux (gcc -mabi=32),
+                mips64-unknown-linux (gcc -mabi=n32, -mabi=64)
+     sparc      sparc-sun-sunos4.1.1 (gcc, cc), sparc-sun-solaris2.3 (gcc),
+                sparc-sun-solaris2.4 (gcc, cc), sparc-sun-solaris2.10 (gcc, cc),
+                sparc64-sun-solaris2.10 (gcc -m64, cc -xarch=generic64),
+                sparc-unknown-linux (gcc), sparc64-unknown-linux (gcc),
+                sparc-unknown-netbsdelf7.1 (gcc),
+                sparc64-unknown-netbsd8.0 (gcc)
+     alpha      alpha-dec-osf3.0 (gcc, cc), alpha-dec-osf4.0 (gcc, cc),
+                alphaev67-unknown-linux (gcc)
+     hppa       hppa1.0-hp-hpux8.00 (gcc, cc), hppa1.1-hp-hpux9.05 (cc),
+                hppa1.1-hp-hpux10.01 (cc), hppa2.0-hp-hpux10.20 (cc +DA1.1),
+                hppa2.0w-hp-hpux11.31 (cc), hppa-unknown-linux (gcc)
+     hppa64     hppa64-hp-hpux11.31 (cc +DD64)
+     arm        armv5tejl-unknown-linux (gcc), armv6l-unknown-linux (gcc),
+                armv7l-unknown-linux (gcc)
+     arm64      aarch64-unknown-linux (gcc)
+     powerpc    powerpc-ibm-aix4.1.4.0 (cc), powerpc-ibm-aix7.1.3.0 (xlc, gcc),
+                powerpc-unknown-linux (gcc), powerpc-apple-darwin6.8 (gcc),
+                powerpc-apple-darwin9.8.0 (gcc)
+     powerpc64  powerpc-ibm-aix7.1.3.0 (gcc -maix64, xlc -q64; AR="ar -X 64"),
+                powerpc64-unknown-linux (gcc -m64),
+                powerpc64le-unknown-linux (gcc)
+     ia64       ia64-unknown-linux (gcc)
+     x86_64     x86_64-suse-linux (gcc), x86_64-unknown-linux (gcc -mx32),
+                x86_64-pc-solaris2.10 (gcc -m64, cc -xarch=generic64),
+                x86_64-pc-cygwin (gcc), x86_64-w64-mingw32 (gcc, MSVC 14),
+                x86_64-unknown-freebsd11.0 (cc), x86_64-unknown-netbsd7.0 (gcc),
+                x86_64-unknown-openbsd6.0 (gcc)
+     s390       s390x-ibm-linux (gcc -m31)
+     s390x      s390x-ibm-linux (gcc)
+     riscv32    riscv32-unknown-linux (gcc -mabi=ilp32d)
+     riscv64    riscv64-unknown-linux (gcc -mabi=lp64d)
+
diff --git a/vacall/README b/vacall/README
new file mode 100644 (file)
index 0000000..152436d
--- /dev/null
@@ -0,0 +1,78 @@
+vacall - C functions called with variable arguments
+
+This library allows C functions to be called with variable arguments and
+to return variable return values. This is much like the varargs(3) facility,
+but also allows the return value to be specified at run time.
+
+A typical use is the implementation of call-back functions in embedded
+interpreters.
+
+
+Installation instructions:
+
+    Configure the parent directory. Then:
+        cd vacall
+        make
+        make check
+        make install
+
+
+Files in this package:
+
+    Documentation:
+
+        README          this text
+        COPYING         free software license
+        PLATFORMS       list of supported platforms
+        vacall.3        manual page in Unix man format
+        vacall.man      manual page
+        vacall.html     manual page in HTML format
+
+    Source:
+
+        vacall.h        main include file
+        vacall-*.c      source for the main interface function
+        vacall-*.[sS]   its translation to assembly language
+        vacall-libapi.c     implementation of other library API
+        vacall-structcpy.c  auxiliary function
+        tests.c         test program
+
+    Building:
+
+        Makefile.in     Makefile master
+
+    Porting:
+
+        Makefile.devel  developer's Makefile
+
+
+This subdirectory produces a static library. Reason:
+The vacall-*.c files access global variables. Such accesses causes
+portability problems when combined with the option -fPIC (because of
+the small/medium/large memory models and platform dependent assembler
+syntax to access the GOT).
+Therefore Makefile.devel in this directory compiles the files without -fPIC.
+Therefore the resulting object files are not suitable for being put into
+a shared library.
+Therefore this direcory must
+  - either not use libtool,
+  - or pass '-static' to $(LIBTOOL_LINK) when creating libvacall.la.
+
+
+Copyright notice:
+
+Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+
+This program is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
diff --git a/vacall/minitests-c++.cc b/vacall/minitests-c++.cc
new file mode 100644 (file)
index 0000000..1738e11
--- /dev/null
@@ -0,0 +1,18 @@
+/*
+ * Copyright 2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "minitests.c"
diff --git a/vacall/minitests.c b/vacall/minitests.c
new file mode 100644 (file)
index 0000000..b0f50fe
--- /dev/null
@@ -0,0 +1,19 @@
+/*
+ * Copyright 1999-2001 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#define SKIP_EXTRA_STRUCTS
+#include "tests.c"
diff --git a/vacall/tests.c b/vacall/tests.c
new file mode 100644 (file)
index 0000000..2401a95
--- /dev/null
@@ -0,0 +1,2216 @@
+/* Some random tests for vacall. */
+
+/*
+ * Copyright 1993 Bill Triggs <Bill.Triggs@inrialpes.fr>
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include "vacall.h"
+
+#include "testcases.c"
+
+#if defined(__m68k__) && defined(__GNUC__)
+/* "gcc-2.6.3 -freg-struct-return" returns  T = struct { char c[3]; }  (which
+ * has size 4 !) in memory, in contrast to  struct { char a,b,c; }  and
+ * struct { char c[4]; }  and  struct { char a,b,c,d; }  which have the same
+ * size and the same alignment but are returned in registers. I don't know why.
+ */
+#define SKIP_T
+#endif
+#if defined(__sparc__) && defined(__sun) && defined(__SUNPRO_C) /* SUNWspro cc */
+/* SunPRO cc miscompiles the simulator function for X_BcdB: d.i[1] is
+ * temporarily stored in %l2 and put onto the stack from %l2, but in between
+ * the copy of X has used %l2 as a counter without saving and restoring its
+ * value.
+ */
+#define SKIP_X
+#endif
+#if defined(__mipsn32__) && !defined(__GNUC__)
+/* The X test crashes for an unknown reason. */
+#define SKIP_X
+#endif
+
+
+void* current_function;
+
+/* This function simulates the behaviour of current_function. */
+void simulator (va_alist alist)
+{
+  /* void tests */
+  if (current_function == (void*)&v_v)
+    {
+      va_start_void(alist);
+      fprintf(out,"void f(void):\n");
+      fflush(out);
+      va_return_void(alist);
+    }
+
+  /* int tests */
+  else if (current_function == (void*)&i_v)
+    {
+      va_start_int(alist);
+     {int r=99;
+      fprintf(out,"int f(void):");
+      fflush(out);
+      va_return_int(alist, r);
+    }}
+  else if (current_function == (void*)&i_i)
+    {
+      va_start_int(alist);
+     {int a = va_arg_int(alist);
+      int r=a+1;
+      fprintf(out,"int f(int):(%d)",a);
+      fflush(out);
+      va_return_int(alist, r);
+    }}
+  else if (current_function == (void*)&i_i2)
+    {
+      va_start_int(alist);
+     {int a = va_arg_int(alist);
+      int b = va_arg_int(alist);
+      int r=a+b;
+      fprintf(out,"int f(2*int):(%d,%d)",a,b);
+      fflush(out);
+      va_return_int(alist, r);
+    }}
+  else if (current_function == (void*)&i_i4)
+    {
+      va_start_int(alist);
+     {int a = va_arg_int(alist);
+      int b = va_arg_int(alist);
+      int c = va_arg_int(alist);
+      int d = va_arg_int(alist);
+      int r=a+b+c+d;
+      fprintf(out,"int f(4*int):(%d,%d,%d,%d)",a,b,c,d);
+      fflush(out);
+      va_return_int(alist, r);
+    }}
+  else if (current_function == (void*)&i_i8)
+    {
+      va_start_int(alist);
+     {int a = va_arg_int(alist);
+      int b = va_arg_int(alist);
+      int c = va_arg_int(alist);
+      int d = va_arg_int(alist);
+      int e = va_arg_int(alist);
+      int f = va_arg_int(alist);
+      int g = va_arg_int(alist);
+      int h = va_arg_int(alist);
+      int r=a+b+c+d+e+f+g+h;
+      fprintf(out,"int f(8*int):(%d,%d,%d,%d,%d,%d,%d,%d)",a,b,c,d,e,f,g,h);
+      fflush(out);
+      va_return_int(alist, r);
+    }}
+  else if (current_function == (void*)&i_i16)
+    {
+      va_start_int(alist);
+     {int a = va_arg_int(alist);
+      int b = va_arg_int(alist);
+      int c = va_arg_int(alist);
+      int d = va_arg_int(alist);
+      int e = va_arg_int(alist);
+      int f = va_arg_int(alist);
+      int g = va_arg_int(alist);
+      int h = va_arg_int(alist);
+      int i = va_arg_int(alist);
+      int j = va_arg_int(alist);
+      int k = va_arg_int(alist);
+      int l = va_arg_int(alist);
+      int m = va_arg_int(alist);
+      int n = va_arg_int(alist);
+      int o = va_arg_int(alist);
+      int p = va_arg_int(alist);
+      int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p;
+      fprintf(out,"int f(16*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)",
+              a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p);
+      fflush(out);
+      va_return_int(alist, r);
+    }}
+  else if (current_function == (void*)&i_i32)
+    {
+      va_start_int(alist);
+     {int a = va_arg_int(alist);
+      int b = va_arg_int(alist);
+      int c = va_arg_int(alist);
+      int d = va_arg_int(alist);
+      int e = va_arg_int(alist);
+      int f = va_arg_int(alist);
+      int g = va_arg_int(alist);
+      int h = va_arg_int(alist);
+      int i = va_arg_int(alist);
+      int j = va_arg_int(alist);
+      int k = va_arg_int(alist);
+      int l = va_arg_int(alist);
+      int m = va_arg_int(alist);
+      int n = va_arg_int(alist);
+      int o = va_arg_int(alist);
+      int p = va_arg_int(alist);
+      int aa = va_arg_int(alist);
+      int ab = va_arg_int(alist);
+      int ac = va_arg_int(alist);
+      int ad = va_arg_int(alist);
+      int ae = va_arg_int(alist);
+      int af = va_arg_int(alist);
+      int ag = va_arg_int(alist);
+      int ah = va_arg_int(alist);
+      int ai = va_arg_int(alist);
+      int aj = va_arg_int(alist);
+      int ak = va_arg_int(alist);
+      int al = va_arg_int(alist);
+      int am = va_arg_int(alist);
+      int an = va_arg_int(alist);
+      int ao = va_arg_int(alist);
+      int ap = va_arg_int(alist);
+      int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+aa+ab+ac+ad+ae+af+ag+ah+ai+aj+ak+al+am+an+ao+ap;
+      fprintf(out,"int f(32*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)",
+              a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,aa,ab,ac,ad,ae,af,ag,ah,ai,aj,ak,al,am,an,ao,ap);
+      fflush(out);
+      va_return_int(alist, r);
+    }}
+
+  /* float tests */
+  else if (current_function == (void*)&f_f)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float r=a+1.0;
+      fprintf(out,"float f(float):(%g)",a);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f2)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float r=a+b;
+      fprintf(out,"float f(2*float):(%g,%g)",a,b);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f4)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float c = va_arg_float(alist);
+      float d = va_arg_float(alist);
+      float r=a+b+c+d;
+      fprintf(out,"float f(4*float):(%g,%g,%g,%g)",a,b,c,d);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f8)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float c = va_arg_float(alist);
+      float d = va_arg_float(alist);
+      float e = va_arg_float(alist);
+      float f = va_arg_float(alist);
+      float g = va_arg_float(alist);
+      float h = va_arg_float(alist);
+      float r=a+b+c+d+e+f+g+h;
+      fprintf(out,"float f(8*float):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f16)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float c = va_arg_float(alist);
+      float d = va_arg_float(alist);
+      float e = va_arg_float(alist);
+      float f = va_arg_float(alist);
+      float g = va_arg_float(alist);
+      float h = va_arg_float(alist);
+      float i = va_arg_float(alist);
+      float j = va_arg_float(alist);
+      float k = va_arg_float(alist);
+      float l = va_arg_float(alist);
+      float m = va_arg_float(alist);
+      float n = va_arg_float(alist);
+      float o = va_arg_float(alist);
+      float p = va_arg_float(alist);
+      float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p;
+      fprintf(out,"float f(16*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f24)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float c = va_arg_float(alist);
+      float d = va_arg_float(alist);
+      float e = va_arg_float(alist);
+      float f = va_arg_float(alist);
+      float g = va_arg_float(alist);
+      float h = va_arg_float(alist);
+      float i = va_arg_float(alist);
+      float j = va_arg_float(alist);
+      float k = va_arg_float(alist);
+      float l = va_arg_float(alist);
+      float m = va_arg_float(alist);
+      float n = va_arg_float(alist);
+      float o = va_arg_float(alist);
+      float p = va_arg_float(alist);
+      float q = va_arg_float(alist);
+      float s = va_arg_float(alist);
+      float t = va_arg_float(alist);
+      float u = va_arg_float(alist);
+      float v = va_arg_float(alist);
+      float w = va_arg_float(alist);
+      float x = va_arg_float(alist);
+      float y = va_arg_float(alist);
+      float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+v+w+x+y;
+      fprintf(out,"float f(24*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,v,w,x,y);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+
+  /* double tests */
+  else if (current_function == (void*)&d_d)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double r=a+1.0;
+      fprintf(out,"double f(double):(%g)",a);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_d2)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      double r=a+b;
+      fprintf(out,"double f(2*double):(%g,%g)",a,b);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_d4)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      double c = va_arg_double(alist);
+      double d = va_arg_double(alist);
+      double r=a+b+c+d;
+      fprintf(out,"double f(4*double):(%g,%g,%g,%g)",a,b,c,d);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_d8)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      double c = va_arg_double(alist);
+      double d = va_arg_double(alist);
+      double e = va_arg_double(alist);
+      double f = va_arg_double(alist);
+      double g = va_arg_double(alist);
+      double h = va_arg_double(alist);
+      double r=a+b+c+d+e+f+g+h;
+      fprintf(out,"double f(8*double):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_d16)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      double c = va_arg_double(alist);
+      double d = va_arg_double(alist);
+      double e = va_arg_double(alist);
+      double f = va_arg_double(alist);
+      double g = va_arg_double(alist);
+      double h = va_arg_double(alist);
+      double i = va_arg_double(alist);
+      double j = va_arg_double(alist);
+      double k = va_arg_double(alist);
+      double l = va_arg_double(alist);
+      double m = va_arg_double(alist);
+      double n = va_arg_double(alist);
+      double o = va_arg_double(alist);
+      double p = va_arg_double(alist);
+      double r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p;
+      fprintf(out,"double f(16*double):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+
+  /* pointer tests */
+  else if (current_function == (void*)&vp_vpdpcpsp)
+    {
+      va_start_ptr(alist, void*);
+     {void* a = va_arg_ptr(alist, void*);
+      double* b = va_arg_ptr(alist, double*);
+      char* c = va_arg_ptr(alist, char*);
+      Int* d = va_arg_ptr(alist, Int*);
+      void* ret = (char*)b + 1;
+      fprintf(out,"void* f(void*,double*,char*,Int*):(0x%p,0x%p,0x%p,0x%p)",a,b,c,d);
+      fflush(out);
+      va_return_ptr(alist, void*, ret);
+    }}
+
+  /* mixed number tests */
+  else if (current_function == (void*)&uc_ucsil)
+    {
+      va_start_uchar(alist);
+     {uchar a = va_arg_uchar(alist);
+      ushort b = va_arg_ushort(alist);
+      uint c = va_arg_uint(alist);
+      ulong d = va_arg_ulong(alist);
+      uchar r = (uchar)-1;
+      fprintf(out,"uchar f(uchar,ushort,uint,ulong):(%u,%u,%u,%lu)",a,b,c,d);
+      fflush(out);
+      va_return_uchar(alist, r);
+    }}
+  else if (current_function == (void*)&d_iidd)
+    {
+      va_start_double(alist);
+     {int a = va_arg_int(alist);
+      int b = va_arg_int(alist);
+      double c = va_arg_double(alist);
+      double d = va_arg_double(alist);
+      double r=a+b+c+d;
+      fprintf(out,"double f(int,int,double,double):(%d,%d,%g,%g)",a,b,c,d);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_iiidi)
+    {
+      va_start_double(alist);
+     {int a = va_arg_int(alist);
+      int b = va_arg_int(alist);
+      int c = va_arg_int(alist);
+      double d = va_arg_double(alist);
+      int e = va_arg_int(alist);
+      double r=a+b+c+d+e;
+      fprintf(out,"double f(int,int,int,double,int):(%d,%d,%d,%g,%d)",a,b,c,d,e);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_idid)
+    {
+      va_start_double(alist);
+     {int a = va_arg_int(alist);
+      double b = va_arg_double(alist);
+      int c = va_arg_int(alist);
+      double d = va_arg_double(alist);
+      double r=a+b+c+d;
+      fprintf(out,"double f(int,double,int,double):(%d,%g,%d,%g)",a,b,c,d);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_fdi)
+    {
+      va_start_double(alist);
+     {float a = va_arg_float(alist);
+      double b = va_arg_double(alist);
+      int c = va_arg_int(alist);
+      double r=a+b+c;
+      fprintf(out,"double f(float,double,int):(%g,%g,%d)",a,b,c);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&us_cdcd)
+    {
+      va_start_ushort(alist);
+     {char a = va_arg_char(alist);
+      double b = va_arg_double(alist);
+      char c = va_arg_char(alist);
+      double d = va_arg_double(alist);
+      ushort r = (ushort)(a + b + c + d);
+      fprintf(out,"ushort f(char,double,char,double):('%c',%g,'%c',%g)",a,b,c,d);
+      fflush(out);
+      va_return_ushort(alist, r);
+    }}
+  else if (current_function == (void*)&ll_iiilli)
+    {
+      va_start_longlong(alist);
+     {int a = va_arg_int(alist);
+      int b = va_arg_int(alist);
+      int c = va_arg_int(alist);
+      long long d = va_arg_longlong(alist);
+      int e = va_arg_int(alist);
+      long long r = (long long)a + (long long)b + (long long)c + d + (long long)e;
+      fprintf(out,"long long f(int,int,int,long long,int):(%d,%d,%d,0x%lx%08lx,%d)",a,b,c,(long)(d>>32),(long)(d&0xffffffff),e);
+      fflush(out);
+      va_return_longlong(alist, r);
+    }}
+  else if (current_function == (void*)&ll_flli)
+    {
+      va_start_longlong(alist);
+     {float a = va_arg_float(alist);
+      long long b = va_arg_longlong(alist);
+      int c = va_arg_int(alist);
+      long long r = (long long)(int)a + b + (long long)c;
+      fprintf(out,"long long f(float,long long,int):(%g,0x%lx%08lx,0x%lx)",a,(long)(b>>32),(long)(b&0xffffffff),(long)c);
+      fflush(out);
+      va_return_longlong(alist, r);
+    }}
+  else if (current_function == (void*)&f_fi)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      int z = va_arg_int(alist);
+      float r = a+z;
+      fprintf(out,"float f(float,int):(%g,%d)",a,z);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f2i)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      int z = va_arg_int(alist);
+      float r = a+b+z;
+      fprintf(out,"float f(2*float,int):(%g,%g,%d)",a,b,z);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f3i)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float c = va_arg_float(alist);
+      int z = va_arg_int(alist);
+      float r = a+b+c+z;
+      fprintf(out,"float f(3*float,int):(%g,%g,%g,%d)",a,b,c,z);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f4i)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float c = va_arg_float(alist);
+      float d = va_arg_float(alist);
+      int z = va_arg_int(alist);
+      float r = a+b+c+d+z;
+      fprintf(out,"float f(4*float,int):(%g,%g,%g,%g,%d)",a,b,c,d,z);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f7i)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float c = va_arg_float(alist);
+      float d = va_arg_float(alist);
+      float e = va_arg_float(alist);
+      float f = va_arg_float(alist);
+      float g = va_arg_float(alist);
+      int z = va_arg_int(alist);
+      float r = a+b+c+d+e+f+g+z;
+      fprintf(out,"float f(7*float,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f8i)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float c = va_arg_float(alist);
+      float d = va_arg_float(alist);
+      float e = va_arg_float(alist);
+      float f = va_arg_float(alist);
+      float g = va_arg_float(alist);
+      float h = va_arg_float(alist);
+      int z = va_arg_int(alist);
+      float r = a+b+c+d+e+f+g+h+z;
+      fprintf(out,"float f(8*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f12i)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float c = va_arg_float(alist);
+      float d = va_arg_float(alist);
+      float e = va_arg_float(alist);
+      float f = va_arg_float(alist);
+      float g = va_arg_float(alist);
+      float h = va_arg_float(alist);
+      float i = va_arg_float(alist);
+      float j = va_arg_float(alist);
+      float k = va_arg_float(alist);
+      float l = va_arg_float(alist);
+      int z = va_arg_int(alist);
+      float r = a+b+c+d+e+f+g+h+i+j+k+l+z;
+      fprintf(out,"float f(12*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&f_f13i)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float c = va_arg_float(alist);
+      float d = va_arg_float(alist);
+      float e = va_arg_float(alist);
+      float f = va_arg_float(alist);
+      float g = va_arg_float(alist);
+      float h = va_arg_float(alist);
+      float i = va_arg_float(alist);
+      float j = va_arg_float(alist);
+      float k = va_arg_float(alist);
+      float l = va_arg_float(alist);
+      float m = va_arg_float(alist);
+      int z = va_arg_int(alist);
+      float r = a+b+c+d+e+f+g+h+i+j+k+l+m+z;
+      fprintf(out,"float f(13*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&d_di)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      int z = va_arg_int(alist);
+      double r = a+z;
+      fprintf(out,"double f(double,int):(%g,%d)",a,z);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_d2i)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      int z = va_arg_int(alist);
+      double r = a+b+z;
+      fprintf(out,"double f(2*double,int):(%g,%g,%d)",a,b,z);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_d3i)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      double c = va_arg_double(alist);
+      int z = va_arg_int(alist);
+      double r = a+b+c+z;
+      fprintf(out,"double f(3*double,int):(%g,%g,%g,%d)",a,b,c,z);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_d4i)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      double c = va_arg_double(alist);
+      double d = va_arg_double(alist);
+      int z = va_arg_int(alist);
+      double r = a+b+c+d+z;
+      fprintf(out,"double f(4*double,int):(%g,%g,%g,%g,%d)",a,b,c,d,z);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_d7i)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      double c = va_arg_double(alist);
+      double d = va_arg_double(alist);
+      double e = va_arg_double(alist);
+      double f = va_arg_double(alist);
+      double g = va_arg_double(alist);
+      int z = va_arg_int(alist);
+      double r = a+b+c+d+e+f+g+z;
+      fprintf(out,"double f(7*double,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_d8i)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      double c = va_arg_double(alist);
+      double d = va_arg_double(alist);
+      double e = va_arg_double(alist);
+      double f = va_arg_double(alist);
+      double g = va_arg_double(alist);
+      double h = va_arg_double(alist);
+      int z = va_arg_int(alist);
+      double r = a+b+c+d+e+f+g+h+z;
+      fprintf(out,"double f(8*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_d12i)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      double c = va_arg_double(alist);
+      double d = va_arg_double(alist);
+      double e = va_arg_double(alist);
+      double f = va_arg_double(alist);
+      double g = va_arg_double(alist);
+      double h = va_arg_double(alist);
+      double i = va_arg_double(alist);
+      double j = va_arg_double(alist);
+      double k = va_arg_double(alist);
+      double l = va_arg_double(alist);
+      int z = va_arg_int(alist);
+      double r = a+b+c+d+e+f+g+h+i+j+k+l+z;
+      fprintf(out,"double f(12*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_d13i)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      double c = va_arg_double(alist);
+      double d = va_arg_double(alist);
+      double e = va_arg_double(alist);
+      double f = va_arg_double(alist);
+      double g = va_arg_double(alist);
+      double h = va_arg_double(alist);
+      double i = va_arg_double(alist);
+      double j = va_arg_double(alist);
+      double k = va_arg_double(alist);
+      double l = va_arg_double(alist);
+      double m = va_arg_double(alist);
+      int z = va_arg_int(alist);
+      double r = a+b+c+d+e+f+g+h+i+j+k+l+m+z;
+      fprintf(out,"double f(13*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+
+  /* small structure return tests */
+  else if (current_function == (void*)&S1_v)
+    {
+      Size1 r;
+      va_start_struct(alist, Size1, 1);
+      r = Size1_1;
+      fprintf(out,"Size1 f(void):");
+      fflush(out);
+      va_return_struct(alist, Size1, r);
+    }
+  else if (current_function == (void*)&S2_v)
+    {
+      Size2 r;
+      va_start_struct(alist, Size2, 1);
+      r = Size2_1;
+      fprintf(out,"Size2 f(void):");
+      fflush(out);
+      va_return_struct(alist, Size2, r);
+    }
+  else if (current_function == (void*)&S3_v)
+    {
+      Size3 r;
+      va_start_struct(alist, Size3, 1);
+      r = Size3_1;
+      fprintf(out,"Size3 f(void):");
+      fflush(out);
+      va_return_struct(alist, Size3, r);
+    }
+  else if (current_function == (void*)&S4_v)
+    {
+      Size4 r;
+      va_start_struct(alist, Size4, 1);
+      r = Size4_1;
+      fprintf(out,"Size4 f(void):");
+      fflush(out);
+      va_return_struct(alist, Size4, r);
+    }
+  else if (current_function == (void*)&S7_v)
+    {
+      Size7 r;
+      va_start_struct(alist, Size7, 1);
+      r = Size7_1;
+      fprintf(out,"Size7 f(void):");
+      fflush(out);
+      va_return_struct(alist, Size7, r);
+    }
+  else if (current_function == (void*)&S8_v)
+    {
+      Size8 r;
+      va_start_struct(alist, Size8, 1);
+      r = Size8_1;
+      fprintf(out,"Size8 f(void):");
+      fflush(out);
+      va_return_struct(alist, Size8, r);
+    }
+  else if (current_function == (void*)&S12_v)
+    {
+      Size12 r;
+      va_start_struct(alist, Size12, 1);
+      r = Size12_1;
+      fprintf(out,"Size12 f(void):");
+      fflush(out);
+      va_return_struct(alist, Size12, r);
+    }
+  else if (current_function == (void*)&S15_v)
+    {
+      Size15 r;
+      va_start_struct(alist, Size15, 1);
+      r = Size15_1;
+      fprintf(out,"Size15 f(void):");
+      fflush(out);
+      va_return_struct(alist, Size15, r);
+    }
+  else if (current_function == (void*)&S16_v)
+    {
+      Size16 r;
+      va_start_struct(alist, Size16, 1);
+      r = Size16_1;
+      fprintf(out,"Size16 f(void):");
+      fflush(out);
+      va_return_struct(alist, Size16, r);
+    }
+
+  /* structure tests */
+  else if (current_function == (void*)&I_III)
+    {
+      Int a;
+      Int b;
+      Int c;
+      Int r;
+      va_start_struct(alist, Int, 1);
+      a = va_arg_struct(alist, Int);
+      b = va_arg_struct(alist, Int);
+      c = va_arg_struct(alist, Int);
+      r.x = a.x + b.x + c.x;
+      fprintf(out,"Int f(Int,Int,Int):({%d},{%d},{%d})",a.x,b.x,c.x);
+      fflush(out);
+      va_return_struct(alist, Int, r);
+    }
+#ifndef SKIP_EXTRA_STRUCTS
+  else if (current_function == (void*)&C_CdC)
+    {
+      Char a;
+      double b;
+      Char c;
+      Char r;
+      va_start_struct(alist, Char, 1);
+      a = va_arg_struct(alist, Char);
+      b = va_arg_double(alist);
+      c = va_arg_struct(alist, Char);
+      r.x = (a.x + c.x)/2;
+      fprintf(out,"Char f(Char,double,Char):({'%c'},%g,{'%c'})",a.x,b,c.x);
+      fflush(out);
+      va_return_struct(alist, Char, r);
+    }
+  else if (current_function == (void*)&F_Ffd)
+    {
+      Float a;
+      float b;
+      double c;
+      Float r;
+      va_start_struct(alist, Float, va_word_splittable_1(float));
+      a = va_arg_struct(alist, Float);
+      b = va_arg_float(alist);
+      c = va_arg_double(alist);
+      r.x = a.x + b + c;
+      fprintf(out,"Float f(Float,float,double):({%g},%g,%g)",a.x,b,c);
+      fflush(out);
+      va_return_struct(alist, Float, r);
+    }
+  else if (current_function == (void*)&D_fDd)
+    {
+      float a;
+      Double b;
+      double c;
+      Double r;
+      va_start_struct(alist, Double, va_word_splittable_1(double));
+      a = va_arg_float(alist);
+      b = va_arg_struct(alist, Double);
+      c = va_arg_double(alist);
+      r.x = a + b.x + c;
+      fprintf(out,"Double f(float,Double,double):(%g,{%g},%g)",a,b.x,c);
+      fflush(out);
+      va_return_struct(alist, Double, r);
+    }
+  else if (current_function == (void*)&D_Dfd)
+    {
+      Double a;
+      float b;
+      double c;
+      Double r;
+      va_start_struct(alist, Double, va_word_splittable_1(double));
+      a = va_arg_struct(alist, Double);
+      b = va_arg_float(alist);
+      c = va_arg_double(alist);
+      r.x = a.x + b + c;
+      fprintf(out,"Double f(Double,float,double):({%g},%g,%g)",a.x,b,c);
+      fflush(out);
+      va_return_struct(alist, Double, r);
+    }
+#endif
+  else if (current_function == (void*)&J_JiJ)
+    {
+      J a;
+      int b;
+      J c;
+      J r;
+      va_start_struct(alist, J, va_word_splittable_2(long,long));
+      a = va_arg_struct(alist, J);
+      b = va_arg_int(alist);
+      c = va_arg_struct(alist, J);
+      r.l1 = a.l1+c.l1; r.l2 = a.l2+b+c.l2;
+      fprintf(out,"J f(J,int,J):({%ld,%ld},%d,{%ld,%ld})",a.l1,a.l2,b,c.l1,c.l2);
+      fflush(out);
+      va_return_struct(alist, J, r);
+    }
+#ifndef SKIP_EXTRA_STRUCTS
+  else if (current_function == (void*)&T_TcT)
+    {
+      T a;
+      char b;
+      T c;
+      T r;
+      va_start_struct(alist, T, 1);
+      a = va_arg_struct(alist, T);
+      b = va_arg_char(alist);
+      c = va_arg_struct(alist, T);
+      r.c[0]='b'; r.c[1]=c.c[1]; r.c[2]=c.c[2];
+      fprintf(out,"T f(T,char,T):({\"%c%c%c\"},'%c',{\"%c%c%c\"})",a.c[0],a.c[1],a.c[2],b,c.c[0],c.c[1],c.c[2]);
+      fflush(out);
+      va_return_struct(alist, T, r);
+    }
+  else if (current_function == (void*)&X_BcdB)
+    {
+      B a;
+      char b;
+      double c;
+      B d;
+      static X xr={"return val",'R'};
+      X r;
+      va_start_struct(alist, X, 0);
+      a = va_arg_struct(alist, B);
+      b = va_arg_char(alist);
+      c = va_arg_double(alist);
+      d = va_arg_struct(alist, B);
+      r = xr;
+      r.c1 = b;
+      fprintf(out,"X f(B,char,double,B):({%g,{%d,%d,%d}},'%c',%g,{%g,{%d,%d,%d}})",
+              a.d,a.i[0],a.i[1],a.i[2],b,c,d.d,d.i[0],d.i[1],d.i[2]);
+      fflush(out);
+      va_return_struct(alist, X, r);
+    }
+#endif
+
+  /* gpargs boundary tests */
+  else if (current_function == (void*)&l_l0J)
+    {
+      va_start_long(alist);
+     {J b = va_arg_struct(alist, J);
+      long c = va_arg_long(alist);
+      long r = b.l1 + b.l2 + c;
+      fprintf(out,"long f(J,long):(%ld,%ld,%ld)",b.l1,b.l2,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l1J)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      J b = va_arg_struct(alist, J);
+      long c = va_arg_long(alist);
+      long r = a1 + b.l1 + b.l2 + c;
+      fprintf(out,"long f(long,J,long):(%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l2J)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      J b = va_arg_struct(alist, J);
+      long c = va_arg_long(alist);
+      long r = a1 + a2 + b.l1 + b.l2 + c;
+      fprintf(out,"long f(2*long,J,long):(%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l3J)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      J b = va_arg_struct(alist, J);
+      long c = va_arg_long(alist);
+      long r = a1 + a2 + a3 + b.l1 + b.l2 + c;
+      fprintf(out,"long f(3*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l4J)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      J b = va_arg_struct(alist, J);
+      long c = va_arg_long(alist);
+      long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + c;
+      fprintf(out,"long f(4*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l5J)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long a5 = va_arg_long(alist);
+      J b = va_arg_struct(alist, J);
+      long c = va_arg_long(alist);
+      long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + c;
+      fprintf(out,"long f(5*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l6J)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long a5 = va_arg_long(alist);
+      long a6 = va_arg_long(alist);
+      J b = va_arg_struct(alist, J);
+      long c = va_arg_long(alist);
+      long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + c;
+      fprintf(out,"long f(6*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l7J)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long a5 = va_arg_long(alist);
+      long a6 = va_arg_long(alist);
+      long a7 = va_arg_long(alist);
+      J b = va_arg_struct(alist, J);
+      long c = va_arg_long(alist);
+      long r = a1 + a2 + a3 + a4 + a5 + a6 + a7 + b.l1 + b.l2 + c;
+      fprintf(out,"long f(7*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,a7,b.l1,b.l2,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l0K)
+    {
+      va_start_long(alist);
+     {K b = va_arg_struct(alist, K);
+      long c = va_arg_long(alist);
+      long r = b.l1 + b.l2 + b.l3 + b.l4 + c;
+      fprintf(out,"long f(K,long):(%ld,%ld,%ld,%ld,%ld)",b.l1,b.l2,b.l3,b.l4,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l1K)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      K b = va_arg_struct(alist, K);
+      long c = va_arg_long(alist);
+      long r = a1 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+      fprintf(out,"long f(long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,b.l3,b.l4,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l2K)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      K b = va_arg_struct(alist, K);
+      long c = va_arg_long(alist);
+      long r = a1 + a2 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+      fprintf(out,"long f(2*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,b.l3,b.l4,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l3K)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      K b = va_arg_struct(alist, K);
+      long c = va_arg_long(alist);
+      long r = a1 + a2 + a3 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+      fprintf(out,"long f(3*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,b.l3,b.l4,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l4K)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      K b = va_arg_struct(alist, K);
+      long c = va_arg_long(alist);
+      long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+      fprintf(out,"long f(4*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,b.l3,b.l4,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l5K)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long a5 = va_arg_long(alist);
+      K b = va_arg_struct(alist, K);
+      long c = va_arg_long(alist);
+      long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+      fprintf(out,"long f(5*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,b.l3,b.l4,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&l_l6K)
+    {
+      va_start_long(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long a5 = va_arg_long(alist);
+      long a6 = va_arg_long(alist);
+      K b = va_arg_struct(alist, K);
+      long c = va_arg_long(alist);
+      long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + b.l3 + b.l4 + c;
+      fprintf(out,"long f(6*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,b.l3,b.l4,c);
+      fflush(out);
+      va_return_long(alist, r);
+    }}
+  else if (current_function == (void*)&f_f17l3L)
+    {
+      va_start_float(alist);
+     {float a = va_arg_float(alist);
+      float b = va_arg_float(alist);
+      float c = va_arg_float(alist);
+      float d = va_arg_float(alist);
+      float e = va_arg_float(alist);
+      float f = va_arg_float(alist);
+      float g = va_arg_float(alist);
+      float h = va_arg_float(alist);
+      float i = va_arg_float(alist);
+      float j = va_arg_float(alist);
+      float k = va_arg_float(alist);
+      float l = va_arg_float(alist);
+      float m = va_arg_float(alist);
+      float n = va_arg_float(alist);
+      float o = va_arg_float(alist);
+      float p = va_arg_float(alist);
+      float q = va_arg_float(alist);
+      long s = va_arg_long(alist);
+      long t = va_arg_long(alist);
+      long u = va_arg_long(alist);
+      L z = va_arg_struct(alist, L);
+      float r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6;
+      fprintf(out,"float f(17*float,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6);
+      fflush(out);
+      va_return_float(alist, r);
+    }}
+  else if (current_function == (void*)&d_d17l3L)
+    {
+      va_start_double(alist);
+     {double a = va_arg_double(alist);
+      double b = va_arg_double(alist);
+      double c = va_arg_double(alist);
+      double d = va_arg_double(alist);
+      double e = va_arg_double(alist);
+      double f = va_arg_double(alist);
+      double g = va_arg_double(alist);
+      double h = va_arg_double(alist);
+      double i = va_arg_double(alist);
+      double j = va_arg_double(alist);
+      double k = va_arg_double(alist);
+      double l = va_arg_double(alist);
+      double m = va_arg_double(alist);
+      double n = va_arg_double(alist);
+      double o = va_arg_double(alist);
+      double p = va_arg_double(alist);
+      double q = va_arg_double(alist);
+      long s = va_arg_long(alist);
+      long t = va_arg_long(alist);
+      long u = va_arg_long(alist);
+      L z = va_arg_struct(alist, L);
+      double r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6;
+      fprintf(out,"double f(17*double,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&ll_l2ll)
+    {
+      va_start_longlong(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long long b = va_arg_longlong(alist);
+      long c = va_arg_long(alist);
+      long long r = (long long) (a1 + a2) + b + c;
+      fprintf(out,"long long f(2*long,long long,long):(%ld,%ld,0x%lx%08lx,%ld)",a1,a2,(long)(b>>32),(long)(b&0xffffffff),c);
+      fflush(out);
+      va_return_longlong(alist, r);
+    }}
+  else if (current_function == (void*)&ll_l3ll)
+    {
+      va_start_longlong(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long long b = va_arg_longlong(alist);
+      long c = va_arg_long(alist);
+      long long r = (long long) (a1 + a2 + a3) + b + c;
+      fprintf(out,"long long f(3*long,long long,long):(%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,(long)(b>>32),(long)(b&0xffffffff),c);
+      fflush(out);
+      va_return_longlong(alist, r);
+    }}
+  else if (current_function == (void*)&ll_l4ll)
+    {
+      va_start_longlong(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long long b = va_arg_longlong(alist);
+      long c = va_arg_long(alist);
+      long long r = (long long) (a1 + a2 + a3 + a4) + b + c;
+      fprintf(out,"long long f(4*long,long long,long):(%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,(long)(b>>32),(long)(b&0xffffffff),c);
+      fflush(out);
+      va_return_longlong(alist, r);
+    }}
+  else if (current_function == (void*)&ll_l5ll)
+    {
+      va_start_longlong(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long a5 = va_arg_long(alist);
+      long long b = va_arg_longlong(alist);
+      long c = va_arg_long(alist);
+      long long r = (long long) (a1 + a2 + a3 + a4 + a5) + b + c;
+      fprintf(out,"long long f(5*long,long long,long):(%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,(long)(b>>32),(long)(b&0xffffffff),c);
+      fflush(out);
+      va_return_longlong(alist, r);
+    }}
+  else if (current_function == (void*)&ll_l6ll)
+    {
+      va_start_longlong(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long a5 = va_arg_long(alist);
+      long a6 = va_arg_long(alist);
+      long long b = va_arg_longlong(alist);
+      long c = va_arg_long(alist);
+      long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6) + b + c;
+      fprintf(out,"long long f(6*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,(long)(b>>32),(long)(b&0xffffffff),c);
+      fflush(out);
+      va_return_longlong(alist, r);
+    }}
+  else if (current_function == (void*)&ll_l7ll)
+    {
+      va_start_longlong(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long a5 = va_arg_long(alist);
+      long a6 = va_arg_long(alist);
+      long a7 = va_arg_long(alist);
+      long long b = va_arg_longlong(alist);
+      long c = va_arg_long(alist);
+      long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c;
+      fprintf(out,"long long f(7*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,a7,(long)(b>>32),(long)(b&0xffffffff),c);
+      fflush(out);
+      va_return_longlong(alist, r);
+    }}
+  else if (current_function == (void*)&d_l2d)
+    {
+      va_start_double(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      double b = va_arg_double(alist);
+      long c = va_arg_long(alist);
+      double r = (double) (a1 + a2) + b + c;
+      fprintf(out,"double f(2*long,double,long):(%ld,%ld,%g,%ld)",a1,a2,b,c);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_l3d)
+    {
+      va_start_double(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      double b = va_arg_double(alist);
+      long c = va_arg_long(alist);
+      double r = (double) (a1 + a2 + a3) + b + c;
+      fprintf(out,"double f(3*long,double,long):(%ld,%ld,%ld,%g,%ld)",a1,a2,a3,b,c);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_l4d)
+    {
+      va_start_double(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      double b = va_arg_double(alist);
+      long c = va_arg_long(alist);
+      double r = (double) (a1 + a2 + a3 + a4) + b + c;
+      fprintf(out,"double f(4*long,double,long):(%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,b,c);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_l5d)
+    {
+      va_start_double(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long a5 = va_arg_long(alist);
+      double b = va_arg_double(alist);
+      long c = va_arg_long(alist);
+      double r = (double) (a1 + a2 + a3 + a4 + a5) + b + c;
+      fprintf(out,"double f(5*long,double,long):(%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,b,c);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_l6d)
+    {
+      va_start_double(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long a5 = va_arg_long(alist);
+      long a6 = va_arg_long(alist);
+      double b = va_arg_double(alist);
+      long c = va_arg_long(alist);
+      double r = (double) (a1 + a2 + a3 + a4 + a5 + a6) + b + c;
+      fprintf(out,"double f(6*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,b,c);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+  else if (current_function == (void*)&d_l7d)
+    {
+      va_start_double(alist);
+     {long a1 = va_arg_long(alist);
+      long a2 = va_arg_long(alist);
+      long a3 = va_arg_long(alist);
+      long a4 = va_arg_long(alist);
+      long a5 = va_arg_long(alist);
+      long a6 = va_arg_long(alist);
+      long a7 = va_arg_long(alist);
+      double b = va_arg_double(alist);
+      long c = va_arg_long(alist);
+      double r = (double) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c;
+      fprintf(out,"double f(7*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,a7,b,c);
+      fflush(out);
+      va_return_double(alist, r);
+    }}
+
+  /* by-value tests */
+  else if (current_function == (void*)&v_clobber_K)
+    {
+      va_start_void(alist);
+     {K k = va_arg_struct(alist, K);
+      k.l1 += 1;
+      k.l2 += 10;
+      k.l3 += 100;
+      k.l4 += 1000;
+      va_return_void(alist);
+    }}
+
+  else
+    {
+      fprintf(out,"simulate: unknown function\n");
+      fflush(out);
+    }
+}
+
+
+/*
+ * The way we run these tests - first call the function directly, then
+ * through vacall() - there is the danger that arguments or results seem
+ * to be passed correctly, but what we are seeing are in fact the vestiges
+ * (traces) or the previous call. This may seriously fake the test.
+ * Avoid this by clearing the registers between the first and the second call.
+ */
+long clear_traces_i (long a, long b, long c, long d, long e, long f, long g, long h,
+                     long i, long j, long k, long l, long m, long n, long o, long p)
+{ return 0; }
+float clear_traces_f (float a, float b, float c, float d, float e, float f, float g,
+                      float h, float i, float j, float k, float l, float m, float n,
+                      float o, float p)
+{ return 0.0; }
+double clear_traces_d (double a, double b, double c, double d, double e, double f, double g,
+                       double h, double i, double j, double k, double l, double m, double n,
+                       double o, double p)
+{ return 0.0; }
+J clear_traces_J (void)
+{ J j; j.l1 = j.l2 = 0; return j; }
+void clear_traces (void)
+{ clear_traces_i(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0);
+  clear_traces_f(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0);
+  clear_traces_d(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0);
+  clear_traces_J();
+}
+
+int main (void)
+{
+  out = stdout;
+
+  vacall_function = &simulator;
+
+  /* void tests */
+  v_v();
+  clear_traces();
+  current_function = (void*) &v_v; ((void (*) (void)) vacall) ();
+
+  /* int tests */
+  { int ir;
+
+    ir = i_v();
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    current_function = (void*) &i_v; ir = ((int (*) (void)) vacall) ();
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i(i1);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    current_function = (void*) &i_i; ir = ((int (*) (int)) vacall) (i1);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i2(i1,i2);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    current_function = (void*) &i_i2; ir = ((int (*) (int,int)) vacall) (i1,i2);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i4(i1,i2,i3,i4);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    current_function = (void*) &i_i4; ir = ((int (*) (int,int,int,int)) vacall) (i1,i2,i3,i4);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i8(i1,i2,i3,i4,i5,i6,i7,i8);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    current_function = (void*) &i_i8; ir = ((int (*) (int,int,int,int,int,int,int,int)) vacall) (i1,i2,i3,i4,i5,i6,i7,i8);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i16(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    current_function = (void*) &i_i16; ir = ((int (*) (int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int)) vacall) (i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+
+    ir = i_i32(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16,i17,i18,i19,i20,i21,i22,i23,i24,i25,i26,i27,i28,i29,i30,i31,i32);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+    ir = 0; clear_traces();
+    current_function = (void*) &i_i32; ir = ((int (*) (int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int)) vacall) (i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16,i17,i18,i19,i20,i21,i22,i23,i24,i25,i26,i27,i28,i29,i30,i31,i32);
+    fprintf(out,"->%d\n",ir);
+    fflush(out);
+  }
+
+  /* float tests */
+  { float fr;
+
+    fr = f_f(f1);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f; fr = ((float (*) (float)) vacall) (f1);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f2(f1,f2);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f2; fr = ((float (*) (float,float)) vacall) (f1,f2);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f4(f1,f2,f3,f4);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f4; fr = ((float (*) (float,float,float,float)) vacall) (f1,f2,f3,f4);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f8(f1,f2,f3,f4,f5,f6,f7,f8);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f8; fr = ((float (*) (float,float,float,float,float,float,float,float)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f16(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f16; fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f24(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f24; fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+  }
+
+  /* double tests */
+  { double dr;
+
+    dr = d_d(d1);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d; dr = ((double (*) (double)) vacall) (d1);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d2(d1,d2);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d2; dr = ((double (*) (double,double)) vacall) (d1,d2);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d4(d1,d2,d3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d4; dr = ((double (*) (double,double,double,double)) vacall) (d1,d2,d3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d8(d1,d2,d3,d4,d5,d6,d7,d8);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d8; dr = ((double (*) (double,double,double,double,double,double,double,double)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d16(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d16; dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+  }
+
+  /* pointer tests */
+  { void* vpr;
+
+    vpr = vp_vpdpcpsp(&uc1,&d2,str3,&I4);
+    fprintf(out,"->0x%p\n",vpr);
+    fflush(out);
+    vpr = 0; clear_traces();
+    current_function = (void*) &vp_vpdpcpsp; vpr = ((void* (*) (void*,double*,char*,Int*)) vacall) (&uc1,&d2,str3,&I4);
+    fprintf(out,"->0x%p\n",vpr);
+    fflush(out);
+  }
+
+  /* mixed number tests */
+  { uchar ucr;
+    ushort usr;
+    float fr;
+    double dr;
+    long long llr;
+
+    ucr = uc_ucsil(uc1,us2,ui3,ul4);
+    fprintf(out,"->%u\n",ucr);
+    fflush(out);
+    ucr = 0; clear_traces();
+    current_function = (void*) &uc_ucsil; ucr = ((uchar (*) (uchar,ushort,uint,ulong)) vacall) (uc1,us2,ui3,ul4);
+    fprintf(out,"->%u\n",ucr);
+    fflush(out);
+
+    dr = d_iidd(i1,i2,d3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_iidd; dr = ((double (*) (int,int,double,double)) vacall) (i1,i2,d3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_iiidi(i1,i2,i3,d4,i5);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_iiidi; dr = ((double (*) (int,int,int,double,int)) vacall) (i1,i2,i3,d4,i5);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_idid(i1,d2,i3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_idid; dr = ((double (*) (int,double,int,double)) vacall) (i1,d2,i3,d4);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_fdi(f1,d2,i3);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_fdi; dr = ((double (*) (float,double,int)) vacall) (f1,d2,i3);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    usr = us_cdcd(c1,d2,c3,d4);
+    fprintf(out,"->%u\n",usr);
+    fflush(out);
+    usr = 0; clear_traces();
+    current_function = (void*) &us_cdcd; usr = ((ushort (*) (char,double,char,double)) vacall) (c1,d2,c3,d4);
+    fprintf(out,"->%u\n",usr);
+    fflush(out);
+
+    llr = ll_iiilli(i1,i2,i3,ll1,i13);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    current_function = (void*) &ll_iiilli; llr = ((long long (*) (int,int,int,long long,int)) vacall) (i1,i2,i3,ll1,i13);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_flli(f13,ll1,i13);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    current_function = (void*) &ll_flli; llr = ((long long (*) (float,long long,int)) vacall) (f13,ll1,i13);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    fr = f_fi(f1,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_fi; fr = ((float (*) (float,int)) vacall) (f1,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f2i(f1,f2,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f2i; fr = ((float (*) (float,float,int)) vacall) (f1,f2,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f3i(f1,f2,f3,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f3i; fr = ((float (*) (float,float,float,int)) vacall) (f1,f2,f3,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f4i(f1,f2,f3,f4,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f4i; fr = ((float (*) (float,float,float,float,int)) vacall) (f1,f2,f3,f4,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f7i(f1,f2,f3,f4,f5,f6,f7,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f7i; fr = ((float (*) (float,float,float,float,float,float,float,int)) vacall) (f1,f2,f3,f4,f5,f6,f7,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f8i(f1,f2,f3,f4,f5,f6,f7,f8,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f8i; fr = ((float (*) (float,float,float,float,float,float,float,float,int)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f12i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f12i; fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,int)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    fr = f_f13i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f13i; fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,int)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,i9);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    dr = d_di(d1,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_di; dr = ((double (*) (double,int)) vacall) (d1,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d2i(d1,d2,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d2i; dr = ((double (*) (double,double,int)) vacall) (d1,d2,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d3i(d1,d2,d3,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d3i; dr = ((double (*) (double,double,double,int)) vacall) (d1,d2,d3,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d4i(d1,d2,d3,d4,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d4i; dr = ((double (*) (double,double,double,double,int)) vacall) (d1,d2,d3,d4,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d7i(d1,d2,d3,d4,d5,d6,d7,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d7i; dr = ((double (*) (double,double,double,double,double,double,double,int)) vacall) (d1,d2,d3,d4,d5,d6,d7,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d8i(d1,d2,d3,d4,d5,d6,d7,d8,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d8i; dr = ((double (*) (double,double,double,double,double,double,double,double,int)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d12i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d12i; dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,int)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_d13i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d13i; dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,int)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,i9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+  }
+
+  /* small structure return tests */
+  {
+    Size1 r = S1_v();
+    fprintf(out,"->{%c}\n",r.x1);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    current_function = (void*) &S1_v; r = ((Size1 (*) (void)) vacall) ();
+    fprintf(out,"->{%c}\n",r.x1);
+    fflush(out);
+  }
+  {
+    Size2 r = S2_v();
+    fprintf(out,"->{%c%c}\n",r.x1,r.x2);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    current_function = (void*) &S2_v; r = ((Size2 (*) (void)) vacall) ();
+    fprintf(out,"->{%c%c}\n",r.x1,r.x2);
+    fflush(out);
+  }
+  {
+    Size3 r = S3_v();
+    fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    current_function = (void*) &S3_v; r = ((Size3 (*) (void)) vacall) ();
+    fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3);
+    fflush(out);
+  }
+  {
+    Size4 r = S4_v();
+    fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    current_function = (void*) &S4_v; r = ((Size4 (*) (void)) vacall) ();
+    fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4);
+    fflush(out);
+  }
+  {
+    Size7 r = S7_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    current_function = (void*) &S7_v; r = ((Size7 (*) (void)) vacall) ();
+    fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7);
+    fflush(out);
+  }
+  {
+    Size8 r = S8_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    current_function = (void*) &S8_v; r = ((Size8 (*) (void)) vacall) ();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8);
+    fflush(out);
+  }
+  {
+    Size12 r = S12_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    current_function = (void*) &S12_v; r = ((Size12 (*) (void)) vacall) ();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12);
+    fflush(out);
+  }
+  {
+    Size15 r = S15_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    current_function = (void*) &S15_v; r = ((Size15 (*) (void)) vacall) ();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15);
+    fflush(out);
+  }
+  {
+    Size16 r = S16_v();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16);
+    fflush(out);
+    memset(&r,0,sizeof(r)); clear_traces();
+    current_function = (void*) &S16_v; r = ((Size16 (*) (void)) vacall) ();
+    fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16);
+    fflush(out);
+  }
+
+  /* structure tests */
+  { Int Ir;
+    Char Cr;
+    Float Fr;
+    Double Dr;
+    J Jr;
+    T Tr;
+    X Xr;
+
+    Ir = I_III(I1,I2,I3);
+    fprintf(out,"->{%d}\n",Ir.x);
+    fflush(out);
+    Ir.x = 0; clear_traces();
+    current_function = (void*) &I_III; Ir = ((Int (*) (Int,Int,Int)) vacall) (I1,I2,I3);
+    fprintf(out,"->{%d}\n",Ir.x);
+    fflush(out);
+
+#ifndef SKIP_EXTRA_STRUCTS
+    Cr = C_CdC(C1,d2,C3);
+    fprintf(out,"->{'%c'}\n",Cr.x);
+    fflush(out);
+    Cr.x = '\0'; clear_traces();
+    current_function = (void*) &C_CdC; Cr = ((Char (*) (Char,double,Char)) vacall) (C1,d2,C3);
+    fprintf(out,"->{'%c'}\n",Cr.x);
+    fflush(out);
+
+    Fr = F_Ffd(F1,f2,d3);
+    fprintf(out,"->{%g}\n",Fr.x);
+    fflush(out);
+    Fr.x = 0.0; clear_traces();
+    current_function = (void*) &F_Ffd; Fr = ((Float (*) (Float,float,double)) vacall) (F1,f2,d3);
+    fprintf(out,"->{%g}\n",Fr.x);
+    fflush(out);
+
+    Dr = D_fDd(f1,D2,d3);
+    fprintf(out,"->{%g}\n",Dr.x);
+    fflush(out);
+    Dr.x = 0.0; clear_traces();
+    current_function = (void*) &D_fDd; Dr = ((Double (*) (float,Double,double)) vacall) (f1,D2,d3);
+    fprintf(out,"->{%g}\n",Dr.x);
+    fflush(out);
+
+    Dr = D_Dfd(D1,f2,d3);
+    fprintf(out,"->{%g}\n",Dr.x);
+    fflush(out);
+    Dr.x = 0.0; clear_traces();
+    current_function = (void*) &D_Dfd; Dr = ((Double (*) (Double,float,double)) vacall) (D1,f2,d3);
+    fprintf(out,"->{%g}\n",Dr.x);
+    fflush(out);
+#endif
+
+    Jr = J_JiJ(J1,i2,J2);
+    fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2);
+    fflush(out);
+    Jr.l1 = Jr.l2 = 0; clear_traces();
+    current_function = (void*) &J_JiJ; Jr = ((J (*) (J,int,J)) vacall) (J1,i2,J2);
+    fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2);
+    fflush(out);
+
+#ifndef SKIP_EXTRA_STRUCTS
+#ifndef SKIP_T
+    Tr = T_TcT(T1,' ',T2);
+    fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]);
+    fflush(out);
+    Tr.c[0] = Tr.c[1] = Tr.c[2] = 0; clear_traces();
+    current_function = (void*) &T_TcT; Tr = ((T (*) (T,char,T)) vacall) (T1,' ',T2);
+    fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]);
+    fflush(out);
+#endif
+
+#ifndef SKIP_X
+    Xr = X_BcdB(B1,c2,d3,B2);
+    fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1);
+    fflush(out);
+    Xr.c[0]=Xr.c1='\0'; clear_traces();
+    current_function = (void*) &X_BcdB; Xr = ((X (*) (B,char,double,B)) vacall) (B1,c2,d3,B2);
+    fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1);
+    fflush(out);
+#endif
+#endif
+  }
+
+  /* gpargs boundary tests */
+  { long lr;
+    long long llr;
+    float fr;
+    double dr;
+
+    lr = l_l0J(J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l0J; lr = ((long (*) (J,long)) vacall) (J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l1J(l1,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l1J; lr = ((long (*) (long,J,long)) vacall) (l1,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l2J(l1,l2,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l2J; lr = ((long (*) (long,long,J,long)) vacall) (l1,l2,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l3J(l1,l2,l3,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l3J; lr = ((long (*) (long,long,long,J,long)) vacall) (l1,l2,l3,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l4J(l1,l2,l3,l4,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l4J; lr = ((long (*) (long,long,long,long,J,long)) vacall) (l1,l2,l3,l4,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l5J(l1,l2,l3,l4,l5,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l5J; lr = ((long (*) (long,long,long,long,long,J,long)) vacall) (l1,l2,l3,l4,l5,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l6J(l1,l2,l3,l4,l5,l6,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l6J; lr = ((long (*) (long,long,long,long,long,long,J,long)) vacall) (l1,l2,l3,l4,l5,l6,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l7J(l1,l2,l3,l4,l5,l6,l7,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l7J; lr = ((long (*) (long,long,long,long,long,long,long,J,long)) vacall) (l1,l2,l3,l4,l5,l6,l7,J1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l0K(K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l0K; lr = ((long (*) (K,long)) vacall) (K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l1K(l1,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l1K; lr = ((long (*) (long,K,long)) vacall) (l1,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l2K(l1,l2,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l2K; lr = ((long (*) (long,long,K,long)) vacall) (l1,l2,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l3K(l1,l2,l3,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l3K; lr = ((long (*) (long,long,long,K,long)) vacall) (l1,l2,l3,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l4K(l1,l2,l3,l4,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l4K; lr = ((long (*) (long,long,long,long,K,long)) vacall) (l1,l2,l3,l4,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l5K(l1,l2,l3,l4,l5,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l5K; lr = ((long (*) (long,long,long,long,long,K,long)) vacall) (l1,l2,l3,l4,l5,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    lr = l_l6K(l1,l2,l3,l4,l5,l6,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+    lr = 0; clear_traces();
+    current_function = (void*) &l_l6K; lr = ((long (*) (long,long,long,long,long,long,K,long)) vacall) (l1,l2,l3,l4,l5,l6,K1,l9);
+    fprintf(out,"->%ld\n",lr);
+    fflush(out);
+
+    fr = f_f17l3L(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,l6,l7,l8,L1);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+    fr = 0.0; clear_traces();
+    current_function = (void*) &f_f17l3L; fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,long,long,long,L)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,l6,l7,l8,L1);
+    fprintf(out,"->%g\n",fr);
+    fflush(out);
+
+    dr = d_d17l3L(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16,d17,l6,l7,l8,L1);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_d17l3L; dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,long,long,long,L)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16,d17,l6,l7,l8,L1);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    llr = ll_l2ll(l1,l2,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    current_function = (void*) &ll_l2ll; llr = ((long long (*) (long,long,long long,long)) vacall) (l1,l2,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_l3ll(l1,l2,l3,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    current_function = (void*) &ll_l3ll; llr = ((long long (*) (long,long,long,long long,long)) vacall) (l1,l2,l3,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_l4ll(l1,l2,l3,l4,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    current_function = (void*) &ll_l4ll; llr = ((long long (*) (long,long,long,long,long long,long)) vacall) (l1,l2,l3,l4,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_l5ll(l1,l2,l3,l4,l5,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    current_function = (void*) &ll_l5ll; llr = ((long long (*) (long,long,long,long,long,long long,long)) vacall) (l1,l2,l3,l4,l5,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_l6ll(l1,l2,l3,l4,l5,l6,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    current_function = (void*) &ll_l6ll; llr = ((long long (*) (long,long,long,long,long,long,long long,long)) vacall) (l1,l2,l3,l4,l5,l6,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    llr = ll_l7ll(l1,l2,l3,l4,l5,l6,l7,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+    llr = 0; clear_traces();
+    current_function = (void*) &ll_l7ll; llr = ((long long (*) (long,long,long,long,long,long,long,long long,long)) vacall) (l1,l2,l3,l4,l5,l6,l7,ll1,l9);
+    fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff));
+    fflush(out);
+
+    dr = d_l2d(l1,l2,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_l2d; dr = ((double (*) (long,long,double,long)) vacall) (l1,l2,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_l3d(l1,l2,l3,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_l3d; dr = ((double (*) (long,long,long,double,long)) vacall) (l1,l2,l3,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_l4d(l1,l2,l3,l4,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_l4d; dr = ((double (*) (long,long,long,long,double,long)) vacall) (l1,l2,l3,l4,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_l5d(l1,l2,l3,l4,l5,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_l5d; dr = ((double (*) (long,long,long,long,long,double,long)) vacall) (l1,l2,l3,l4,l5,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_l6d(l1,l2,l3,l4,l5,l6,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_l6d; dr = ((double (*) (long,long,long,long,long,long,double,long)) vacall) (l1,l2,l3,l4,l5,l6,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+
+    dr = d_l7d(l1,l2,l3,l4,l5,l6,l7,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+    dr = 0.0; clear_traces();
+    current_function = (void*) &d_l7d; dr = ((double (*) (long,long,long,long,long,long,long,double,long)) vacall) (l1,l2,l3,l4,l5,l6,l7,ll1,l9);
+    fprintf(out,"->%g\n",dr);
+    fflush(out);
+  }
+
+  /* by-value tests */
+  /* This test is trivial, since a copy of k is allocated on the callee's stack.
+     But anyway... */
+  { K k;
+
+    k.l1 = l1;
+    k.l2 = l2;
+    k.l3 = l3;
+    k.l4 = l4;
+    fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4);
+    fflush(out);
+    clear_traces();
+    current_function = (void*) &v_clobber_K; ((void (*) (K)) vacall) (k);
+    fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4);
+    fflush(out);
+  }
+
+  exit(0);
+}
diff --git a/vacall/vacall-alpha-linux.s b/vacall/vacall-alpha-linux.s
new file mode 100644 (file)
index 0000000..85364c8
--- /dev/null
@@ -0,0 +1,174 @@
+       .set noreorder
+       .set volatile
+       .set noat
+       .set nomacro
+       .text
+       .align 2
+       .align 4
+       .globl vacall_receiver
+       .ent vacall_receiver
+vacall_receiver:
+       .frame $15,192,$26,48
+       .mask 0x4008000,-192
+       ldah $29,0($27)         !gpdisp!1
+       lda $29,0($29)          !gpdisp!1
+$vacall_receiver..ng:
+       lda $30,-192($30)
+       stq $15,8($30)
+       mov $30,$15
+       lda $3,144($15)
+       stq $26,0($30)
+       .prologue 1
+       lda $2,88($15)
+       stq $16,144($15)
+       subq $2,$3,$2
+       ldq $3,vacall_function($29)             !literal
+       stq $2,80($15)
+       lda $2,192($15)
+       lda $16,16($15)
+       stq $2,72($15)
+       ldq $27,0($3)
+       lda $2,144($15)
+       stq $17,152($15)
+       stq $18,160($15)
+       stq $19,168($15)
+       stq $20,176($15)
+       stq $21,184($15)
+       stt $f16,88($15)
+       stt $f17,96($15)
+       stt $f18,104($15)
+       stt $f19,112($15)
+       stt $f20,120($15)
+       stt $f21,128($15)
+       stl $31,16($15)
+       stq $2,40($15)
+       stq $31,48($15)
+       stl $31,56($15)
+       jsr $26,($27),0
+       ldah $29,0($26)         !gpdisp!2
+       lda $29,0($29)          !gpdisp!2
+       ldl $2,56($15)
+       beq $2,$L43
+       zapnot $2,15,$3
+       cmpeq $3,1,$2
+       bne $2,$L44
+       cmpeq $3,2,$2
+       bne $2,$L44
+       cmpeq $3,3,$2
+       bne $2,$L50
+       cmpeq $3,4,$2
+       bne $2,$L51
+       cmpeq $3,5,$2
+       bne $2,$L52
+       cmpeq $3,6,$2
+       bne $2,$L53
+       cmpeq $3,7,$2
+       bne $2,$L54
+       cmpeq $3,8,$2
+       bne $2,$L48
+       cmpeq $3,9,$2
+       bne $2,$L48
+       cmpeq $3,10,$2
+       bne $2,$L48
+       cmpeq $3,11,$2
+       bne $2,$L48
+       cmpeq $3,12,$2
+       bne $2,$L55
+       cmpeq $3,13,$2
+       bne $2,$L56
+       cmpeq $3,14,$2
+       bne $2,$L48
+       cmpeq $3,15,$2
+       beq $2,$L43
+       lda $2,1024($31)
+       ldl $3,16($15)
+       and $2,$3,$2
+       beq $2,$L43
+       ldq $3,64($15)
+       cmpeq $3,1,$2
+       bne $2,$L57
+       cmpeq $3,2,$2
+       bne $2,$L58
+       cmpeq $3,4,$2
+       bne $2,$L59
+       cmpeq $3,8,$2
+       bne $2,$L60
+       cmpeq $3,16,$2
+       beq $2,$L43
+       ldq $2,48($15)
+       ldq $1,8($2)
+       ldq $0,0($2)
+       .align 4
+$L43:
+       mov $15,$30
+       ldq $26,0($30)
+       ldq $15,8($30)
+       lda $30,192($30)
+       ret $31,($26),1
+       .align 4
+$L44:
+       mov $15,$30
+       ldl $2,24($15)
+       ldq $26,0($30)
+       sll $2,56,$2
+       sra $2,56,$0
+       ldq $15,8($30)
+       lda $30,192($30)
+       ret $31,($26),1
+$L51:
+       ldl $2,24($15)
+       sll $2,48,$2
+       sra $2,48,$0
+       br $31,$L43
+$L50:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       and $2,0xff,$0
+       br $31,$L43
+$L48:
+       ldq $0,24($15)
+       br $31,$L43
+$L52:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       zapnot $2,3,$0
+       br $31,$L43
+$L53:
+       ldl $3,24($15)
+       bis $31,$31,$31
+       mov $3,$0
+       br $31,$L43
+$L54:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       zapnot $2,15,$0
+       br $31,$L43
+$L55:
+       lds $f0,24($15)
+       br $31,$L43
+$L56:
+       ldt $f0,24($15)
+       br $31,$L43
+$L57:
+       ldq $3,48($15)
+       ldq_u $2,0($3)
+       extbl $2,$3,$0
+       br $31,$L43
+$L58:
+       ldq $3,48($15)
+       ldq_u $2,0($3)
+       extwl $2,$3,$0
+       br $31,$L43
+$L60:
+       ldq $2,48($15)
+       bis $31,$31,$31
+       ldq $0,0($2)
+       br $31,$L43
+$L59:
+       ldq $2,48($15)
+       ldl $3,0($2)
+       zapnot $3,15,$0
+       br $31,$L43
+       .end vacall_receiver
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/vacall/vacall-alpha-macro.S b/vacall/vacall-alpha-macro.S
new file mode 100644 (file)
index 0000000..2655035
--- /dev/null
@@ -0,0 +1,175 @@
+       .set noreorder
+       .set volatile
+       .set noat
+       .set nomacro
+       .text
+       .align 2
+       .align 4
+       .globl vacall_receiver
+       .ent vacall_receiver
+vacall_receiver:
+       .frame $15,192,$26,48
+       .mask 0x4008000,-192
+       ldah $29,0($27)         !gpdisp!1
+       lda $29,0($29)          !gpdisp!1
+$vacall_receiver..ng:
+       lda $30,-192($30)
+       stq $15,8($30)
+       mov $30,$15
+       lda $3,144($15)
+       stq $26,0($30)
+       .prologue 1
+       lda $2,88($15)
+       stq $16,144($15)
+       subq $2,$3,$2
+       ldq $3,vacall_function($29)             !literal
+       stq $2,80($15)
+       lda $2,192($15)
+       lda $16,16($15)
+       stq $2,72($15)
+       ldq $27,0($3)
+       lda $2,144($15)
+       stq $17,152($15)
+       stq $18,160($15)
+       stq $19,168($15)
+       stq $20,176($15)
+       stq $21,184($15)
+       stt $f16,88($15)
+       stt $f17,96($15)
+       stt $f18,104($15)
+       stt $f19,112($15)
+       stt $f20,120($15)
+       stt $f21,128($15)
+       stl $31,16($15)
+       stq $2,40($15)
+       stq $31,48($15)
+       stl $31,56($15)
+       jsr $26,($27),0
+       ldah $29,0($26)         !gpdisp!2
+       lda $29,0($29)          !gpdisp!2
+       ldl $2,56($15)
+       beq $2,$L43
+       zapnot $2,15,$3
+       cmpeq $3,1,$2
+       bne $2,$L44
+       cmpeq $3,2,$2
+       bne $2,$L44
+       cmpeq $3,3,$2
+       bne $2,$L50
+       cmpeq $3,4,$2
+       bne $2,$L51
+       cmpeq $3,5,$2
+       bne $2,$L52
+       cmpeq $3,6,$2
+       bne $2,$L53
+       cmpeq $3,7,$2
+       bne $2,$L54
+       cmpeq $3,8,$2
+       bne $2,$L48
+       cmpeq $3,9,$2
+       bne $2,$L48
+       cmpeq $3,10,$2
+       bne $2,$L48
+       cmpeq $3,11,$2
+       bne $2,$L48
+       cmpeq $3,12,$2
+       bne $2,$L55
+       cmpeq $3,13,$2
+       bne $2,$L56
+       cmpeq $3,14,$2
+       bne $2,$L48
+       cmpeq $3,15,$2
+       beq $2,$L43
+       lda $2,1024($31)
+       ldl $3,16($15)
+       and $2,$3,$2
+       beq $2,$L43
+       ldq $3,64($15)
+       cmpeq $3,1,$2
+       bne $2,$L57
+       cmpeq $3,2,$2
+       bne $2,$L58
+       cmpeq $3,4,$2
+       bne $2,$L59
+       cmpeq $3,8,$2
+       bne $2,$L60
+       cmpeq $3,16,$2
+       beq $2,$L43
+       ldq $2,48($15)
+       ldq $1,8($2)
+       ldq $0,0($2)
+       .align 4
+$L43:
+       mov $15,$30
+       ldq $26,0($30)
+       ldq $15,8($30)
+       lda $30,192($30)
+       ret $31,($26),1
+       .align 4
+$L44:
+       mov $15,$30
+       ldl $2,24($15)
+       ldq $26,0($30)
+       sll $2,56,$2
+       sra $2,56,$0
+       ldq $15,8($30)
+       lda $30,192($30)
+       ret $31,($26),1
+$L51:
+       ldl $2,24($15)
+       sll $2,48,$2
+       sra $2,48,$0
+       br $31,$L43
+$L50:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       and $2,0xff,$0
+       br $31,$L43
+$L48:
+       ldq $0,24($15)
+       br $31,$L43
+$L52:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       zapnot $2,3,$0
+       br $31,$L43
+$L53:
+       ldl $3,24($15)
+       bis $31,$31,$31
+       mov $3,$0
+       br $31,$L43
+$L54:
+       ldl $2,24($15)
+       bis $31,$31,$31
+       zapnot $2,15,$0
+       br $31,$L43
+$L55:
+       lds $f0,24($15)
+       br $31,$L43
+$L56:
+       ldt $f0,24($15)
+       br $31,$L43
+$L57:
+       ldq $3,48($15)
+       ldq_u $2,0($3)
+       extbl $2,$3,$0
+       br $31,$L43
+$L58:
+       ldq $3,48($15)
+       ldq_u $2,0($3)
+       extwl $2,$3,$0
+       br $31,$L43
+$L60:
+       ldq $2,48($15)
+       bis $31,$31,$31
+       ldq $0,0($2)
+       br $31,$L43
+$L59:
+       ldq $2,48($15)
+       ldl $3,0($2)
+       zapnot $3,15,$0
+       br $31,$L43
+       .end vacall_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-alpha.c b/vacall/vacall-alpha.c
new file mode 100644 (file)
index 0000000..cb74c91
--- /dev/null
@@ -0,0 +1,161 @@
+/* vacall function for alpha CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *             env     __asm__("$1");
+#endif
+register long          arg1    __asm__("$16");
+register long          arg2    __asm__("$17");
+register long          arg3    __asm__("$18");
+register long          arg4    __asm__("$19");
+register long          arg5    __asm__("$20");
+register long          arg6    __asm__("$21");
+register double                farg1   __asm__("$f16");
+register double                farg2   __asm__("$f17");
+register double                farg3   __asm__("$f18");
+register double                farg4   __asm__("$f19");
+register double                farg5   __asm__("$f20");
+register double                farg6   __asm__("$f21");
+register __vaword      iret    __asm__("$0");
+register __vaword      iret2   __asm__("$1");
+register float         fret    __asm__("$f0");
+register double                dret    __asm__("$f0");
+
+/* The ABI requires that the first 6 general-purpose argument words are
+   being passed in registers, even if these words belong to a struct. No room
+   is allocated for these register words on the stack by the caller, but the
+   callee allocates room for them - at the right place in the stack frame,
+   that is, above the usual {fp, retaddr} combo - if and only if they are part
+   of a larger struct that extends to the stack and the address of this struct
+   is taken. */
+struct gpargsequence {
+  __vaword word1; /* $16 */
+  __vaword word2; /* $17 */
+  __vaword word3; /* $18 */
+  __vaword word4; /* $19 */
+  __vaword word5; /* $20 */
+  __vaword word6; /* $21 */
+  __vaword firststackword;
+};
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (struct gpargsequence gpargs)
+{
+  __va_alist list;
+  /* Move the arguments passed in registers to their stack locations. */
+  list.farg[0] = farg1;
+  list.farg[1] = farg2;
+  list.farg[2] = farg3;
+  list.farg[3] = farg4;
+  list.farg[4] = farg5;
+  list.farg[5] = farg6;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&gpargs;
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.memargptr = (long)&gpargs.firststackword;
+  list.farg_offset = (long)&list.farg[0] - list.aptr;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulonglong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      if (list.rsize == sizeof(char)) {
+        iret = *(unsigned char *) list.raddr;
+      } else
+      if (list.rsize == sizeof(short)) {
+        iret = *(unsigned short *) list.raddr;
+      } else
+      if (list.rsize == sizeof(int)) {
+        iret = *(unsigned int *) list.raddr;
+      } else
+      if (list.rsize == sizeof(long)) {
+        iret = *(unsigned long *) list.raddr;
+      } else
+      if (list.rsize == 2*sizeof(__vaword)) {
+        iret  = ((__vaword *) list.raddr)[0];
+        iret2 = ((__vaword *) list.raddr)[1];
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-arm-linux-pic.s b/vacall/vacall-arm-linux-pic.s
new file mode 100644 (file)
index 0000000..9035020
--- /dev/null
@@ -0,0 +1,100 @@
+       .file   "vacall-arm.c"
+       .text
+       .align  2
+       .global vacall_receiver
+       .type   vacall_receiver,function
+vacall_receiver:
+       @ args = 20, pretend = 16, frame = 32
+       @ frame_needed = 1, uses_anonymous_args = 0
+       mov     ip, sp
+       sub     sp, sp, #16
+       stmfd   sp!, {sl, fp, ip, lr, pc}
+       sub     fp, ip, #20
+       add     ip, fp, #4
+       ldr     sl, .L41
+       sub     sp, sp, #32
+       stmia   ip, {r0, r1, r2, r3}
+       ldr     r3, .L41+4
+       mov     lr, #0
+.L36:
+       add     sl, pc, sl
+       ldr     r2, [sl, r3]
+       str     ip, [fp, #-32]
+       str     lr, [fp, #-24]
+       str     lr, [fp, #-48]
+       str     lr, [fp, #-28]
+       bic     sp, sp, #7
+       sub     r0, fp, #48
+       mov     lr, pc
+       ldr     pc, [r2, #0]
+       ldr     r2, [fp, #-24]
+       cmp     r2, #0
+       beq     .L1
+       cmp     r2, #1
+       beq     .L39
+       cmp     r2, #2
+       ldreqsb r0, [fp, #-40]
+       beq     .L1
+       cmp     r2, #3
+       beq     .L39
+       cmp     r2, #4
+       ldreqsh r0, [fp, #-40]
+       beq     .L1
+       cmp     r2, #5
+       ldreqh  r0, [fp, #-40]
+       beq     .L1
+       cmp     r2, #6
+       beq     .L38
+       cmp     r2, #7
+       beq     .L38
+       cmp     r2, #8
+       beq     .L38
+       cmp     r2, #9
+       beq     .L38
+       sub     r3, r2, #10
+       cmp     r3, #1
+       bls     .L37
+       cmp     r2, #12
+       ldreq   r0, [fp, #-40]  @ float
+       beq     .L1
+       cmp     r2, #13
+       beq     .L37
+       cmp     r2, #14
+       beq     .L38
+       cmp     r2, #15
+       beq     .L40
+.L1:
+       ldmea   fp, {sl, fp, sp, pc}
+.L40:
+       ldr     r3, [fp, #-48]
+       tst     r3, #1024
+       beq     .L1
+       ldr     r3, [fp, #-20]
+       cmp     r3, #1
+       ldreq   r3, [fp, #-28]
+       ldreqb  r0, [r3, #0]    @ zero_extendqisi2
+       beq     .L1
+       cmp     r3, #2
+       ldreq   r3, [fp, #-28]
+       ldrne   r3, [fp, #-28]
+       ldreqh  r0, [r3, #0]
+       ldrne   r0, [r3, #0]
+       b       .L1
+.L38:
+       ldr     r0, [fp, #-40]
+       b       .L1
+.L37:
+       sub     r0, fp, #40
+       ldmia   r0, {r0, r1}    @ phole ldm
+       b       .L1
+.L39:
+       ldrb    r0, [fp, #-40]  @ zero_extendqisi2
+       b       .L1
+.L42:
+       .align  2
+.L41:
+       .word   _GLOBAL_OFFSET_TABLE_-(.L36+8)
+       .word   vacall_function(GOT)
+.Lfe1:
+       .size   vacall_receiver,.Lfe1-vacall_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/vacall/vacall-arm-linux.s b/vacall/vacall-arm-linux.s
new file mode 100644 (file)
index 0000000..1c9118b
--- /dev/null
@@ -0,0 +1,95 @@
+       .file   "vacall-arm.c"
+       .text
+       .align  2
+       .global vacall_receiver
+       .type   vacall_receiver,function
+vacall_receiver:
+       @ args = 20, pretend = 16, frame = 32
+       @ frame_needed = 1, uses_anonymous_args = 0
+       mov     ip, sp
+       sub     sp, sp, #16
+       stmfd   sp!, {fp, ip, lr, pc}
+       sub     fp, ip, #20
+       add     lr, fp, #4
+       mov     ip, #0
+       sub     sp, sp, #32
+       stmia   lr, {r0, r1, r2, r3}
+       bic     sp, sp, #7
+       str     lr, [fp, #-28]
+       str     ip, [fp, #-20]
+       str     ip, [fp, #-44]
+       str     ip, [fp, #-24]
+       sub     r0, fp, #44
+       ldr     r3, .L40
+       mov     lr, pc
+       ldr     pc, [r3, #0]
+       ldr     r2, [fp, #-20]
+       cmp     r2, #0
+       beq     .L1
+       cmp     r2, #1
+       beq     .L38
+       cmp     r2, #2
+       ldreqsb r0, [fp, #-36]
+       beq     .L1
+       cmp     r2, #3
+       beq     .L38
+       cmp     r2, #4
+       ldreqsh r0, [fp, #-36]
+       beq     .L1
+       cmp     r2, #5
+       ldreqh  r0, [fp, #-36]
+       beq     .L1
+       cmp     r2, #6
+       beq     .L37
+       cmp     r2, #7
+       beq     .L37
+       cmp     r2, #8
+       beq     .L37
+       cmp     r2, #9
+       beq     .L37
+       sub     r3, r2, #10
+       cmp     r3, #1
+       bls     .L36
+       cmp     r2, #12
+       ldreq   r0, [fp, #-36]  @ float
+       beq     .L1
+       cmp     r2, #13
+       beq     .L36
+       cmp     r2, #14
+       beq     .L37
+       cmp     r2, #15
+       beq     .L39
+.L1:
+       ldmea   fp, {fp, sp, pc}
+.L39:
+       ldr     r3, [fp, #-44]
+       tst     r3, #1024
+       beq     .L1
+       ldr     r3, [fp, #-16]
+       cmp     r3, #1
+       ldreq   r3, [fp, #-24]
+       ldreqb  r0, [r3, #0]    @ zero_extendqisi2
+       beq     .L1
+       cmp     r3, #2
+       ldreq   r3, [fp, #-24]
+       ldrne   r3, [fp, #-24]
+       ldreqh  r0, [r3, #0]
+       ldrne   r0, [r3, #0]
+       b       .L1
+.L37:
+       ldr     r0, [fp, #-36]
+       b       .L1
+.L36:
+       sub     r0, fp, #36
+       ldmia   r0, {r0, r1}    @ phole ldm
+       b       .L1
+.L38:
+       ldrb    r0, [fp, #-36]  @ zero_extendqisi2
+       b       .L1
+.L41:
+       .align  2
+.L40:
+       .word   vacall_function
+.Lfe1:
+       .size   vacall_receiver,.Lfe1-vacall_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/vacall/vacall-arm-macro.S b/vacall/vacall-arm-macro.S
new file mode 100644 (file)
index 0000000..3ff455b
--- /dev/null
@@ -0,0 +1,198 @@
+#include "asm-arm.h"
+#ifdef __PIC__
+       .text
+       .align  2
+       .global C(vacall_receiver)
+       DECLARE_FUNCTION(vacall_receiver)
+FUNBEGIN(vacall_receiver)
+       // args = 20, pretend = 16, frame = 32
+       // frame_needed = 1, uses_anonymous_args = 0
+       mov     ip, sp
+       sub     sp, sp, $16
+       stmfd   sp!, {sl, fp, ip, lr, pc}
+       sub     fp, ip, $20
+       add     ip, fp, $4
+       ldr     sl, L(41)
+       sub     sp, sp, $32
+       stmia   ip, {r0, r1, r2, r3}
+       ldr     r3, L(41)+4
+       mov     lr, $0
+L(36):
+       add     sl, pc, sl
+       ldr     r2, [sl, r3]
+       str     ip, [fp, $-32]
+       str     lr, [fp, $-24]
+       str     lr, [fp, $-48]
+       str     lr, [fp, $-28]
+       bic     sp, sp, $7
+       sub     r0, fp, $48
+       mov     lr, pc
+       ldr     pc, [r2, $0]
+       ldr     r2, [fp, $-24]
+       cmp     r2, $0
+       beq     L(1)
+       cmp     r2, $1
+       beq     L(39)
+       cmp     r2, $2
+       ldreqsb r0, [fp, $-40]
+       beq     L(1)
+       cmp     r2, $3
+       beq     L(39)
+       cmp     r2, $4
+       ldreqsh r0, [fp, $-40]
+       beq     L(1)
+       cmp     r2, $5
+       ldreqh  r0, [fp, $-40]
+       beq     L(1)
+       cmp     r2, $6
+       beq     L(38)
+       cmp     r2, $7
+       beq     L(38)
+       cmp     r2, $8
+       beq     L(38)
+       cmp     r2, $9
+       beq     L(38)
+       sub     r3, r2, $10
+       cmp     r3, $1
+       bls     L(37)
+       cmp     r2, $12
+       ldreq   r0, [fp, $-40]  // float
+       beq     L(1)
+       cmp     r2, $13
+       beq     L(37)
+       cmp     r2, $14
+       beq     L(38)
+       cmp     r2, $15
+       beq     L(40)
+L(1):
+       ldmea   fp, {sl, fp, sp, pc}
+L(40):
+       ldr     r3, [fp, $-48]
+       tst     r3, $1024
+       beq     L(1)
+       ldr     r3, [fp, $-20]
+       cmp     r3, $1
+       ldreq   r3, [fp, $-28]
+       ldreqb  r0, [r3, $0]    // zero_extendqisi2
+       beq     L(1)
+       cmp     r3, $2
+       ldreq   r3, [fp, $-28]
+       ldrne   r3, [fp, $-28]
+       ldreqh  r0, [r3, $0]
+       ldrne   r0, [r3, $0]
+       b       L(1)
+L(38):
+       ldr     r0, [fp, $-40]
+       b       L(1)
+L(37):
+       sub     r0, fp, $40
+       ldmia   r0, {r0, r1}    // phole ldm
+       b       L(1)
+L(39):
+       ldrb    r0, [fp, $-40]  // zero_extendqisi2
+       b       L(1)
+L(42):
+       .align  2
+L(41):
+       .word   _GLOBAL_OFFSET_TABLE_-(L(36)+8)
+       .word   C(vacall_function)(GOT)
+L(fe1):
+       FUNEND(vacall_receiver)
+#else
+       .text
+       .align  2
+       .global C(vacall_receiver)
+       DECLARE_FUNCTION(vacall_receiver)
+FUNBEGIN(vacall_receiver)
+       // args = 20, pretend = 16, frame = 32
+       // frame_needed = 1, uses_anonymous_args = 0
+       mov     ip, sp
+       sub     sp, sp, $16
+       stmfd   sp!, {fp, ip, lr, pc}
+       sub     fp, ip, $20
+       add     lr, fp, $4
+       mov     ip, $0
+       sub     sp, sp, $32
+       stmia   lr, {r0, r1, r2, r3}
+       bic     sp, sp, $7
+       str     lr, [fp, $-28]
+       str     ip, [fp, $-20]
+       str     ip, [fp, $-44]
+       str     ip, [fp, $-24]
+       sub     r0, fp, $44
+       ldr     r3, L(40)
+       mov     lr, pc
+       ldr     pc, [r3, $0]
+       ldr     r2, [fp, $-20]
+       cmp     r2, $0
+       beq     L(1)
+       cmp     r2, $1
+       beq     L(38)
+       cmp     r2, $2
+       ldreqsb r0, [fp, $-36]
+       beq     L(1)
+       cmp     r2, $3
+       beq     L(38)
+       cmp     r2, $4
+       ldreqsh r0, [fp, $-36]
+       beq     L(1)
+       cmp     r2, $5
+       ldreqh  r0, [fp, $-36]
+       beq     L(1)
+       cmp     r2, $6
+       beq     L(37)
+       cmp     r2, $7
+       beq     L(37)
+       cmp     r2, $8
+       beq     L(37)
+       cmp     r2, $9
+       beq     L(37)
+       sub     r3, r2, $10
+       cmp     r3, $1
+       bls     L(36)
+       cmp     r2, $12
+       ldreq   r0, [fp, $-36]  // float
+       beq     L(1)
+       cmp     r2, $13
+       beq     L(36)
+       cmp     r2, $14
+       beq     L(37)
+       cmp     r2, $15
+       beq     L(39)
+L(1):
+       ldmea   fp, {fp, sp, pc}
+L(39):
+       ldr     r3, [fp, $-44]
+       tst     r3, $1024
+       beq     L(1)
+       ldr     r3, [fp, $-16]
+       cmp     r3, $1
+       ldreq   r3, [fp, $-24]
+       ldreqb  r0, [r3, $0]    // zero_extendqisi2
+       beq     L(1)
+       cmp     r3, $2
+       ldreq   r3, [fp, $-24]
+       ldrne   r3, [fp, $-24]
+       ldreqh  r0, [r3, $0]
+       ldrne   r0, [r3, $0]
+       b       L(1)
+L(37):
+       ldr     r0, [fp, $-36]
+       b       L(1)
+L(36):
+       sub     r0, fp, $36
+       ldmia   r0, {r0, r1}    // phole ldm
+       b       L(1)
+L(38):
+       ldrb    r0, [fp, $-36]  // zero_extendqisi2
+       b       L(1)
+L(41):
+       .align  2
+L(40):
+       .word   C(vacall_function)
+L(fe1):
+       FUNEND(vacall_receiver)
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",%progbits
+#endif
diff --git a/vacall/vacall-arm.c b/vacall/vacall-arm.c
new file mode 100644 (file)
index 0000000..e6b4bd5
--- /dev/null
@@ -0,0 +1,149 @@
+/* vacall function for arm CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+typedef struct { void (*vacall_function) (void*,va_alist); void* arg; } env_t;
+#endif
+
+/* armel have only softvfp which uses generic registers */
+register __vaword      iret    __asm__("r0");
+register __vaword      iret2   __asm__("r1");
+register float         fret    __asm__("r0");
+register __vaword      dret1   __asm__("r0");
+register __vaword      dret2   __asm__("r1");
+
+#ifndef REENTRANT
+/* The ARM ABI requires that the first 4 general-purpose argument words are
+   being passed in registers, even if these words belong to a struct. No room
+   is allocated for these register words on the stack by the caller, but the
+   callee allocates room for them - at the right place in the stack frame,
+   that is, above the usual {fp, sp, retaddr, pc} combo - if and only if
+   they are part of a larger struct that extends to the stack and the address
+   of this struct is taken. */
+struct gpargsequence {
+  __vaword word1; /* r0 */
+  __vaword word2; /* r1 */
+  __vaword word3; /* r2 */
+  __vaword word4; /* r3 */
+  __vaword firststackword;
+};
+
+void /* the return type is variable, not void! */
+vacall_receiver (struct gpargsequence gpargs)
+#else /* REENTRANT */
+/* The first 4 general-purpose argument words have already been pushed to the
+   stack by the trampoline. We can ignore them here. */
+static
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword ignored1, __vaword ignored2, __vaword ignored3, __vaword ignored4,
+                 env_t* env, __vaword filler, __vaword saved_fp, __vaword saved_sp, __vaword saved_lr, __vaword saved_pc,
+                 __vaword firstword)
+#endif
+{
+  __va_alist list;
+
+  /* Enforce 8-bytes-alignment of the stack pointer.
+     We need to do it this way because the old GCC that we use to compile
+     this file does not support the option '-mabi=aapcs'. */
+  register unsigned long sp __asm__("r13");  /* C names for registers */
+  sp &= -8;
+
+  /* Prepare the va_alist. */
+  list.flags = 0;
+#ifndef REENTRANT
+  list.aptr = (long)&gpargs;
+#else /* REENTRANT */
+  list.aptr = (long)&firstword;
+#endif
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) {
+    iret  = ((__vaword *) &list.tmp._longlong)[0];
+    iret2 = ((__vaword *) &list.tmp._longlong)[1];
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret1 = ((__vaword *) &list.tmp._double)[0];
+    dret2 = ((__vaword *) &list.tmp._double)[1];
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    /* NB: On arm, all structure sizes are divisible by 4. */
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      if (list.rsize == sizeof(char)) { /* can't occur */
+        iret = *(unsigned char *) list.raddr;
+      } else
+      if (list.rsize == sizeof(short)) { /* can't occur */
+        iret = *(unsigned short *) list.raddr;
+      } else
+        iret = *(unsigned int *) list.raddr; /* struct of size 3 :) */
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-arm64-macro.S b/vacall/vacall-arm64-macro.S
new file mode 100644 (file)
index 0000000..63b9cb6
--- /dev/null
@@ -0,0 +1,182 @@
+#include "asm-arm.h"
+       .cpu generic+fp+simd
+       .text
+       .align  2
+       .p2align 3,,7
+       .global C(vacall_receiver)
+       .type   vacall_receiver, %function
+FUNBEGIN(vacall_receiver)
+       stp     x29, x30, [sp, -256]!
+       adrp    x9, vacall_function
+       add     x29, sp, 0
+       add     x10, x29, 256
+       stp     s0, s1, [x29, 156]
+       ldr     x9, [x9, $:lo12:vacall_function]
+       stp     x0, x1, [x29, 88]
+       stp     s2, s3, [x29, 164]
+       stp     x10, xzr, [x29, 40]
+       stp     s4, s5, [x29, 172]
+       str     x8, [x29, 72]
+       stp     s6, s7, [x29, 180]
+       stp     x2, x3, [x29, 104]
+       stp     d0, d1, [x29, 192]
+       stp     x4, x5, [x29, 120]
+       stp     d2, d3, [x29, 208]
+       stp     x6, x7, [x29, 136]
+       str     wzr, [x29, 16]
+       add     x0, x29, 16
+       str     wzr, [x29, 56]
+       str     wzr, [x29, 80]
+       str     wzr, [x29, 152]
+       stp     d4, d5, [x29, 224]
+       stp     d6, d7, [x29, 240]
+       blr     x9
+       ldr     w9, [x29, 56]
+       cbz     w9, L(1)
+       cmp     w9, 1
+       beq     L(25)
+       cmp     w9, 2
+       beq     L(29)
+       cmp     w9, 3
+       beq     L(25)
+       cmp     w9, 4
+       beq     L(30)
+       cmp     w9, 5
+       beq     L(31)
+       cmp     w9, 6
+       beq     L(32)
+       cmp     w9, 7
+       beq     L(33)
+       and     w10, w9, -3
+       cmp     w10, 8
+       beq     L(27)
+       cmp     w10, 9
+       beq     L(27)
+       cmp     w9, 12
+       beq     L(34)
+       cmp     w9, 13
+       beq     L(35)
+       cmp     w9, 14
+       beq     L(27)
+       cmp     w9, 15
+       bne     L(1)
+       ldr     w9, [x29, 16]
+       tbz     x9, 10, L(1)
+       ldr     x9, [x29, 64]
+       sub     x10, x9, $1
+       cmp     x10, 15
+       bhi     L(1)
+       ldr     x11, [x29, 48]
+       cmp     x9, 8
+       and     x10, x11, 7
+       and     x11, x11, -8
+       add     x9, x9, x10
+       bhi     L(15)
+       cmp     x9, 8
+       lsl     w9, w9, 3
+       bhi     L(16)
+       mov     x12, 2
+       sub     w9, w9, $1
+       lsl     x9, x12, x9
+       ldr     x11, [x11]
+       sub     x9, x9, $1
+       lsl     w10, w10, 3
+       and     x9, x9, x11
+       asr     x0, x9, x10
+L(1):
+       ldp     x29, x30, [sp], 256
+       ret
+       .p2align 3
+L(25):
+       ldrb    w0, [x29, 24]
+       ldp     x29, x30, [sp], 256
+       ret
+       .p2align 3
+L(27):
+       ldr     x0, [x29, 24]
+       b       L(1)
+       .p2align 3
+L(29):
+       ldrsb   x0, [x29, 24]
+       b       L(1)
+       .p2align 3
+L(30):
+       ldrsh   x0, [x29, 24]
+       b       L(1)
+       .p2align 3
+L(31):
+       ldrh    w0, [x29, 24]
+       b       L(1)
+       .p2align 3
+L(32):
+       ldrsw   x0, [x29, 24]
+       b       L(1)
+       .p2align 3
+L(33):
+       ldr     w0, [x29, 24]
+       b       L(1)
+L(34):
+       ldr     s0, [x29, 24]
+       b       L(1)
+L(35):
+       ldr     d0, [x29, 24]
+       b       L(1)
+L(15):
+       cmp     x9, 16
+       lsl     w9, w9, 3
+       bls     L(36)
+       mov     x13, 2
+       sub     w9, w9, $129
+       ldp     x14, x12, [x11, 8]
+       lsl     x9, x13, x9
+       lsl     w15, w10, 3
+       sub     x9, x9, $1
+       neg     w10, w10, lsl 3
+       ldr     x11, [x11]
+       add     w10, w10, 64
+       and     x9, x9, x12
+       lsl     x16, x14, x10
+       asr     x11, x11, x15
+       asr     x14, x14, x15
+       lsl     x10, x9, x10
+       orr     x0, x11, x16
+       orr     x1, x10, x14
+       b       L(1)
+L(16):
+       mov     w13, -8
+       mov     x14, 2
+       sub     w9, w9, $65
+       lsl     w15, w10, 3
+       ldr     x12, [x11, 8]
+       lsl     x9, x14, x9
+       mul     w10, w13, w10
+       sub     x9, x9, $1
+       ldr     x11, [x11]
+       add     w10, w10, 64
+       and     x9, x9, x12
+       asr     x11, x11, x15
+       lsl     x9, x9, x10
+       orr     x0, x9, x11
+       b       L(1)
+L(36):
+       mov     w13, -4
+       mov     x14, 2
+       sub     w9, w9, $65
+       lsl     w15, w10, 3
+       ldr     x12, [x11, 8]
+       lsl     x9, x14, x9
+       mul     w10, w13, w10
+       sub     x9, x9, $1
+       ldr     x11, [x11]
+       add     w10, w10, 32
+       and     x9, x9, x12
+       asr     x1, x9, x15
+       lsl     x9, x9, x10
+       asr     x11, x11, x15
+       lsl     x9, x9, x10
+       orr     x0, x11, x9
+       b       L(1)
+       FUNEND(vacall_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",%progbits
+#endif
diff --git a/vacall/vacall-arm64.c b/vacall/vacall-arm64.c
new file mode 100644 (file)
index 0000000..e4264f8
--- /dev/null
@@ -0,0 +1,229 @@
+/* vacall function for arm64 (a.k.a. aarch64) CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *             env     __asm__("x18");
+#endif
+
+register __vaword* sret __asm__("x8");  /* structure return pointer */
+
+register __vaword iarg1 __asm__("x0");
+register __vaword iarg2 __asm__("x1");
+register __vaword iarg3 __asm__("x2");
+register __vaword iarg4 __asm__("x3");
+register __vaword iarg5 __asm__("x4");
+register __vaword iarg6 __asm__("x5");
+register __vaword iarg7 __asm__("x6");
+register __vaword iarg8 __asm__("x7");
+
+register float farg1 __asm__("s0");
+register float farg2 __asm__("s1");
+register float farg3 __asm__("s2");
+register float farg4 __asm__("s3");
+register float farg5 __asm__("s4");
+register float farg6 __asm__("s5");
+register float farg7 __asm__("s6");
+register float farg8 __asm__("s7");
+
+register double darg1 __asm__("d0");
+register double darg2 __asm__("d1");
+register double darg3 __asm__("d2");
+register double darg4 __asm__("d3");
+register double darg5 __asm__("d4");
+register double darg6 __asm__("d5");
+register double darg7 __asm__("d6");
+register double darg8 __asm__("d7");
+
+register __vaword iret  __asm__("x0");
+register __vaword iret2 __asm__("x1");
+register float  fret __asm__("s0");
+register double dret __asm__("d0");
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword word5, __vaword word6, __vaword word7, __vaword word8,
+                 __vaword firstword)
+{
+  __va_alist list;
+  /* Move the arguments passed in registers to temp storage. */
+  list.iarg[0] = iarg1;
+  list.iarg[1] = iarg2;
+  list.iarg[2] = iarg3;
+  list.iarg[3] = iarg4;
+  list.iarg[4] = iarg5;
+  list.iarg[5] = iarg6;
+  list.iarg[6] = iarg7;
+  list.iarg[7] = iarg8;
+  list.farg[0] = farg1;
+  list.farg[1] = farg2;
+  list.farg[2] = farg3;
+  list.farg[3] = farg4;
+  list.farg[4] = farg5;
+  list.farg[5] = farg6;
+  list.farg[6] = farg7;
+  list.farg[7] = farg8;
+  list.darg[0] = darg1;
+  list.darg[1] = darg2;
+  list.darg[2] = darg3;
+  list.darg[3] = darg4;
+  list.darg[4] = darg5;
+  list.darg[5] = darg6;
+  list.darg[6] = darg7;
+  list.darg[7] = darg8;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&firstword;
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.structraddr = sret;
+  list.ianum = 0;
+  list.fanum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong || list.rtype == __VAlonglong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong || list.rtype == __VAulonglong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    /* normal struct return convention */
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      /* Return structs of size <= 16 in registers. */
+      if (list.rsize > 0 && list.rsize <= 16) {
+        #if 0 /* Unoptimized */
+        iret = (__vaword)((unsigned char *) list.raddr)[0];
+        if (list.rsize >= 2)
+          iret |= (__vaword)((unsigned char *) list.raddr)[1] << 8;
+        if (list.rsize >= 3)
+          iret |= (__vaword)((unsigned char *) list.raddr)[2] << 16;
+        if (list.rsize >= 4)
+          iret |= (__vaword)((unsigned char *) list.raddr)[3] << 24;
+        if (list.rsize >= 5)
+          iret |= (__vaword)((unsigned char *) list.raddr)[4] << 32;
+        if (list.rsize >= 6)
+          iret |= (__vaword)((unsigned char *) list.raddr)[5] << 40;
+        if (list.rsize >= 7)
+          iret |= (__vaword)((unsigned char *) list.raddr)[6] << 48;
+        if (list.rsize >= 8)
+          iret |= (__vaword)((unsigned char *) list.raddr)[7] << 56;
+        if (list.rsize >= 9) {
+          iret2 = (__vaword)((unsigned char *) list.raddr)[8];
+          if (list.rsize >= 10)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[9] << 8;
+          if (list.rsize >= 11)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[10] << 16;
+          if (list.rsize >= 12)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[11] << 24;
+          if (list.rsize >= 13)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[12] << 32;
+          if (list.rsize >= 14)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[13] << 40;
+          if (list.rsize >= 15)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[14] << 48;
+          if (list.rsize >= 16)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[15] << 56;
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__vaword) */
+        __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+        uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__vaword) */
+        if (count <= sizeof(__vaword)) {
+          /* Assign iret. */
+          if (end_offset <= sizeof(__vaword)) {
+            /* 0 < end_offset ≤ sizeof(__vaword) */
+            __vaword mask0 = ((__vaword)2 << (end_offset*8-1)) - 1;
+            iret = (wordaddr[0] & mask0) >> (start_offset*8);
+          } else {
+            /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        } else {
+          /* Assign iret, iret2. */
+          if (end_offset <= 2*sizeof(__vaword)) {
+            /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+            iret2 = (wordaddr[1] & mask1) >> (start_offset*8);
+          } else {
+            /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+            __vaword mask2 = ((__vaword)2 << (end_offset*8-2*sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*8-start_offset*8));
+            iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        }
+        #endif
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-armhf-linux-pic.s b/vacall/vacall-armhf-linux-pic.s
new file mode 100644 (file)
index 0000000..a591771
--- /dev/null
@@ -0,0 +1,155 @@
+       .arch armv6
+       .eabi_attribute 28, 1
+       .eabi_attribute 20, 1
+       .eabi_attribute 21, 1
+       .eabi_attribute 23, 3
+       .eabi_attribute 24, 1
+       .eabi_attribute 25, 1
+       .eabi_attribute 26, 1
+       .eabi_attribute 30, 2
+       .eabi_attribute 34, 1
+       .eabi_attribute 18, 4
+       .file   "vacall-armhf.c"
+       .text
+       .align  2
+       .global vacall_receiver
+       .syntax unified
+       .arm
+       .fpu vfpv3-d16
+       .type   vacall_receiver, %function
+vacall_receiver:
+       @ args = 20, pretend = 16, frame = 176
+       @ frame_needed = 1, uses_anonymous_args = 0
+       sub     sp, sp, #16
+       mov     ip, #0
+       push    {r4, r5, r6, fp, lr}
+       add     fp, sp, #16
+       ldr     r4, .L32
+       ldr     r5, .L32+4
+       add     lr, fp, #4
+.LPIC0:
+       add     r4, pc, r4
+       add     r6, fp, #20
+       sub     sp, sp, #180
+       stm     lr, {r0, r1, r2, r3}
+       vstr.32 s0, [fp, #-152]
+       vstr.32 s1, [fp, #-148]
+       vstr.32 s2, [fp, #-144]
+       vstr.32 s3, [fp, #-140]
+       vstr.32 s4, [fp, #-136]
+       vstr.32 s5, [fp, #-132]
+       vstr.32 s6, [fp, #-128]
+       vstr.32 s7, [fp, #-124]
+       vstr.32 s8, [fp, #-120]
+       vstr.32 s9, [fp, #-116]
+       vstr.32 s10, [fp, #-112]
+       vstr.32 s11, [fp, #-108]
+       vstr.32 s12, [fp, #-104]
+       vstr.32 s13, [fp, #-100]
+       vstr.32 s14, [fp, #-96]
+       vstr.32 s15, [fp, #-92]
+       vstr.64 d0, [fp, #-84]
+       vstr.64 d1, [fp, #-76]
+       vstr.64 d2, [fp, #-68]
+       vstr.64 d3, [fp, #-60]
+       vstr.64 d4, [fp, #-52]
+       vstr.64 d5, [fp, #-44]
+       vstr.64 d6, [fp, #-36]
+       vstr.64 d7, [fp, #-28]
+       str     lr, [fp, #-164]
+       str     ip, [fp, #-196]
+       str     ip, [fp, #-160]
+       str     r6, [fp, #-180]
+       str     ip, [fp, #-156]
+       str     ip, [fp, #-176]
+       strb    ip, [fp, #-172]
+       ldr     r2, [r4, r5]
+       mov     r3, r4
+       sub     r0, fp, #196
+       ldr     r3, [r2]
+       blx     r3
+       ldrb    r3, [fp, #-172] @ zero_extendqisi2
+       cmp     r3, #0
+       beq     .L1
+       cmp     r3, #1
+       beq     .L25
+       cmp     r3, #2
+       ldrsbeq r0, [fp, #-188]
+       beq     .L1
+       cmp     r3, #3
+       beq     .L25
+       cmp     r3, #4
+       ldrsheq r0, [fp, #-188]
+       beq     .L1
+       cmp     r3, #5
+       ldrheq  r0, [fp, #-188]
+       beq     .L1
+       cmp     r3, #6
+       beq     .L27
+       cmp     r3, #7
+       beq     .L27
+       cmp     r3, #8
+       beq     .L27
+       cmp     r3, #9
+       beq     .L27
+       sub     r2, r3, #10
+       cmp     r2, #1
+       bls     .L29
+       cmp     r3, #12
+       vldreq.32       s0, [fp, #-188]
+       beq     .L1
+       cmp     r3, #13
+       beq     .L30
+       cmp     r3, #14
+       beq     .L27
+       cmp     r3, #15
+       bne     .L1
+       ldr     r3, [fp, #-196]
+       tst     r3, #1024
+       beq     .L1
+       ldr     r3, [fp, #-168]
+       cmp     r3, #1
+       beq     .L31
+       cmp     r3, #2
+       ldr     r3, [fp, #-176]
+       ldrheq  r0, [r3]
+       ldrne   r0, [r3]
+.L1:
+       sub     sp, fp, #16
+       @ sp needed
+       pop     {r4, r5, r6, fp, lr}
+       add     sp, sp, #16
+       bx      lr
+.L25:
+       ldrb    r0, [fp, #-188] @ zero_extendqisi2
+       sub     sp, fp, #16
+       @ sp needed
+       pop     {r4, r5, r6, fp, lr}
+       add     sp, sp, #16
+       bx      lr
+.L27:
+       ldr     r0, [fp, #-188]
+       sub     sp, fp, #16
+       @ sp needed
+       pop     {r4, r5, r6, fp, lr}
+       add     sp, sp, #16
+       bx      lr
+.L30:
+       vldr.64 d0, [fp, #-188]
+       b       .L1
+.L29:
+       ldr     r0, [fp, #-188]
+       ldr     r1, [fp, #-184]
+       b       .L1
+.L31:
+       ldr     r3, [fp, #-176]
+       ldrb    r0, [r3]        @ zero_extendqisi2
+       b       .L1
+.L33:
+       .align  2
+.L32:
+       .word   _GLOBAL_OFFSET_TABLE_-(.LPIC0+8)
+       .word   vacall_function(GOT)
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 6.3.0"
+       .section        .note.GNU-stack,"",%progbits
diff --git a/vacall/vacall-armhf-linux.s b/vacall/vacall-armhf-linux.s
new file mode 100644 (file)
index 0000000..46ac622
--- /dev/null
@@ -0,0 +1,149 @@
+       .arch armv6
+       .eabi_attribute 28, 1
+       .eabi_attribute 20, 1
+       .eabi_attribute 21, 1
+       .eabi_attribute 23, 3
+       .eabi_attribute 24, 1
+       .eabi_attribute 25, 1
+       .eabi_attribute 26, 1
+       .eabi_attribute 30, 2
+       .eabi_attribute 34, 1
+       .eabi_attribute 18, 4
+       .file   "vacall-armhf.c"
+       .text
+       .align  2
+       .global vacall_receiver
+       .syntax unified
+       .arm
+       .fpu vfpv3-d16
+       .type   vacall_receiver, %function
+vacall_receiver:
+       @ args = 20, pretend = 16, frame = 176
+       @ frame_needed = 1, uses_anonymous_args = 0
+       sub     sp, sp, #16
+       mov     ip, #0
+       push    {r4, r5, fp, lr}
+       add     fp, sp, #12
+       ldr     r4, .L32
+       add     lr, fp, #4
+       add     r5, fp, #20
+       sub     sp, sp, #176
+       stm     lr, {r0, r1, r2, r3}
+       vstr.32 s0, [fp, #-144]
+       vstr.32 s1, [fp, #-140]
+       vstr.32 s2, [fp, #-136]
+       vstr.32 s3, [fp, #-132]
+       vstr.32 s4, [fp, #-128]
+       vstr.32 s5, [fp, #-124]
+       vstr.32 s6, [fp, #-120]
+       vstr.32 s7, [fp, #-116]
+       vstr.32 s8, [fp, #-112]
+       vstr.32 s9, [fp, #-108]
+       vstr.32 s10, [fp, #-104]
+       vstr.32 s11, [fp, #-100]
+       vstr.32 s12, [fp, #-96]
+       vstr.32 s13, [fp, #-92]
+       vstr.32 s14, [fp, #-88]
+       vstr.32 s15, [fp, #-84]
+       vstr.64 d0, [fp, #-76]
+       vstr.64 d1, [fp, #-68]
+       vstr.64 d2, [fp, #-60]
+       vstr.64 d3, [fp, #-52]
+       vstr.64 d4, [fp, #-44]
+       vstr.64 d5, [fp, #-36]
+       vstr.64 d6, [fp, #-28]
+       vstr.64 d7, [fp, #-20]
+       str     lr, [fp, #-156]
+       str     ip, [fp, #-188]
+       sub     r0, fp, #188
+       str     ip, [fp, #-152]
+       ldr     r3, [r4]
+       str     r5, [fp, #-172]
+       str     ip, [fp, #-148]
+       str     ip, [fp, #-168]
+       strb    ip, [fp, #-164]
+       blx     r3
+       ldrb    r3, [fp, #-164] @ zero_extendqisi2
+       cmp     r3, #0
+       beq     .L1
+       cmp     r3, #1
+       beq     .L25
+       cmp     r3, #2
+       ldrsbeq r0, [fp, #-180]
+       beq     .L1
+       cmp     r3, #3
+       beq     .L25
+       cmp     r3, #4
+       ldrsheq r0, [fp, #-180]
+       beq     .L1
+       cmp     r3, #5
+       ldrheq  r0, [fp, #-180]
+       beq     .L1
+       cmp     r3, #6
+       beq     .L27
+       cmp     r3, #7
+       beq     .L27
+       cmp     r3, #8
+       beq     .L27
+       cmp     r3, #9
+       beq     .L27
+       sub     r2, r3, #10
+       cmp     r2, #1
+       bls     .L29
+       cmp     r3, #12
+       vldreq.32       s0, [fp, #-180]
+       beq     .L1
+       cmp     r3, #13
+       beq     .L30
+       cmp     r3, #14
+       beq     .L27
+       cmp     r3, #15
+       bne     .L1
+       ldr     r3, [fp, #-188]
+       tst     r3, #1024
+       beq     .L1
+       ldr     r3, [fp, #-160]
+       cmp     r3, #1
+       beq     .L31
+       cmp     r3, #2
+       ldr     r3, [fp, #-168]
+       ldrheq  r0, [r3]
+       ldrne   r0, [r3]
+.L1:
+       sub     sp, fp, #12
+       @ sp needed
+       pop     {r4, r5, fp, lr}
+       add     sp, sp, #16
+       bx      lr
+.L25:
+       ldrb    r0, [fp, #-180] @ zero_extendqisi2
+       sub     sp, fp, #12
+       @ sp needed
+       pop     {r4, r5, fp, lr}
+       add     sp, sp, #16
+       bx      lr
+.L27:
+       ldr     r0, [fp, #-180]
+       sub     sp, fp, #12
+       @ sp needed
+       pop     {r4, r5, fp, lr}
+       add     sp, sp, #16
+       bx      lr
+.L30:
+       vldr.64 d0, [fp, #-180]
+       b       .L1
+.L29:
+       ldr     r0, [fp, #-180]
+       ldr     r1, [fp, #-176]
+       b       .L1
+.L31:
+       ldr     r3, [fp, #-168]
+       ldrb    r0, [r3]        @ zero_extendqisi2
+       b       .L1
+.L33:
+       .align  2
+.L32:
+       .word   vacall_function
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 6.3.0"
+       .section        .note.GNU-stack,"",%progbits
diff --git a/vacall/vacall-armhf-macro.S b/vacall/vacall-armhf-macro.S
new file mode 100644 (file)
index 0000000..b9bbb59
--- /dev/null
@@ -0,0 +1,305 @@
+#include "asm-arm.h"
+#ifdef __PIC__
+       .arch armv6
+       .eabi_attribute 28, 1
+       .eabi_attribute 20, 1
+       .eabi_attribute 21, 1
+       .eabi_attribute 23, 3
+       .eabi_attribute 24, 1
+       .eabi_attribute 25, 1
+       .eabi_attribute 26, 1
+       .eabi_attribute 30, 2
+       .eabi_attribute 34, 1
+       .eabi_attribute 18, 4
+       .text
+       .align  2
+       .global C(vacall_receiver)
+       .syntax unified
+       .arm
+       .fpu vfpv3-d16
+       .type   vacall_receiver, %function
+FUNBEGIN(vacall_receiver)
+       // args = 20, pretend = 16, frame = 176
+       // frame_needed = 1, uses_anonymous_args = 0
+       sub     sp, sp, $16
+       mov     ip, $0
+       push    {r4, r5, r6, fp, lr}
+       add     fp, sp, $16
+       ldr     r4, L(32)
+       ldr     r5, L(32)+4
+       add     lr, fp, $4
+L(PIC0):
+       add     r4, pc, r4
+       add     r6, fp, $20
+       sub     sp, sp, $180
+       stm     lr, {r0, r1, r2, r3}
+       vstr.32 s0, [fp, $-152]
+       vstr.32 s1, [fp, $-148]
+       vstr.32 s2, [fp, $-144]
+       vstr.32 s3, [fp, $-140]
+       vstr.32 s4, [fp, $-136]
+       vstr.32 s5, [fp, $-132]
+       vstr.32 s6, [fp, $-128]
+       vstr.32 s7, [fp, $-124]
+       vstr.32 s8, [fp, $-120]
+       vstr.32 s9, [fp, $-116]
+       vstr.32 s10, [fp, $-112]
+       vstr.32 s11, [fp, $-108]
+       vstr.32 s12, [fp, $-104]
+       vstr.32 s13, [fp, $-100]
+       vstr.32 s14, [fp, $-96]
+       vstr.32 s15, [fp, $-92]
+       vstr.64 d0, [fp, $-84]
+       vstr.64 d1, [fp, $-76]
+       vstr.64 d2, [fp, $-68]
+       vstr.64 d3, [fp, $-60]
+       vstr.64 d4, [fp, $-52]
+       vstr.64 d5, [fp, $-44]
+       vstr.64 d6, [fp, $-36]
+       vstr.64 d7, [fp, $-28]
+       str     lr, [fp, $-164]
+       str     ip, [fp, $-196]
+       str     ip, [fp, $-160]
+       str     r6, [fp, $-180]
+       str     ip, [fp, $-156]
+       str     ip, [fp, $-176]
+       strb    ip, [fp, $-172]
+       ldr     r2, [r4, r5]
+       mov     r3, r4
+       sub     r0, fp, $196
+       ldr     r3, [r2]
+       blx     r3
+       ldrb    r3, [fp, $-172] // zero_extendqisi2
+       cmp     r3, $0
+       beq     L(1)
+       cmp     r3, $1
+       beq     L(25)
+       cmp     r3, $2
+       ldrsbeq r0, [fp, $-188]
+       beq     L(1)
+       cmp     r3, $3
+       beq     L(25)
+       cmp     r3, $4
+       ldrsheq r0, [fp, $-188]
+       beq     L(1)
+       cmp     r3, $5
+       ldrheq  r0, [fp, $-188]
+       beq     L(1)
+       cmp     r3, $6
+       beq     L(27)
+       cmp     r3, $7
+       beq     L(27)
+       cmp     r3, $8
+       beq     L(27)
+       cmp     r3, $9
+       beq     L(27)
+       sub     r2, r3, $10
+       cmp     r2, $1
+       bls     L(29)
+       cmp     r3, $12
+       vldreq.32       s0, [fp, $-188]
+       beq     L(1)
+       cmp     r3, $13
+       beq     L(30)
+       cmp     r3, $14
+       beq     L(27)
+       cmp     r3, $15
+       bne     L(1)
+       ldr     r3, [fp, $-196]
+       tst     r3, $1024
+       beq     L(1)
+       ldr     r3, [fp, $-168]
+       cmp     r3, $1
+       beq     L(31)
+       cmp     r3, $2
+       ldr     r3, [fp, $-176]
+       ldrheq  r0, [r3]
+       ldrne   r0, [r3]
+L(1):
+       sub     sp, fp, $16
+       // sp needed
+       pop     {r4, r5, r6, fp, lr}
+       add     sp, sp, $16
+       bx      lr
+L(25):
+       ldrb    r0, [fp, $-188] // zero_extendqisi2
+       sub     sp, fp, $16
+       // sp needed
+       pop     {r4, r5, r6, fp, lr}
+       add     sp, sp, $16
+       bx      lr
+L(27):
+       ldr     r0, [fp, $-188]
+       sub     sp, fp, $16
+       // sp needed
+       pop     {r4, r5, r6, fp, lr}
+       add     sp, sp, $16
+       bx      lr
+L(30):
+       vldr.64 d0, [fp, $-188]
+       b       L(1)
+L(29):
+       ldr     r0, [fp, $-188]
+       ldr     r1, [fp, $-184]
+       b       L(1)
+L(31):
+       ldr     r3, [fp, $-176]
+       ldrb    r0, [r3]        // zero_extendqisi2
+       b       L(1)
+L(33):
+       .align  2
+L(32):
+       .word   _GLOBAL_OFFSET_TABLE_-(L(PIC0)+8)
+       .word   C(vacall_function)(GOT)
+       FUNEND(vacall_receiver)
+#else
+       .arch armv6
+       .eabi_attribute 28, 1
+       .eabi_attribute 20, 1
+       .eabi_attribute 21, 1
+       .eabi_attribute 23, 3
+       .eabi_attribute 24, 1
+       .eabi_attribute 25, 1
+       .eabi_attribute 26, 1
+       .eabi_attribute 30, 2
+       .eabi_attribute 34, 1
+       .eabi_attribute 18, 4
+       .text
+       .align  2
+       .global C(vacall_receiver)
+       .syntax unified
+       .arm
+       .fpu vfpv3-d16
+       .type   vacall_receiver, %function
+FUNBEGIN(vacall_receiver)
+       // args = 20, pretend = 16, frame = 176
+       // frame_needed = 1, uses_anonymous_args = 0
+       sub     sp, sp, $16
+       mov     ip, $0
+       push    {r4, r5, fp, lr}
+       add     fp, sp, $12
+       ldr     r4, L(32)
+       add     lr, fp, $4
+       add     r5, fp, $20
+       sub     sp, sp, $176
+       stm     lr, {r0, r1, r2, r3}
+       vstr.32 s0, [fp, $-144]
+       vstr.32 s1, [fp, $-140]
+       vstr.32 s2, [fp, $-136]
+       vstr.32 s3, [fp, $-132]
+       vstr.32 s4, [fp, $-128]
+       vstr.32 s5, [fp, $-124]
+       vstr.32 s6, [fp, $-120]
+       vstr.32 s7, [fp, $-116]
+       vstr.32 s8, [fp, $-112]
+       vstr.32 s9, [fp, $-108]
+       vstr.32 s10, [fp, $-104]
+       vstr.32 s11, [fp, $-100]
+       vstr.32 s12, [fp, $-96]
+       vstr.32 s13, [fp, $-92]
+       vstr.32 s14, [fp, $-88]
+       vstr.32 s15, [fp, $-84]
+       vstr.64 d0, [fp, $-76]
+       vstr.64 d1, [fp, $-68]
+       vstr.64 d2, [fp, $-60]
+       vstr.64 d3, [fp, $-52]
+       vstr.64 d4, [fp, $-44]
+       vstr.64 d5, [fp, $-36]
+       vstr.64 d6, [fp, $-28]
+       vstr.64 d7, [fp, $-20]
+       str     lr, [fp, $-156]
+       str     ip, [fp, $-188]
+       sub     r0, fp, $188
+       str     ip, [fp, $-152]
+       ldr     r3, [r4]
+       str     r5, [fp, $-172]
+       str     ip, [fp, $-148]
+       str     ip, [fp, $-168]
+       strb    ip, [fp, $-164]
+       blx     r3
+       ldrb    r3, [fp, $-164] // zero_extendqisi2
+       cmp     r3, $0
+       beq     L(1)
+       cmp     r3, $1
+       beq     L(25)
+       cmp     r3, $2
+       ldrsbeq r0, [fp, $-180]
+       beq     L(1)
+       cmp     r3, $3
+       beq     L(25)
+       cmp     r3, $4
+       ldrsheq r0, [fp, $-180]
+       beq     L(1)
+       cmp     r3, $5
+       ldrheq  r0, [fp, $-180]
+       beq     L(1)
+       cmp     r3, $6
+       beq     L(27)
+       cmp     r3, $7
+       beq     L(27)
+       cmp     r3, $8
+       beq     L(27)
+       cmp     r3, $9
+       beq     L(27)
+       sub     r2, r3, $10
+       cmp     r2, $1
+       bls     L(29)
+       cmp     r3, $12
+       vldreq.32       s0, [fp, $-180]
+       beq     L(1)
+       cmp     r3, $13
+       beq     L(30)
+       cmp     r3, $14
+       beq     L(27)
+       cmp     r3, $15
+       bne     L(1)
+       ldr     r3, [fp, $-188]
+       tst     r3, $1024
+       beq     L(1)
+       ldr     r3, [fp, $-160]
+       cmp     r3, $1
+       beq     L(31)
+       cmp     r3, $2
+       ldr     r3, [fp, $-168]
+       ldrheq  r0, [r3]
+       ldrne   r0, [r3]
+L(1):
+       sub     sp, fp, $12
+       // sp needed
+       pop     {r4, r5, fp, lr}
+       add     sp, sp, $16
+       bx      lr
+L(25):
+       ldrb    r0, [fp, $-180] // zero_extendqisi2
+       sub     sp, fp, $12
+       // sp needed
+       pop     {r4, r5, fp, lr}
+       add     sp, sp, $16
+       bx      lr
+L(27):
+       ldr     r0, [fp, $-180]
+       sub     sp, fp, $12
+       // sp needed
+       pop     {r4, r5, fp, lr}
+       add     sp, sp, $16
+       bx      lr
+L(30):
+       vldr.64 d0, [fp, $-180]
+       b       L(1)
+L(29):
+       ldr     r0, [fp, $-180]
+       ldr     r1, [fp, $-176]
+       b       L(1)
+L(31):
+       ldr     r3, [fp, $-168]
+       ldrb    r0, [r3]        // zero_extendqisi2
+       b       L(1)
+L(33):
+       .align  2
+L(32):
+       .word   C(vacall_function)
+       FUNEND(vacall_receiver)
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",%progbits
+#endif
diff --git a/vacall/vacall-armhf.c b/vacall/vacall-armhf.c
new file mode 100644 (file)
index 0000000..3c232b4
--- /dev/null
@@ -0,0 +1,195 @@
+/* vacall function for arm CPU with -mfloat-abi=hard */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+typedef struct { void (*vacall_function) (void*,va_alist); void* arg; } env_t;
+#endif
+
+/* armhf passes up to 16 float arguments and up to 8 double arguments
+   in floating-point registers. */
+register float  farg0   __asm__("s0");
+register float  farg1   __asm__("s1");
+register float  farg2   __asm__("s2");
+register float  farg3   __asm__("s3");
+register float  farg4   __asm__("s4");
+register float  farg5   __asm__("s5");
+register float  farg6   __asm__("s6");
+register float  farg7   __asm__("s7");
+register float  farg8   __asm__("s8");
+register float  farg9   __asm__("s9");
+register float  farg10  __asm__("s10");
+register float  farg11  __asm__("s11");
+register float  farg12  __asm__("s12");
+register float  farg13  __asm__("s13");
+register float  farg14  __asm__("s14");
+register float  farg15  __asm__("s15");
+register double darg0   __asm__("d0"); /* overlaps s0,s1 */
+register double darg1   __asm__("d1"); /* overlaps s2,s3 */
+register double darg2   __asm__("d2"); /* overlaps s4,s5 */
+register double darg3   __asm__("d3"); /* overlaps s6,s7 */
+register double darg4   __asm__("d4"); /* overlaps s8,s9 */
+register double darg5   __asm__("d5"); /* overlaps s10,s11 */
+register double darg6   __asm__("d6"); /* overlaps s12,s13 */
+register double darg7   __asm__("d7"); /* overlaps s14,s15 */
+register __vaword      iret    __asm__("r0");
+register __vaword      iret2   __asm__("r1");
+register float         fret    __asm__("s0");
+register double                dret    __asm__("d0");
+
+#ifndef REENTRANT
+/* The ARM ABI requires that the first 4 general-purpose argument words are
+   being passed in registers, even if these words belong to a struct. No room
+   is allocated for these register words on the stack by the caller, but the
+   callee allocates room for them - at the right place in the stack frame,
+   that is, above the usual {fp, sp, retaddr, pc} combo - if and only if
+   they are part of a larger struct that extends to the stack and the address
+   of this struct is taken. */
+struct gpargsequence {
+  __vaword word1; /* r0 */
+  __vaword word2; /* r1 */
+  __vaword word3; /* r2 */
+  __vaword word4; /* r3 */
+  __vaword firststackword;
+};
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (struct gpargsequence gpargs)
+#else /* REENTRANT */
+/* The first 4 general-purpose argument words have already been pushed to the
+   stack by the trampoline. We can ignore them here. */
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword ignored1, __vaword ignored2, __vaword ignored3, __vaword ignored4,
+                 env_t* env, __vaword filler, __vaword saved_fp, __vaword saved_sp, __vaword saved_lr, __vaword saved_pc,
+                 __vaword firstword)
+#endif
+{
+  __va_alist list;
+  /* Save the floating point argument registers. */
+  list.farg[0] = farg0;
+  list.farg[1] = farg1;
+  list.farg[2] = farg2;
+  list.farg[3] = farg3;
+  list.farg[4] = farg4;
+  list.farg[5] = farg5;
+  list.farg[6] = farg6;
+  list.farg[7] = farg7;
+  list.farg[8] = farg8;
+  list.farg[9] = farg9;
+  list.farg[10] = farg10;
+  list.farg[11] = farg11;
+  list.farg[12] = farg12;
+  list.farg[13] = farg13;
+  list.farg[14] = farg14;
+  list.farg[15] = farg15;
+  list.darg[0] = darg0;
+  list.darg[1] = darg1;
+  list.darg[2] = darg2;
+  list.darg[3] = darg3;
+  list.darg[4] = darg4;
+  list.darg[5] = darg5;
+  list.darg[6] = darg6;
+  list.darg[7] = darg7;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+#ifndef REENTRANT
+  list.iarg = (__vaword*)&gpargs;
+#else /* REENTRANT */
+  list.iarg = (__vaword*)&firstword;
+#endif
+  list.aptr = (long)(list.iarg + __VA_IARG_NUM);
+  list.ianum = 0;
+  list.fanum = 0;
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) {
+    iret  = ((__vaword *) &list.tmp._longlong)[0];
+    iret2 = ((__vaword *) &list.tmp._longlong)[1];
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    /* NB: On arm, all structure sizes are divisible by 4. */
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      if (list.rsize == sizeof(char)) { /* can't occur */
+        iret = *(unsigned char *) list.raddr;
+      } else
+      if (list.rsize == sizeof(short)) { /* can't occur */
+        iret = *(unsigned short *) list.raddr;
+      } else
+        iret = *(unsigned int *) list.raddr; /* struct of size 3 :) */
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-hppa-linux.s b/vacall/vacall-hppa-linux.s
new file mode 100644 (file)
index 0000000..fb9c5be
--- /dev/null
@@ -0,0 +1,182 @@
+       .LEVEL 1.1
+       .text
+       .align 4
+.globl vacall_receiver
+               .type            vacall_receiver,@function
+vacall_receiver:
+       .PROC
+       .CALLINFO FRAME=192,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=3
+       .ENTRY
+       copy %r3,%r1
+       stw %r2,-20(%r30)
+       copy %r30,%r3
+       stwm %r1,192(%r30)
+       addil LR'vacall_function-$global$,%r27
+       ldo -32(%r3),%r2
+       ldo 16(%r3),%r22
+       sub %r22,%r2,%r20
+       ldo 104(%r3),%r19
+       ldo 72(%r3),%r21
+       ldo 80(%r20),%r31
+       fstds %fr5,-16(%r19)
+       ldo 64(%r20),%r20
+       ldo -48(%r3),%r19
+       stw %r26,-36(%r3)
+       copy %r22,%r26
+       stw %r20,56(%r3)
+       fstws %fr7L,-8(%r21)
+       stw %r19,52(%r3)
+       stw %r31,60(%r3)
+       stw %r25,-40(%r3)
+       stw %r24,-44(%r3)
+       stw %r23,-48(%r3)
+       fstds %fr7,8(%r21)
+       fstws %fr4L,4(%r21)
+       fstws %fr5L,0(%r21)
+       fstws %fr6L,-4(%r21)
+       stw %r0,16(%r3)
+       stw %r2,32(%r3)
+       stw %r0,36(%r3)
+       stw %r0,40(%r3)
+       stw %r28,48(%r3)
+       ldw RR'vacall_function-$global$(%r1),%r22
+       .CALL   ARGW0=GR
+       bl $$dyncall,%r31
+       copy %r31,%r2
+       ldw 40(%r3),%r20
+       comib,= 0,%r20,.L48
+       ldw -20(%r3),%r2
+       comib,= 1,%r20,.L49
+       ldb 24(%r3),%r19
+       comib,=,n 2,%r20,.L49
+       comib,=,n 3,%r20,.L43
+       comib,=,n 4,%r20,.L44
+       comib,=,n 5,%r20,.L45
+       comib,=,n 6,%r20,.L41
+       comib,=,n 7,%r20,.L41
+       comib,=,n 8,%r20,.L41
+       comib,= 9,%r20,.L41
+       ldo -10(%r20),%r19
+       comib,<<,n 1,%r19,.L22
+       ldw 24(%r3),%r28
+.L40:
+       ldw 28(%r3),%r29
+.L1:
+       ldw -20(%r3),%r2
+.L48:
+       ldo 64(%r3),%r30
+       bv %r0(%r2)
+       ldwm -64(%r30),%r3
+.L22:
+       comib,= 12,%r20,.L46
+       ldo 40(%r3),%r19
+       comib,=,n 13,%r20,.L47
+       comib,=,n 14,%r20,.L1
+       ldw 24(%r3),%r28
+       comib,<> 15,%r20,.L48
+       ldw -20(%r3),%r2
+       ldw 16(%r3),%r19
+       bb,>= %r19,30,.L1
+       ldw 44(%r3),%r2
+       ldo -1(%r2),%r19
+       comib,<< 7,%r19,.L1
+       ldw 36(%r3),%r19
+       extru %r19,31,2,%r22
+       copy %r19,%r31
+       depi 0,31,2,%r31
+       comib,<< 4,%r2,.L33
+       addl %r22,%r2,%r1
+       zdep %r22,28,29,%r22
+       mtsar %r22
+       zvdepi 2,32,%r19
+       comib,<< 4,%r1,.L34
+       ldo -1(%r19),%r22
+       ldw 0(%r31),%r19
+       zdep %r1,28,29,%r20
+       ldo -1(%r20),%r20
+       and %r19,%r22,%r19
+       mtsar %r20
+       vextrs %r19,32,%r19
+       movb,tr %r19,%r28,.L48
+       ldw -20(%r3),%r2
+.L34:
+       ldw 0(%r31),%r19
+       zdep %r1,28,29,%r21
+       ldw 4(%r31),%r20
+       and %r19,%r22,%r19
+       ldo -33(%r21),%r31
+       subi 63,%r21,%r21
+       mtsar %r21
+       zvdep %r19,32,%r19
+       mtsar %r31
+       vextrs %r20,32,%r20
+.L39:
+       b .L1
+       or %r20,%r19,%r28
+.L33:
+       zdep %r22,28,29,%r22
+       mtsar %r22
+       zvdepi 2,32,%r19
+       comib,<< 8,%r1,.L37
+       ldo -1(%r19),%r2
+       ldw 0(%r31),%r21
+       zdep %r1,29,30,%r19
+       and %r21,%r2,%r21
+       ldw 4(%r31),%r22
+       subi 47,%r19,%r2
+       zdep %r1,28,29,%r19
+       mtsar %r2
+       ldo -33(%r19),%r19
+       zvdep %r21,32,%r20
+       zvdep %r20,32,%r20
+       mtsar %r19
+       vextrs %r22,32,%r22
+       vextrs %r21,32,%r21
+       movb,tr %r21,%r28,.L1
+       or %r20,%r22,%r29
+.L37:
+       ldw 0(%r31),%r20
+       zdep %r1,28,29,%r22
+       ldw 8(%r31),%r21
+       and %r20,%r2,%r20
+       ldo -65(%r22),%r2
+       ldw 4(%r31),%r19
+       mtsar %r2
+       subi 95,%r22,%r31
+       vextrs %r21,32,%r21
+       mtsar %r31
+       zvdep %r19,32,%r22
+       zvdep %r20,32,%r20
+       or %r22,%r21,%r29
+       mtsar %r2
+       b .L39
+       vextrs %r19,32,%r19
+.L41:
+       b .L1
+       ldw 24(%r3),%r28
+.L47:
+       ldw 24(%r3),%r28
+       b .L40
+       fldds -16(%r19),%fr4
+.L46:
+       ldw 24(%r3),%r28
+       b .L1
+       fldws -16(%r19),%fr4L
+.L45:
+       b .L1
+       ldh 24(%r3),%r28
+.L44:
+       ldh 24(%r3),%r19
+       b .L1
+       extrs %r19,31,16,%r28
+.L43:
+       b .L1
+       ldb 24(%r3),%r28
+.L49:
+       b .L1
+       extrs %r19,31,8,%r28
+       .EXIT
+       .PROCEND
+.Lfe1:
+       .size   vacall_receiver,.Lfe1-vacall_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/vacall/vacall-hppa-macro.S b/vacall/vacall-hppa-macro.S
new file mode 100644 (file)
index 0000000..da42725
--- /dev/null
@@ -0,0 +1,188 @@
+#include "asm-hppa.h"
+       .LEVEL 1.1
+       IMPORT_MILLICODE($$dyncall)
+       TEXT1()
+       TEXT2()
+       .align 4
+GLOBL(vacall_receiver)
+               DECLARE_FUNCTION(vacall_receiver)
+DEF(vacall_receiver)
+       .PROC
+       .CALLINFO FRAME=192,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=3
+       .ENTRY
+       copy %r3,%r1
+       stw %r2,-20(%r30)
+       copy %r30,%r3
+       stwm %r1,192(%r30)
+       addil LR!vacall_function-$global$,%r27
+       ldo -32(%r3),%r2
+       ldo 16(%r3),%r22
+       sub %r22,%r2,%r20
+       ldo 104(%r3),%r19
+       ldo 72(%r3),%r21
+       ldo 80(%r20),%r31
+       fstds %fr5,-16(%r19)
+       ldo 64(%r20),%r20
+       ldo -48(%r3),%r19
+       stw %r26,-36(%r3)
+       copy %r22,%r26
+       stw %r20,56(%r3)
+       fstws %fr7L,-8(%r21)
+       stw %r19,52(%r3)
+       stw %r31,60(%r3)
+       stw %r25,-40(%r3)
+       stw %r24,-44(%r3)
+       stw %r23,-48(%r3)
+       fstds %fr7,8(%r21)
+       fstws %fr4L,4(%r21)
+       fstws %fr5L,0(%r21)
+       fstws %fr6L,-4(%r21)
+       stw %r0,16(%r3)
+       stw %r2,32(%r3)
+       stw %r0,36(%r3)
+       stw %r0,40(%r3)
+       stw %r28,48(%r3)
+       ldw RR!vacall_function-$global$(%r1),%r22
+       .CALL   ARGW0=GR
+       bl $$dyncall,%r31
+       copy %r31,%r2
+       ldw 40(%r3),%r20
+       comib,= 0,%r20,L(48)
+       ldw -20(%r3),%r2
+       comib,= 1,%r20,L(49)
+       ldb 24(%r3),%r19
+       comib,=,n 2,%r20,L(49)
+       comib,=,n 3,%r20,L(43)
+       comib,=,n 4,%r20,L(44)
+       comib,=,n 5,%r20,L(45)
+       comib,=,n 6,%r20,L(41)
+       comib,=,n 7,%r20,L(41)
+       comib,=,n 8,%r20,L(41)
+       comib,= 9,%r20,L(41)
+       ldo -10(%r20),%r19
+       comib,<<,n 1,%r19,L(22)
+       ldw 24(%r3),%r28
+DEF(L(40))
+       ldw 28(%r3),%r29
+DEF(L(1))
+       ldw -20(%r3),%r2
+DEF(L(48))
+       ldo 64(%r3),%r30
+       bv %r0(%r2)
+       ldwm -64(%r30),%r3
+DEF(L(22))
+       comib,= 12,%r20,L(46)
+       ldo 40(%r3),%r19
+       comib,=,n 13,%r20,L(47)
+       comib,=,n 14,%r20,L(1)
+       ldw 24(%r3),%r28
+       comib,<> 15,%r20,L(48)
+       ldw -20(%r3),%r2
+       ldw 16(%r3),%r19
+       bb,>= %r19,30,L(1)
+       ldw 44(%r3),%r2
+       ldo -1(%r2),%r19
+       comib,<< 7,%r19,L(1)
+       ldw 36(%r3),%r19
+       extru %r19,31,2,%r22
+       copy %r19,%r31
+       depi 0,31,2,%r31
+       comib,<< 4,%r2,L(33)
+       addl %r22,%r2,%r1
+       zdep %r22,28,29,%r22
+       mtsar %r22
+       zvdepi 2,32,%r19
+       comib,<< 4,%r1,L(34)
+       ldo -1(%r19),%r22
+       ldw 0(%r31),%r19
+       zdep %r1,28,29,%r20
+       ldo -1(%r20),%r20
+       and %r19,%r22,%r19
+       mtsar %r20
+       vextrs %r19,32,%r19
+       movb,tr %r19,%r28,L(48)
+       ldw -20(%r3),%r2
+DEF(L(34))
+       ldw 0(%r31),%r19
+       zdep %r1,28,29,%r21
+       ldw 4(%r31),%r20
+       and %r19,%r22,%r19
+       ldo -33(%r21),%r31
+       subi 63,%r21,%r21
+       mtsar %r21
+       zvdep %r19,32,%r19
+       mtsar %r31
+       vextrs %r20,32,%r20
+DEF(L(39))
+       b L(1)
+       or %r20,%r19,%r28
+DEF(L(33))
+       zdep %r22,28,29,%r22
+       mtsar %r22
+       zvdepi 2,32,%r19
+       comib,<< 8,%r1,L(37)
+       ldo -1(%r19),%r2
+       ldw 0(%r31),%r21
+       zdep %r1,29,30,%r19
+       and %r21,%r2,%r21
+       ldw 4(%r31),%r22
+       subi 47,%r19,%r2
+       zdep %r1,28,29,%r19
+       mtsar %r2
+       ldo -33(%r19),%r19
+       zvdep %r21,32,%r20
+       zvdep %r20,32,%r20
+       mtsar %r19
+       vextrs %r22,32,%r22
+       vextrs %r21,32,%r21
+       movb,tr %r21,%r28,L(1)
+       or %r20,%r22,%r29
+DEF(L(37))
+       ldw 0(%r31),%r20
+       zdep %r1,28,29,%r22
+       ldw 8(%r31),%r21
+       and %r20,%r2,%r20
+       ldo -65(%r22),%r2
+       ldw 4(%r31),%r19
+       mtsar %r2
+       subi 95,%r22,%r31
+       vextrs %r21,32,%r21
+       mtsar %r31
+       zvdep %r19,32,%r22
+       zvdep %r20,32,%r20
+       or %r22,%r21,%r29
+       mtsar %r2
+       b L(39)
+       vextrs %r19,32,%r19
+DEF(L(41))
+       b L(1)
+       ldw 24(%r3),%r28
+DEF(L(47))
+       ldw 24(%r3),%r28
+       b L(40)
+       fldds -16(%r19),%fr4
+DEF(L(46))
+       ldw 24(%r3),%r28
+       b L(1)
+       fldws -16(%r19),%fr4L
+DEF(L(45))
+       b L(1)
+       ldh 24(%r3),%r28
+DEF(L(44))
+       ldh 24(%r3),%r19
+       b L(1)
+       extrs %r19,31,16,%r28
+DEF(L(43))
+       b L(1)
+       ldb 24(%r3),%r28
+DEF(L(49))
+       b L(1)
+       extrs %r19,31,8,%r28
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(vacall_receiver)
+IMPORT_DATA(vacall_function)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-hppa.c b/vacall/vacall-hppa.c
new file mode 100644 (file)
index 0000000..50d70b5
--- /dev/null
@@ -0,0 +1,256 @@
+/* vacall function for hppa CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+/*---------------------------------------------------------------------------
+  HPPA Argument Passing Conventions:
+
+  The calling conventions for anonymous functions and for explicitly named
+  functions are different. Only the convention for explicitly named functions
+  matters here.
+
+  All arguments, except the first 4 words, are passed on the stack
+  - growing down! - with word alignment. Doubles take two words and force
+  double alignment. Structures args are passed as true structures embedded
+  in the argument stack. They force double alignment and - if they don't
+  fit entirely in the 4 register words - are passed in memory.
+  The first 2 words are passed like this:
+    %r26 = first integer arg, %r25 = second integer arg, or
+    %fr4L = first float arg, %fr5L = second float arg, or
+    %fr5 = double arg.
+  Similarly for the next 2 words, passed in %r24 and %r23, or
+                                            %fr6L and %fr7L, or
+                                            %fr7.
+
+  To return a structure, the called function copies the return value to
+  the address supplied in register "%r28".
+---------------------------------------------------------------------------*/
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *     env     __asm__("%r29");
+#endif
+register void* sret    __asm__("%r28");
+register long   arg1   __asm__("%r26");
+register long   arg2   __asm__("%r25");
+register long   arg3   __asm__("%r24");
+register long   arg4   __asm__("%r23");
+register float  farg1  __asm__("%fr4"); /* fr4L */
+register float  farg2  __asm__("%fr5"); /* fr5L */
+register float  farg3  __asm__("%fr6"); /* fr6L */
+register float  farg4  __asm__("%fr7"); /* fr7L */
+register double darg1  __asm__("%fr5");
+register double darg2  __asm__("%fr7");
+register int   iret    __asm__("%r28");
+register float fret    __asm__("%fr4"); /* fr4L */
+register double        dret    __asm__("%fr4");
+register __vaword iret1        __asm__("%r28");
+register __vaword iret2        __asm__("%r29");
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword firstword)
+{
+  /* gcc-2.6.3 source says: When a parameter is passed in a register,
+   * stack space is still allocated for it.
+   */
+  /* Note about stack offsets (see vacall-hppa.s):
+   * &firstword = %r30 - 244, &word4 = %r30 - 240, ..., &word1 = %r30 - 228,
+   */
+  __va_alist list;
+  /* Move the arguments passed in registers to their stack locations. */
+  (&firstword)[4] = word1;
+  (&firstword)[3] = word2;
+  (&firstword)[2] = word3;
+  (&firstword)[1] = word4;
+  list.darg[1] = darg1;
+  list.darg[0] = darg2;
+  list.farg[3] = farg1;
+  list.farg[2] = farg2;
+  list.farg[1] = farg3;
+  list.farg[0] = farg4;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)(&firstword + 5);
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.structraddr = sret;
+  list.memargptr = (long)(&firstword + 1);
+  list.farg_offset = (long)&list.farg[4] - list.aptr;
+  list.darg_offset = (long)&list.darg[2] - list.aptr;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) {
+    iret1 = ((__vaword *) &list.tmp._longlong)[0];
+    iret2 = ((__vaword *) &list.tmp._longlong)[1];
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+    iret1 = list.tmp._words[0]; /* HP cc generates a RTNVAL=GR call */
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+    iret1 = list.tmp._words[0]; /* HP cc generates a RTNVAL=GR call */
+    iret2 = list.tmp._words[1]; /* i.e. result is expected in r28,r29 */
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_SMALL_STRUCT_RETURN) {
+      /* cc, c89 and gcc >= 2.7 return structs of size <= 8 in registers. */
+      /* This is really weird code, unlike all other big-endian platforms. */
+      if (list.rsize > 0 && list.rsize <= 8) {
+        #if 0 /* Unoptimized */
+        if (list.rsize == 1) {
+          iret =   ((unsigned char *) list.raddr)[0];
+        } else
+        if (list.rsize == 2) {
+          iret =  (((unsigned char *) list.raddr)[0] << 8)
+                |  ((unsigned char *) list.raddr)[1];
+        } else
+        if (list.rsize == 3) {
+          iret =  (((unsigned char *) list.raddr)[0] << 16)
+                | (((unsigned char *) list.raddr)[1] << 8)
+                |  ((unsigned char *) list.raddr)[2];
+        } else
+        if (list.rsize == 4) {
+          iret =  (((unsigned char *) list.raddr)[0] << 24)
+                | (((unsigned char *) list.raddr)[1] << 16)
+                | (((unsigned char *) list.raddr)[2] << 8)
+                |  ((unsigned char *) list.raddr)[3];
+        } else
+        if (list.rsize == 5) {
+          iret1 =   ((unsigned char *) list.raddr)[0];
+          iret2 =  (((unsigned char *) list.raddr)[1] << 24)
+                 | (((unsigned char *) list.raddr)[2] << 16)
+                 | (((unsigned char *) list.raddr)[3] << 8)
+                 |  ((unsigned char *) list.raddr)[4];
+        } else
+        if (list.rsize == 6) {
+          iret1 =  (((unsigned char *) list.raddr)[0] << 8)
+                 |  ((unsigned char *) list.raddr)[1];
+          iret2 =  (((unsigned char *) list.raddr)[2] << 24)
+                 | (((unsigned char *) list.raddr)[3] << 16)
+                 | (((unsigned char *) list.raddr)[4] << 8)
+                 |  ((unsigned char *) list.raddr)[5];
+        } else
+        if (list.rsize == 7) {
+          iret1 =  (((unsigned char *) list.raddr)[0] << 16)
+                 | (((unsigned char *) list.raddr)[1] << 8)
+                 |  ((unsigned char *) list.raddr)[2];
+          iret2 =  (((unsigned char *) list.raddr)[3] << 24)
+                 | (((unsigned char *) list.raddr)[4] << 16)
+                 | (((unsigned char *) list.raddr)[5] << 8)
+                 |  ((unsigned char *) list.raddr)[6];
+        } else
+        if (list.rsize == 8) {
+          iret1 =  (((unsigned char *) list.raddr)[0] << 24)
+                 | (((unsigned char *) list.raddr)[1] << 16)
+                 | (((unsigned char *) list.raddr)[2] << 8)
+                 |  ((unsigned char *) list.raddr)[3];
+          iret2 =  (((unsigned char *) list.raddr)[4] << 24)
+                 | (((unsigned char *) list.raddr)[5] << 16)
+                 | (((unsigned char *) list.raddr)[6] << 8)
+                 |  ((unsigned char *) list.raddr)[7];
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__vaword) */
+        __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+        uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__vaword) */
+        if (count <= sizeof(__vaword)) {
+          /* Assign iret. */
+          __vaword mask0 = ((__vaword)2 << (sizeof(__vaword)*8-start_offset*8-1)) - 1;
+          if (end_offset <= sizeof(__vaword)) {
+            /* 0 < end_offset ≤ sizeof(__vaword) */
+            iret = (wordaddr[0] & mask0) >> (sizeof(__vaword)*8-end_offset*8);
+          } else {
+            /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+            iret = ((wordaddr[0] & mask0) << (end_offset*8-sizeof(__vaword)*8))
+                   | (wordaddr[1] >> (2*sizeof(__vaword)*8-end_offset*8));
+          }
+        } else {
+          /* Assign iret, iret2. */
+          __vaword mask0 = ((__vaword)2 << (sizeof(__vaword)*8-start_offset*8-1)) - 1;
+          if (end_offset <= 2*sizeof(__vaword)) {
+            /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+            iret = (wordaddr[0] & mask0) >> (2*sizeof(__vaword)*8-end_offset*8);
+            iret2 = ((wordaddr[0] & mask0) << (end_offset*4-sizeof(__vaword)*4) << (end_offset*4-sizeof(__vaword)*4))
+                    | (wordaddr[1] >> (2*sizeof(__vaword)*8-end_offset*8));
+          } else {
+            /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+            iret = ((wordaddr[0] & mask0) << (end_offset*8-2*sizeof(__vaword)*8))
+                   | (wordaddr[1] >> (3*sizeof(__vaword)*8-end_offset*8));
+            iret2 = (wordaddr[1] << (end_offset*8-2*sizeof(__vaword)*8))
+                    | (wordaddr[2] >> (3*sizeof(__vaword)*8-end_offset*8));
+          }
+        }
+        #endif
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-hppa64-linux.s b/vacall/vacall-hppa64-linux.s
new file mode 100644 (file)
index 0000000..8d1317f
--- /dev/null
@@ -0,0 +1,225 @@
+       .LEVEL 2.0w
+       .text
+       .align 8
+.globl vacall_receiver
+               .type            vacall_receiver,@function
+vacall_receiver:
+       .PROC
+       .CALLINFO FRAME=384,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=8
+       .ENTRY
+       copy %r3,%r1
+       std %r2,-16(%r30)
+       copy %r30,%r3
+       std,ma %r1,384(%r30)
+       std %r4,224(%r3)
+       copy %r27,%r4
+       std %r8,192(%r3)
+       std %r7,200(%r3)
+       std %r6,208(%r3)
+       std %r5,216(%r3)
+       std %r26,-64(%r29)
+       std %r19,-8(%r29)
+       std %r25,-56(%r29)
+       std %r24,-48(%r29)
+       std %r23,-40(%r29)
+       std %r22,-32(%r29)
+       std %r21,-24(%r29)
+       std %r20,-16(%r29)
+#APP
+       fstw %fr4R,88(%r3)
+       fstw %fr5R,92(%r3)
+       fstw %fr6R,96(%r3)
+       fstw %fr7R,100(%r3)
+       fstw %fr8R,104(%r3)
+       fstw %fr9R,108(%r3)
+       fstw %fr10R,112(%r3)
+       fstw %fr11R,116(%r3)
+#NO_APP
+       fstd %fr10,168(%r3)
+       addil LT'vacall_function,%r27
+       ldo -64(%r29),%r31
+       ldd RT'vacall_function(%r1),%r1
+       ldo 16(%r3),%r26
+       std %r31,40(%r3)
+       std %r29,80(%r3)
+       ldo -16(%r30),%r29
+       ldd 0(%r1),%r31
+       fstd %fr11,176(%r3)
+       fstd %fr4,120(%r3)
+       fstd %fr5,128(%r3)
+       fstd %fr6,136(%r3)
+       fstd %fr7,144(%r3)
+       fstd %fr8,152(%r3)
+       fstd %fr9,160(%r3)
+       stw %r0,16(%r3)
+       std %r0,48(%r3)
+       stw %r0,56(%r3)
+       ldd 16(%r31),%r2
+       ldd 24(%r31),%r27
+       bve,l (%r2),%r2
+       nop
+       ldw 56(%r3),%r31
+       cmpib,= 0,%r31,.L1
+       copy %r4,%r27
+       cmpib,=,n 1,%r31,.L43
+       cmpib,=,n 2,%r31,.L43
+       cmpib,=,n 3,%r31,.L44
+       cmpib,=,n 4,%r31,.L45
+       cmpib,=,n 5,%r31,.L46
+       cmpib,=,n 6,%r31,.L47
+       cmpib,=,n 7,%r31,.L41
+       cmpib,=,n 8,%r31,.L40
+       cmpib,=,n 10,%r31,.L40
+       cmpib,=,n 9,%r31,.L40
+       cmpib,=,n 11,%r31,.L40
+       cmpib,=,n 12,%r31,.L48
+       cmpib,=,n 13,%r31,.L49
+       cmpib,=,n 14,%r31,.L40
+       cmpib,= 15,%r31,.L50
+       ldw 16(%r3),%r31
+.L1:
+       ldd -16(%r3),%r2
+       ldd 192(%r3),%r8
+       ldd 200(%r3),%r7
+       ldd 208(%r3),%r6
+       ldd 216(%r3),%r5
+       ldd 224(%r3),%r4
+       ldo 64(%r3),%r30
+       bve (%r2)
+       ldd,mb -64(%r30),%r3
+.L50:
+       extrd,u %r31,53+1-1,1,%r31
+       cmpib,= 0,%r31,.L1
+       ldd 48(%r3),%r28
+       ldd 48(%r3),%r31
+       ldd 64(%r3),%r2
+       extrd,u %r31,63,3,%r6
+       copy %r31,%r1
+       depdi 0,63,3,%r1
+       cmpib,*<< 8,%r2,.L32
+       add,l %r6,%r2,%r4
+       cmpib,*<< 8,%r4,.L33
+       depd,z %r4,60,61,%r31
+       subi 64,%r31,%r31
+       ldd 0(%r1),%r2
+       extrd,s %r31,63,32,%r31
+       mtsarcm %r31
+       depd,z %r6,60,61,%r4
+       depdi,z 1,%sar,64,%r31
+       mtsarcm %r4
+       sub %r0,%r31,%r31
+       and %r2,%r31,%r2
+       depd,z %r2,%sar,64,%r2
+       b .L1
+       copy %r2,%r28
+.L33:
+       subi 128,%r31,%r31
+       depd,z %r6,60,61,%r2
+       extrd,s %r31,63,32,%r31
+       subi 64,%r2,%r5
+       mtsarcm %r31
+       subi 63,%r2,%r7
+       depdi,z 1,%sar,64,%r31
+       mtsar %r7
+       ldd 8(%r1),%r4
+       sub %r0,%r31,%r31
+       extrd,s %r5,63,32,%r5
+       ldd 0(%r1),%r2
+       subi 63,%r5,%r5
+       and %r4,%r31,%r4
+       depd,z %r2,%sar,64,%r2
+       mtsar %r5
+       extrd,s %r4,%sar,64,%r4
+.L39:
+       b .L1
+       or %r4,%r2,%r28
+.L32:
+       ldi 16,%r31
+       cmpb,*<< %r31,%r4,.L36
+       depd,z %r4,60,61,%r31
+       subi 128,%r31,%r31
+       depd,z %r6,61,62,%r2
+       extrd,s %r31,63,32,%r31
+       subi 32,%r2,%r2
+       mtsarcm %r31
+       extrd,s %r2,63,32,%r2
+       depdi,z 1,%sar,64,%r31
+       subi 63,%r2,%r7
+       ldd 8(%r1),%r4
+       sub %r0,%r31,%r31
+       mtsar %r7
+       ldd 0(%r1),%r5
+       and %r4,%r31,%r4
+       depd,z %r6,60,61,%r31
+       extrd,s %r4,%sar,64,%r2
+       subi 63,%r31,%r31
+       extrd,s %r2,%sar,64,%r2
+       mtsar %r31
+       depd,z %r4,%sar,64,%r4
+       depd,z %r5,%sar,64,%r5
+       copy %r4,%r29
+       b .L1
+       or %r5,%r2,%r28
+.L36:
+       subi 192,%r31,%r31
+       depd,z %r6,60,61,%r2
+       extrd,s %r31,63,32,%r31
+       subi 64,%r2,%r6
+       mtsarcm %r31
+       subi 63,%r2,%r8
+       depdi,z 1,%sar,64,%r31
+       mtsar %r8
+       ldd 8(%r1),%r2
+       sub %r0,%r31,%r31
+       ldd 16(%r1),%r5
+       extrd,s %r6,63,32,%r6
+       subi 63,%r6,%r6
+       and %r5,%r31,%r5
+       ldd 0(%r1),%r4
+       depd,z %r2,%sar,64,%r31
+       mtsar %r6
+       extrd,s %r5,%sar,64,%r5
+       mtsar %r8
+       depd,z %r4,%sar,64,%r4
+       or %r31,%r5,%r29
+       mtsar %r6
+       b .L39
+       extrd,s %r2,%sar,64,%r2
+.L40:
+       b .L1
+       ldd 24(%r3),%r28
+.L49:
+       b .L40
+       fldd 24(%r3),%fr4
+.L48:
+#APP
+       fldw 24(%r3),%fr4R
+#NO_APP
+.L41:
+       ldw 24(%r3),%r31
+.L42:
+       b .L1
+       copy %r31,%r28
+.L47:
+       ldw 24(%r3),%r31
+       b .L1
+       extrd,s %r31,63,32,%r28
+.L46:
+       b .L42
+       ldh 24(%r3),%r31
+.L45:
+       ldh 24(%r3),%r31
+       b .L1
+       extrd,s %r31,63,16,%r28
+.L44:
+       b .L42
+       ldb 24(%r3),%r31
+.L43:
+       ldb 24(%r3),%r31
+       b .L1
+       extrd,s %r31,63,8,%r28
+       .EXIT
+       .PROCEND
+.Lfe1:
+       .size   vacall_receiver,.Lfe1-vacall_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/vacall/vacall-hppa64-macro.S b/vacall/vacall-hppa64-macro.S
new file mode 100644 (file)
index 0000000..0bf669b
--- /dev/null
@@ -0,0 +1,226 @@
+#include "asm-hppa64.h"
+       .LEVEL 2.0w
+       TEXT1()
+       TEXT2()
+       .align 8
+GLOBL(vacall_receiver)
+               DECLARE_FUNCTION(vacall_receiver)
+DEF(vacall_receiver)
+       .PROC
+       .CALLINFO FRAME=384,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=8
+       .ENTRY
+       copy %r3,%r1
+       std %r2,-16(%r30)
+       copy %r30,%r3
+       std,ma %r1,384(%r30)
+       std %r4,224(%r3)
+       copy %r27,%r4
+       std %r8,192(%r3)
+       std %r7,200(%r3)
+       std %r6,208(%r3)
+       std %r5,216(%r3)
+       std %r26,-64(%r29)
+       std %r19,-8(%r29)
+       std %r25,-56(%r29)
+       std %r24,-48(%r29)
+       std %r23,-40(%r29)
+       std %r22,-32(%r29)
+       std %r21,-24(%r29)
+       std %r20,-16(%r29)
+       fstw %fr4R,88(%r3)
+       fstw %fr5R,92(%r3)
+       fstw %fr6R,96(%r3)
+       fstw %fr7R,100(%r3)
+       fstw %fr8R,104(%r3)
+       fstw %fr9R,108(%r3)
+       fstw %fr10R,112(%r3)
+       fstw %fr11R,116(%r3)
+       fstd %fr10,168(%r3)
+       addil LT!vacall_function,%r27
+       ldo -64(%r29),%r31
+       ldd RT!vacall_function(%r1),%r1
+       ldo 16(%r3),%r26
+       std %r31,40(%r3)
+       std %r29,80(%r3)
+       ldo -16(%r30),%r29
+       ldd 0(%r1),%r31
+       fstd %fr11,176(%r3)
+       fstd %fr4,120(%r3)
+       fstd %fr5,128(%r3)
+       fstd %fr6,136(%r3)
+       fstd %fr7,144(%r3)
+       fstd %fr8,152(%r3)
+       fstd %fr9,160(%r3)
+       stw %r0,16(%r3)
+       std %r0,48(%r3)
+       stw %r0,56(%r3)
+       ldd 16(%r31),%r2
+       ldd 24(%r31),%r27
+       bve,l (%r2),%r2
+       nop
+       ldw 56(%r3),%r31
+       cmpib,= 0,%r31,L(1)
+       copy %r4,%r27
+       cmpib,=,n 1,%r31,L(43)
+       cmpib,=,n 2,%r31,L(43)
+       cmpib,=,n 3,%r31,L(44)
+       cmpib,=,n 4,%r31,L(45)
+       cmpib,=,n 5,%r31,L(46)
+       cmpib,=,n 6,%r31,L(47)
+       cmpib,=,n 7,%r31,L(41)
+       cmpib,=,n 8,%r31,L(40)
+       cmpib,=,n 10,%r31,L(40)
+       cmpib,=,n 9,%r31,L(40)
+       cmpib,=,n 11,%r31,L(40)
+       cmpib,=,n 12,%r31,L(48)
+       cmpib,=,n 13,%r31,L(49)
+       cmpib,=,n 14,%r31,L(40)
+       cmpib,= 15,%r31,L(50)
+       ldw 16(%r3),%r31
+DEF(L(1))
+       ldd -16(%r3),%r2
+       ldd 192(%r3),%r8
+       ldd 200(%r3),%r7
+       ldd 208(%r3),%r6
+       ldd 216(%r3),%r5
+       ldd 224(%r3),%r4
+       ldo 64(%r3),%r30
+       bve (%r2)
+       ldd,mb -64(%r30),%r3
+DEF(L(50))
+       extrd,u %r31,53+1-1,1,%r31
+       cmpib,= 0,%r31,L(1)
+       ldd 48(%r3),%r28
+       ldd 48(%r3),%r31
+       ldd 64(%r3),%r2
+       extrd,u %r31,63,3,%r6
+       copy %r31,%r1
+       depdi 0,63,3,%r1
+       cmpib,*<< 8,%r2,L(32)
+       add,l %r6,%r2,%r4
+       cmpib,*<< 8,%r4,L(33)
+       depd,z %r4,60,61,%r31
+       subi 64,%r31,%r31
+       ldd 0(%r1),%r2
+       extrd,s %r31,63,32,%r31
+       mtsarcm %r31
+       depd,z %r6,60,61,%r4
+       depdi,z 1,%sar,64,%r31
+       mtsarcm %r4
+       sub %r0,%r31,%r31
+       and %r2,%r31,%r2
+       depd,z %r2,%sar,64,%r2
+       b L(1)
+       copy %r2,%r28
+DEF(L(33))
+       subi 128,%r31,%r31
+       depd,z %r6,60,61,%r2
+       extrd,s %r31,63,32,%r31
+       subi 64,%r2,%r5
+       mtsarcm %r31
+       subi 63,%r2,%r7
+       depdi,z 1,%sar,64,%r31
+       mtsar %r7
+       ldd 8(%r1),%r4
+       sub %r0,%r31,%r31
+       extrd,s %r5,63,32,%r5
+       ldd 0(%r1),%r2
+       subi 63,%r5,%r5
+       and %r4,%r31,%r4
+       depd,z %r2,%sar,64,%r2
+       mtsar %r5
+       extrd,s %r4,%sar,64,%r4
+DEF(L(39))
+       b L(1)
+       or %r4,%r2,%r28
+DEF(L(32))
+       ldi 16,%r31
+       cmpb,*<< %r31,%r4,L(36)
+       depd,z %r4,60,61,%r31
+       subi 128,%r31,%r31
+       depd,z %r6,61,62,%r2
+       extrd,s %r31,63,32,%r31
+       subi 32,%r2,%r2
+       mtsarcm %r31
+       extrd,s %r2,63,32,%r2
+       depdi,z 1,%sar,64,%r31
+       subi 63,%r2,%r7
+       ldd 8(%r1),%r4
+       sub %r0,%r31,%r31
+       mtsar %r7
+       ldd 0(%r1),%r5
+       and %r4,%r31,%r4
+       depd,z %r6,60,61,%r31
+       extrd,s %r4,%sar,64,%r2
+       subi 63,%r31,%r31
+       extrd,s %r2,%sar,64,%r2
+       mtsar %r31
+       depd,z %r4,%sar,64,%r4
+       depd,z %r5,%sar,64,%r5
+       copy %r4,%r29
+       b L(1)
+       or %r5,%r2,%r28
+DEF(L(36))
+       subi 192,%r31,%r31
+       depd,z %r6,60,61,%r2
+       extrd,s %r31,63,32,%r31
+       subi 64,%r2,%r6
+       mtsarcm %r31
+       subi 63,%r2,%r8
+       depdi,z 1,%sar,64,%r31
+       mtsar %r8
+       ldd 8(%r1),%r2
+       sub %r0,%r31,%r31
+       ldd 16(%r1),%r5
+       extrd,s %r6,63,32,%r6
+       subi 63,%r6,%r6
+       and %r5,%r31,%r5
+       ldd 0(%r1),%r4
+       depd,z %r2,%sar,64,%r31
+       mtsar %r6
+       extrd,s %r5,%sar,64,%r5
+       mtsar %r8
+       depd,z %r4,%sar,64,%r4
+       or %r31,%r5,%r29
+       mtsar %r6
+       b L(39)
+       extrd,s %r2,%sar,64,%r2
+DEF(L(40))
+       b L(1)
+       ldd 24(%r3),%r28
+DEF(L(49))
+       b L(40)
+       fldd 24(%r3),%fr4
+DEF(L(48))
+       fldw 24(%r3),%fr4R
+DEF(L(41))
+       ldw 24(%r3),%r31
+DEF(L(42))
+       b L(1)
+       copy %r31,%r28
+DEF(L(47))
+       ldw 24(%r3),%r31
+       b L(1)
+       extrd,s %r31,63,32,%r28
+DEF(L(46))
+       b L(42)
+       ldh 24(%r3),%r31
+DEF(L(45))
+       ldh 24(%r3),%r31
+       b L(1)
+       extrd,s %r31,63,16,%r28
+DEF(L(44))
+       b L(42)
+       ldb 24(%r3),%r31
+DEF(L(43))
+       ldb 24(%r3),%r31
+       b L(1)
+       extrd,s %r31,63,8,%r28
+       .EXIT
+       .PROCEND
+DEF(L(fe1))
+       FUNEND(vacall_receiver)
+IMPORT_DATA(vacall_function)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-hppa64.c b/vacall/vacall-hppa64.c
new file mode 100644 (file)
index 0000000..7abc8da
--- /dev/null
@@ -0,0 +1,294 @@
+/* vacall function for hppa64 CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *     env     __asm__("%r31");
+#endif
+
+register __vaword arg1 __asm__("r26");
+register __vaword arg2 __asm__("r25");
+register __vaword arg3 __asm__("r24");
+register __vaword arg4 __asm__("r23");
+register __vaword arg5 __asm__("r22");
+register __vaword arg6 __asm__("r21");
+register __vaword arg7 __asm__("r20");
+register __vaword arg8 __asm__("r19");
+
+/*register float farg1 __asm__("fr4R");*/
+/*register float farg2 __asm__("fr5R");*/
+/*register float farg3 __asm__("fr6R");*/
+/*register float farg4 __asm__("fr7R");*/
+/*register float farg5 __asm__("fr8R");*/
+/*register float farg6 __asm__("fr9R");*/
+/*register float farg7 __asm__("fr10R");*/
+/*register float farg8 __asm__("fr11R");*/
+
+register double darg1 __asm__("fr4");
+register double darg2 __asm__("fr5");
+register double darg3 __asm__("fr6");
+register double darg4 __asm__("fr7");
+register double darg5 __asm__("fr8");
+register double darg6 __asm__("fr9");
+register double darg7 __asm__("fr10");
+register double darg8 __asm__("fr11");
+
+register __vaword iret __asm__("r28");
+register __vaword iret2 __asm__("r29");
+
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword word5, __vaword word6, __vaword word7, __vaword word8,
+                 __vaword firstword)
+{
+  __va_alist list;
+  /* Move the arguments passed in registers to their stack locations. */
+  (&firstword)[-8] = word1;
+  (&firstword)[-7] = word2;
+  (&firstword)[-6] = word3;
+  (&firstword)[-5] = word4;
+  (&firstword)[-4] = word5;
+  (&firstword)[-3] = word6;
+  (&firstword)[-2] = word7;
+  (&firstword)[-1] = word8;
+  __asm__ __volatile__ ("fstw %%fr4R,%0" : : "m" (list.farg[0])); /* list.farg[0] = farg1; */
+  __asm__ __volatile__ ("fstw %%fr5R,%0" : : "m" (list.farg[1])); /* list.farg[1] = farg2; */
+  __asm__ __volatile__ ("fstw %%fr6R,%0" : : "m" (list.farg[2])); /* list.farg[2] = farg3; */
+  __asm__ __volatile__ ("fstw %%fr7R,%0" : : "m" (list.farg[3])); /* list.farg[3] = farg4; */
+  __asm__ __volatile__ ("fstw %%fr8R,%0" : : "m" (list.farg[4])); /* list.farg[4] = farg5; */
+  __asm__ __volatile__ ("fstw %%fr9R,%0" : : "m" (list.farg[5])); /* list.farg[5] = farg6; */
+  __asm__ __volatile__ ("fstw %%fr10R,%0" : : "m" (list.farg[6])); /* list.farg[6] = farg7; */
+  __asm__ __volatile__ ("fstw %%fr11R,%0" : : "m" (list.farg[7])); /* list.farg[7] = farg8; */
+  list.darg[0] = darg1;
+  list.darg[1] = darg2;
+  list.darg[2] = darg3;
+  list.darg[3] = darg4;
+  list.darg[4] = darg5;
+  list.darg[5] = darg6;
+  list.darg[6] = darg7;
+  list.darg[7] = darg8;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)(&firstword - 8);
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.memargptr = (long)&firstword;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong || list.rtype == __VAlonglong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong || list.rtype == __VAulonglong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAfloat) {
+    __asm__ __volatile__ ("fldw %0,%%fr4R" : : "m" (list.tmp._float)); /* farg1 = list.tmp._float; */
+    iret = *(unsigned int *)&list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    darg1 = list.tmp._double;
+    iret = *(unsigned long*)&list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      #if 0 /* Unoptimized */
+      if (list.rsize == 1) {
+        iret =   (__vaword)((unsigned char *) list.raddr)[0] << 56;
+      } else
+      if (list.rsize == 2) {
+        iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+              | ((__vaword)((unsigned char *) list.raddr)[1] << 48);
+      } else
+      if (list.rsize == 3) {
+        iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+              | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+              | ((__vaword)((unsigned char *) list.raddr)[2] << 40);
+      } else
+      if (list.rsize == 4) {
+        iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+              | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+              | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+              | ((__vaword)((unsigned char *) list.raddr)[3] << 32);
+      } else
+      if (list.rsize == 5) {
+        iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+              | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+              | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+              | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+              | ((__vaword)((unsigned char *) list.raddr)[4] << 24);
+      } else
+      if (list.rsize == 6) {
+        iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+              | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+              | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+              | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+              | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+              | ((__vaword)((unsigned char *) list.raddr)[5] << 16);
+      } else
+      if (list.rsize == 7) {
+        iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+              | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+              | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+              | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+              | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+              | ((__vaword)((unsigned char *) list.raddr)[5] << 16)
+              | ((__vaword)((unsigned char *) list.raddr)[6] << 8);
+      } else
+      if (list.rsize >= 8 && list.rsize <= 16) {
+        iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+              | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+              | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+              | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+              | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+              | ((__vaword)((unsigned char *) list.raddr)[5] << 16)
+              | ((__vaword)((unsigned char *) list.raddr)[6] << 8)
+              |  (__vaword)((unsigned char *) list.raddr)[7];
+        if (list.rsize == 8) {
+        } else
+        if (list.rsize == 9) {
+          iret2 =   (__vaword)((unsigned char *) list.raddr)[8] << 56;
+        } else
+        if (list.rsize == 10) {
+          iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                 | ((__vaword)((unsigned char *) list.raddr)[9] << 48);
+        } else
+        if (list.rsize == 11) {
+          iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                 | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                 | ((__vaword)((unsigned char *) list.raddr)[10] << 40);
+        } else
+        if (list.rsize == 12) {
+          iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                 | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                 | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                 | ((__vaword)((unsigned char *) list.raddr)[11] << 32);
+        } else
+        if (list.rsize == 13) {
+          iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                 | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                 | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                 | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                 | ((__vaword)((unsigned char *) list.raddr)[12] << 24);
+        } else
+        if (list.rsize == 14) {
+          iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                 | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                 | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                 | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                 | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                 | ((__vaword)((unsigned char *) list.raddr)[13] << 16);
+        } else
+        if (list.rsize == 15) {
+          iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                 | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                 | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                 | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                 | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                 | ((__vaword)((unsigned char *) list.raddr)[13] << 16)
+                 | ((__vaword)((unsigned char *) list.raddr)[14] << 8);
+        } else
+        if (list.rsize == 16) {
+          iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                 | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                 | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                 | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                 | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                 | ((__vaword)((unsigned char *) list.raddr)[13] << 16)
+                 | ((__vaword)((unsigned char *) list.raddr)[14] << 8)
+                 |  (__vaword)((unsigned char *) list.raddr)[15];
+        }
+      }
+      #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+      uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__vaword) */
+      __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+      uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+      uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__vaword) */
+      if (count <= sizeof(__vaword)) {
+        /* Assign iret. */
+        if (end_offset <= sizeof(__vaword)) {
+          /* 0 < end_offset ≤ sizeof(__vaword) */
+          __vaword mask0 = - ((__vaword)1 << (sizeof(__vaword)*8-end_offset*8));
+          iret = (wordaddr[0] & mask0) << (start_offset*8);
+        } else {
+          /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+          __vaword mask1 = - ((__vaword)1 << (2*sizeof(__vaword)*8-end_offset*8));
+          iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__vaword)*8-start_offset*8));
+        }
+      } else {
+        /* Assign iret, iret2. */
+        if (end_offset <= 2*sizeof(__vaword)) {
+          /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+          __vaword mask1 = - ((__vaword)1 << (2*sizeof(__vaword)*8-end_offset*8));
+          iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__vaword)*4-start_offset*4) >> (sizeof(__vaword)*4-start_offset*4));
+          iret2 = (wordaddr[1] & mask1) << (start_offset*8);
+        } else {
+          /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+          __vaword mask2 = - ((__vaword)1 << (3*sizeof(__vaword)*8-end_offset*8));
+          iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__vaword)*8-start_offset*8));
+          iret2 = (wordaddr[1] << (start_offset*8)) | ((wordaddr[2] & mask2) >> (sizeof(__vaword)*8-start_offset*8));
+        }
+      }
+      #endif
+    } else {
+      iret = (long)list.raddr;
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-i386-linux-pic.s b/vacall/vacall-i386-linux-pic.s
new file mode 100644 (file)
index 0000000..65470a8
--- /dev/null
@@ -0,0 +1,159 @@
+       .file   "vacall-i386.c"
+       .text
+       .align 2
+       .p2align 2,,3
+.globl vacall_receiver
+       .type   vacall_receiver,@function
+vacall_receiver:
+       pushl   %ebp
+       movl    %esp, %ebp
+       pushl   %esi
+       pushl   %ebx
+       subl    $48, %esp
+       call    .L44
+.L44:
+       popl    %ebx
+       addl    $_GLOBAL_OFFSET_TABLE_+[.-.L44], %ebx
+       leal    8(%ebp), %edx
+       movl    %edx, -40(%ebp)
+       subl    $12, %esp
+       leal    -56(%ebp), %edx
+       movl    $0, -56(%ebp)
+       movl    $0, -36(%ebp)
+       movl    $0, -32(%ebp)
+       movl    %ebx, -24(%ebp)
+       pushl   %edx
+       movl    vacall_function@GOT(%ebx), %edx
+       call    *(%edx)
+       movl    -32(%ebp), %ecx
+       addl    $16, %esp
+       testl   %ecx, %ecx
+       je      .L43
+       cmpl    $1, %ecx
+       je      .L45
+       cmpl    $2, %ecx
+       je      .L45
+       cmpl    $3, %ecx
+       je      .L50
+       cmpl    $4, %ecx
+       je      .L51
+       cmpl    $5, %ecx
+       je      .L52
+       cmpl    $6, %ecx
+       je      .L49
+       cmpl    $7, %ecx
+       je      .L49
+       cmpl    $8, %ecx
+       je      .L49
+       cmpl    $9, %ecx
+       je      .L49
+       leal    -10(%ecx), %edx
+       cmpl    $1, %edx
+       ja      .L22
+       movl    -48(%ebp), %eax
+#APP
+       movl -44(%ebp),%edx
+.L33:
+       .p2align 2,,3
+#NO_APP
+.L43:
+       movl    -56(%ebp), %ecx
+.L3:
+       andl    $512, %ecx
+       je      .L1
+#APP
+       movl 0(%ebp),%ecx
+#NO_APP
+       movl    -40(%ebp), %esp
+#APP
+       jmp *%ecx
+#NO_APP
+.L1:
+       leal    -8(%ebp), %esp
+       popl    %ebx
+       popl    %esi
+       leave
+       ret
+.L22:
+       cmpl    $12, %ecx
+       je      .L53
+       cmpl    $13, %ecx
+       je      .L54
+       cmpl    $14, %ecx
+       je      .L49
+       cmpl    $15, %ecx
+       jne     .L43
+       movl    -56(%ebp), %ecx
+       testl   $1024, %ecx
+       movl    %ecx, %esi
+       je      .L31
+       movl    -28(%ebp), %edx
+       cmpl    $1, %edx
+       je      .L55
+       cmpl    $2, %edx
+       je      .L56
+       cmpl    $4, %edx
+       je      .L57
+       cmpl    $8, %edx
+       je      .L58
+.L31:
+       andl    $16, %esi
+       movl    -36(%ebp), %eax
+       jne     .L3
+#APP
+       leal -4(%ebp), %esp
+       popl %esi
+       leave
+       ret $4
+#NO_APP
+       jmp     .L3
+.L58:
+       movl    -36(%ebp), %edx
+       movl    (%edx), %eax
+#APP
+       movl 4(%edx),%edx
+#NO_APP
+       jmp     .L3
+.L57:
+       movl    -36(%ebp), %edx
+       movl    (%edx), %eax
+       jmp     .L3
+.L56:
+       movl    -36(%ebp), %edx
+       movzwl  (%edx), %eax
+       jmp     .L3
+.L55:
+       movl    -36(%ebp), %edx
+       movzbl  (%edx), %eax
+       jmp     .L3
+       .p2align 2,,3
+.L49:
+       movl    -48(%ebp), %eax
+       jmp     .L43
+.L54:
+#APP
+       fldl -48(%ebp)
+#NO_APP
+       jmp     .L43
+.L53:
+#APP
+       flds -48(%ebp)
+#NO_APP
+       jmp     .L43
+       .p2align 2,,3
+.L52:
+       movzwl  -48(%ebp), %eax
+       jmp     .L43
+.L51:
+       movswl  -48(%ebp),%eax
+       jmp     .L43
+.L50:
+       movzbl  -48(%ebp), %eax
+       jmp     .L43
+       .p2align 2,,3
+.L45:
+       movsbl  -48(%ebp),%eax
+       jmp     .L43
+.Lfe1:
+       .size   vacall_receiver,.Lfe1-vacall_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/vacall/vacall-i386-linux.s b/vacall/vacall-i386-linux.s
new file mode 100644 (file)
index 0000000..d8c714e
--- /dev/null
@@ -0,0 +1,150 @@
+       .file   "vacall-i386.c"
+       .text
+       .align 2
+       .p2align 2,,3
+.globl vacall_receiver
+       .type   vacall_receiver,@function
+vacall_receiver:
+       pushl   %ebp
+       movl    %esp, %ebp
+       leal    8(%ebp), %edx
+       pushl   %esi
+       subl    $64, %esp
+       movl    %edx, -40(%ebp)
+       leal    -56(%ebp), %edx
+       movl    $0, -56(%ebp)
+       movl    $0, -36(%ebp)
+       movl    $0, -32(%ebp)
+       movl    %ebx, -24(%ebp)
+       pushl   %edx
+       call    *vacall_function
+       movl    -32(%ebp), %ecx
+       addl    $16, %esp
+       testl   %ecx, %ecx
+       je      .L43
+       cmpl    $1, %ecx
+       je      .L44
+       cmpl    $2, %ecx
+       je      .L44
+       cmpl    $3, %ecx
+       je      .L49
+       cmpl    $4, %ecx
+       je      .L50
+       cmpl    $5, %ecx
+       je      .L51
+       cmpl    $6, %ecx
+       je      .L48
+       cmpl    $7, %ecx
+       je      .L48
+       cmpl    $8, %ecx
+       je      .L48
+       cmpl    $9, %ecx
+       je      .L48
+       leal    -10(%ecx), %edx
+       cmpl    $1, %edx
+       ja      .L22
+       movl    -48(%ebp), %eax
+#APP
+       movl -44(%ebp),%edx
+.L33:
+       .p2align 2,,3
+#NO_APP
+.L43:
+       movl    -56(%ebp), %ecx
+.L3:
+       andl    $512, %ecx
+       je      .L1
+#APP
+       movl 0(%ebp),%ecx
+#NO_APP
+       movl    -40(%ebp), %esp
+#APP
+       jmp *%ecx
+#NO_APP
+.L1:
+       movl    -4(%ebp), %esi
+       leave
+       ret
+.L22:
+       cmpl    $12, %ecx
+       je      .L52
+       cmpl    $13, %ecx
+       je      .L53
+       cmpl    $14, %ecx
+       je      .L48
+       cmpl    $15, %ecx
+       jne     .L43
+       movl    -56(%ebp), %ecx
+       testl   $1024, %ecx
+       movl    %ecx, %esi
+       je      .L31
+       movl    -28(%ebp), %edx
+       cmpl    $1, %edx
+       je      .L54
+       cmpl    $2, %edx
+       je      .L55
+       cmpl    $4, %edx
+       je      .L56
+       cmpl    $8, %edx
+       je      .L57
+.L31:
+       andl    $16, %esi
+       movl    -36(%ebp), %eax
+       jne     .L3
+#APP
+       leal -4(%ebp), %esp
+       popl %esi
+       leave
+       ret $4
+#NO_APP
+       jmp     .L3
+.L57:
+       movl    -36(%ebp), %edx
+       movl    (%edx), %eax
+#APP
+       movl 4(%edx),%edx
+#NO_APP
+       jmp     .L3
+.L56:
+       movl    -36(%ebp), %edx
+       movl    (%edx), %eax
+       jmp     .L3
+.L55:
+       movl    -36(%ebp), %edx
+       movzwl  (%edx), %eax
+       jmp     .L3
+.L54:
+       movl    -36(%ebp), %edx
+       movzbl  (%edx), %eax
+       jmp     .L3
+       .p2align 2,,3
+.L48:
+       movl    -48(%ebp), %eax
+       jmp     .L43
+.L53:
+#APP
+       fldl -48(%ebp)
+#NO_APP
+       jmp     .L43
+.L52:
+#APP
+       flds -48(%ebp)
+#NO_APP
+       jmp     .L43
+       .p2align 2,,3
+.L51:
+       movzwl  -48(%ebp), %eax
+       jmp     .L43
+.L50:
+       movswl  -48(%ebp),%eax
+       jmp     .L43
+.L49:
+       movzbl  -48(%ebp), %eax
+       jmp     .L43
+       .p2align 2,,3
+.L44:
+       movsbl  -48(%ebp),%eax
+       jmp     .L43
+.Lfe1:
+       .size   vacall_receiver,.Lfe1-vacall_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/vacall/vacall-i386-macro.S b/vacall/vacall-i386-macro.S
new file mode 100644 (file)
index 0000000..c352c94
--- /dev/null
@@ -0,0 +1,288 @@
+#include "asm-i386.h"
+#ifdef __PIC__
+       TEXT()
+       ALIGN(2)
+       P2ALIGN(2,3)
+GLOBL(C(vacall_receiver))
+       DECLARE_FUNCTION(vacall_receiver)
+FUNBEGIN(vacall_receiver)
+       INSN1(push,l    ,R(ebp))
+       INSN2(mov,l     ,R(esp), R(ebp))
+       INSN1(push,l    ,R(esi))
+       INSN1(push,l    ,R(ebx))
+       INSN2(sub,l     ,NUM(48), R(esp))
+       INSN1(call,_    ,L(44))
+L(44):
+       INSN1(pop,l     ,R(ebx))
+#ifdef __ELF__
+       INSN2(add,l     ,NUM()_GLOBAL_OFFSET_TABLE_+[.-L(44)],R(ebx))
+#endif
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,R(edx),X4 MEM_DISP(ebp,-40))
+       INSN2(sub,l     ,NUM(12), R(esp))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-56), R(edx))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-56))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-36))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-32))
+       INSN2(mov,l     ,R(ebx),X4 MEM_DISP(ebp,-24))
+       INSN1(push,l    ,R(edx))
+       INSN2(mov,l     ,C(vacall_function)@MEM_DISP(ebx,GOT), R(edx))
+       INSN1(call,_    ,INDIR(X4 MEM(edx)))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-32), R(ecx))
+       INSN2(add,l     ,NUM(16), R(esp))
+       INSN2(test,l    ,R(ecx), R(ecx))
+       INSN1(je,_      ,L(43))
+       INSN2(cmp,l     ,NUM(1), R(ecx))
+       INSN1(je,_      ,L(45))
+       INSN2(cmp,l     ,NUM(2), R(ecx))
+       INSN1(je,_      ,L(45))
+       INSN2(cmp,l     ,NUM(3), R(ecx))
+       INSN1(je,_      ,L(50))
+       INSN2(cmp,l     ,NUM(4), R(ecx))
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(5), R(ecx))
+       INSN1(je,_      ,L(52))
+       INSN2(cmp,l     ,NUM(6), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(7), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(8), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(9), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(lea,l     ,X4 MEM_DISP(ecx,-10), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(ja,_      ,L(22))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-44),R(edx))
+L(33):
+       P2ALIGN(2,3)
+L(43):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(ecx))
+L(3):
+       INSN2(and,l     ,NUM(512), R(ecx))
+       INSN1(je,_      ,L(1))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,0),R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-40), R(esp))
+       INSN1(jmp,_     ,INDIR(R(ecx)))
+L(1):
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-8), R(esp))
+       INSN1(pop,l     ,R(ebx))
+       INSN1(pop,l     ,R(esi))
+       leave
+       ret
+L(22):
+       INSN2(cmp,l     ,NUM(12), R(ecx))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(13), R(ecx))
+       INSN1(je,_      ,L(54))
+       INSN2(cmp,l     ,NUM(14), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(15), R(ecx))
+       INSN1(jne,_     ,L(43))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(ecx))
+       INSN2(test,l    ,NUM(1024), R(ecx))
+       INSN2(mov,l     ,R(ecx), R(esi))
+       INSN1(je,_      ,L(31))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-28), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(je,_      ,L(55))
+       INSN2(cmp,l     ,NUM(2), R(edx))
+       INSN1(je,_      ,L(56))
+       INSN2(cmp,l     ,NUM(4), R(edx))
+       INSN1(je,_      ,L(57))
+       INSN2(cmp,l     ,NUM(8), R(edx))
+       INSN1(je,_      ,L(58))
+L(31):
+       INSN2(and,l     ,NUM(16), R(esi))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(eax))
+       INSN1(jne,_     ,L(3))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-4), R(esp))
+       INSN1(pop,l     ,R(esi))
+       leave
+       ret NUM(4)
+       INSN1(jmp,_     ,L(3))
+L(58):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,4),R(edx))
+       INSN1(jmp,_     ,L(3))
+L(57):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(56):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,w,X2 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(55):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,b,X1 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+       P2ALIGN(2,3)
+L(49):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(54):
+       INSN1(fld,l     ,X8 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+L(53):
+       INSN1(fld,s     ,X4 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(52):
+       INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(51):
+       INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(50):
+       INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(45):
+       INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(fe1):
+       FUNEND(vacall_receiver,L(fe1)-vacall_receiver)
+
+#else
+       TEXT()
+       ALIGN(2)
+       P2ALIGN(2,3)
+GLOBL(C(vacall_receiver))
+       DECLARE_FUNCTION(vacall_receiver)
+FUNBEGIN(vacall_receiver)
+       INSN1(push,l    ,R(ebp))
+       INSN2(mov,l     ,R(esp), R(ebp))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN1(push,l    ,R(esi))
+       INSN2(sub,l     ,NUM(64), R(esp))
+       INSN2(mov,l     ,R(edx),X4 MEM_DISP(ebp,-40))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-56), R(edx))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-56))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-36))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-32))
+       INSN2(mov,l     ,R(ebx),X4 MEM_DISP(ebp,-24))
+       INSN1(push,l    ,R(edx))
+       INSN1(call,_    ,INDIR(X4 C(vacall_function)))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-32), R(ecx))
+       INSN2(add,l     ,NUM(16), R(esp))
+       INSN2(test,l    ,R(ecx), R(ecx))
+       INSN1(je,_      ,L(43))
+       INSN2(cmp,l     ,NUM(1), R(ecx))
+       INSN1(je,_      ,L(44))
+       INSN2(cmp,l     ,NUM(2), R(ecx))
+       INSN1(je,_      ,L(44))
+       INSN2(cmp,l     ,NUM(3), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(4), R(ecx))
+       INSN1(je,_      ,L(50))
+       INSN2(cmp,l     ,NUM(5), R(ecx))
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(6), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(7), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(8), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(9), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(lea,l     ,X4 MEM_DISP(ecx,-10), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(ja,_      ,L(22))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-44),R(edx))
+L(33):
+       P2ALIGN(2,3)
+L(43):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(ecx))
+L(3):
+       INSN2(and,l     ,NUM(512), R(ecx))
+       INSN1(je,_      ,L(1))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,0),R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-40), R(esp))
+       INSN1(jmp,_     ,INDIR(R(ecx)))
+L(1):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-4), R(esi))
+       leave
+       ret
+L(22):
+       INSN2(cmp,l     ,NUM(12), R(ecx))
+       INSN1(je,_      ,L(52))
+       INSN2(cmp,l     ,NUM(13), R(ecx))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(14), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(15), R(ecx))
+       INSN1(jne,_     ,L(43))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(ecx))
+       INSN2(test,l    ,NUM(1024), R(ecx))
+       INSN2(mov,l     ,R(ecx), R(esi))
+       INSN1(je,_      ,L(31))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-28), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(je,_      ,L(54))
+       INSN2(cmp,l     ,NUM(2), R(edx))
+       INSN1(je,_      ,L(55))
+       INSN2(cmp,l     ,NUM(4), R(edx))
+       INSN1(je,_      ,L(56))
+       INSN2(cmp,l     ,NUM(8), R(edx))
+       INSN1(je,_      ,L(57))
+L(31):
+       INSN2(and,l     ,NUM(16), R(esi))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(eax))
+       INSN1(jne,_     ,L(3))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-4), R(esp))
+       INSN1(pop,l     ,R(esi))
+       leave
+       ret NUM(4)
+       INSN1(jmp,_     ,L(3))
+L(57):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,4),R(edx))
+       INSN1(jmp,_     ,L(3))
+L(56):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(55):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,w,X2 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(54):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,b,X1 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+       P2ALIGN(2,3)
+L(48):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(53):
+       INSN1(fld,l     ,X8 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+L(52):
+       INSN1(fld,s     ,X4 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(51):
+       INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(50):
+       INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(49):
+       INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(44):
+       INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(fe1):
+       FUNEND(vacall_receiver,L(fe1)-vacall_receiver)
+
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-i386-msvc.c b/vacall/vacall-i386-msvc.c
new file mode 100644 (file)
index 0000000..170067e
--- /dev/null
@@ -0,0 +1,291 @@
+#ifdef _MSC_VER
+#include "vacall.h"
+#endif
+#include "asm-i386.h"
+#ifdef __PIC__
+       TEXT()
+       ALIGN(2)
+       P2ALIGN(2,3)
+GLOBL(C(vacall_receiver))
+       DECLARE_FUNCTION(vacall_receiver)
+FUNBEGIN(vacall_receiver)
+       INSN1(push,l    ,R(ebp))
+       INSN2(mov,l     ,R(esp), R(ebp))
+       INSN1(push,l    ,R(esi))
+       INSN1(push,l    ,R(ebx))
+       INSN2(sub,l     ,NUM(48), R(esp))
+       INSN1(call,_    ,L(44))
+L(44):
+       INSN1(pop,l     ,R(ebx))
+#ifdef __ELF__
+       INSN2(add,l     ,NUM()_GLOBAL_OFFSET_TABLE_+[.-L(44)],R(ebx))
+#endif
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN2(mov,l     ,R(edx),X4 MEM_DISP(ebp,-40))
+       INSN2(sub,l     ,NUM(12), R(esp))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-56), R(edx))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-56))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-36))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-32))
+       INSN2(mov,l     ,R(ebx),X4 MEM_DISP(ebp,-24))
+       INSN1(push,l    ,R(edx))
+       INSN2(mov,l     ,C(vacall_function)@MEM_DISP(ebx,GOT), R(edx))
+       INSN1(call,_    ,INDIR(X4 MEM(edx)))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-32), R(ecx))
+       INSN2(add,l     ,NUM(16), R(esp))
+       INSN2(test,l    ,R(ecx), R(ecx))
+       INSN1(je,_      ,L(43))
+       INSN2(cmp,l     ,NUM(1), R(ecx))
+       INSN1(je,_      ,L(45))
+       INSN2(cmp,l     ,NUM(2), R(ecx))
+       INSN1(je,_      ,L(45))
+       INSN2(cmp,l     ,NUM(3), R(ecx))
+       INSN1(je,_      ,L(50))
+       INSN2(cmp,l     ,NUM(4), R(ecx))
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(5), R(ecx))
+       INSN1(je,_      ,L(52))
+       INSN2(cmp,l     ,NUM(6), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(7), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(8), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(9), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(lea,l     ,X4 MEM_DISP(ecx,-10), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(ja,_      ,L(22))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-44),R(edx))
+L(33):
+       P2ALIGN(2,3)
+L(43):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(ecx))
+L(3):
+       INSN2(and,l     ,NUM(512), R(ecx))
+       INSN1(je,_      ,L(1))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,0),R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-40), R(esp))
+       INSN1(jmp,_     ,INDIR(R(ecx)))
+L(1):
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-8), R(esp))
+       INSN1(pop,l     ,R(ebx))
+       INSN1(pop,l     ,R(esi))
+       leave
+       ret
+L(22):
+       INSN2(cmp,l     ,NUM(12), R(ecx))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(13), R(ecx))
+       INSN1(je,_      ,L(54))
+       INSN2(cmp,l     ,NUM(14), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(15), R(ecx))
+       INSN1(jne,_     ,L(43))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(ecx))
+       INSN2(test,l    ,NUM(1024), R(ecx))
+       INSN2(mov,l     ,R(ecx), R(esi))
+       INSN1(je,_      ,L(31))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-28), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(je,_      ,L(55))
+       INSN2(cmp,l     ,NUM(2), R(edx))
+       INSN1(je,_      ,L(56))
+       INSN2(cmp,l     ,NUM(4), R(edx))
+       INSN1(je,_      ,L(57))
+       INSN2(cmp,l     ,NUM(8), R(edx))
+       INSN1(je,_      ,L(58))
+L(31):
+       INSN2(and,l     ,NUM(16), R(esi))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(eax))
+       INSN1(jne,_     ,L(3))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-4), R(esp))
+       INSN1(pop,l     ,R(esi))
+       leave
+       ret NUM(4)
+       INSN1(jmp,_     ,L(3))
+L(58):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,4),R(edx))
+       INSN1(jmp,_     ,L(3))
+L(57):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(56):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,w,X2 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(55):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,b,X1 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+       P2ALIGN(2,3)
+L(49):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(54):
+       INSN1(fld,l     ,X8 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+L(53):
+       INSN1(fld,s     ,X4 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(52):
+       INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(51):
+       INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(50):
+       INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(45):
+       INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(fe1):
+       FUNEND(vacall_receiver,L(fe1)-vacall_receiver)
+
+#else
+       TEXT()
+       ALIGN(2)
+       P2ALIGN(2,3)
+GLOBL(C(vacall_receiver))
+       DECLARE_FUNCTION(vacall_receiver)
+FUNBEGIN(vacall_receiver)
+       INSN1(push,l    ,R(ebp))
+       INSN2(mov,l     ,R(esp), R(ebp))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,8), R(edx))
+       INSN1(push,l    ,R(esi))
+       INSN2(sub,l     ,NUM(64), R(esp))
+       INSN2(mov,l     ,R(edx),X4 MEM_DISP(ebp,-40))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-56), R(edx))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-56))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-36))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(ebp,-32))
+       INSN2(mov,l     ,R(ebx),X4 MEM_DISP(ebp,-24))
+       INSN1(push,l    ,R(edx))
+       INSN1(call,_    ,INDIR(X4 C(vacall_function)))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-32), R(ecx))
+       INSN2(add,l     ,NUM(16), R(esp))
+       INSN2(test,l    ,R(ecx), R(ecx))
+       INSN1(je,_      ,L(43))
+       INSN2(cmp,l     ,NUM(1), R(ecx))
+       INSN1(je,_      ,L(44))
+       INSN2(cmp,l     ,NUM(2), R(ecx))
+       INSN1(je,_      ,L(44))
+       INSN2(cmp,l     ,NUM(3), R(ecx))
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(4), R(ecx))
+       INSN1(je,_      ,L(50))
+       INSN2(cmp,l     ,NUM(5), R(ecx))
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(6), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(7), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(8), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(9), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(lea,l     ,X4 MEM_DISP(ecx,-10), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(ja,_      ,L(22))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-44),R(edx))
+L(33):
+       P2ALIGN(2,3)
+L(43):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(ecx))
+L(3):
+       INSN2(and,l     ,NUM(512), R(ecx))
+       INSN1(je,_      ,L(1))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,0),R(ecx))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-40), R(esp))
+       INSN1(jmp,_     ,INDIR(R(ecx)))
+L(1):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-4), R(esi))
+       leave
+       ret
+L(22):
+       INSN2(cmp,l     ,NUM(12), R(ecx))
+       INSN1(je,_      ,L(52))
+       INSN2(cmp,l     ,NUM(13), R(ecx))
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(14), R(ecx))
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(15), R(ecx))
+       INSN1(jne,_     ,L(43))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-56), R(ecx))
+       INSN2(test,l    ,NUM(1024), R(ecx))
+       INSN2(mov,l     ,R(ecx), R(esi))
+       INSN1(je,_      ,L(31))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-28), R(edx))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(je,_      ,L(54))
+       INSN2(cmp,l     ,NUM(2), R(edx))
+       INSN1(je,_      ,L(55))
+       INSN2(cmp,l     ,NUM(4), R(edx))
+       INSN1(je,_      ,L(56))
+       INSN2(cmp,l     ,NUM(8), R(edx))
+       INSN1(je,_      ,L(57))
+L(31):
+       INSN2(and,l     ,NUM(16), R(esi))
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(eax))
+       INSN1(jne,_     ,L(3))
+       INSN2(lea,l     ,X4 MEM_DISP(ebp,-4), R(esp))
+       INSN1(pop,l     ,R(esi))
+       leave
+       ret NUM(4)
+       INSN1(jmp,_     ,L(3))
+L(57):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN2(mov,l     ,X4 MEM_DISP(edx,4),R(edx))
+       INSN1(jmp,_     ,L(3))
+L(56):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2(mov,l     ,X4 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(55):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,w,X2 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+L(54):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-36), R(edx))
+       INSN2MOVXL(movz,b,X1 MEM(edx), R(eax))
+       INSN1(jmp,_     ,L(3))
+       P2ALIGN(2,3)
+L(48):
+       INSN2(mov,l     ,X4 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(53):
+       INSN1(fld,l     ,X8 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+L(52):
+       INSN1(fld,s     ,X4 MEM_DISP(ebp,-48))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(51):
+       INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+L(50):
+       INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(49):
+       INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax))
+       INSN1(jmp,_     ,L(43))
+       P2ALIGN(2,3)
+L(44):
+       INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax))
+       INSN1(jmp,_     ,L(43))
+L(fe1):
+       FUNEND(vacall_receiver,L(fe1)-vacall_receiver)
+
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-i386.c b/vacall/vacall-i386.c
new file mode 100644 (file)
index 0000000..5666a27
--- /dev/null
@@ -0,0 +1,163 @@
+/* vacall function for i386 CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+typedef struct { void (*vacall_function) (void*,va_alist); void* arg; } env_t;
+register env_t*        env     __asm__("%ecx");
+#endif
+register void* sp      __asm__("%esp");
+register void* sret    __asm__("%ebx");
+register int   iret    __asm__("%eax");
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword firstword)
+{
+  __va_alist list;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&firstword;
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.structraddr = sret;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) {
+    /* This code is EXTREMELY fragile!!                     */
+    /* It depends on the register allocation chosen by gcc. */
+    iret = ((__vaword *) &list.tmp._longlong)[0];
+    asm volatile ("movl %0,%%edx" : : "g"(((__vaword *) &list.tmp._longlong)[1]));
+  } else
+  if (list.rtype == __VAfloat) {
+    asm volatile ("flds %0": : "m"(list.tmp._float));
+  } else
+  if (list.rtype == __VAdouble) {
+    asm volatile ("fldl %0": : "m"(list.tmp._double));
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      if (list.rsize == sizeof(char)) {
+        iret = *(unsigned char *) list.raddr;
+        goto done;
+      } else
+      if (list.rsize == sizeof(short)) {
+        iret = *(unsigned short *) list.raddr;
+        goto done;
+      } else
+      if (list.rsize == sizeof(int)) {
+        iret = *(unsigned int *) list.raddr;
+        goto done;
+      } else
+      if (list.rsize == 2*sizeof(__vaword)) {
+        /* This code is EXTREMELY fragile!!                     */
+        /* It depends on the register allocation chosen by gcc. */
+        iret = ((__vaword *) list.raddr)[0];
+        asm volatile ("movl %0,%%edx" : : "g"(((__vaword *) list.raddr)[1]));
+        goto done;
+      }
+    }
+    /* On MSVC and on FreeBSD, must put the structure address into %eax.
+       For the other platforms, it does not matter, but doesn't hurt either. */
+    iret = (long) list.raddr;
+    if (!(list.flags & __VA_MSVC_STRUCT_RETURN)) {
+      /* We have to pop the struct return address off the stack. */
+      /* Callers compiled with -fomit-frame-pointer expect this. */
+      /* Return via a "ret $4" instruction. */
+      /* NOTE: This is EXTREMELY fragile. We must use the same return sequence
+       * as the one generated by GCC, except that we use a "ret $4" instruction
+       * in place of the "ret" instruction. Look at the 'pushl' instructions
+       * at the beginning of the generated code and at the sequence of
+       * instructions right before the generated "ret" instruction. */
+#ifdef REENTRANT
+      asm volatile ("leal -8(%ebp), %esp");
+      asm volatile ("popl %esi");
+      asm volatile ("popl %edi");
+      asm volatile ("leave");
+#else
+      asm volatile ("leal -4(%ebp), %esp");
+      asm volatile ("popl %esi");
+      asm volatile ("leave");
+#endif
+      asm volatile ("ret $4");
+      /*NOTREACHED*/
+    }
+    done: ;
+  }
+  if (list.flags & __VA_STDCALL_CLEANUP) {
+    /* Return, and at the same time pop the arguments off the stack. */
+    /* Normally done through a "ret $n" instruction. */
+    /* Be careful not to clobber %eax and %edx. Only %ecx can be used. */
+    /* Use *__builtin_frame_address(0), since __builtin_return_address(0)
+     * is buggy in gcc-2.7.2. */
+    asm volatile ("movl %0,%%ecx" : : "g" (*(void**)__builtin_frame_address(0)));
+    sp = (void*)list.aptr;
+    asm volatile ("jmp *%ecx");
+    /*NOTREACHED*/
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-ia64-linux.s b/vacall/vacall-ia64-linux.s
new file mode 100644 (file)
index 0000000..864463e
--- /dev/null
@@ -0,0 +1,842 @@
+       .file   "vacall-ia64.c"
+       .pred.safe_across_calls p1-p5,p16-p63
+       .text
+       .align 16
+       .global vacall_receiver#
+       .proc vacall_receiver#
+vacall_receiver:
+       .prologue 14, 41
+       .spill 48
+       .mmb
+       .save ar.pfs, r42
+       alloc r42 = ar.pfs, 8, 5, 1, 0
+       .vframe r43
+       mov r43 = r12
+       nop 0
+       .mmi
+       adds r12 = -208, r12
+       mov r44 = r1
+       .save rp, r41
+       mov r41 = b0
+       .body
+       ;;
+       .mmi
+       adds r14 = -48, r43
+       adds r16 = -48, r43
+       adds r40 = -152, r43
+       .mmb
+       adds r45 = -192, r43
+       st8 [r43] = r38
+       nop 0
+       ;;
+       .mmi
+       nop 0
+       st8 [r14] = r32, 8
+       adds r32 = -160, r43
+       .mmi
+       st4 [r40] = r0
+       ;;
+       st8 [r14] = r33
+       adds r14 = -32, r43
+       .mmi
+       st4 [r45] = r0
+       ;;
+       st8 [r14] = r34
+       addl r14 = @ltoffx(vacall_function#), r1
+       .mmb
+       nop 0
+       st8 [r32] = r0
+       nop 0
+       ;;
+       .mmi
+       ld8.mov r14 = [r14], vacall_function#
+       ;;
+       ld8 r15 = [r14]
+       nop 0
+       .mmi
+       adds r14 = -24, r43
+       ;;
+       st8 [r14] = r35
+       adds r14 = -16, r43
+       ;;
+       .mfi
+       st8 [r14] = r36
+       nop 0
+       adds r14 = -8, r43
+       .mmi
+       nop 0
+       ;;
+       st8 [r14] = r37
+       nop 0
+       .mmi
+       adds r14 = 8, r43
+       ;;
+       st8 [r14] = r39
+       adds r14 = -112, r43
+       ;;
+       .mfi
+       stfd [r14] = f8
+       nop 0
+       adds r14 = -104, r43
+       .mmi
+       nop 0
+       ;;
+       stfd [r14] = f9
+       nop 0
+       .mmi
+       adds r14 = -96, r43
+       ;;
+       stfd [r14] = f10
+       adds r14 = -88, r43
+       ;;
+       .mfi
+       stfd [r14] = f11
+       nop 0
+       adds r14 = -80, r43
+       .mmi
+       nop 0
+       ;;
+       stfd [r14] = f12
+       nop 0
+       .mmi
+       adds r14 = -72, r43
+       ;;
+       stfd [r14] = f13
+       adds r14 = -64, r43
+       ;;
+       .mfi
+       stfd [r14] = f14
+       nop 0
+       adds r14 = -56, r43
+       .mmi
+       nop 0
+       ;;
+       stfd [r14] = f15
+       nop 0
+       .mmi
+       adds r14 = -168, r43
+       ;;
+       st8 [r14] = r16
+       adds r14 = -128, r43
+       ;;
+       .mii
+       st8 [r14] = r16
+       adds r14 = -120, r43
+       ;;
+       nop 0
+       .mii
+       st4 [r14] = r0
+       adds r14 = -136, r43
+       ;;
+       nop 0
+       .mmb
+       st8 [r14] = r8
+       ld8 r14 = [r15], 8
+       nop 0
+       ;;
+       .mib
+       nop 0
+       mov b6 = r14
+       nop 0
+       .mbb
+       ld8 r1 = [r15]
+       nop 0
+       br.call.sptk.many b0 = b6
+       ;;
+       .mmb
+       mov r1 = r44
+       ld4 r40 = [r40]
+       nop 0
+       ;;
+       .mfb
+       cmp4.eq p6, p7 = 0, r40
+       nop 0
+       (p6) br.cond.dpnt .L49
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 1, r40
+       nop 0
+       (p7) br.cond.dpnt .L50
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 2, r40
+       nop 0
+       (p7) br.cond.dpnt .L50
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 3, r40
+       ;;
+       (p7) adds r14 = -184, r43
+       ;;
+       .mfb
+       (p7) ld1 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 4, r40
+       ;;
+       nop 0
+       .mmi
+       (p7) adds r14 = -184, r43
+       ;;
+       (p7) ld2 r14 = [r14]
+       nop 0
+       ;;
+       .mib
+       nop 0
+       (p7) sxt2 r8 = r14
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 5, r40
+       ;;
+       (p7) adds r14 = -184, r43
+       ;;
+       .mfb
+       (p7) ld2 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 6, r40
+       ;;
+       nop 0
+       .mmi
+       (p7) adds r14 = -184, r43
+       ;;
+       (p7) ld4 r14 = [r14]
+       nop 0
+       ;;
+       .mib
+       nop 0
+       (p7) sxt4 r8 = r14
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 7, r40
+       ;;
+       (p7) adds r14 = -184, r43
+       ;;
+       .mfb
+       (p7) ld4 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mfb
+       cmp4.ne p6, p7 = 8, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 9, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 10, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 11, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 12, r40
+       ;;
+       (p7) adds r14 = -184, r43
+       ;;
+       .mfb
+       (p7) ldfs f8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 13, r40
+       ;;
+       (p7) adds r14 = -184, r43
+       ;;
+       .mfb
+       (p7) ldfd f8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mfb
+       cmp4.ne p6, p7 = 14, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mib
+       nop 0
+       cmp4.ne p6, p7 = 15, r40
+       (p6) br.cond.dptk .L49
+       .mii
+       nop 0
+       adds r15 = -192, r43
+       ;;
+       nop 0
+       .mmi
+       ld4 r14 = [r15]
+       ;;
+       nop 0
+       tbit.z p6, p7 = r14, 10
+       .mfb
+       adds r14 = -144, r43
+       nop 0
+       (p6) br.cond.dpnt .L49
+       ;;
+       .mmi
+       ld8 r21 = [r14]
+       ;;
+       adds r14 = -1, r21
+       nop 0
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 31, r14
+       (p6) br.cond.dpnt .L49
+       .mmi
+       ld8 r14 = [r32]
+       ;;
+       and r20 = 7, r14
+       and r23 = -8, r14
+       .mii
+       nop 0
+       cmp.ltu p6, p7 = 8, r21
+       ;;
+       nop 0
+       .mfb
+       add r14 = r21, r20
+       nop 0
+       (p6) br.cond.dptk .L35
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 8, r14
+       (p6) br.cond.dptk .L37
+       .mfi
+       shladd r15 = r14, 3, r0
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       ld8 r16 = [r23]
+       shladd r17 = r20, 3, r0
+       ;;
+       adds r15 = -1, r15
+       ;;
+       .mii
+       nop 0
+       sxt4 r15 = r15
+       ;;
+       shl r14 = r14, r15
+       ;;
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r16, r14
+       nop 0
+       .mmi
+       nop 0
+       ;;
+       nop 0
+       shr r8 = r14, r17
+.L49:
+       .mii
+       nop 0
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 1
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L50:
+       .body
+       .copy_state 1
+       .mii
+       nop 0
+       adds r14 = -184, r43
+       ;;
+       nop 0
+       .mii
+       ld1 r14 = [r14]
+       nop 0
+       ;;
+       sxt1 r8 = r14
+       .mii
+       nop 0
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 2
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L54:
+       .body
+       .copy_state 2
+       .mmb
+       nop 0
+       adds r14 = -184, r43
+       nop 0
+       ;;
+       .mii
+       ld8 r8 = [r14]
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 3
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L35:
+       .body
+       .copy_state 3
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 16, r21
+       (p6) br.cond.dptk .L39
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 16, r14
+       (p6) br.cond.dptk .L41
+       .mmi
+       shladd r15 = r14, 3, r0
+       adds r14 = 8, r23
+       shladd r16 = r20, 2, r0
+       .mmb
+       shladd r18 = r20, 3, r0
+       ld8 r17 = [r23]
+       nop 0
+       ;;
+       .mfi
+       ld8 r19 = [r14]
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       adds r15 = -65, r15
+       sub r16 = 32, r16
+       ;;
+       sxt4 r15 = r15
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       shr r17 = r17, r18
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r15
+       ;;
+       adds r14 = -1, r14
+       ;;
+       .mii
+       nop 0
+       and r14 = r19, r14
+       ;;
+       shl r15 = r14, r16
+       .mii
+       nop 0
+       shr r9 = r14, r18
+       ;;
+       shl r15 = r15, r16
+       ;;
+       .mii
+       or r8 = r15, r17
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 4
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L37:
+       .body
+       .copy_state 4
+       .mfi
+       shladd r15 = r14, 3, r0
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       ld8 r17 = [r23], 8
+       shladd r18 = r20, 3, r0
+       ;;
+       adds r15 = -65, r15
+       .mii
+       ld8 r19 = [r23]
+       sub r16 = 64, r18
+       ;;
+       sxt4 r15 = r15
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       ;;
+       shl r14 = r14, r15
+       .mii
+       nop 0
+       shr r17 = r17, r18
+       ;;
+       adds r14 = -1, r14
+       ;;
+       .mii
+       nop 0
+       and r14 = r19, r14
+       ;;
+       shl r14 = r14, r16
+       ;;
+       .mii
+       or r8 = r14, r17
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 5
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L39:
+       .body
+       .copy_state 5
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 24, r21
+       (p6) br.cond.dptk .L43
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 24, r14
+       (p6) br.cond.dptk .L45
+       .mmi
+       shladd r15 = r14, 3, r0
+       adds r14 = 8, r23
+       shladd r16 = r20, 2, r0
+       .mmb
+       shladd r19 = r20, 3, r0
+       ld8 r18 = [r23], 16
+       nop 0
+       ;;
+       .mmi
+       ld8 r17 = [r14]
+       addl r14 = 2, r0
+       adds r15 = -65, r15
+       .mmb
+       sub r16 = 32, r16
+       ld8 r20 = [r23]
+       nop 0
+       ;;
+       .mii
+       nop 0
+       sxt4 r15 = r15
+       sxt4 r16 = r16
+       .mii
+       nop 0
+       shr r18 = r18, r19
+       ;;
+       shl r14 = r14, r15
+       .mii
+       nop 0
+       shl r15 = r17, r16
+       shr r17 = r17, r19
+       ;;
+       .mii
+       nop 0
+       shl r15 = r15, r16
+       adds r14 = -1, r14
+       ;;
+       .mii
+       and r14 = r20, r14
+       or r8 = r15, r18
+       ;;
+       shl r15 = r14, r16
+       .mii
+       nop 0
+       shr r10 = r14, r19
+       ;;
+       shl r15 = r15, r16
+       ;;
+       .mii
+       or r9 = r15, r17
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 6
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L41:
+       .body
+       .copy_state 6
+       .mfi
+       shladd r16 = r14, 3, r0
+       nop 0
+       adds r14 = 8, r23
+       .mfi
+       ld8 r18 = [r23], 16
+       nop 0
+       shladd r15 = r20, 3, r0
+       ;;
+       .mmi
+       ld8 r17 = [r14]
+       addl r14 = 2, r0
+       adds r16 = -129, r16
+       .mmi
+       ld8 r20 = [r23]
+       mov r19 = r15
+       sub r15 = 64, r15
+       ;;
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       sxt4 r15 = r15
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r16
+       shr r18 = r18, r19
+       .mii
+       nop 0
+       shl r16 = r17, r15
+       shr r17 = r17, r19
+       ;;
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r20, r14
+       or r8 = r16, r18
+       ;;
+       .mib
+       nop 0
+       shl r14 = r14, r15
+       nop 0
+       ;;
+       .mii
+       or r9 = r14, r17
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 7
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L45:
+       .body
+       .copy_state 7
+       .mmi
+       shladd r16 = r14, 3, r0
+       adds r14 = 24, r23
+       shladd r15 = r20, 3, r0
+       .mmi
+       adds r18 = 8, r23
+       ld8 r20 = [r23]
+       adds r19 = 16, r23
+       ;;
+       .mmi
+       ld8 r22 = [r14]
+       addl r14 = 2, r0
+       adds r16 = -129, r16
+       .mmi
+       mov r17 = r15
+       ld8 r18 = [r18]
+       sub r15 = 64, r15
+       ;;
+       .mib
+       nop 0
+       sxt4 r16 = r16
+       nop 0
+       .mii
+       ld8 r19 = [r19]
+       sxt4 r15 = r15
+       ;;
+       shl r14 = r14, r16
+       .mii
+       nop 0
+       shr r21 = r19, r17
+       shl r16 = r18, r15
+       .mii
+       nop 0
+       shr r20 = r20, r17
+       shr r18 = r18, r17
+       .mii
+       nop 0
+       shl r19 = r19, r15
+       ;;
+       nop 0
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r22, r14
+       or r8 = r16, r20
+       .mii
+       nop 0
+       or r9 = r19, r18
+       ;;
+       shl r14 = r14, r15
+       ;;
+       .mii
+       or r10 = r14, r21
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 8
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L43:
+       .body
+       .copy_state 8
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 32, r14
+       (p6) br.cond.dptk .L47
+       .mmi
+       adds r15 = 24, r23
+       shladd r14 = r14, 3, r0
+       adds r17 = 8, r23
+       .mmi
+       shladd r16 = r20, 2, r0
+       adds r18 = 16, r23
+       shladd r20 = r20, 3, r0
+       ;;
+       .mmi
+       nop 0
+       ld8 r22 = [r15]
+       addl r15 = 2, r0
+       .mmi
+       adds r14 = -65, r14
+       ld8 r19 = [r17]
+       sub r16 = 32, r16
+       ;;
+       .mii
+       nop 0
+       sxt4 r14 = r14
+       sxt4 r16 = r16
+       .mmb
+       ld8 r21 = [r18]
+       ld8 r18 = [r23]
+       nop 0
+       ;;
+       .mii
+       nop 0
+       shl r15 = r15, r14
+       shl r14 = r19, r16
+       .mii
+       nop 0
+       shr r18 = r18, r20
+       shl r17 = r21, r16
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r16
+       shr r19 = r19, r20
+       .mii
+       adds r15 = -1, r15
+       shl r17 = r17, r16
+       shr r21 = r21, r20
+       ;;
+       .mmi
+       nop 0
+       and r15 = r22, r15
+       or r8 = r14, r18
+       .mmi
+       or r9 = r17, r19
+       ;;
+       nop 0
+       shl r14 = r15, r16
+       .mii
+       nop 0
+       shr r11 = r15, r20
+       ;;
+       shl r14 = r14, r16
+       ;;
+       .mii
+       or r10 = r14, r21
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 9
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L47:
+       .body
+       .copy_state 9
+       .mmb
+       shladd r16 = r14, 3, r0
+       adds r14 = 32, r23
+       nop 0
+       .mmi
+       adds r18 = 8, r23
+       adds r19 = 16, r23
+       shladd r15 = r20, 3, r0
+       ;;
+       .mfi
+       ld8 r22 = [r14]
+       nop 0
+       adds r14 = 24, r23
+       .mmi
+       ld8 r20 = [r18]
+       adds r16 = -129, r16
+       mov r17 = r15
+       .mfi
+       ld8 r18 = [r19]
+       nop 0
+       sub r15 = 64, r15
+       ;;
+       .mmi
+       ld8 r19 = [r14]
+       addl r14 = 2, r0
+       sxt4 r16 = r16
+       .mii
+       nop 0
+       sxt4 r15 = r15
+       ;;
+       shl r21 = r20, r15
+       .mii
+       nop 0
+       shr r20 = r20, r17
+       shl r14 = r14, r16
+       .mii
+       ld8 r16 = [r23]
+       shr r23 = r19, r17
+       shl r19 = r19, r15
+       ;;
+       .mii
+       nop 0
+       shr r16 = r16, r17
+       shr r17 = r18, r17
+       .mii
+       adds r14 = -1, r14
+       shl r18 = r18, r15
+       ;;
+       and r14 = r22, r14
+       .mmi
+       nop 0
+       or r8 = r21, r16
+       or r10 = r19, r17
+       .mii
+       nop 0
+       or r9 = r18, r20
+       ;;
+       shl r14 = r14, r15
+       ;;
+       .mii
+       or r11 = r14, r23
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+       .endp vacall_receiver#
+       .ident  "GCC: (GNU) 4.0.1"
diff --git a/vacall/vacall-ia64-macro.S b/vacall/vacall-ia64-macro.S
new file mode 100644 (file)
index 0000000..23fcb30
--- /dev/null
@@ -0,0 +1,845 @@
+       .file   "vacall-ia64.c"
+       .pred.safe_across_calls p1-p5,p16-p63
+       .text
+       .align 16
+       .global vacall_receiver#
+       .proc vacall_receiver#
+vacall_receiver:
+       .prologue 14, 41
+       .spill 48
+       .mmb
+       .save ar.pfs, r42
+       alloc r42 = ar.pfs, 8, 5, 1, 0
+       .vframe r43
+       mov r43 = r12
+       nop 0
+       .mmi
+       adds r12 = -208, r12
+       mov r44 = r1
+       .save rp, r41
+       mov r41 = b0
+       .body
+       ;;
+       .mmi
+       adds r14 = -48, r43
+       adds r16 = -48, r43
+       adds r40 = -152, r43
+       .mmb
+       adds r45 = -192, r43
+       st8 [r43] = r38
+       nop 0
+       ;;
+       .mmi
+       nop 0
+       st8 [r14] = r32, 8
+       adds r32 = -160, r43
+       .mmi
+       st4 [r40] = r0
+       ;;
+       st8 [r14] = r33
+       adds r14 = -32, r43
+       .mmi
+       st4 [r45] = r0
+       ;;
+       st8 [r14] = r34
+       addl r14 = @ltoffx(vacall_function#), r1
+       .mmb
+       nop 0
+       st8 [r32] = r0
+       nop 0
+       ;;
+       .mmi
+       ld8.mov r14 = [r14], vacall_function#
+       ;;
+       ld8 r15 = [r14]
+       nop 0
+       .mmi
+       adds r14 = -24, r43
+       ;;
+       st8 [r14] = r35
+       adds r14 = -16, r43
+       ;;
+       .mfi
+       st8 [r14] = r36
+       nop 0
+       adds r14 = -8, r43
+       .mmi
+       nop 0
+       ;;
+       st8 [r14] = r37
+       nop 0
+       .mmi
+       adds r14 = 8, r43
+       ;;
+       st8 [r14] = r39
+       adds r14 = -112, r43
+       ;;
+       .mfi
+       stfd [r14] = f8
+       nop 0
+       adds r14 = -104, r43
+       .mmi
+       nop 0
+       ;;
+       stfd [r14] = f9
+       nop 0
+       .mmi
+       adds r14 = -96, r43
+       ;;
+       stfd [r14] = f10
+       adds r14 = -88, r43
+       ;;
+       .mfi
+       stfd [r14] = f11
+       nop 0
+       adds r14 = -80, r43
+       .mmi
+       nop 0
+       ;;
+       stfd [r14] = f12
+       nop 0
+       .mmi
+       adds r14 = -72, r43
+       ;;
+       stfd [r14] = f13
+       adds r14 = -64, r43
+       ;;
+       .mfi
+       stfd [r14] = f14
+       nop 0
+       adds r14 = -56, r43
+       .mmi
+       nop 0
+       ;;
+       stfd [r14] = f15
+       nop 0
+       .mmi
+       adds r14 = -168, r43
+       ;;
+       st8 [r14] = r16
+       adds r14 = -128, r43
+       ;;
+       .mii
+       st8 [r14] = r16
+       adds r14 = -120, r43
+       ;;
+       nop 0
+       .mii
+       st4 [r14] = r0
+       adds r14 = -136, r43
+       ;;
+       nop 0
+       .mmb
+       st8 [r14] = r8
+       ld8 r14 = [r15], 8
+       nop 0
+       ;;
+       .mib
+       nop 0
+       mov b6 = r14
+       nop 0
+       .mbb
+       ld8 r1 = [r15]
+       nop 0
+       br.call.sptk.many b0 = b6
+       ;;
+       .mmb
+       mov r1 = r44
+       ld4 r40 = [r40]
+       nop 0
+       ;;
+       .mfb
+       cmp4.eq p6, p7 = 0, r40
+       nop 0
+       (p6) br.cond.dpnt .L49
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 1, r40
+       nop 0
+       (p7) br.cond.dpnt .L50
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 2, r40
+       nop 0
+       (p7) br.cond.dpnt .L50
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 3, r40
+       ;;
+       (p7) adds r14 = -184, r43
+       ;;
+       .mfb
+       (p7) ld1 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 4, r40
+       ;;
+       nop 0
+       .mmi
+       (p7) adds r14 = -184, r43
+       ;;
+       (p7) ld2 r14 = [r14]
+       nop 0
+       ;;
+       .mib
+       nop 0
+       (p7) sxt2 r8 = r14
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 5, r40
+       ;;
+       (p7) adds r14 = -184, r43
+       ;;
+       .mfb
+       (p7) ld2 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 6, r40
+       ;;
+       nop 0
+       .mmi
+       (p7) adds r14 = -184, r43
+       ;;
+       (p7) ld4 r14 = [r14]
+       nop 0
+       ;;
+       .mib
+       nop 0
+       (p7) sxt4 r8 = r14
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 7, r40
+       ;;
+       (p7) adds r14 = -184, r43
+       ;;
+       .mfb
+       (p7) ld4 r8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mfb
+       cmp4.ne p6, p7 = 8, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 9, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 10, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mfb
+       cmp4.ne p6, p7 = 11, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 12, r40
+       ;;
+       (p7) adds r14 = -184, r43
+       ;;
+       .mfb
+       (p7) ldfs f8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mii
+       nop 0
+       cmp4.ne p6, p7 = 13, r40
+       ;;
+       (p7) adds r14 = -184, r43
+       ;;
+       .mfb
+       (p7) ldfd f8 = [r14]
+       nop 0
+       (p7) br.cond.dpnt .L49
+       .mfb
+       cmp4.ne p6, p7 = 14, r40
+       nop 0
+       (p7) br.cond.dpnt .L54
+       ;;
+       .mib
+       nop 0
+       cmp4.ne p6, p7 = 15, r40
+       (p6) br.cond.dptk .L49
+       .mii
+       nop 0
+       adds r15 = -192, r43
+       ;;
+       nop 0
+       .mmi
+       ld4 r14 = [r15]
+       ;;
+       nop 0
+       tbit.z p6, p7 = r14, 10
+       .mfb
+       adds r14 = -144, r43
+       nop 0
+       (p6) br.cond.dpnt .L49
+       ;;
+       .mmi
+       ld8 r21 = [r14]
+       ;;
+       adds r14 = -1, r21
+       nop 0
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 31, r14
+       (p6) br.cond.dpnt .L49
+       .mmi
+       ld8 r14 = [r32]
+       ;;
+       and r20 = 7, r14
+       and r23 = -8, r14
+       .mii
+       nop 0
+       cmp.ltu p6, p7 = 8, r21
+       ;;
+       nop 0
+       .mfb
+       add r14 = r21, r20
+       nop 0
+       (p6) br.cond.dptk .L35
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 8, r14
+       (p6) br.cond.dptk .L37
+       .mfi
+       shladd r15 = r14, 3, r0
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       ld8 r16 = [r23]
+       shladd r17 = r20, 3, r0
+       ;;
+       adds r15 = -1, r15
+       ;;
+       .mii
+       nop 0
+       sxt4 r15 = r15
+       ;;
+       shl r14 = r14, r15
+       ;;
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r16, r14
+       nop 0
+       .mmi
+       nop 0
+       ;;
+       nop 0
+       shr r8 = r14, r17
+.L49:
+       .mii
+       nop 0
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 1
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L50:
+       .body
+       .copy_state 1
+       .mii
+       nop 0
+       adds r14 = -184, r43
+       ;;
+       nop 0
+       .mii
+       ld1 r14 = [r14]
+       nop 0
+       ;;
+       sxt1 r8 = r14
+       .mii
+       nop 0
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 2
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L54:
+       .body
+       .copy_state 2
+       .mmb
+       nop 0
+       adds r14 = -184, r43
+       nop 0
+       ;;
+       .mii
+       ld8 r8 = [r14]
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 3
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L35:
+       .body
+       .copy_state 3
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 16, r21
+       (p6) br.cond.dptk .L39
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 16, r14
+       (p6) br.cond.dptk .L41
+       .mmi
+       shladd r15 = r14, 3, r0
+       adds r14 = 8, r23
+       shladd r16 = r20, 2, r0
+       .mmb
+       shladd r18 = r20, 3, r0
+       ld8 r17 = [r23]
+       nop 0
+       ;;
+       .mfi
+       ld8 r19 = [r14]
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       adds r15 = -65, r15
+       sub r16 = 32, r16
+       ;;
+       sxt4 r15 = r15
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       shr r17 = r17, r18
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r15
+       ;;
+       adds r14 = -1, r14
+       ;;
+       .mii
+       nop 0
+       and r14 = r19, r14
+       ;;
+       shl r15 = r14, r16
+       .mii
+       nop 0
+       shr r9 = r14, r18
+       ;;
+       shl r15 = r15, r16
+       ;;
+       .mii
+       or r8 = r15, r17
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 4
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L37:
+       .body
+       .copy_state 4
+       .mfi
+       shladd r15 = r14, 3, r0
+       nop 0
+       addl r14 = 2, r0
+       .mii
+       ld8 r17 = [r23], 8
+       shladd r18 = r20, 3, r0
+       ;;
+       adds r15 = -65, r15
+       .mii
+       ld8 r19 = [r23]
+       sub r16 = 64, r18
+       ;;
+       sxt4 r15 = r15
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       ;;
+       shl r14 = r14, r15
+       .mii
+       nop 0
+       shr r17 = r17, r18
+       ;;
+       adds r14 = -1, r14
+       ;;
+       .mii
+       nop 0
+       and r14 = r19, r14
+       ;;
+       shl r14 = r14, r16
+       ;;
+       .mii
+       or r8 = r14, r17
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 5
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L39:
+       .body
+       .copy_state 5
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 24, r21
+       (p6) br.cond.dptk .L43
+       ;;
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 24, r14
+       (p6) br.cond.dptk .L45
+       .mmi
+       shladd r15 = r14, 3, r0
+       adds r14 = 8, r23
+       shladd r16 = r20, 2, r0
+       .mmb
+       shladd r19 = r20, 3, r0
+       ld8 r18 = [r23], 16
+       nop 0
+       ;;
+       .mmi
+       ld8 r17 = [r14]
+       addl r14 = 2, r0
+       adds r15 = -65, r15
+       .mmb
+       sub r16 = 32, r16
+       ld8 r20 = [r23]
+       nop 0
+       ;;
+       .mii
+       nop 0
+       sxt4 r15 = r15
+       sxt4 r16 = r16
+       .mii
+       nop 0
+       shr r18 = r18, r19
+       ;;
+       shl r14 = r14, r15
+       .mii
+       nop 0
+       shl r15 = r17, r16
+       shr r17 = r17, r19
+       ;;
+       .mii
+       nop 0
+       shl r15 = r15, r16
+       adds r14 = -1, r14
+       ;;
+       .mii
+       and r14 = r20, r14
+       or r8 = r15, r18
+       ;;
+       shl r15 = r14, r16
+       .mii
+       nop 0
+       shr r10 = r14, r19
+       ;;
+       shl r15 = r15, r16
+       ;;
+       .mii
+       or r9 = r15, r17
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 6
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L41:
+       .body
+       .copy_state 6
+       .mfi
+       shladd r16 = r14, 3, r0
+       nop 0
+       adds r14 = 8, r23
+       .mfi
+       ld8 r18 = [r23], 16
+       nop 0
+       shladd r15 = r20, 3, r0
+       ;;
+       .mmi
+       ld8 r17 = [r14]
+       addl r14 = 2, r0
+       adds r16 = -129, r16
+       .mmi
+       ld8 r20 = [r23]
+       mov r19 = r15
+       sub r15 = 64, r15
+       ;;
+       .mii
+       nop 0
+       sxt4 r16 = r16
+       sxt4 r15 = r15
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r16
+       shr r18 = r18, r19
+       .mii
+       nop 0
+       shl r16 = r17, r15
+       shr r17 = r17, r19
+       ;;
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r20, r14
+       or r8 = r16, r18
+       ;;
+       .mib
+       nop 0
+       shl r14 = r14, r15
+       nop 0
+       ;;
+       .mii
+       or r9 = r14, r17
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 7
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L45:
+       .body
+       .copy_state 7
+       .mmi
+       shladd r16 = r14, 3, r0
+       adds r14 = 24, r23
+       shladd r15 = r20, 3, r0
+       .mmi
+       adds r18 = 8, r23
+       ld8 r20 = [r23]
+       adds r19 = 16, r23
+       ;;
+       .mmi
+       ld8 r22 = [r14]
+       addl r14 = 2, r0
+       adds r16 = -129, r16
+       .mmi
+       mov r17 = r15
+       ld8 r18 = [r18]
+       sub r15 = 64, r15
+       ;;
+       .mib
+       nop 0
+       sxt4 r16 = r16
+       nop 0
+       .mii
+       ld8 r19 = [r19]
+       sxt4 r15 = r15
+       ;;
+       shl r14 = r14, r16
+       .mii
+       nop 0
+       shr r21 = r19, r17
+       shl r16 = r18, r15
+       .mii
+       nop 0
+       shr r20 = r20, r17
+       shr r18 = r18, r17
+       .mii
+       nop 0
+       shl r19 = r19, r15
+       ;;
+       nop 0
+       .mmi
+       adds r14 = -1, r14
+       ;;
+       and r14 = r22, r14
+       or r8 = r16, r20
+       .mii
+       nop 0
+       or r9 = r19, r18
+       ;;
+       shl r14 = r14, r15
+       ;;
+       .mii
+       or r10 = r14, r21
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 8
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L43:
+       .body
+       .copy_state 8
+       .mib
+       nop 0
+       cmp.ltu p6, p7 = 32, r14
+       (p6) br.cond.dptk .L47
+       .mmi
+       adds r15 = 24, r23
+       shladd r14 = r14, 3, r0
+       adds r17 = 8, r23
+       .mmi
+       shladd r16 = r20, 2, r0
+       adds r18 = 16, r23
+       shladd r20 = r20, 3, r0
+       ;;
+       .mmi
+       nop 0
+       ld8 r22 = [r15]
+       addl r15 = 2, r0
+       .mmi
+       adds r14 = -65, r14
+       ld8 r19 = [r17]
+       sub r16 = 32, r16
+       ;;
+       .mii
+       nop 0
+       sxt4 r14 = r14
+       sxt4 r16 = r16
+       .mmb
+       ld8 r21 = [r18]
+       ld8 r18 = [r23]
+       nop 0
+       ;;
+       .mii
+       nop 0
+       shl r15 = r15, r14
+       shl r14 = r19, r16
+       .mii
+       nop 0
+       shr r18 = r18, r20
+       shl r17 = r21, r16
+       ;;
+       .mii
+       nop 0
+       shl r14 = r14, r16
+       shr r19 = r19, r20
+       .mii
+       adds r15 = -1, r15
+       shl r17 = r17, r16
+       shr r21 = r21, r20
+       ;;
+       .mmi
+       nop 0
+       and r15 = r22, r15
+       or r8 = r14, r18
+       .mmi
+       or r9 = r17, r19
+       ;;
+       nop 0
+       shl r14 = r15, r16
+       .mii
+       nop 0
+       shr r11 = r15, r20
+       ;;
+       shl r14 = r14, r16
+       ;;
+       .mii
+       or r10 = r14, r21
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .label_state 9
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+.L47:
+       .body
+       .copy_state 9
+       .mmb
+       shladd r16 = r14, 3, r0
+       adds r14 = 32, r23
+       nop 0
+       .mmi
+       adds r18 = 8, r23
+       adds r19 = 16, r23
+       shladd r15 = r20, 3, r0
+       ;;
+       .mfi
+       ld8 r22 = [r14]
+       nop 0
+       adds r14 = 24, r23
+       .mmi
+       ld8 r20 = [r18]
+       adds r16 = -129, r16
+       mov r17 = r15
+       .mfi
+       ld8 r18 = [r19]
+       nop 0
+       sub r15 = 64, r15
+       ;;
+       .mmi
+       ld8 r19 = [r14]
+       addl r14 = 2, r0
+       sxt4 r16 = r16
+       .mii
+       nop 0
+       sxt4 r15 = r15
+       ;;
+       shl r21 = r20, r15
+       .mii
+       nop 0
+       shr r20 = r20, r17
+       shl r14 = r14, r16
+       .mii
+       ld8 r16 = [r23]
+       shr r23 = r19, r17
+       shl r19 = r19, r15
+       ;;
+       .mii
+       nop 0
+       shr r16 = r16, r17
+       shr r17 = r18, r17
+       .mii
+       adds r14 = -1, r14
+       shl r18 = r18, r15
+       ;;
+       and r14 = r22, r14
+       .mmi
+       nop 0
+       or r8 = r21, r16
+       or r10 = r19, r17
+       .mii
+       nop 0
+       or r9 = r18, r20
+       ;;
+       shl r14 = r14, r15
+       ;;
+       .mii
+       or r11 = r14, r23
+       mov ar.pfs = r42
+       mov b0 = r41
+       .mib
+       nop 0
+       .restore sp
+       mov r12 = r43
+       br.ret.sptk.many b0
+       .endp vacall_receiver#
+       .ident  "GCC: (GNU) 4.0.1"
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-ia64.c b/vacall/vacall-ia64.c
new file mode 100644 (file)
index 0000000..0bdbc7d
--- /dev/null
@@ -0,0 +1,282 @@
+/* vacall function for ia64 CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *             env     __asm__("r15");
+#endif
+register double                farg1   __asm__("f8");
+register double                farg2   __asm__("f9");
+register double                farg3   __asm__("f10");
+register double                farg4   __asm__("f11");
+register double                farg5   __asm__("f12");
+register double                farg6   __asm__("f13");
+register double                farg7   __asm__("f14");
+register double                farg8   __asm__("f15");
+register __vaword*     sret    __asm__("r8");
+register __vaword      iret    __asm__("r8");
+register __vaword      iret2   __asm__("r9");
+register __vaword      iret3   __asm__("r10");
+register __vaword      iret4   __asm__("r11");
+register float         fret    __asm__("f8");
+register double                dret    __asm__("f8");
+
+/* The ABI requires that the first 8 general-purpose argument words are
+   being passed in registers, even if these words belong to a struct. No room
+   is allocated for these register words on the stack by the caller, but the
+   callee allocates room for them - at the right place in the stack frame,
+   that is, above the usual {fp, retaddr} combo - if and only if they are part
+   of a larger struct that extends to the stack and the address of this struct
+   is taken. */
+struct gpargsequence {
+  __vaword word1; /* r32 */
+  __vaword word2; /* r33 */
+  __vaword word3; /* r34 */
+  __vaword word4; /* r35 */
+  __vaword word5; /* r36 */
+  __vaword word6; /* r37 */
+  __vaword word7; /* r38 */
+  __vaword word8; /* r39 */
+  __vaword firststackword;
+};
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (struct gpargsequence gpargs)
+{
+  __va_alist list;
+  /* Move the arguments passed in registers to their stack locations. */
+  list.farg[0] = farg1;
+  list.farg[1] = farg2;
+  list.farg[2] = farg3;
+  list.farg[3] = farg4;
+  list.farg[4] = farg5;
+  list.farg[5] = farg6;
+  list.farg[6] = farg7;
+  list.farg[7] = farg8;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&gpargs;
+  list.saptr = (__vaword*)&gpargs;
+  list.fanum = 0;
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.structraddr = sret;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulonglong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      /* Return structs of size <= 32 in registers. */
+      if (list.rsize > 0 && list.rsize <= 32) {
+        #if 0 /* Unoptimized */
+        iret = (__vaword)((unsigned char *) list.raddr)[0];
+        if (list.rsize >= 2)
+          iret |= (__vaword)((unsigned char *) list.raddr)[1] << 8;
+        if (list.rsize >= 3)
+          iret |= (__vaword)((unsigned char *) list.raddr)[2] << 16;
+        if (list.rsize >= 4)
+          iret |= (__vaword)((unsigned char *) list.raddr)[3] << 24;
+        if (list.rsize >= 5)
+          iret |= (__vaword)((unsigned char *) list.raddr)[4] << 32;
+        if (list.rsize >= 6)
+          iret |= (__vaword)((unsigned char *) list.raddr)[5] << 40;
+        if (list.rsize >= 7)
+          iret |= (__vaword)((unsigned char *) list.raddr)[6] << 48;
+        if (list.rsize >= 8)
+          iret |= (__vaword)((unsigned char *) list.raddr)[7] << 56;
+        if (list.rsize >= 9) {
+          iret2 = (__vaword)((unsigned char *) list.raddr)[8];
+          if (list.rsize >= 10)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[9] << 8;
+          if (list.rsize >= 11)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[10] << 16;
+          if (list.rsize >= 12)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[11] << 24;
+          if (list.rsize >= 13)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[12] << 32;
+          if (list.rsize >= 14)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[13] << 40;
+          if (list.rsize >= 15)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[14] << 48;
+          if (list.rsize >= 16)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[15] << 56;
+          if (list.rsize >= 17) {
+            iret3 = (__vaword)((unsigned char *) list.raddr)[16];
+            if (list.rsize >= 18)
+              iret3 |= (__vaword)((unsigned char *) list.raddr)[17] << 8;
+            if (list.rsize >= 19)
+              iret3 |= (__vaword)((unsigned char *) list.raddr)[18] << 16;
+            if (list.rsize >= 20)
+              iret3 |= (__vaword)((unsigned char *) list.raddr)[19] << 24;
+            if (list.rsize >= 21)
+              iret3 |= (__vaword)((unsigned char *) list.raddr)[20] << 32;
+            if (list.rsize >= 22)
+              iret3 |= (__vaword)((unsigned char *) list.raddr)[21] << 40;
+            if (list.rsize >= 23)
+              iret3 |= (__vaword)((unsigned char *) list.raddr)[22] << 48;
+            if (list.rsize >= 24)
+              iret3 |= (__vaword)((unsigned char *) list.raddr)[23] << 56;
+            if (list.rsize >= 25) {
+              iret4 = (__vaword)((unsigned char *) list.raddr)[24];
+              if (list.rsize >= 26)
+                iret4 |= (__vaword)((unsigned char *) list.raddr)[25] << 8;
+              if (list.rsize >= 27)
+                iret4 |= (__vaword)((unsigned char *) list.raddr)[26] << 16;
+              if (list.rsize >= 28)
+                iret4 |= (__vaword)((unsigned char *) list.raddr)[27] << 24;
+              if (list.rsize >= 29)
+                iret4 |= (__vaword)((unsigned char *) list.raddr)[28] << 32;
+              if (list.rsize >= 30)
+                iret4 |= (__vaword)((unsigned char *) list.raddr)[29] << 40;
+              if (list.rsize >= 31)
+                iret4 |= (__vaword)((unsigned char *) list.raddr)[30] << 48;
+              if (list.rsize >= 32)
+                iret4 |= (__vaword)((unsigned char *) list.raddr)[31] << 56;
+            }
+          }
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = list.rsize; /* > 0, ≤ 4*sizeof(__vaword) */
+        __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+        uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 5*sizeof(__vaword) */
+        if (count <= sizeof(__vaword)) {
+          /* Assign iret. */
+          if (end_offset <= sizeof(__vaword)) {
+            /* 0 < end_offset ≤ sizeof(__vaword) */
+            __vaword mask0 = ((__vaword)2 << (end_offset*8-1)) - 1;
+            iret = (wordaddr[0] & mask0) >> (start_offset*8);
+          } else {
+            /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        } else if (count <= 2*sizeof(__vaword)) {
+          /* Assign iret, iret2. */
+          if (end_offset <= 2*sizeof(__vaword)) {
+            /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+            iret2 = (wordaddr[1] & mask1) >> (start_offset*8);
+          } else {
+            /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+            __vaword mask2 = ((__vaword)2 << (end_offset*8-2*sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*8-start_offset*8));
+            iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        } else if (count <= 3*sizeof(__vaword)) {
+          /* Assign iret, iret2, iret3. */
+          if (end_offset <= 3*sizeof(__vaword)) {
+            /* 2*sizeof(__vaword) < end_offset ≤ 3*sizeof(__vaword) */
+            __vaword mask2 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+            iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+            iret3 = (wordaddr[2] & mask2) >> (start_offset*8);
+          } else {
+            /* 3*sizeof(__vaword) < end_offset < 4*sizeof(__vaword), start_offset > 0 */
+            __vaword mask3 = ((__vaword)2 << (end_offset*8-2*sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*8-start_offset*8));
+            iret2 = (wordaddr[1] >> (start_offset*8)) | (wordaddr[2] << (sizeof(__vaword)*8-start_offset*8));
+            iret3 = (wordaddr[2] >> (start_offset*8)) | ((wordaddr[3] & mask3) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        } else {
+          /* Assign iret, iret2, iret3, iret4. */
+          if (end_offset <= 4*sizeof(__vaword)) {
+            /* 3*sizeof(__vaword) < end_offset ≤ 4*sizeof(__vaword) */
+            __vaword mask3 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+            iret2 = (wordaddr[1] >> (start_offset*8)) | (wordaddr[2] << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+            iret3 = (wordaddr[2] >> (start_offset*8)) | ((wordaddr[3] & mask3) << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+            iret4 = (wordaddr[3] & mask3) >> (start_offset*8);
+          } else {
+            /* 4*sizeof(__vaword) < end_offset < 5*sizeof(__vaword), start_offset > 0 */
+            __vaword mask4 = ((__vaword)2 << (end_offset*8-2*sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*8-start_offset*8));
+            iret2 = (wordaddr[1] >> (start_offset*8)) | (wordaddr[2] << (sizeof(__vaword)*8-start_offset*8));
+            iret3 = (wordaddr[2] >> (start_offset*8)) | (wordaddr[3] << (sizeof(__vaword)*8-start_offset*8));
+            iret4 = (wordaddr[3] >> (start_offset*8)) | ((wordaddr[4] & mask4) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        }
+        #endif
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-internal.h b/vacall/vacall-internal.h
new file mode 100644 (file)
index 0000000..e29a6d4
--- /dev/null
@@ -0,0 +1,1204 @@
+/*
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#ifndef _VACALL_INTERNAL_H
+#define _VACALL_INTERNAL_H
+
+/* Get intptr_t, uintptr_t. */
+#include "ffcall-stdint.h"
+
+/* Include the public definitions,  */
+#ifndef REENTRANT
+#include "vacall.h"
+#else
+#include "vacall_r.h"
+#endif
+
+
+/* The platform indicator symbols (__i386__, etc.) come from
+   - "config.h" when compiling vacall-libapi.c,
+   - the GCC command line options when compiling vacall-$(CPU).c.
+ */
+
+/* These two variants of powerpc ABIs are quite different. */
+#if defined(__powerpc__) && !defined(__powerpc64__)
+#if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__))
+#define __powerpc_aix__ 1
+#else
+#define __powerpc_sysv4__ 1
+#endif
+#endif
+
+/* The Unix and Windows variants of x86_64 ABIs are quite different. */
+#if defined(__x86_64__)
+#if defined(_WIN32) || defined(__CYGWIN__)
+#define __x86_64_ms__ 1
+#else
+#define __x86_64_sysv__ 1
+#endif
+#endif
+
+
+/* Max # words in temporary structure storage.
+ */
+#ifndef __VA_ALIST_WORDS
+#define __VA_ALIST_WORDS  256
+#endif
+
+/*
+ * Definition of the ‘__va_alist’ type.
+ */
+/* Note: This struct must not contain members of type 'long' or 'unsigned long',
+   because in the mingw port we use precompiled code that assumes 'long' is
+   64-bit whereas avcall-libapi.c is then compiled by a compiler that has a
+   32-bit 'long' type. */
+typedef struct vacall_alist
+{
+  /* some va_... macros need these flags */
+  int            flags;
+  /* temporary storage for return value */
+#if defined(__i386__) || defined(__arm__) || defined(__armhf__) || (defined(__powerpc__) && !defined(__powerpc64__) && defined(__MACH__) && defined(__APPLE__))
+  /* Filler word, needed if the numbers of words up to now in this structure */
+  /* is odd.                                                                 */
+  /* - On MSVC, alignof(double) = 8, but normally on i386 it is = 4.         */
+  /* - On ARM, GCC 3.1 produces code for an ABI where alignof(double) = 4    */
+  /*   and alignof(long long) = 4. But in the newer AAPCS ABI, these         */
+  /*   alignments are 8.                                                     */
+  /* - On Mac OS X, the Apple compiler has alignof(double) = 8 whereas the   */
+  /*   standard GCC has alignof(double) = 4.                                 */
+  __vaword       filler1;
+#endif
+  union {
+    char                _char;
+    signed char         _schar;
+    unsigned char       _uchar;
+    short               _short;
+    unsigned short      _ushort;
+    int                 _int;
+    unsigned int        _uint;
+    long                _long;
+    unsigned long       _ulong;
+#if !(defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm64__) || defined(__powerpc64__) || defined(__ia64__) || defined(__riscv64__))
+    long long           _longlong;
+    unsigned long long  _ulonglong;
+#endif
+    float               _float;
+    double              _double;
+    void*               _ptr;
+    __vaword            _words[2];
+  }              tmp;
+  /* current pointer into the argument array */
+  uintptr_t      aptr;
+  /* structure return pointer, return type, return type size */
+  void*          raddr;
+  enum __VAtype  rtype;
+  uintptr_t      rsize;
+#if defined(__i386__) || defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) || defined(__hppa__) || defined(__hppa64__) || defined(__arm64__) || defined(__ia64__)
+  void*          structraddr;
+#endif
+#if (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) || defined(__alpha__) || defined(__hppa__) || defined(__hppa64__)
+  uintptr_t      memargptr;
+#endif
+#if defined(__alpha__)
+  long           farg_offset;
+  double         farg[6];
+#endif
+#if defined(__hppa__) && !defined(__hppa64__)
+  long           farg_offset;
+  long           darg_offset;
+  float          farg[4];
+  double         darg[2];
+#endif
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)
+  unsigned int   anum;
+#define __VA_FARG_NUM 2
+  unsigned int   fanum;
+  float          farg[__VA_FARG_NUM];
+  double         darg[__VA_FARG_NUM];
+#endif
+#if defined(__mipsn32__) || defined(__mips64__)
+  int            anum;
+#define __VA_FARG_NUM 8
+  float          farg[__VA_FARG_NUM];
+  double         darg[__VA_FARG_NUM];
+#endif
+#if defined(__sparc64__)
+  int            anum;
+  float          farg[16];
+  double         darg[16];
+#endif
+#if defined(__hppa64__)
+#define __VA_FARG_NUM 8
+  float          farg[__VA_FARG_NUM];
+  double         darg[__VA_FARG_NUM];
+#endif
+#if defined(__armhf__)
+#define __VA_IARG_NUM 4
+  /* The first __AV_IARG_NUM integer arguments are passed in registers, even if
+     some floating-point arguments have already been allocated on the stack. */
+  __vaword*      iarg;
+  unsigned int   ianum;
+  unsigned int   fanum;
+  float          farg[16];
+  double         darg[8];
+#endif
+#if defined(__arm64__)
+#define __VA_IARG_NUM 8
+  unsigned int   ianum;
+  __vaword       iarg[__VA_IARG_NUM];
+#define __VA_FARG_NUM 8
+  unsigned int   fanum;
+  float          farg[__VA_FARG_NUM];
+  double         darg[__VA_FARG_NUM];
+#endif
+#if defined(__powerpc__) || defined(__powerpc64__)
+#if defined(__powerpc_sysv4__)
+#define __VA_IARG_NUM 8
+  unsigned int   ianum;
+  __vaword       iarg[__VA_IARG_NUM];
+#define __VA_FARG_NUM 8
+#else
+#define __VA_FARG_NUM 13
+#endif
+  unsigned int   fanum;
+  double         farg[__VA_FARG_NUM];
+#endif
+#if defined(__ia64__)
+  __vaword*      saptr;
+#define __VA_FARG_NUM 8
+  unsigned int   fanum;
+  double         farg[__VA_FARG_NUM];
+#endif
+#if defined(__x86_64_sysv__)
+#define __VA_FARG_NUM 8
+  unsigned int   fanum;
+  double         farg[__VA_FARG_NUM];
+#define __VA_IARG_NUM 6
+  unsigned int   ianum;
+  __vaword       iarg[__VA_IARG_NUM];
+#endif
+#if defined(__x86_64_ms__)
+  int            anum;
+#define __VA_FARG_NUM 4
+  float          farg[__VA_FARG_NUM];
+  double         darg[__VA_FARG_NUM];
+#endif
+#if defined(__s390__) && !defined(__s390x__)
+#define __VA_IARG_NUM 5
+  unsigned int   ianum;
+  __vaword       iarg[5];
+#define __VA_FARG_NUM 2
+  unsigned int   fanum;
+  float          farg[__VA_FARG_NUM];
+  double         darg[__VA_FARG_NUM];
+#endif
+#if defined(__s390x__)
+#define __VA_IARG_NUM 5
+  unsigned int   ianum;
+  __vaword       iarg[__VA_IARG_NUM];
+#define __VA_FARG_NUM 4
+  unsigned int   fanum;
+  float          farg[__VA_FARG_NUM];
+  double         darg[__VA_FARG_NUM];
+#endif
+#if defined(__riscv32__) || defined(__riscv64__)
+#define __VA_IARG_NUM 8
+  unsigned int   ianum;
+  __vaword       iarg[__VA_IARG_NUM];
+  /* Note: iarg[7] == ((__vaword *) (initial aptr))[-1]. */
+#define __VA_FARG_NUM 8
+  unsigned int   fanum;
+  float          farg[__VA_FARG_NUM];
+  double         darg[__VA_FARG_NUM];
+#endif
+} __va_alist;
+
+
+/* Avoid macro redefinition warnings on DragonFly BSD. */
+#undef __va_start
+#undef __va_arg
+
+
+/*
+ * Definition of the va_start_xxx macros.
+ */
+
+#define __va_start(LIST,RETTYPE,FLAGS)  \
+  ((LIST)->flags = (FLAGS),                                            \
+   (LIST)->rtype = (RETTYPE)                                           \
+  )
+
+/*
+ * va_start_struct: Preparing structure return.
+ */
+#define __va_start_struct(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE,FLAGS)  \
+  (__va_start(LIST,__VAstruct,FLAGS),                                  \
+   (LIST)->rsize = (TYPE_SIZE),                                                \
+   ((LIST)->flags & __VA_SUNPROCC_STRUCT_RETURN                                \
+    ? __va_start_struct2(LIST)                                         \
+    : ((LIST)->flags & __VA_SUNCC_STRUCT_RETURN                                \
+       ? ((TYPE_SIZE) <= sizeof(vacall_struct_buffer) || (vacall_error_struct_too_large(TYPE_SIZE), 0), \
+          (LIST)->raddr = &vacall_struct_buffer,                       \
+          0                                                            \
+         )                                                             \
+       : (((LIST)->flags & __VA_SMALL_STRUCT_RETURN)                   \
+          && __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)    \
+          ? ((LIST)->raddr = &(LIST)->tmp,                             \
+             __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \
+            )                                                          \
+          : __va_start_struct2(LIST)                                   \
+  ))  )  )
+/* Determines whether a structure is returned in registers,
+ * depending on its size and its word-splittable flag.
+ */
+#if (defined(__i386__) && defined(_WIN32))
+#define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4            \
+   || ((TYPE_SIZE) == 8                                                        \
+       && (((LIST)->flags & __VA_MSVC_STRUCT_RETURN)                   \
+           || ((TYPE_SPLITTABLE)                                       \
+               && ((LIST)->flags & __VA_GCC_STRUCT_RETURN)             \
+  )   )   )   )
+/* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if (defined(__i386__) && !defined(_WIN32)) || defined(__m68k__) || (defined(__powerpc__) && !defined(__powerpc64__)) || (defined(__s390__) && !defined(__s390x__))
+#define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4            \
+   || ((TYPE_SIZE) == 8 && (TYPE_SPLITTABLE)                           \
+       && ((LIST)->flags & __VA_GCC_STRUCT_RETURN)                     \
+  )   )
+/* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if defined(__arm__) || defined(__armhf__)
+/* structs of size 3 also will be returned in register */
+#define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) <= 4)
+/* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if defined(__alpha__)
+#define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8        \
+   || ((TYPE_SIZE) == 16 && (TYPE_SPLITTABLE)                          \
+       && ((LIST)->flags & __VA_GCC_STRUCT_RETURN)                     \
+  )   )
+/* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, 0)
+#endif
+#if (defined(__hppa__) && !defined(__hppa64__)) || defined(__riscv32__)
+#define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) <= 8)
+/* Test __VA_SMALL_STRUCT_RETURN at run time. */
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  0
+#endif
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) || (defined(__sparc__) && !defined(__sparc64__))
+#define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4)
+/* Test __VA_SMALL_STRUCT_RETURN instead of __VA_REGISTER_STRUCT_RETURN. */
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  ((LIST)->anum++,                                                     \
+   0                                                                   \
+  )
+#else
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  0
+#endif
+#endif
+#if defined(__mipsn32__) || defined(__mips64__)
+#define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((LIST)->flags & __VA_GCC_STRUCT_RETURN                              \
+   ? ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8) \
+   : ((TYPE_SIZE) <= 16)                                               \
+  )
+/* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers. Also turn on
+ * __VA_REGISTER_FLOATSTRUCT_RETURN or __VA_REGISTER_DOUBLESTRUCT_RETURN if
+ * the struct will be returned in floating-point registers.
+ */
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN,                               \
+   (TYPE_ALIGN) == sizeof(float) && (TYPE_SPLITTABLE)                          \
+    && ((TYPE_SIZE) == sizeof(float) || (TYPE_SIZE) == 2*sizeof(float))                \
+    && ((LIST)->flags |= __VA_REGISTER_FLOATSTRUCT_RETURN),                    \
+   (TYPE_ALIGN) == sizeof(double) && (TYPE_SPLITTABLE)                         \
+    && ((TYPE_SIZE) == sizeof(double) || (TYPE_SIZE) == 2*sizeof(double))      \
+    && ((LIST)->flags |= __VA_REGISTER_DOUBLESTRUCT_RETURN),                   \
+   0)
+#endif
+#if (defined(__powerpc64__) && !defined(__powerpc64_elfv2__)) || defined(__s390x__)
+#define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  0
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  0
+#endif
+#if defined(__sparc64__) || defined(__ia64__)
+#define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) <= 32)
+/* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN,                       \
+   0)
+#endif
+#if defined(__hppa64__) || defined(__arm64__) || (defined(__powerpc64__) && defined(__powerpc64_elfv2__)) || defined(__x86_64_sysv__) || defined(__riscv64__)
+#define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) <= 16)
+/* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN,                       \
+   0)
+#endif
+#if defined(__x86_64_ms__)
+#define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE)  \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8)
+/* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set
+ * and the struct will actually be returned in registers.
+ */
+#define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN,                       \
+   0)
+#endif
+/*
+ * Preparing structure return in memory.
+ */
+#if defined(__i386__) || defined(__alpha__) || (defined(__arm__) && !defined(__armhf__)) || defined(__powerpc_aix__) || defined(__powerpc64__)
+/* Return structure pointer is passed as first arg. */
+#define __va_start_struct2(LIST)  \
+  ((LIST)->raddr = *(void* *)((LIST)->aptr),                           \
+   (LIST)->aptr += sizeof(void*),                                      \
+   0                                                                   \
+  )
+#endif
+#if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__x86_64_ms__)
+/* Return structure pointer is passed as first arg. */
+#define __va_start_struct2(LIST)  \
+  ((LIST)->raddr = *(void* *)((LIST)->aptr),                           \
+   (LIST)->aptr += sizeof(void*),                                      \
+   (LIST)->anum++,                                                     \
+   0                                                                   \
+  )
+#endif
+#if defined(__armhf__)
+/* Return structure pointer is passed as first arg. */
+#define __va_start_struct2(LIST)  \
+  ((LIST)->raddr = (void*)(LIST)->iarg[(LIST)->ianum],                 \
+   (LIST)->ianum++,                                                    \
+   0                                                                   \
+  )
+#endif
+#if defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) || defined(__riscv32__) || defined(__riscv64__)
+/* Return structure pointer is passed as first arg. */
+#define __va_start_struct2(LIST)  \
+  ((LIST)->raddr = (void*)((LIST)->iarg[(LIST)->ianum++]),             \
+   0                                                                   \
+  )
+#endif
+#if defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) || defined(__hppa__) || defined(__hppa64__) || defined(__arm64__) || defined(__ia64__)
+/* Return structure pointer is passed in a special register. */
+#define __va_start_struct2(LIST)  \
+  ((LIST)->raddr = (LIST)->structraddr, 0)
+#endif
+
+
+/*
+ * Definition of the va_arg_xxx macros.
+ */
+
+/* Padding of non-struct arguments. */
+#define __va_argsize(TYPE_SIZE)  \
+  (((TYPE_SIZE) + sizeof(__vaword)-1) & -(intptr_t)sizeof(__vaword))
+#if defined(__i386__) || defined(__m68k__) || (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) || (defined(__sparc__) && !defined(__sparc64__)) || defined(__alpha__) || (defined(__arm__) && !defined(__armhf__)) || defined(__arm64__) || defined(__powerpc_aix__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) || defined(__riscv32__) || defined(__riscv64__)
+/* args grow up */
+/* small structures < 1 word are adjusted depending on compiler */
+#define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((LIST)->aptr += __va_argsize(TYPE_SIZE),                            \
+   (LIST)->aptr - __va_argsize(TYPE_SIZE)                              \
+  )
+#define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((LIST)->aptr += __va_argsize(TYPE_SIZE),                            \
+   (LIST)->aptr - ((TYPE_SIZE) < sizeof(__vaword)                      \
+                  ? (TYPE_SIZE)                                        \
+                  : __va_argsize(TYPE_SIZE)                            \
+                 )                                                     \
+  )
+#endif
+#if defined(__armhf__)
+/* args grow up */
+/* small structures < 1 word are adjusted depending on compiler */
+/* the first __VA_IARG_NUM argument words are passed in registers */
+#define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (((LIST)->ianum + ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword) <= __VA_IARG_NUM \
+    ? ((LIST)->ianum += __va_argsize(TYPE_SIZE) / sizeof(__vaword),    \
+       (char*)&(LIST)->iarg[(LIST)->ianum]                             \
+      )                                                                        \
+    : (((LIST)->aptr == (uintptr_t)&(LIST)->iarg[__VA_IARG_NUM]                \
+        ? /* split case */                                             \
+          ((LIST)->aptr = (uintptr_t)&(LIST)->iarg[(LIST)->ianum] + __va_argsize(TYPE_SIZE), \
+           0)                                                          \
+        : ((LIST)->aptr += __va_argsize(TYPE_SIZE),                    \
+           0)),                                                                \
+       (LIST)->ianum = __VA_IARG_NUM,                                  \
+       (char*)(LIST)->aptr                                             \
+   )  )                                                                        \
+   - __va_argsize(TYPE_SIZE)                                           \
+  )
+#define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (((LIST)->ianum + ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword) <= __VA_IARG_NUM \
+    ? ((LIST)->ianum += __va_argsize(TYPE_SIZE) / sizeof(__vaword),    \
+       (char*)&(LIST)->iarg[(LIST)->ianum]                             \
+      )                                                                        \
+    : (((LIST)->aptr == (uintptr_t)&(LIST)->iarg[__VA_IARG_NUM]                \
+        ? /* split case */                                             \
+          ((LIST)->aptr = (uintptr_t)&(LIST)->iarg[(LIST)->ianum] + __va_argsize(TYPE_SIZE), \
+           0)                                                          \
+        : ((LIST)->aptr += __va_argsize(TYPE_SIZE),                    \
+           0)),                                                                \
+       (LIST)->ianum = __VA_IARG_NUM,                                  \
+       (char*)(LIST)->aptr                                             \
+   )  )                                                                        \
+   - ((TYPE_SIZE) < sizeof(__vaword)                                   \
+      ? (TYPE_SIZE)                                                    \
+      : __va_argsize(TYPE_SIZE)                                                \
+     )                                                                 \
+  )
+#endif
+#if defined(__powerpc_sysv4__)
+/* args grow up */
+/* small structures < 1 word are adjusted depending on compiler */
+/* the first __VA_IARG_NUM argument words are passed in registers */
+#define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (((LIST)->ianum + ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword) <= __VA_IARG_NUM \
+    ? ((LIST)->ianum += __va_argsize(TYPE_SIZE) / sizeof(__vaword),    \
+       (char*)&(LIST)->iarg[(LIST)->ianum]                             \
+      )                                                                        \
+    : ((LIST)->aptr += __va_argsize(TYPE_SIZE),                                \
+       (char*)(LIST)->aptr                                             \
+   )  )                                                                        \
+   - __va_argsize(TYPE_SIZE)                                           \
+  )
+#define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (((LIST)->ianum + ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword) <= __VA_IARG_NUM \
+    ? ((LIST)->ianum += __va_argsize(TYPE_SIZE) / sizeof(__vaword),    \
+       (char*)&(LIST)->iarg[(LIST)->ianum]                             \
+      )                                                                        \
+    : ((LIST)->aptr += __va_argsize(TYPE_SIZE),                                \
+       (char*)(LIST)->aptr                                             \
+   )  )                                                                        \
+   - ((TYPE_SIZE) < sizeof(__vaword)                                   \
+      ? (TYPE_SIZE)                                                    \
+      : __va_argsize(TYPE_SIZE)                                                \
+     )                                                                 \
+  )
+#endif
+#if defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__x86_64_ms__)
+/* args grow up */
+/* small structures < 1 word are adjusted depending on compiler */
+#define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((LIST)->anum += __va_argsize(TYPE_SIZE)/sizeof(__vaword),           \
+   (LIST)->aptr += __va_argsize(TYPE_SIZE),                            \
+   (LIST)->aptr - __va_argsize(TYPE_SIZE)                              \
+  )
+#define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((LIST)->anum += __va_argsize(TYPE_SIZE)/sizeof(__vaword),           \
+   (LIST)->aptr += __va_argsize(TYPE_SIZE),                            \
+   (LIST)->aptr - ((TYPE_SIZE) < sizeof(__vaword)                      \
+                  ? (TYPE_SIZE)                                        \
+                  : __va_argsize(TYPE_SIZE)                            \
+                 )                                                     \
+  )
+#endif
+#if defined(__hppa__) && !defined(__hppa64__)
+/* args grow down */
+#define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((LIST)->aptr = (LIST)->aptr - __va_argsize(TYPE_SIZE),              \
+   ((TYPE_SIZE) > 4 && ((LIST)->aptr &= -8)),                          \
+   (LIST)->aptr                                                                \
+  )
+#define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((LIST)->aptr = (LIST)->aptr - __va_argsize(TYPE_SIZE),              \
+   ((TYPE_SIZE) > 4 && ((LIST)->aptr &= -8)),                          \
+   (LIST)->aptr + ((-(TYPE_SIZE)) & 3)                                 \
+  )
+#endif
+#if defined(__hppa64__)
+/* args grow up */
+#define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (((TYPE_SIZE) > 8 && ((LIST)->aptr = (((LIST)->aptr +15) & -16))),   \
+   (LIST)->aptr += __va_argsize(TYPE_SIZE),                            \
+   (LIST)->aptr - __va_argsize(TYPE_SIZE)                              \
+  )
+#define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (((TYPE_SIZE) > 8 && ((LIST)->aptr = (((LIST)->aptr +15) & -16))),   \
+   (LIST)->aptr += __va_argsize(TYPE_SIZE),                            \
+   (LIST)->aptr - ((TYPE_SIZE) < sizeof(__vaword)                      \
+                  ? (TYPE_SIZE)                                        \
+                  : __va_argsize(TYPE_SIZE)                            \
+                 )                                                     \
+  )
+#endif
+#if defined(__i386__) || ((defined(__mipsn32__) || defined(__mips64__)) && defined(_MIPSEL)) || defined(__alpha__) || ((defined(__arm__) || defined(__armhf__)) && defined(__ARMEL__)) || defined(__ia64__) || (defined(__powerpc64__) && defined(_LITTLE_ENDIAN)) || defined(__x86_64_ms__)
+/* little endian -> small args < 1 word are adjusted to the left */
+#define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)
+#endif
+#if defined(__m68k__) || ((defined(__mipsn32__) || defined(__mips64__)) && defined(_MIPSEB)) || defined(__sparc__) || defined(__sparc64__) || defined(__hppa__) || defined(__hppa64__) || ((defined(__arm__) || defined(__armhf__)) && !defined(__ARMEL__)) || (defined(__powerpc__) && !defined(__powerpc64__)) || (defined(__powerpc64__) && defined(_BIG_ENDIAN))
+/* big endian -> small args < 1 word are adjusted to the right */
+#define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)
+#endif
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)
+#ifdef _MIPSEB
+/* big endian -> small args < 1 word are adjusted to the right */
+#define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((LIST)->anum++,                                                     \
+   (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN))
+#else /* _MIPSEL */
+/* little endian -> small args < 1 word are adjusted to the left */
+#define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((LIST)->anum++,                                                     \
+   (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN))
+#endif
+#endif
+#if defined(__arm64__)
+/* the first __VA_IARG_NUM argument words are passed in registers */
+#define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((LIST)->ianum + ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword) <= __VA_IARG_NUM \
+   ? ((LIST)->ianum += ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword), \
+      &(LIST)->iarg[(LIST)->ianum - ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword)] \
+     )                                                                 \
+   : ((LIST)->ianum = __VA_IARG_NUM,                                   \
+      (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)          \
+  )  )
+#endif
+#if defined(__x86_64_sysv__)
+/* the first __VA_IARG_NUM argument words are passed in registers */
+#define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (((TYPE_SIZE) <= 2*sizeof(__vaword)                                  \
+    && (LIST)->ianum + ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword) <= __VA_IARG_NUM) \
+   ? ((LIST)->ianum += ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword), \
+      &(LIST)->iarg[(LIST)->ianum - ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword)] \
+     )                                                                 \
+   : (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)           \
+  )
+#endif
+#if defined(__s390__) || defined(__s390x__)
+/* the first __VA_IARG_NUM argument words are passed in registers */
+#define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((LIST)->ianum + ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword) <= __VA_IARG_NUM \
+   ? ((LIST)->ianum += ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword), \
+      (void*)((uintptr_t)&(LIST)->iarg[(LIST)->ianum] - (TYPE_SIZE))   \
+     )                                                                 \
+   : ((LIST)->ianum = __VA_IARG_NUM,                                   \
+      (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)         \
+  )  )
+#endif
+#if defined(__riscv32__) || defined(__riscv64__)
+/* the first __VA_IARG_NUM argument words are passed in registers */
+#define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((LIST)->ianum + ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword) <= __VA_IARG_NUM \
+   ? ((LIST)->ianum += ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword), \
+      &(LIST)->iarg[(LIST)->ianum - ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword)] \
+     )                                                                 \
+   : (((LIST)->ianum < __VA_IARG_NUM                                   \
+       ? ((LIST)->aptr -= (__VA_IARG_NUM - (LIST)->ianum) * sizeof(__vaword), \
+          (LIST)->ianum = __VA_IARG_NUM,                               \
+          0)                                                           \
+       : 0),                                                           \
+      (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)          \
+  )  )
+#endif
+#define __va_arg(LIST,TYPE)  \
+  *(TYPE*)__va_arg_adjusted(LIST,sizeof(TYPE),__VA_alignof(TYPE))
+
+/* Integer arguments. */
+
+#define _va_arg_char(LIST)     __va_arg(LIST,char)
+#define _va_arg_schar(LIST)    __va_arg(LIST,signed char)
+#define _va_arg_uchar(LIST)    __va_arg(LIST,unsigned char)
+#define _va_arg_short(LIST)    __va_arg(LIST,short)
+#define _va_arg_ushort(LIST)   __va_arg(LIST,unsigned short)
+#define _va_arg_int(LIST)      __va_arg(LIST,int)
+#define _va_arg_uint(LIST)     __va_arg(LIST,unsigned int)
+#define _va_arg_long(LIST)     __va_arg(LIST,long)
+#define _va_arg_ulong(LIST)    __va_arg(LIST,unsigned long)
+
+#if defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm64__) || defined(__powerpc64__) || defined(__ia64__) || (defined(__x86_64__) && !defined(__x86_64_x32__) && !defined(__VA_LLP64)) || defined(__s390x__) || defined(__riscv64__)
+/* ‘long long’ and ‘long’ are identical. */
+#define _va_arg_longlong       _va_arg_long
+#define _va_arg_ulonglong      _va_arg_ulong
+#elif defined(__mipsn32__) || defined(__x86_64_x32__) || (defined(__x86_64__) && defined(__VA_LLP64))
+/* ‘long long’ fits in __vaword. */
+#define _va_arg_longlong(LIST) __va_arg(LIST,long long)
+#define _va_arg_ulonglong(LIST)        __va_arg(LIST,unsigned long long)
+#elif defined(__i386__) || defined(__m68k__) || defined(__mips__) || (defined(__sparc__) && !defined(__sparc64__)) || (defined(__hppa__) && !defined(__hppa64__)) || defined(__arm__) || defined(__armhf__) || defined(__powerpc__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv32__)
+/* ‘long long’s are passed embedded on the arg stack. */
+#define _va_arg_longlong(LIST) __va_arg_longlong(LIST,long long)
+#define _va_arg_ulonglong(LIST)        __va_arg_longlong(LIST,unsigned long long)
+#if defined(__i386__) || defined(__m68k__) || defined(__powerpc_aix__)
+/* ‘long long’s are (at most) word-aligned. */
+#define __va_arg_longlong(LIST,TYPE)   __va_arg(LIST,TYPE)
+#endif
+#if defined(__mips__) || defined(__arm__)
+/* ‘long long’s have alignment 8. */
+#define __va_arg_longlong(LIST,TYPE)                                   \
+  ((LIST)->aptr = (((LIST)->aptr+__VA_alignof(TYPE)-1) & -(intptr_t)__VA_alignof(TYPE)), \
+   __va_arg(LIST,TYPE))
+#endif
+#if defined(__armhf__) || defined(__powerpc_sysv4__)
+/* ‘long long’s have alignment 8. */
+#define __va_arg_longlong(LIST,TYPE)                                   \
+  (((LIST)->ianum < __VA_IARG_NUM                                      \
+    ? ((LIST)->ianum = (((LIST)->ianum+__VA_alignof(TYPE)/sizeof(__vaword)-1) & -(intptr_t)(__VA_alignof(TYPE)/sizeof(__vaword))), 0) \
+    : ((LIST)->aptr = (((LIST)->aptr+__VA_alignof(TYPE)-1) & -(intptr_t)__VA_alignof(TYPE)), 0) \
+   ),                                                                  \
+   __va_arg(LIST,TYPE))
+#endif
+#if (defined(__s390__) && !defined(__s390x__)) || defined(__riscv32__)
+/* Within the arg stack, the alignment is only 4, not 8. */
+#define __va_arg_longlong(LIST,TYPE)   __va_arg(LIST,TYPE)
+#endif
+#if (defined(__sparc__) && !defined(__sparc64__))
+/* Within the arg stack, the alignment is only 4, not 8. */
+/* Beware against unaligned accesses! */
+#define __va_arg_longlong(LIST,TYPE)                                   \
+  ((LIST)->tmp._words[0] = ((__vaword*)((LIST)->aptr))[0],             \
+   (LIST)->tmp._words[1] = ((__vaword*)((LIST)->aptr))[1],             \
+   (LIST)->aptr += sizeof(TYPE),                                       \
+   (TYPE)((LIST)->tmp._longlong)                                       \
+  )
+#endif
+#if defined(__hppa__) && !defined(__hppa64__)
+/* ‘long long’s have alignment 8. */
+#define __va_arg_longlong(LIST,TYPE)                                   \
+  ((LIST)->aptr = ((LIST)->aptr & -(intptr_t)__VA_alignof(TYPE)),      \
+   __va_arg(LIST,TYPE))
+#endif
+#endif
+
+/* Floating point arguments. */
+
+#if defined(__i386__) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm64__) || defined(__powerpc__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64__) || defined(__s390__) || defined(__s390x__) || defined(__riscv32__) || defined(__riscv64__)
+#define __va_align_double(LIST)
+#endif
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) || defined(__arm__) || defined(__armhf__)
+/* __VA_alignof(double) > sizeof(__vaword) */
+#define __va_align_double(LIST)  \
+  (LIST)->aptr = ((LIST)->aptr + sizeof(double)-1) & -(intptr_t)sizeof(double),
+#endif
+#if defined(__hppa__) && !defined(__hppa64__)
+#define __va_align_double(LIST)  \
+  (LIST)->aptr = (LIST)->aptr & -(intptr_t)sizeof(double),
+#endif
+
+#if defined(__sparc__) && !defined(__sparc64__)
+/* Beware against unaligned ‘double’ accesses! */
+#define _va_arg_double(LIST)  \
+  (__va_align_double(LIST)                                             \
+   (LIST)->tmp._words[0] = ((__vaword*)((LIST)->aptr))[0],             \
+   (LIST)->tmp._words[1] = ((__vaword*)((LIST)->aptr))[1],             \
+   (LIST)->aptr += sizeof(double),                                     \
+   (LIST)->tmp._double                                                 \
+  )
+#endif
+#if defined(__alpha__)
+/* The first 6 floating point registers have been stored in another place. */
+#define _va_arg_double(LIST)  \
+  (((LIST)->aptr += sizeof(double)) <= (LIST)->memargptr               \
+   ? *(double*)((LIST)->aptr - sizeof(double) + (LIST)->farg_offset)   \
+   : *(double*)((LIST)->aptr - sizeof(double))                         \
+  )
+#define _va_arg_float(LIST)  \
+  (((LIST)->aptr += sizeof(double)) <= (LIST)->memargptr               \
+   ? /* The first 6 args have been put into memory by "stt" instructions */\
+     /* (see vacall-alpha.s!). Therefore load them as doubles. */      \
+     /* When viewed as floats, the value will be the correct one. */   \
+     (float)*(double*)((LIST)->aptr - sizeof(double) + (LIST)->farg_offset) \
+   : /* These args have been put into memory by "sts" instructions, */ \
+     /* therefore load them as floats. */                              \
+     *(float*)((LIST)->aptr - sizeof(double))                          \
+  )
+#endif
+#if defined(__hppa__) && !defined(__hppa64__)
+/* The floats and doubles among the first 4 argument words are passed
+ * - in both general registers and floating-point registers when the
+ *   function call is a variadic one, which means:
+ *     - for HP cc: the call is done through a function pointer or
+ *       directly to a function declared with a varargs prototype,
+ *     - for GCC: the function's type is a varargs function.
+ * - in floating-point registers otherwise.
+ * Since the code in tests.c uses a function pointer, casted to a non-varargs
+ * function type, we are in the first case for HP cc, but in the second case
+ * for GCC.
+ * Therefore we need to take the values from the floating-point registers.
+ */
+#define _va_arg_float(LIST)  \
+  (((LIST)->aptr -= sizeof(float)) >= (LIST)->memargptr                        \
+   ? /* The first 4 float args are stored separately. */               \
+     *(float*)((LIST)->aptr + (LIST)->farg_offset)                     \
+   : *(float*)((LIST)->aptr)                                           \
+  )
+#define _va_arg_double(LIST)  \
+  (__va_align_double(LIST)                                             \
+   (((LIST)->aptr -= sizeof(double)) >= (LIST)->memargptr              \
+    ? /* The first 2 double args are stored separately. */             \
+      *(double*)((LIST)->aptr + (LIST)->darg_offset)                   \
+    : *(double*)((LIST)->aptr)                                         \
+  ))
+#endif
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)
+/* The first 0,1,2 registers are stored elsewhere if they are floating-point
+ * parameters.
+ */
+#define _va_arg_float(LIST)  \
+  ((LIST)->aptr += sizeof(float),                                      \
+   (LIST)->anum++,                                                     \
+   (LIST)->fanum++,                                                    \
+   ((LIST)->anum == (LIST)->fanum && (LIST)->fanum <= __VA_FARG_NUM    \
+    ? /* only floating-point arguments so far */                       \
+      (LIST)->farg[(LIST)->fanum - 1]                                  \
+    : *(float*)((LIST)->aptr - sizeof(float))                          \
+  ))
+#define _va_arg_double(LIST)  \
+  (__va_align_double(LIST)                                             \
+   (LIST)->aptr += sizeof(double),                                     \
+   (LIST)->anum++,                                                     \
+   (LIST)->fanum++,                                                    \
+   ((LIST)->anum == (LIST)->fanum && (LIST)->fanum <= __VA_FARG_NUM    \
+    ? /* only floating-point arguments so far */                       \
+      (LIST)->darg[(LIST)->fanum - 1]                                  \
+    : *(double*)((LIST)->aptr - sizeof(double))                                \
+  ))
+#endif
+#if defined(__mipsn32__) || defined(__mips64__) || defined(__x86_64_ms__)
+/* The first 0,..,8 registers are stored elsewhere if they are floating-point
+ * parameters.
+ */
+#define _va_arg_float(LIST)  \
+  (__va_align_double(LIST)                                             \
+   (LIST)->aptr += sizeof(double),                                     \
+   (++(LIST)->anum <= __VA_FARG_NUM                                    \
+    ? (LIST)->farg[(LIST)->anum - 1]                                   \
+    : *(float*)((LIST)->aptr - sizeof(double))                         \
+  ))
+#define _va_arg_double(LIST)  \
+  (__va_align_double(LIST)                                             \
+   (LIST)->aptr += sizeof(double),                                     \
+   (++(LIST)->anum <= __VA_FARG_NUM                                    \
+    ? (LIST)->darg[(LIST)->anum - 1]                                   \
+    : *(double*)((LIST)->aptr - sizeof(double))                                \
+  ))
+#endif
+#if defined(__sparc64__)
+/* The first 0,..,16 registers are stored elsewhere if they are floating-point
+ * parameters.
+ */
+#define _va_arg_float(LIST)  \
+  (__va_align_double(LIST)                                             \
+   (LIST)->aptr += sizeof(double),                                     \
+   (++(LIST)->anum <= 16                                               \
+    ? (LIST)->farg[(LIST)->anum - 1]                                   \
+    : *(float*)((LIST)->aptr - sizeof(float))                          \
+  ))
+#define _va_arg_double(LIST)  \
+  (__va_align_double(LIST)                                             \
+   (LIST)->aptr += sizeof(double),                                     \
+   (++(LIST)->anum <= 16                                               \
+    ? (LIST)->darg[(LIST)->anum - 1]                                   \
+    : *(double*)((LIST)->aptr - sizeof(double))                                \
+  ))
+#endif
+#if defined(__hppa64__)
+/* The floating-point arguments among the first 8 argument words have been
+   stored elsewhere. */
+#define _va_arg_float(LIST)  \
+  ((LIST)->aptr += sizeof(double),                                     \
+   ((LIST)->aptr <= (LIST)->memargptr                                  \
+    ? (LIST)->farg[__VA_FARG_NUM-1-((LIST)->memargptr - (LIST)->aptr)/sizeof(__vaword)] \
+    : ((float*)(LIST)->aptr)[-1]                                       \
+  ))
+#define _va_arg_double(LIST)  \
+  ((LIST)->aptr += sizeof(double),                                     \
+   ((LIST)->aptr <= (LIST)->memargptr                                  \
+    ? (LIST)->darg[__VA_FARG_NUM-1-((LIST)->memargptr - (LIST)->aptr)/sizeof(__vaword)] \
+    : ((double*)(LIST)->aptr)[-1]                                      \
+  ))
+#endif
+#if defined(__armhf__)
+#define _va_arg_float(LIST)  \
+  ((LIST)->fanum <= 15                                                 \
+   ? (LIST)->farg[(LIST)->fanum++]                                     \
+   : ((LIST)->aptr += sizeof(float),                                   \
+      *(float*)((LIST)->aptr - sizeof(float))                          \
+  )  )
+#define _va_arg_double(LIST)  \
+  (((LIST)->fanum % 2 ? (LIST)->fanum++ : 0),                          \
+   ((LIST)->fanum <= 14                                                        \
+    ? ((LIST)->fanum += 2, (LIST)->darg[(LIST)->fanum / 2 - 1])                \
+    : ((LIST)->aptr += sizeof(double),                                 \
+       *(double*)((LIST)->aptr - sizeof(double))                       \
+  ))  )
+#endif
+#if defined(__arm64__)
+/* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */
+#define _va_arg_float(LIST)  \
+  ((LIST)->fanum < __VA_FARG_NUM                                       \
+   ? (LIST)->farg[(LIST)->fanum++]                                     \
+   : ((LIST)->aptr += sizeof(__vaword),                                        \
+      *(float*)((LIST)->aptr - sizeof(__vaword))                       \
+  )  )
+#define _va_arg_double(LIST)  \
+  ((LIST)->fanum < __VA_FARG_NUM                                       \
+   ? (LIST)->darg[(LIST)->fanum++]                                     \
+   : ((LIST)->aptr += sizeof(__vaword),                                        \
+      *(double*)((LIST)->aptr - sizeof(__vaword))                      \
+  )  )
+#endif
+#if defined(__powerpc_aix__)
+/* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */
+#define _va_arg_float(LIST)  \
+  ((LIST)->aptr += sizeof(float),                                      \
+   ((LIST)->fanum < __VA_FARG_NUM                                      \
+    ? (float) (LIST)->farg[(LIST)->fanum++]                            \
+    : *(float*)((LIST)->aptr - sizeof(float))                          \
+  ))
+#define _va_arg_double(LIST)  \
+  (__va_align_double(LIST)                                             \
+   (LIST)->aptr += sizeof(double),                                     \
+   ((LIST)->fanum < __VA_FARG_NUM                                      \
+    ? (LIST)->farg[(LIST)->fanum++]                                    \
+    : *(double*)((LIST)->aptr - sizeof(double))                                \
+  ))
+#endif
+#if defined(__powerpc_sysv4__)
+/* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */
+#define _va_arg_float(LIST)  \
+  ((LIST)->fanum < __VA_FARG_NUM                                       \
+   ? (float) (LIST)->farg[(LIST)->fanum++]                             \
+   : ((LIST)->aptr += sizeof(float),                                   \
+      *(float*)((LIST)->aptr - sizeof(float))                          \
+  )  )
+#define _va_arg_double(LIST)  \
+  ((LIST)->fanum < __VA_FARG_NUM                                       \
+   ? (LIST)->farg[(LIST)->fanum++]                                     \
+   : (__va_align_double(LIST)                                          \
+      (LIST)->aptr += sizeof(double),                                  \
+      *(double*)((LIST)->aptr - sizeof(double))                                \
+  )  )
+#endif
+#if defined(__powerpc64__)
+/* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */
+#if defined(_AIX)
+#define _va_arg_float(LIST)  \
+  ((LIST)->aptr += sizeof(__vaword),                                   \
+   ((LIST)->fanum < __VA_FARG_NUM                                      \
+    ? (float) (LIST)->farg[(LIST)->fanum++]                            \
+    : ((float*)(LIST)->aptr)[(LIST)->flags & __VA_AIXCC_FLOAT_ARGS ? -2 : -1] \
+  ))
+#elif defined(_LITTLE_ENDIAN)
+#define _va_arg_float(LIST)  \
+  ((LIST)->aptr += sizeof(__vaword),                                   \
+   ((LIST)->fanum < __VA_FARG_NUM                                      \
+    ? (float) (LIST)->farg[(LIST)->fanum++]                            \
+    : ((float*)(LIST)->aptr)[-2]                                       \
+  ))
+#else /* _BIG_ENDIAN */
+#define _va_arg_float(LIST)  \
+  ((LIST)->aptr += sizeof(__vaword),                                   \
+   ((LIST)->fanum < __VA_FARG_NUM                                      \
+    ? (float) (LIST)->farg[(LIST)->fanum++]                            \
+    : ((float*)(LIST)->aptr)[-1]                                       \
+  ))
+#endif
+#define _va_arg_double(LIST)  \
+  (__va_align_double(LIST)                                             \
+   (LIST)->aptr += sizeof(double),                                     \
+   ((LIST)->fanum < __VA_FARG_NUM                                      \
+    ? (LIST)->farg[(LIST)->fanum++]                                    \
+    : *(double*)((LIST)->aptr - sizeof(double))                                \
+  ))
+#endif
+#if defined(__ia64__)
+/* The first 8 floating-point args have been stored elsewhere. */
+#define _va_arg_float(LIST)  \
+  ((LIST)->aptr += sizeof(__vaword),                                   \
+   ((LIST)->fanum < __VA_FARG_NUM                                      \
+    ? (float) (LIST)->farg[(LIST)->fanum++]                            \
+    : *(float*)((LIST)->aptr - sizeof(__vaword))                       \
+  ))
+#define _va_arg_double(LIST)  \
+  (__va_align_double(LIST)                                             \
+   (LIST)->aptr += sizeof(double),                                     \
+   ((LIST)->fanum < __VA_FARG_NUM                                      \
+    ? (LIST)->farg[(LIST)->fanum++]                                    \
+    : *(double*)((LIST)->aptr - sizeof(double))                                \
+  ))
+#endif
+#if defined(__x86_64_sysv__)
+/* The first 8 floating-point args have been stored elsewhere. */
+#define _va_arg_float(LIST)  \
+  ((LIST)->fanum < __VA_FARG_NUM                                       \
+   ? *(float*)&(LIST)->farg[(LIST)->fanum++]                           \
+   : ((LIST)->aptr += sizeof(__vaword),                                        \
+      *(float*)((LIST)->aptr - sizeof(__vaword))                       \
+  )  )
+#define _va_arg_double(LIST)  \
+  ((LIST)->fanum < __VA_FARG_NUM                                       \
+   ? (LIST)->farg[(LIST)->fanum++]                                     \
+   : ((LIST)->aptr += sizeof(__vaword),                                        \
+      *(double*)((LIST)->aptr - sizeof(__vaword))                      \
+  )  )
+#endif
+#if defined(__s390__) || defined(__s390x__)
+/* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */
+#define _va_arg_float(LIST)  \
+  ((LIST)->fanum < __VA_FARG_NUM                                       \
+   ? (LIST)->farg[(LIST)->fanum++]                                     \
+   : ((LIST)->aptr += sizeof(__vaword),                                        \
+      ((float*)(LIST)->aptr)[-1]                                       \
+  )  )
+#define _va_arg_double(LIST)  \
+  ((LIST)->fanum < __VA_FARG_NUM                                       \
+   ? (LIST)->darg[(LIST)->fanum++]                                     \
+   : ((LIST)->aptr += sizeof(double),                                  \
+      *(double*)((LIST)->aptr - sizeof(double))                                \
+  )  )
+#endif
+#if defined(__riscv32__) || defined(__riscv64__)
+/* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */
+#define _va_arg_float(LIST)  \
+  ((LIST)->fanum < __VA_FARG_NUM                                       \
+   ? (LIST)->farg[(LIST)->fanum++]                                     \
+   : __va_arg((LIST),float)                                            \
+  )
+#define _va_arg_double(LIST)  \
+  ((LIST)->fanum < __VA_FARG_NUM                                       \
+   ? (LIST)->darg[(LIST)->fanum++]                                     \
+   : __va_arg((LIST),double)                                           \
+  )
+#endif
+#ifndef _va_arg_float
+#define _va_arg_float(LIST)    __va_arg(LIST,float)
+#endif
+#ifndef _va_arg_double
+#define _va_arg_double(LIST)  \
+  (__va_align_double(LIST) __va_arg(LIST,double))
+#endif
+
+/* Pointer arguments. */
+#define _va_arg_ptr(LIST)      __va_arg(LIST,void*)
+
+/* Structure arguments. */
+/* Structure argument alignment. */
+#if defined(__i386__) && defined(_MSC_VER)
+/* In MSVC, doubles inside structures have alignment 8, i.e.
+ * __VA_alignof(double) = 8, but doubles (and also structures containing
+ * doubles) are passed on the stack with alignment 4. Looks really weird.
+ */
+#define __va_struct_alignment(TYPE_ALIGN)  \
+  ((TYPE_ALIGN) <= 4 ? (TYPE_ALIGN) : 4)
+#else
+#define __va_struct_alignment(TYPE_ALIGN)  \
+  (TYPE_ALIGN)
+#endif
+#define __va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (LIST)->aptr = ((LIST)->aptr + __va_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__va_struct_alignment(TYPE_ALIGN),
+#if defined(__i386__) || defined(__m68k__) || defined(__alpha__) || defined(__arm__) || defined(__armhf__) || (defined(__powerpc64__) && !defined(_AIX)) || defined(__x86_64_sysv__)
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN)                                \
+   __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)                                \
+  )
+#endif
+#if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)
+/* small structures < 1 word are adjusted depending on compiler */
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN)                                \
+   ((LIST)->flags & __VA_SGICC_STRUCT_ARGS                             \
+    ? /* SGI MIPS cc passes small structures left-adjusted, although big-endian! */\
+      (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)          \
+    : /* SGI MIPS gcc passes small structures within the first four words left-           \
+       * adjusted, for compatibility with cc. But structures in memory are passed  \
+       * right-adjusted!! See gcc-2.6.3/config/mips/mips.c:function_arg().        \
+       */                                                                         \
+      ((LIST)->aptr < (LIST)->memargptr                                        \
+       ? (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)       \
+       : (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)      \
+  ))  )
+#endif
+#if defined(__mipsn32__) || defined(__mips64__)
+/* small structures < 1 word are adjusted depending on compiler */
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN)                                \
+   ((LIST)->flags & __VA_SGICC_STRUCT_ARGS                             \
+    ? /* SGI MIPS cc and gcc >= 3.4 passes small structures left-adjusted, although big-endian! */\
+      (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)          \
+    : /* SGI MIPS gcc < 3.4 passes small structures right-adjusted. */ \
+      (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)         \
+  ))
+#endif
+#if defined(__powerpc_aix__) || (defined(__powerpc64__) && defined(_AIX))
+/* small structures < 1 word are adjusted depending on compiler */
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN)                                \
+   ((LIST)->flags & __VA_AIXCC_STRUCT_ARGS                             \
+    ? /* AIX cc and xlc pass small structures left-adjusted, although big-endian! */\
+      (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)          \
+    : /* gcc passes small structures right-adjusted. */                        \
+      (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)         \
+  ))
+#endif
+#if defined(__powerpc_sysv4__)
+/* Structures are passed as pointers to caller-made local copies. */
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  va_arg_ptr(LIST,void*)
+#endif
+#if defined(__sparc__) && !defined(__sparc64__)
+/* Structures are passed as pointers to caller-made local copies. */
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  va_arg_ptr(LIST,void*)
+#endif
+#if defined(__sparc64__)
+/* Small structures are passed left-adjusted, although big-endian! */
+/* Big structures are passed as pointers to caller-made local copies. */
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((TYPE_SIZE) <= 16                                                   \
+   ? (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN)                     \
+      (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN))         \
+   : va_arg_ptr(LIST,void*)                                            \
+  )
+#endif
+#if defined(__hppa64__)
+/* Structures are passed left-adjusted (although big-endian!). */
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN)                                \
+   (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)             \
+  )
+#endif
+#if defined(__arm64__) || defined(__riscv32__) || defined(__riscv64__)
+/* Small structures are passed in registers or on the stack. */
+/* Big structures are passed as pointers to caller-made local copies. */
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((TYPE_SIZE) <= 2*sizeof(__vaword)                                   \
+   ? (void*)__va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)               \
+   : va_arg_ptr(LIST,void*)                                            \
+  )
+#endif
+#if defined(__x86_64_ms__) || defined(__s390__) || defined(__s390x__)
+/* Structures of 1, 2, 4, 8 bytes are passed as embedded copies on the arg stack.
+ * Big structures are passed as pointers to caller-made local copies.
+ */
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8 \
+   ? (void*)__va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)               \
+   : va_arg_ptr(LIST,void*)                                            \
+  )
+#endif
+#if defined(__hppa__) && !defined(__hppa64__)
+/* Structures <= 8 bytes are passed as embedded copies on the arg stack.
+ * Big structures are passed as pointers (to caller-made local copies
+ * with GCC >= 8, without copy otherwise).
+ */
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  ((TYPE_SIZE) > 8                                                     \
+   ? va_arg_ptr(LIST,void*)                                            \
+   : /* FIXME: gcc-2.6.3 passes structures <= 4 bytes in memory left-adjusted! ?? */\
+     (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)          \
+  )
+#endif
+#if defined(__ia64__)
+/* With GCC < 3, types larger than a word have 2-word alignment. */
+#define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN)                                \
+   (((LIST)->flags & __VA_OLDGCC_STRUCT_ARGS) && (TYPE_SIZE) > sizeof(__vaword) && (((__vaword*)(LIST)->aptr - (LIST)->saptr) & 1) ? (LIST)->aptr += sizeof(__vaword) : 0), \
+   __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN)                                \
+  )
+#endif
+
+
+/*
+ * Definition of the va_return_xxx macros.
+ */
+#define __va_return(LIST,RETTYPE)  \
+  (((LIST)->rtype == (RETTYPE)) || (vacall_error_type_mismatch((LIST)->rtype,RETTYPE), 0))
+#define _va_return_void(LIST)  \
+  __va_return(LIST,__VAvoid)
+#define _va_return_char(LIST,VAL)  \
+  (__va_return(LIST,__VAchar), (LIST)->tmp._char = (VAL))
+#define _va_return_schar(LIST,VAL)  \
+  (__va_return(LIST,__VAschar), (LIST)->tmp._schar = (VAL))
+#define _va_return_uchar(LIST,VAL)  \
+  (__va_return(LIST,__VAuchar), (LIST)->tmp._uchar = (VAL))
+#define _va_return_short(LIST,VAL)  \
+  (__va_return(LIST,__VAshort), (LIST)->tmp._short = (VAL))
+#define _va_return_ushort(LIST,VAL)  \
+  (__va_return(LIST,__VAushort), (LIST)->tmp._ushort = (VAL))
+#define _va_return_int(LIST,VAL)  \
+  (__va_return(LIST,__VAint), (LIST)->tmp._int = (VAL))
+#define _va_return_uint(LIST,VAL)  \
+  (__va_return(LIST,__VAuint), (LIST)->tmp._uint = (VAL))
+#define _va_return_long(LIST,VAL)  \
+  (__va_return(LIST,__VAlong), (LIST)->tmp._long = (VAL))
+#define _va_return_ulong(LIST,VAL)  \
+  (__va_return(LIST,__VAulong), (LIST)->tmp._ulong = (VAL))
+#if defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm64__) || defined(__powerpc64__) || defined(__ia64__) || (defined(__x86_64__) && !defined(__x86_64_x32__) && !defined(__VA_LLP64)) || defined(__riscv64__)
+#define _va_return_longlong(LIST,VAL)  \
+  (__va_return(LIST,__VAlonglong), (LIST)->tmp._long = (VAL))
+#define _va_return_ulonglong(LIST,VAL)  \
+  (__va_return(LIST,__VAulonglong), (LIST)->tmp._ulong = (VAL))
+#else
+#define _va_return_longlong(LIST,VAL)  \
+  (__va_return(LIST,__VAlonglong), (LIST)->tmp._longlong = (VAL))
+#define _va_return_ulonglong(LIST,VAL)  \
+  (__va_return(LIST,__VAulonglong), (LIST)->tmp._ulonglong = (VAL))
+#endif
+#define _va_return_float(LIST,VAL)  \
+  (__va_return(LIST,__VAfloat), (LIST)->tmp._float = (VAL))
+#define _va_return_double(LIST,VAL)  \
+  (__va_return(LIST,__VAdouble), (LIST)->tmp._double = (VAL))
+#define _va_return_ptr(LIST,VAL)  \
+  (__va_return(LIST,__VAvoidp), (LIST)->tmp._ptr = (VAL))
+#define __va_return_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR)  \
+  (__va_return(LIST,__VAstruct),                                       \
+   vacall_structcpy((void*)((LIST)->raddr),VAL_ADDR,TYPE_SIZE,TYPE_ALIGN) \
+  )
+
+
+/*
+ * Miscellaneous declarations.
+ */
+extern void vacall_structcpy (void* dest, const void* src, unsigned long size, unsigned long alignment);
+
+
+#endif /* _VACALL_INTERNAL_H */
diff --git a/vacall/vacall-libapi.c b/vacall/vacall-libapi.c
new file mode 100644 (file)
index 0000000..385e7be
--- /dev/null
@@ -0,0 +1,232 @@
+/*
+ * Copyright 1995-2018 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "config.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <stdnoreturn.h>
+
+#include "vacall-internal.h"
+
+/* This is the implementation of the library API.
+   The symbols that the linker sees are all prefixed with 'vacall',
+   to avoid potential collisions with other libraries. */
+
+#ifndef REENTRANT
+
+/* This is the function pointer vacall(). A function pointer indirection is
+   needed because gcc-3.4 generates invalid code when the address of a symbol
+   is casted to a function pointer with different return type.
+   (https://gcc.gnu.org/ml/gcc-patches/2003-12/msg01767.html) */
+#ifdef __cplusplus
+extern "C" void vacall_receiver (); /* the return type is variable, not void! */
+#else
+extern void vacall_receiver (); /* the return type is variable, not void! */
+#endif
+void (*vacall) () = vacall_receiver;
+
+/* This is the function called by vacall(). */
+void (* vacall_function) (va_alist);
+
+#endif
+
+/* Room for returning structs according to the Sun C non-reentrant struct return convention. */
+typedef union { __vaword room[__VA_ALIST_WORDS]; double align; } __va_struct_buffer_t;
+static __va_struct_buffer_t vacall_struct_buffer;
+
+static _Noreturn void
+vacall_error_type_mismatch (enum __VAtype start_type, enum __VAtype return_type)
+{
+  /* If you see this, fix your code. */
+  fprintf (stderr, "vacall: va_start type %d and va_return type %d disagree.\n",
+                   (int)start_type, (int)return_type);
+  abort();
+}
+
+static _Noreturn void
+vacall_error_struct_too_large (unsigned int size)
+{
+  /* If you see this, increase __VA_ALIST_WORDS: */
+  fprintf (stderr, "vacall: struct of size %u too large for Sun C struct return.\n",
+                   size);
+  abort();
+}
+
+void vacall_start (va_alist list, int rettype, int flags)
+{
+  __va_start(list,rettype,flags);
+}
+
+void vacall_start_struct (va_alist list, size_t type_size, size_t type_align, int type_splittable, int flags)
+{
+  __va_start_struct(list,type_size,type_align,type_splittable,flags);
+}
+
+char vacall_arg_char (va_alist list)
+{
+  return _va_arg_char(list);
+}
+
+signed char vacall_arg_schar (va_alist list)
+{
+  return _va_arg_schar(list);
+}
+
+unsigned char vacall_arg_uchar (va_alist list)
+{
+  return _va_arg_uchar(list);
+}
+
+short vacall_arg_short (va_alist list)
+{
+  return _va_arg_short(list);
+}
+
+unsigned short vacall_arg_ushort (va_alist list)
+{
+  return _va_arg_ushort(list);
+}
+
+int vacall_arg_int (va_alist list)
+{
+  return _va_arg_int(list);
+}
+
+unsigned int vacall_arg_uint (va_alist list)
+{
+  return _va_arg_uint(list);
+}
+
+long vacall_arg_long (va_alist list)
+{
+  return _va_arg_long(list);
+}
+
+unsigned long vacall_arg_ulong (va_alist list)
+{
+  return _va_arg_ulong(list);
+}
+
+long long vacall_arg_longlong (va_alist list)
+{
+  return _va_arg_longlong(list);
+}
+
+unsigned long long vacall_arg_ulonglong (va_alist list)
+{
+  return _va_arg_ulonglong(list);
+}
+
+float vacall_arg_float (va_alist list)
+{
+  return _va_arg_float(list);
+}
+
+double vacall_arg_double (va_alist list)
+{
+  return _va_arg_double(list);
+}
+
+void* vacall_arg_ptr (va_alist list)
+{
+  return _va_arg_ptr(list);
+}
+
+void* vacall_arg_struct (va_alist list, size_t type_size, size_t type_align)
+{
+  return __va_arg_struct(list,type_size,type_align);
+}
+
+void vacall_return_void (va_alist list)
+{
+  _va_return_void(list);
+}
+
+void vacall_return_char (va_alist list, char val)
+{
+  _va_return_char(list,val);
+}
+
+void vacall_return_schar (va_alist list, signed char val)
+{
+  _va_return_schar(list,val);
+}
+
+void vacall_return_uchar (va_alist list, unsigned char val)
+{
+  _va_return_uchar(list,val);
+}
+
+void vacall_return_short (va_alist list, short val)
+{
+  _va_return_short(list,val);
+}
+
+void vacall_return_ushort (va_alist list, unsigned short val)
+{
+  _va_return_ushort(list,val);
+}
+
+void vacall_return_int (va_alist list, int val)
+{
+  _va_return_int(list,val);
+}
+
+void vacall_return_uint (va_alist list, unsigned int val)
+{
+  _va_return_uint(list,val);
+}
+
+void vacall_return_long (va_alist list, long val)
+{
+  _va_return_long(list,val);
+}
+
+void vacall_return_ulong (va_alist list, unsigned long val)
+{
+  _va_return_ulong(list,val);
+}
+
+void vacall_return_longlong (va_alist list, long long val)
+{
+  _va_return_longlong(list,val);
+}
+
+void vacall_return_ulonglong (va_alist list, unsigned long long val)
+{
+  _va_return_ulonglong(list,val);
+}
+
+void vacall_return_float (va_alist list, float val)
+{
+  _va_return_float(list,val);
+}
+
+void vacall_return_double (va_alist list, double val)
+{
+  _va_return_double(list,val);
+}
+
+void vacall_return_ptr (va_alist list, void* val)
+{
+  _va_return_ptr(list,val);
+}
+
+void vacall_return_struct (va_alist list, size_t type_size, size_t type_align, const void* val_addr)
+{
+  __va_return_struct(list,type_size,type_align,val_addr);
+}
diff --git a/vacall/vacall-m68k-linux.s b/vacall/vacall-m68k-linux.s
new file mode 100644 (file)
index 0000000..808fd79
--- /dev/null
@@ -0,0 +1,171 @@
+       .file   "vacall-m68k.c"
+       .text
+       .align  2
+       .globl  vacall_receiver
+       .type   vacall_receiver,@function
+vacall_receiver:
+       link.w %a6,#-32
+       movm.l #0x3030,-(%sp)
+       clr.l -32(%a6)
+       lea (8,%a6),%a2
+       move.l %a2,-20(%a6)
+       clr.l -16(%a6)
+       clr.l -12(%a6)
+       move.l %a1,-4(%a6)
+       pea -32(%a6)
+       move.l vacall_function,%a2
+       jbsr (%a2)
+       addq.l #4,%sp
+       move.l -12(%a6),%a3
+       tst.l %a3
+       jbeq .L1
+       moveq.l #1,%d2
+       cmp.l %a3,%d2
+       jbeq .L46
+       moveq.l #2,%d3
+       cmp.l %a3,%d3
+       jbeq .L46
+       moveq.l #3,%d2
+       cmp.l %a3,%d2
+       jbeq .L47
+       moveq.l #4,%d3
+       cmp.l %a3,%d3
+       jbeq .L48
+       moveq.l #5,%d2
+       cmp.l %a3,%d2
+       jbeq .L49
+       moveq.l #6,%d3
+       cmp.l %a3,%d3
+       jbeq .L45
+       moveq.l #7,%d2
+       cmp.l %a3,%d2
+       jbeq .L45
+       moveq.l #8,%d3
+       cmp.l %a3,%d3
+       jbeq .L45
+       moveq.l #9,%d2
+       cmp.l %a3,%d2
+       jbeq .L45
+       lea (-10,%a3),%a2
+       moveq.l #1,%d3
+       cmp.l %a2,%d3
+       jbcs .L22
+       move.l -28(%a6),%d0
+       move.l -24(%a6),%d1
+       jbra .L1
+       .align  2
+.L22:
+       moveq.l #12,%d2
+       cmp.l %a3,%d2
+       jbeq .L50
+       moveq.l #13,%d2
+       cmp.l %a3,%d2
+       jbeq .L51
+       moveq.l #14,%d3
+       cmp.l %a3,%d3
+       jbeq .L52
+       moveq.l #15,%d2
+       cmp.l %a3,%d2
+       jbne .L1
+       btst #2,-30(%a6)
+       jbeq .L1
+       move.l -8(%a6),%d2
+       moveq.l #1,%d3
+       cmp.l %d2,%d3
+       jbeq .L53
+       moveq.l #2,%d3
+       cmp.l %d2,%d3
+       jbeq .L54
+       moveq.l #4,%d3
+       cmp.l %d2,%d3
+       jbeq .L55
+       moveq.l #8,%d3
+       cmp.l %d2,%d3
+       jbne .L1
+       move.l -16(%a6),%a2
+       move.l (%a2),%d0
+       move.l 4(%a2),%d1
+       jbra .L1
+       .align  2
+.L55:
+       move.l -16(%a6),%a2
+       move.l (%a2),%d0
+       jbra .L1
+       .align  2
+.L54:
+       move.l -16(%a6),%a2
+       clr.l %d0
+       move.w (%a2),%d0
+       jbra .L1
+       .align  2
+.L53:
+       move.l -16(%a6),%a2
+       clr.l %d0
+       move.b (%a2),%d0
+       jbra .L1
+       .align  2
+.L52:
+       move.l -28(%a6),%d0
+       move.l %d0,%a0
+       jbra .L1
+       .align  2
+.L51:
+       btst #6,-29(%a6)
+       jbeq .L31
+       fmove.d -28(%a6),%fp0
+       jbra .L1
+       .align  2
+.L31:
+       move.l -28(%a6),%d0
+       move.l -24(%a6),%d1
+       jbra .L1
+       .align  2
+.L50:
+       move.l -32(%a6),%d2
+       btst #6,%d2
+       jbeq .L25
+       fmove.s -28(%a6),%fp0
+       jbra .L1
+       .align  2
+.L25:
+       btst #5,%d2
+       jbeq .L27
+       fmove.s -28(%a6),%fp1
+       fmove.d %fp1,-(%sp)
+       move.l (%sp)+,%d0
+       move.l (%sp)+,%d1
+       jbra .L1
+       .align  2
+.L27:
+       move.l -28(%a6),%d0
+       jbra .L1
+       .align  2
+.L45:
+       move.l -28(%a6),%d0
+       jbra .L1
+       .align  2
+.L49:
+       clr.l %d0
+       move.w -28(%a6),%d0
+       jbra .L1
+       .align  2
+.L48:
+       move.w -28(%a6),%d0
+       ext.l %d0
+       jbra .L1
+       .align  2
+.L47:
+       clr.l %d0
+       move.b -28(%a6),%d0
+       jbra .L1
+       .align  2
+.L46:
+       move.b -28(%a6),%d0
+       extb.l %d0
+.L1:
+       movm.l -48(%a6),#0xc0c
+       unlk %a6
+       rts
+.Lfe1:
+       .size   vacall_receiver,.Lfe1-vacall_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/vacall/vacall-m68k-sun.s b/vacall/vacall-m68k-sun.s
new file mode 100644 (file)
index 0000000..07fae31
--- /dev/null
@@ -0,0 +1,167 @@
+#NO_APP
+       .text
+       .even
+       .globl  _vacall_receiver
+_vacall_receiver:
+       link a6,#-32
+       moveml #0x3030,sp@-
+       clrl a6@(-32)
+       lea a6@(8),a2
+       movel a2,a6@(-20)
+       clrl a6@(-16)
+       clrl a6@(-12)
+       movel a1,a6@(-4)
+       pea a6@(-32)
+       movel _vacall_function,a2
+       jbsr a2@
+       addql #4,sp
+       movel a6@(-12),a3
+       tstl a3
+       jeq L1
+       moveq #1,d2
+       cmpl a3,d2
+       jeq L46
+       moveq #2,d3
+       cmpl a3,d3
+       jeq L46
+       moveq #3,d2
+       cmpl a3,d2
+       jeq L47
+       moveq #4,d3
+       cmpl a3,d3
+       jeq L48
+       moveq #5,d2
+       cmpl a3,d2
+       jeq L49
+       moveq #6,d3
+       cmpl a3,d3
+       jeq L45
+       moveq #7,d2
+       cmpl a3,d2
+       jeq L45
+       moveq #8,d3
+       cmpl a3,d3
+       jeq L45
+       moveq #9,d2
+       cmpl a3,d2
+       jeq L45
+       lea a3@(-10),a2
+       moveq #1,d3
+       cmpl a2,d3
+       jcs L22
+       movel a6@(-28),d0
+       movel a6@(-24),d1
+       jra L1
+       .even
+L22:
+       moveq #12,d2
+       cmpl a3,d2
+       jeq L50
+       moveq #13,d2
+       cmpl a3,d2
+       jeq L51
+       moveq #14,d3
+       cmpl a3,d3
+       jeq L52
+       moveq #15,d2
+       cmpl a3,d2
+       jne L1
+       btst #2,a6@(-30)
+       jeq L1
+       movel a6@(-8),d2
+       moveq #1,d3
+       cmpl d2,d3
+       jeq L53
+       moveq #2,d3
+       cmpl d2,d3
+       jeq L54
+       moveq #4,d3
+       cmpl d2,d3
+       jeq L55
+       moveq #8,d3
+       cmpl d2,d3
+       jne L1
+       movel a6@(-16),a2
+       movel a2@,d0
+       movel a2@(4),d1
+       jra L1
+       .even
+L55:
+       movel a6@(-16),a2
+       movel a2@,d0
+       jra L1
+       .even
+L54:
+       movel a6@(-16),a2
+       clrl d0
+       movew a2@,d0
+       jra L1
+       .even
+L53:
+       movel a6@(-16),a2
+       clrl d0
+       moveb a2@,d0
+       jra L1
+       .even
+L52:
+       movel a6@(-28),d0
+       movel d0,a0
+       jra L1
+       .even
+L51:
+       btst #6,a6@(-29)
+       jeq L31
+       fmoved a6@(-28),fp0
+       jra L1
+       .even
+L31:
+       movel a6@(-28),d0
+       movel a6@(-24),d1
+       jra L1
+       .even
+L50:
+       movel a6@(-32),d2
+       btst #6,d2
+       jeq L25
+       fmoves a6@(-28),fp0
+       jra L1
+       .even
+L25:
+       btst #5,d2
+       jeq L27
+       fmoves a6@(-28),fp1
+       fmoved fp1,sp@-
+       movel sp@+,d0
+       movel sp@+,d1
+       jra L1
+       .even
+L27:
+       movel a6@(-28),d0
+       jra L1
+       .even
+L45:
+       movel a6@(-28),d0
+       jra L1
+       .even
+L49:
+       clrl d0
+       movew a6@(-28),d0
+       jra L1
+       .even
+L48:
+       movew a6@(-28),d0
+       extl d0
+       jra L1
+       .even
+L47:
+       clrl d0
+       moveb a6@(-28),d0
+       jra L1
+       .even
+L46:
+       moveb a6@(-28),d0
+       extbl d0
+L1:
+       moveml a6@(-48),#0xc0c
+       unlk a6
+       rts
diff --git a/vacall/vacall-m68k.c b/vacall/vacall-m68k.c
new file mode 100644 (file)
index 0000000..e6394df
--- /dev/null
@@ -0,0 +1,136 @@
+/* vacall function for m68k CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *     env     __asm__("a0");
+#endif
+register void* sret    __asm__("a1");
+register int   iret    __asm__("d0");
+register int   iret2   __asm__("d1");
+register int   pret    __asm__("a0");  /* some compilers return pointers in a0 */
+register float fret    __asm__("d0");  /* d0 */
+register double        dret    __asm__("d0");  /* d0,d1 */
+register float fp_fret __asm__("fp0");
+register double        fp_dret __asm__("fp0");
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword firstword)
+{
+  __va_alist list;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&firstword;
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.structraddr = sret;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) {
+    iret  = ((__vaword *) &list.tmp._longlong)[0];
+    iret2 = ((__vaword *) &list.tmp._longlong)[1];
+  } else
+  if (list.rtype == __VAfloat) {
+    if (list.flags & __VA_FREG_FLOAT_RETURN) {
+      fp_fret = list.tmp._float;
+    } else {
+      if (list.flags & __VA_SUNCC_FLOAT_RETURN) {
+        dret = (double)list.tmp._float;
+      } else {
+        fret = list.tmp._float;
+      }
+    }
+  } else
+  if (list.rtype == __VAdouble) {
+    if (list.flags & __VA_FREG_FLOAT_RETURN) {
+      fp_dret = list.tmp._double;
+    } else {
+      dret = list.tmp._double;
+    }
+  } else
+  if (list.rtype == __VAvoidp) {
+    pret = iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    /* NB: On m68k, all structure sizes are divisible by 2. */
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      if (list.rsize == sizeof(char)) { /* can't occur */
+        iret = *(unsigned char *) list.raddr;
+      } else
+      if (list.rsize == sizeof(short)) {
+        iret = *(unsigned short *) list.raddr;
+      } else
+      if (list.rsize == sizeof(int)) {
+        iret = *(unsigned int *) list.raddr;
+      } else
+      if (list.rsize == 2*sizeof(__vaword)) {
+        iret  = ((__vaword *) list.raddr)[0];
+        iret2 = ((__vaword *) list.raddr)[1];
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-m68k.mit.S b/vacall/vacall-m68k.mit.S
new file mode 100644 (file)
index 0000000..d617c3f
--- /dev/null
@@ -0,0 +1,172 @@
+#include "asm-m68k.h"
+       .text
+       .even
+       .globl C(vacall_receiver)
+       DECLARE_FUNCTION(vacall_receiver)
+FUNBEGIN(vacall_receiver)
+       link $a6,#-32
+       moveml #0x3030,$sp@-
+       clrl $a6@(-32)
+       lea $a6@(8),$a2
+       movel $a2,$a6@(-20)
+       clrl $a6@(-16)
+       clrl $a6@(-12)
+       movel $a1,$a6@(-4)
+       pea $a6@(-32)
+       movel C(vacall_function),$a2
+       jbsr $a2@
+       addql #4,$sp
+       movel $a6@(-12),$a3
+       tstl $a3
+       jeq L(1)
+       moveq #1,$d2
+       cmpl $a3,$d2
+       jeq L(46)
+       moveq #2,$d3
+       cmpl $a3,$d3
+       jeq L(46)
+       moveq #3,$d2
+       cmpl $a3,$d2
+       jeq L(47)
+       moveq #4,$d3
+       cmpl $a3,$d3
+       jeq L(48)
+       moveq #5,$d2
+       cmpl $a3,$d2
+       jeq L(49)
+       moveq #6,$d3
+       cmpl $a3,$d3
+       jeq L(45)
+       moveq #7,$d2
+       cmpl $a3,$d2
+       jeq L(45)
+       moveq #8,$d3
+       cmpl $a3,$d3
+       jeq L(45)
+       moveq #9,$d2
+       cmpl $a3,$d2
+       jeq L(45)
+       lea $a3@(-10),$a2
+       moveq #1,$d3
+       cmpl $a2,$d3
+       jcs L(22)
+       movel $a6@(-28),$d0
+       movel $a6@(-24),$d1
+       jra L(1)
+       .even
+L(22):
+       moveq #12,$d2
+       cmpl $a3,$d2
+       jeq L(50)
+       moveq #13,$d2
+       cmpl $a3,$d2
+       jeq L(51)
+       moveq #14,$d3
+       cmpl $a3,$d3
+       jeq L(52)
+       moveq #15,$d2
+       cmpl $a3,$d2
+       jne L(1)
+       btst #2,$a6@(-30)
+       jeq L(1)
+       movel $a6@(-8),$d2
+       moveq #1,$d3
+       cmpl $d2,$d3
+       jeq L(53)
+       moveq #2,$d3
+       cmpl $d2,$d3
+       jeq L(54)
+       moveq #4,$d3
+       cmpl $d2,$d3
+       jeq L(55)
+       moveq #8,$d3
+       cmpl $d2,$d3
+       jne L(1)
+       movel $a6@(-16),$a2
+       movel $a2@,$d0
+       movel $a2@(4),$d1
+       jra L(1)
+       .even
+L(55):
+       movel $a6@(-16),$a2
+       movel $a2@,$d0
+       jra L(1)
+       .even
+L(54):
+       movel $a6@(-16),$a2
+       clrl $d0
+       movew $a2@,$d0
+       jra L(1)
+       .even
+L(53):
+       movel $a6@(-16),$a2
+       clrl $d0
+       moveb $a2@,$d0
+       jra L(1)
+       .even
+L(52):
+       movel $a6@(-28),$d0
+       movel $d0,$a0
+       jra L(1)
+       .even
+L(51):
+       btst #6,$a6@(-29)
+       jeq L(31)
+       fmoved $a6@(-28),$fp0
+       jra L(1)
+       .even
+L(31):
+       movel $a6@(-28),$d0
+       movel $a6@(-24),$d1
+       jra L(1)
+       .even
+L(50):
+       movel $a6@(-32),$d2
+       btst #6,$d2
+       jeq L(25)
+       fmoves $a6@(-28),$fp0
+       jra L(1)
+       .even
+L(25):
+       btst #5,$d2
+       jeq L(27)
+       fmoves $a6@(-28),$fp1
+       fmoved $fp1,$sp@-
+       movel $sp@+,$d0
+       movel $sp@+,$d1
+       jra L(1)
+       .even
+L(27):
+       movel $a6@(-28),$d0
+       jra L(1)
+       .even
+L(45):
+       movel $a6@(-28),$d0
+       jra L(1)
+       .even
+L(49):
+       clrl $d0
+       movew $a6@(-28),$d0
+       jra L(1)
+       .even
+L(48):
+       movew $a6@(-28),$d0
+       extl $d0
+       jra L(1)
+       .even
+L(47):
+       clrl $d0
+       moveb $a6@(-28),$d0
+       jra L(1)
+       .even
+L(46):
+       moveb $a6@(-28),$d0
+       extbl $d0
+L(1):
+       moveml $a6@(-48),#0xc0c
+       unlk $a6
+       rts
+FUNEND(vacall_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-m68k.motorola.S b/vacall/vacall-m68k.motorola.S
new file mode 100644 (file)
index 0000000..e4beb5b
--- /dev/null
@@ -0,0 +1,173 @@
+#include "asm-m68k.h"
+       .text
+       .align  2
+       .globl C(vacall_receiver)
+       DECLARE_FUNCTION(vacall_receiver)
+FUNBEGIN(vacall_receiver)
+       link.w %a6,#-32
+       movm.l #0x3030,-(%sp)
+       clr.l -32(%a6)
+       lea (8,%a6),%a2
+       move.l %a2,-20(%a6)
+       clr.l -16(%a6)
+       clr.l -12(%a6)
+       move.l %a1,-4(%a6)
+       pea -32(%a6)
+       move.l C(vacall_function),%a2
+       jbsr (%a2)
+       addq.l #4,%sp
+       move.l -12(%a6),%a3
+       tst.l %a3
+       jbeq L(1)
+       moveq.l #1,%d2
+       cmp.l %a3,%d2
+       jbeq L(46)
+       moveq.l #2,%d3
+       cmp.l %a3,%d3
+       jbeq L(46)
+       moveq.l #3,%d2
+       cmp.l %a3,%d2
+       jbeq L(47)
+       moveq.l #4,%d3
+       cmp.l %a3,%d3
+       jbeq L(48)
+       moveq.l #5,%d2
+       cmp.l %a3,%d2
+       jbeq L(49)
+       moveq.l #6,%d3
+       cmp.l %a3,%d3
+       jbeq L(45)
+       moveq.l #7,%d2
+       cmp.l %a3,%d2
+       jbeq L(45)
+       moveq.l #8,%d3
+       cmp.l %a3,%d3
+       jbeq L(45)
+       moveq.l #9,%d2
+       cmp.l %a3,%d2
+       jbeq L(45)
+       lea (-10,%a3),%a2
+       moveq.l #1,%d3
+       cmp.l %a2,%d3
+       jbcs L(22)
+       move.l -28(%a6),%d0
+       move.l -24(%a6),%d1
+       jbra L(1)
+       .align  2
+L(22):
+       moveq.l #12,%d2
+       cmp.l %a3,%d2
+       jbeq L(50)
+       moveq.l #13,%d2
+       cmp.l %a3,%d2
+       jbeq L(51)
+       moveq.l #14,%d3
+       cmp.l %a3,%d3
+       jbeq L(52)
+       moveq.l #15,%d2
+       cmp.l %a3,%d2
+       jbne L(1)
+       btst #2,-30(%a6)
+       jbeq L(1)
+       move.l -8(%a6),%d2
+       moveq.l #1,%d3
+       cmp.l %d2,%d3
+       jbeq L(53)
+       moveq.l #2,%d3
+       cmp.l %d2,%d3
+       jbeq L(54)
+       moveq.l #4,%d3
+       cmp.l %d2,%d3
+       jbeq L(55)
+       moveq.l #8,%d3
+       cmp.l %d2,%d3
+       jbne L(1)
+       move.l -16(%a6),%a2
+       move.l (%a2),%d0
+       move.l 4(%a2),%d1
+       jbra L(1)
+       .align  2
+L(55):
+       move.l -16(%a6),%a2
+       move.l (%a2),%d0
+       jbra L(1)
+       .align  2
+L(54):
+       move.l -16(%a6),%a2
+       clr.l %d0
+       move.w (%a2),%d0
+       jbra L(1)
+       .align  2
+L(53):
+       move.l -16(%a6),%a2
+       clr.l %d0
+       move.b (%a2),%d0
+       jbra L(1)
+       .align  2
+L(52):
+       move.l -28(%a6),%d0
+       move.l %d0,%a0
+       jbra L(1)
+       .align  2
+L(51):
+       btst #6,-29(%a6)
+       jbeq L(31)
+       fmove.d -28(%a6),%fp0
+       jbra L(1)
+       .align  2
+L(31):
+       move.l -28(%a6),%d0
+       move.l -24(%a6),%d1
+       jbra L(1)
+       .align  2
+L(50):
+       move.l -32(%a6),%d2
+       btst #6,%d2
+       jbeq L(25)
+       fmove.s -28(%a6),%fp0
+       jbra L(1)
+       .align  2
+L(25):
+       btst #5,%d2
+       jbeq L(27)
+       fmove.s -28(%a6),%fp1
+       fmove.d %fp1,-(%sp)
+       move.l (%sp)+,%d0
+       move.l (%sp)+,%d1
+       jbra L(1)
+       .align  2
+L(27):
+       move.l -28(%a6),%d0
+       jbra L(1)
+       .align  2
+L(45):
+       move.l -28(%a6),%d0
+       jbra L(1)
+       .align  2
+L(49):
+       clr.l %d0
+       move.w -28(%a6),%d0
+       jbra L(1)
+       .align  2
+L(48):
+       move.w -28(%a6),%d0
+       ext.l %d0
+       jbra L(1)
+       .align  2
+L(47):
+       clr.l %d0
+       move.b -28(%a6),%d0
+       jbra L(1)
+       .align  2
+L(46):
+       move.b -28(%a6),%d0
+       extb.l %d0
+L(1):
+       movm.l -48(%a6),#0xc0c
+       unlk %a6
+       rts
+L(fe1):
+       FUNEND(vacall_receiver)
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-mips.c b/vacall/vacall-mips.c
new file mode 100644 (file)
index 0000000..dad244c
--- /dev/null
@@ -0,0 +1,139 @@
+/* vacall function for mips CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifndef REENTRANT
+typedef void (*func_pointer)(va_alist);
+#else /* REENTRANT */
+#define vacall_receiver callback_receiver
+typedef void (*func_pointer)(void*,va_alist);
+register struct { func_pointer vacall_function; void* arg; }
+         *     env     __asm__("$2");
+#endif
+register float farg1   __asm__("$f12");
+register float farg2   __asm__("$f14");
+register double        darg1   __asm__("$f12");
+register double        darg2   __asm__("$f14");
+register int   iret    __asm__("$2");
+register int   iret2   __asm__("$3");
+register float fret    __asm__("$f0");
+register double        dret    __asm__("$f0");
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword firstword)
+{
+  __va_alist list;
+  /* gcc-2.6.3 source says: When a parameter is passed in a register,
+   * stack space is still allocated for it.
+   */
+  /* Move the arguments passed in registers to their stack locations. */
+  (&firstword)[-4] = word1;
+  (&firstword)[-3] = word2;
+  (&firstword)[-2] = word3;
+  (&firstword)[-1] = word4;
+  list.darg[0] = darg1;
+  list.darg[1] = darg2;
+  list.farg[0] = farg1;
+  list.farg[1] = farg2;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)(&firstword - 4);
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.memargptr = (long)&firstword;
+  list.anum = 0;
+  list.fanum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) {
+    iret  = ((__vaword *) &list.tmp._longlong)[0];
+    iret2 = ((__vaword *) &list.tmp._longlong)[1];
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_SMALL_STRUCT_RETURN) {
+      if (list.rsize == sizeof(char)) {
+        iret = *(unsigned char *) list.raddr;
+      } else
+      if (list.rsize == sizeof(short)) {
+        iret = *(unsigned short *) list.raddr;
+      } else
+      if (list.rsize == sizeof(int)) {
+        iret = *(unsigned int *) list.raddr;
+      }
+    } else {
+      iret = (long)list.raddr;
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-mips64.c b/vacall/vacall-mips64.c
new file mode 100644 (file)
index 0000000..9b5aeac
--- /dev/null
@@ -0,0 +1,508 @@
+/* vacall function for mips CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifndef REENTRANT
+typedef void (*func_pointer)(va_alist);
+#else /* REENTRANT */
+#define vacall_receiver callback_receiver
+typedef void (*func_pointer)(void*,va_alist);
+register struct { func_pointer vacall_function; void* arg; }
+         *     env     __asm__("$2");
+#endif
+register void* sp      __asm__("$sp");
+register long  iarg0   __asm__("$4");
+register long  iarg1   __asm__("$5");
+register long  iarg2   __asm__("$6");
+register long  iarg3   __asm__("$7");
+register long  iarg4   __asm__("$8");
+register long  iarg5   __asm__("$9");
+register long  iarg6   __asm__("$10");
+register long  iarg7   __asm__("$11");
+register float farg0   __asm__("$f12");
+register float farg1   __asm__("$f13");
+register float farg2   __asm__("$f14");
+register float farg3   __asm__("$f15");
+register float farg4   __asm__("$f16");
+register float farg5   __asm__("$f17");
+register float farg6   __asm__("$f18");
+register float farg7   __asm__("$f19");
+register double        darg0   __asm__("$f12");
+register double        darg1   __asm__("$f13");
+register double        darg2   __asm__("$f14");
+register double        darg3   __asm__("$f15");
+register double        darg4   __asm__("$f16");
+register double        darg5   __asm__("$f17");
+register double        darg6   __asm__("$f18");
+register double        darg7   __asm__("$f19");
+register long  iret    __asm__("$2");
+register long  iret2   __asm__("$3");
+register float fret    __asm__("$f0");
+register float fret2   __asm__("$f2");
+register double        dret    __asm__("$f0");
+register double        dret2   __asm__("$f2");
+
+/* The ABI requires that the first 8 general-purpose argument words are
+   being passed in registers, even if these words belong to a struct. No room
+   is allocated for these register words on the stack by the caller, but the
+   callee allocates room for them - at the right place in the stack frame,
+   that is, above the usual {fp, retaddr} combo - if and only if they are part
+   of a larger struct that extends to the stack and the address of this struct
+   is taken. */
+struct gpargsequence {
+  __vaword word1; /* r4 */
+  __vaword word2; /* r5 */
+  __vaword word3; /* r6 */
+  __vaword word4; /* r7 */
+  __vaword word5; /* r8 */
+  __vaword word6; /* r9 */
+  __vaword word7; /* r10 */
+  __vaword word8; /* r11 */
+  __vaword firststackword;
+};
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (struct gpargsequence gpargs)
+{
+  __va_alist list;
+  list.darg[0] = darg0;
+  list.darg[1] = darg1;
+  list.darg[2] = darg2;
+  list.darg[3] = darg3;
+  list.darg[4] = darg4;
+  list.darg[5] = darg5;
+  list.darg[6] = darg6;
+  list.darg[7] = darg7;
+  list.farg[0] = farg0;
+  list.farg[1] = farg1;
+  list.farg[2] = farg2;
+  list.farg[3] = farg3;
+  list.farg[4] = farg4;
+  list.farg[5] = farg5;
+  list.farg[6] = farg6;
+  list.farg[7] = farg7;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&gpargs;
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.anum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulonglong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      if (list.flags & __VA_GCC_STRUCT_RETURN) {
+        /* gcc returns structs of size 1,2,4,8 in registers. */
+        if (list.rsize == sizeof(char)) {
+          iret = *(unsigned char *) list.raddr;
+        } else
+        if (list.rsize == sizeof(short)) {
+          iret = *(unsigned short *) list.raddr;
+        } else
+        if (list.rsize == sizeof(int)) {
+          iret = *(unsigned int *) list.raddr;
+        } else
+        if (list.rsize == sizeof(long)) {
+          iret = *(unsigned long *) list.raddr;
+        }
+      } else {
+        /* cc returns structs of size <= 16 in registers. */
+        /* Maybe this big if cascade could be replaced with
+         * if (list.rsize > 0 && list.rsize <= 16)
+         *   __asm__ ("ldl $2,%0 ; ldr $2,%1"
+         *            : : "m" (((unsigned char *) list.raddr)[0]),
+         *                "m" (((unsigned char *) list.raddr)[7]));
+         */
+        if (list.rsize > 0 && list.rsize <= 16) {
+          #if 0 /* Unoptimized */
+          if (list.rsize == 1) {
+            #if defined(_MIPSEL)
+            iret =   (__vaword)((unsigned char *) list.raddr)[0];
+            #else
+            iret =   (__vaword)((unsigned char *) list.raddr)[0] << 56;
+            #endif
+          } else
+          if (list.rsize == 2) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48);
+            #endif
+          } else
+          if (list.rsize == 3) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40);
+            #endif
+          } else
+          if (list.rsize == 4) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 24);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 32);
+            #endif
+          } else
+          if (list.rsize == 5) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 32);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 24);
+            #endif
+          } else
+          if (list.rsize == 6) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 40);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 16);
+            #endif
+          } else
+          if (list.rsize == 7) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[6] << 48);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[6] << 8);
+            #endif
+          } else
+          if (list.rsize >= 8 && list.rsize <= 16) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[6] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[7] << 56);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[6] << 8)
+                  |  (__vaword)((unsigned char *) list.raddr)[7];
+            #endif
+            /* Maybe this big if cascade could be replaced with
+             * if (list.rsize > 8 && list.rsize <= 16)
+             *   __asm__ ("ldl $3,%0 ; ldr $3,%1"
+             *            : : "m" (((unsigned char *) list.raddr)[8]),
+             *                "m" (((unsigned char *) list.raddr)[15]));
+             */
+            if (list.rsize == 8) {
+            } else
+            if (list.rsize == 9) {
+              #if defined(_MIPSEL)
+              iret2 =   (__vaword)((unsigned char *) list.raddr)[8];
+              #else
+              iret2 =   (__vaword)((unsigned char *) list.raddr)[8] << 56;
+              #endif
+            } else
+            if (list.rsize == 10) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48);
+              #endif
+            } else
+            if (list.rsize == 11) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40);
+              #endif
+            } else
+            if (list.rsize == 12) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 24);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 32);
+              #endif
+            } else
+            if (list.rsize == 13) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 32);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 24);
+              #endif
+            } else
+            if (list.rsize == 14) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 40);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 16);
+              #endif
+            } else
+            if (list.rsize == 15) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[14] << 48);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[14] << 8);
+              #endif
+            } else
+            if (list.rsize == 16) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[14] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[15] << 56);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[14] << 8)
+                     |  (__vaword)((unsigned char *) list.raddr)[15];
+              #endif
+            }
+          }
+          #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+          uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__vaword) */
+          __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+          uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+          uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__vaword) */
+          #if defined(_MIPSEL)
+          if (count <= sizeof(__vaword)) {
+            /* Assign iret. */
+            if (end_offset <= sizeof(__vaword)) {
+              /* 0 < end_offset ≤ sizeof(__vaword) */
+              __vaword mask0 = ((__vaword)2 << (end_offset*8-1)) - 1;
+              iret = (wordaddr[0] & mask0) >> (start_offset*8);
+            } else {
+              /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+              __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+              iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*8-start_offset*8));
+            }
+          } else {
+            /* Assign iret, iret2. */
+            if (end_offset <= 2*sizeof(__vaword)) {
+              /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+              __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+              iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+              iret2 = (wordaddr[1] & mask1) >> (start_offset*8);
+            } else {
+              /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+              __vaword mask2 = ((__vaword)2 << (end_offset*8-2*sizeof(__vaword)*8-1)) - 1;
+              iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*8-start_offset*8));
+              iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__vaword)*8-start_offset*8));
+            }
+          }
+          #else
+          if (count <= sizeof(__vaword)) {
+            /* Assign iret. */
+            if (end_offset <= sizeof(__vaword)) {
+              /* 0 < end_offset ≤ sizeof(__vaword) */
+              __vaword mask0 = - ((__vaword)1 << (sizeof(__vaword)*8-end_offset*8));
+              iret = (wordaddr[0] & mask0) << (start_offset*8);
+            } else {
+              /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+              __vaword mask1 = - ((__vaword)1 << (2*sizeof(__vaword)*8-end_offset*8));
+              iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__vaword)*8-start_offset*8));
+            }
+          } else {
+            /* Assign iret, iret2. */
+            if (end_offset <= 2*sizeof(__vaword)) {
+              /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+              __vaword mask1 = - ((__vaword)1 << (2*sizeof(__vaword)*8-end_offset*8));
+              iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__vaword)*4-start_offset*4) >> (sizeof(__vaword)*4-start_offset*4));
+              iret2 = (wordaddr[1] & mask1) << (start_offset*8);
+            } else {
+              /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+              __vaword mask2 = - ((__vaword)1 << (3*sizeof(__vaword)*8-end_offset*8));
+              iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__vaword)*8-start_offset*8));
+              iret2 = (wordaddr[1] << (start_offset*8)) | ((wordaddr[2] & mask2) >> (sizeof(__vaword)*8-start_offset*8));
+            }
+          }
+          #endif
+          #endif
+        }
+        if (list.flags & __VA_REGISTER_FLOATSTRUCT_RETURN) {
+          if (list.rsize == sizeof(float)) {
+            fret = *(float*)list.raddr;
+          } else
+          if (list.rsize == 2*sizeof(float)) {
+            fret = *(float*)list.raddr;
+            fret2 = *(float*)((char*)list.raddr + 4);
+          }
+        }
+        if (list.flags & __VA_REGISTER_DOUBLESTRUCT_RETURN) {
+          if (list.rsize == sizeof(double)) {
+            dret = *(double*)list.raddr;
+          } else
+          if (list.rsize == 2*sizeof(double)) {
+            dret = *(double*)list.raddr;
+            dret2 = *(double*)((char*)list.raddr + 8);
+          }
+        }
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-mips64eb-linux.s b/vacall/vacall-mips64eb-linux.s
new file mode 100644 (file)
index 0000000..caeec7b
--- /dev/null
@@ -0,0 +1,362 @@
+       .file   1 "vacall-mips64.c"
+       .section .mdebug.abi64
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       .frame  $fp,272,$31             # vars= 160, regs= 6/0, args= 0, gp= 0
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       daddiu  $sp,$sp,-272
+       sd      $28,184($sp)
+       lui     $28,%hi(%neg(%gp_rel(vacall_receiver)))
+       daddu   $28,$28,$25
+       daddiu  $28,$28,%lo(%neg(%gp_rel(vacall_receiver)))
+       ld      $12,%got_disp(vacall_function)($28)
+       sd      $fp,192($sp)
+       move    $fp,$sp
+       ld      $25,0($12)
+       daddiu  $12,$fp,208
+       sd      $31,200($sp)
+       sd      $18,176($sp)
+       sd      $17,168($sp)
+       sd      $16,160($sp)
+       sd      $4,208($fp)
+       sd      $5,216($fp)
+       sd      $6,224($fp)
+       sd      $7,232($fp)
+       sd      $8,240($fp)
+       sd      $9,248($fp)
+       sd      $10,256($fp)
+       sd      $11,264($fp)
+       sdc1    $f12,96($fp)
+       sdc1    $f13,104($fp)
+       sdc1    $f14,112($fp)
+       sdc1    $f15,120($fp)
+       sdc1    $f16,128($fp)
+       sdc1    $f17,136($fp)
+       sdc1    $f18,144($fp)
+       sdc1    $f19,152($fp)
+       swc1    $f12,60($fp)
+       swc1    $f13,64($fp)
+       swc1    $f14,68($fp)
+       swc1    $f15,72($fp)
+       swc1    $f16,76($fp)
+       swc1    $f17,80($fp)
+       swc1    $f18,84($fp)
+       swc1    $f19,88($fp)
+       move    $4,$fp
+       sw      $0,0($fp)
+       sd      $12,24($fp)
+       sd      $0,32($fp)
+       sw      $0,40($fp)
+       jalr    $25
+       sw      $0,56($fp)
+
+       lw      $12,40($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   # 0x1
+
+       beq     $12,$13,.L43
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L43
+       li      $13,3                   # 0x3
+
+       beq     $12,$13,.L46
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L47
+       li      $13,5                   # 0x5
+
+       beq     $12,$13,.L48
+       li      $13,6                   # 0x6
+
+       beq     $12,$13,.L49
+       li      $13,7                   # 0x7
+
+       beq     $12,$13,.L50
+       li      $13,8                   # 0x8
+
+       beq     $12,$13,.L44
+       li      $13,9                   # 0x9
+
+       beq     $12,$13,.L44
+       li      $13,10                  # 0xa
+
+       beq     $12,$13,.L44
+       li      $13,11                  # 0xb
+
+       beq     $12,$13,.L44
+       li      $13,12                  # 0xc
+
+       beq     $12,$13,.L51
+       li      $13,13                  # 0xd
+
+       beq     $12,$13,.L52
+       li      $13,14                  # 0xe
+
+       beq     $12,$13,.L44
+       li      $13,15                  # 0xf
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       ld      $14,48($fp)
+
+       ld      $12,48($fp)
+       li      $13,1                   # 0x1
+       beq     $12,$13,.L53
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L54
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L55
+       li      $13,8                   # 0x8
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L58:
+       ld      $31,200($sp)
+       ld      $fp,192($sp)
+       ld      $28,184($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,200($sp)
+       ld      $28,184($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       lb      $2,8($fp)
+       ld      $fp,192($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L44:
+       b       .L1
+       ld      $2,8($fp)
+
+       .align  3
+.L46:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L48:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lwu     $2,8($fp)
+
+.L52:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       daddiu  $13,$14,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L59
+       andi    $13,$12,0x800
+
+       ld      $13,32($fp)
+       li      $24,-8                  # 0xfffffffffffffff8
+       sltu    $25,$14,9
+       andi    $15,$13,0x7
+       and     $24,$13,$24
+       beq     $25,$0,.L24
+       daddu   $13,$14,$15
+
+       sltu    $25,$13,9
+       sll     $13,$13,0
+       beq     $25,$0,.L25
+       subu    $13,$0,$13
+
+       ld      $25,0($24)
+       sll     $13,$13,3
+       li      $24,-1                  # 0xffffffffffffffff
+       dsll    $13,$24,$13
+       and     $13,$13,$25
+       sll     $15,$15,3
+       dsll    $2,$13,$15
+.L23:
+       andi    $13,$12,0x800
+.L59:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   # 0x4
+       beq     $14,$13,.L56
+       li      $13,8                   # 0x8
+
+       beql    $14,$13,.L57
+       ld      $13,32($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L58
+       move    $sp,$fp
+
+       li      $12,16                  # 0x10
+.L60:
+       bnel    $14,$12,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   # 0x8
+
+       bne     $14,$12,.L60
+       li      $12,16                  # 0x10
+
+       ld      $13,32($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       sll     $13,$13,0
+
+       ld      $18,8($24)
+       subu    $13,$0,$13
+       move    $16,$15
+       li      $25,-1                  # 0xffffffffffffffff
+       subu    $15,$0,$15
+       sll     $13,$13,3
+       dsll    $13,$25,$13
+       ld      $17,0($24)
+       sll     $25,$15,2
+       addiu   $24,$25,32
+       and     $13,$13,$18
+       sll     $15,$16,3
+       dsra    $25,$13,$24
+       dsll    $16,$17,$15
+       dsra    $24,$25,$24
+       or      $2,$16,$24
+       b       .L23
+       dsll    $3,$13,$15
+
+.L53:
+       ld      $12,32($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L54:
+       ld      $12,32($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $18,16($24)
+       subu    $13,$0,$13
+       ld      $16,8($24)
+       ld      $17,0($24)
+       subu    $25,$0,$15
+       sll     $13,$13,3
+       li      $24,-1                  # 0xffffffffffffffff
+       dsll    $24,$24,$13
+       sll     $25,$25,3
+       sll     $15,$15,3
+       addiu   $25,$25,64
+       and     $13,$24,$18
+       dsra    $13,$13,$25
+       dsll    $24,$17,$15
+       dsra    $17,$16,$25
+       dsll    $15,$16,$15
+       or      $2,$24,$17
+       b       .L23
+       or      $3,$13,$15
+
+.L56:
+       ld      $12,32($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L55:
+       ld      $12,32($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       ld      $16,8($24)
+       ld      $25,0($24)
+       sll     $13,$13,3
+       li      $24,-1                  # 0xffffffffffffffff
+       dsll    $13,$24,$13
+       subu    $24,$0,$15
+       and     $13,$13,$16
+       sll     $24,$24,3
+       sll     $15,$15,3
+       dsra    $13,$13,$24
+       dsll    $15,$25,$15
+       b       .L23
+       or      $2,$13,$15
+
+.L57:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/vacall/vacall-mips64eb-macro.S b/vacall/vacall-mips64eb-macro.S
new file mode 100644 (file)
index 0000000..87b6667
--- /dev/null
@@ -0,0 +1,356 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mips64.c"
+       .text
+       .align  2
+       .align  3
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       DECLARE_FUNCTION(vacall_receiver)
+vacall_receiver:
+       .frame  $fp,272,$31             
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       daddiu  $sp,$sp,-272
+       sd      $28,184($sp)
+       lui     $28,%hi(%neg(%gp_rel(vacall_receiver)))
+       daddu   $28,$28,$25
+       daddiu  $28,$28,%lo(%neg(%gp_rel(vacall_receiver)))
+       ld      $12,%got_disp(vacall_function)($28)
+       sd      $fp,192($sp)
+       move    $fp,$sp
+       ld      $25,0($12)
+       daddiu  $12,$fp,208
+       sd      $31,200($sp)
+       sd      $18,176($sp)
+       sd      $17,168($sp)
+       sd      $16,160($sp)
+       sd      $4,208($fp)
+       sd      $5,216($fp)
+       sd      $6,224($fp)
+       sd      $7,232($fp)
+       sd      $8,240($fp)
+       sd      $9,248($fp)
+       sd      $10,256($fp)
+       sd      $11,264($fp)
+       sdc1    $f12,96($fp)
+       sdc1    $f13,104($fp)
+       sdc1    $f14,112($fp)
+       sdc1    $f15,120($fp)
+       sdc1    $f16,128($fp)
+       sdc1    $f17,136($fp)
+       sdc1    $f18,144($fp)
+       sdc1    $f19,152($fp)
+       swc1    $f12,60($fp)
+       swc1    $f13,64($fp)
+       swc1    $f14,68($fp)
+       swc1    $f15,72($fp)
+       swc1    $f16,76($fp)
+       swc1    $f17,80($fp)
+       swc1    $f18,84($fp)
+       swc1    $f19,88($fp)
+       move    $4,$fp
+       sw      $0,0($fp)
+       sd      $12,24($fp)
+       sd      $0,32($fp)
+       sw      $0,40($fp)
+       jalr    $25
+       sw      $0,56($fp)
+
+       lw      $12,40($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   
+
+       beq     $12,$13,.L43
+       li      $13,2                   
+
+       beq     $12,$13,.L43
+       li      $13,3                   
+
+       beq     $12,$13,.L46
+       li      $13,4                   
+
+       beq     $12,$13,.L47
+       li      $13,5                   
+
+       beq     $12,$13,.L48
+       li      $13,6                   
+
+       beq     $12,$13,.L49
+       li      $13,7                   
+
+       beq     $12,$13,.L50
+       li      $13,8                   
+
+       beq     $12,$13,.L44
+       li      $13,9                   
+
+       beq     $12,$13,.L44
+       li      $13,10                  
+
+       beq     $12,$13,.L44
+       li      $13,11                  
+
+       beq     $12,$13,.L44
+       li      $13,12                  
+
+       beq     $12,$13,.L51
+       li      $13,13                  
+
+       beq     $12,$13,.L52
+       li      $13,14                  
+
+       beq     $12,$13,.L44
+       li      $13,15                  
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       ld      $14,48($fp)
+
+       ld      $12,48($fp)
+       li      $13,1                   
+       beq     $12,$13,.L53
+       li      $13,2                   
+
+       beq     $12,$13,.L54
+       li      $13,4                   
+
+       beq     $12,$13,.L55
+       li      $13,8                   
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L58:
+       ld      $31,200($sp)
+       ld      $fp,192($sp)
+       ld      $28,184($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,200($sp)
+       ld      $28,184($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       lb      $2,8($fp)
+       ld      $fp,192($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L44:
+       b       .L1
+       ld      $2,8($fp)
+
+       .align  3
+.L46:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L48:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lwu     $2,8($fp)
+
+.L52:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       daddiu  $13,$14,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L59
+       andi    $13,$12,0x800
+
+       ld      $13,32($fp)
+       li      $24,-8                  
+       sltu    $25,$14,9
+       andi    $15,$13,0x7
+       and     $24,$13,$24
+       beq     $25,$0,.L24
+       daddu   $13,$14,$15
+
+       sltu    $25,$13,9
+       sll     $13,$13,0
+       beq     $25,$0,.L25
+       subu    $13,$0,$13
+
+       ld      $25,0($24)
+       sll     $13,$13,3
+       li      $24,-1                  
+       dsll    $13,$24,$13
+       and     $13,$13,$25
+       sll     $15,$15,3
+       dsll    $2,$13,$15
+.L23:
+       andi    $13,$12,0x800
+.L59:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   
+       beq     $14,$13,.L56
+       li      $13,8                   
+
+       beql    $14,$13,.L57
+       ld      $13,32($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L58
+       move    $sp,$fp
+
+       li      $12,16                  
+.L60:
+       bnel    $14,$12,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   
+
+       bne     $14,$12,.L60
+       li      $12,16                  
+
+       ld      $13,32($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       sll     $13,$13,0
+
+       ld      $18,8($24)
+       subu    $13,$0,$13
+       move    $16,$15
+       li      $25,-1                  
+       subu    $15,$0,$15
+       sll     $13,$13,3
+       dsll    $13,$25,$13
+       ld      $17,0($24)
+       sll     $25,$15,2
+       addiu   $24,$25,32
+       and     $13,$13,$18
+       sll     $15,$16,3
+       dsra    $25,$13,$24
+       dsll    $16,$17,$15
+       dsra    $24,$25,$24
+       or      $2,$16,$24
+       b       .L23
+       dsll    $3,$13,$15
+
+.L53:
+       ld      $12,32($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L54:
+       ld      $12,32($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $18,16($24)
+       subu    $13,$0,$13
+       ld      $16,8($24)
+       ld      $17,0($24)
+       subu    $25,$0,$15
+       sll     $13,$13,3
+       li      $24,-1                  
+       dsll    $24,$24,$13
+       sll     $25,$25,3
+       sll     $15,$15,3
+       addiu   $25,$25,64
+       and     $13,$24,$18
+       dsra    $13,$13,$25
+       dsll    $24,$17,$15
+       dsra    $17,$16,$25
+       dsll    $15,$16,$15
+       or      $2,$24,$17
+       b       .L23
+       or      $3,$13,$15
+
+.L56:
+       ld      $12,32($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L55:
+       ld      $12,32($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       ld      $16,8($24)
+       ld      $25,0($24)
+       sll     $13,$13,3
+       li      $24,-1                  
+       dsll    $13,$24,$13
+       subu    $24,$0,$15
+       and     $13,$13,$16
+       sll     $24,$24,3
+       sll     $15,$15,3
+       dsra    $13,$13,$24
+       dsll    $15,$25,$15
+       b       .L23
+       or      $2,$13,$15
+
+.L57:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
diff --git a/vacall/vacall-mips64el-linux.s b/vacall/vacall-mips64el-linux.s
new file mode 100644 (file)
index 0000000..a2ea9ad
--- /dev/null
@@ -0,0 +1,366 @@
+       .file   1 "vacall-mips64.c"
+       .section .mdebug.abi64
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       .frame  $fp,272,$31             # vars= 160, regs= 6/0, args= 0, gp= 0
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       daddiu  $sp,$sp,-272
+       sd      $28,184($sp)
+       lui     $28,%hi(%neg(%gp_rel(vacall_receiver)))
+       daddu   $28,$28,$25
+       daddiu  $28,$28,%lo(%neg(%gp_rel(vacall_receiver)))
+       ld      $12,%got_disp(vacall_function)($28)
+       sd      $fp,192($sp)
+       move    $fp,$sp
+       ld      $25,0($12)
+       daddiu  $12,$fp,208
+       sd      $31,200($sp)
+       sd      $18,176($sp)
+       sd      $17,168($sp)
+       sd      $16,160($sp)
+       sd      $4,208($fp)
+       sd      $5,216($fp)
+       sd      $6,224($fp)
+       sd      $7,232($fp)
+       sd      $8,240($fp)
+       sd      $9,248($fp)
+       sd      $10,256($fp)
+       sd      $11,264($fp)
+       sdc1    $f12,96($fp)
+       sdc1    $f13,104($fp)
+       sdc1    $f14,112($fp)
+       sdc1    $f15,120($fp)
+       sdc1    $f16,128($fp)
+       sdc1    $f17,136($fp)
+       sdc1    $f18,144($fp)
+       sdc1    $f19,152($fp)
+       swc1    $f12,60($fp)
+       swc1    $f13,64($fp)
+       swc1    $f14,68($fp)
+       swc1    $f15,72($fp)
+       swc1    $f16,76($fp)
+       swc1    $f17,80($fp)
+       swc1    $f18,84($fp)
+       swc1    $f19,88($fp)
+       move    $4,$fp
+       sw      $0,0($fp)
+       sd      $12,24($fp)
+       sd      $0,32($fp)
+       sw      $0,40($fp)
+       jalr    $25
+       sw      $0,56($fp)
+
+       lw      $12,40($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   # 0x1
+
+       beq     $12,$13,.L43
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L43
+       li      $13,3                   # 0x3
+
+       beq     $12,$13,.L46
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L47
+       li      $13,5                   # 0x5
+
+       beq     $12,$13,.L48
+       li      $13,6                   # 0x6
+
+       beq     $12,$13,.L49
+       li      $13,7                   # 0x7
+
+       beq     $12,$13,.L50
+       li      $13,8                   # 0x8
+
+       beq     $12,$13,.L44
+       li      $13,9                   # 0x9
+
+       beq     $12,$13,.L44
+       li      $13,10                  # 0xa
+
+       beq     $12,$13,.L44
+       li      $13,11                  # 0xb
+
+       beq     $12,$13,.L44
+       li      $13,12                  # 0xc
+
+       beq     $12,$13,.L51
+       li      $13,13                  # 0xd
+
+       beq     $12,$13,.L52
+       li      $13,14                  # 0xe
+
+       beq     $12,$13,.L44
+       li      $13,15                  # 0xf
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       ld      $14,48($fp)
+
+       ld      $12,48($fp)
+       li      $13,1                   # 0x1
+       beq     $12,$13,.L53
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L54
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L55
+       li      $13,8                   # 0x8
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L58:
+       ld      $31,200($sp)
+       ld      $fp,192($sp)
+       ld      $28,184($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,200($sp)
+       ld      $28,184($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       lb      $2,8($fp)
+       ld      $fp,192($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L44:
+       b       .L1
+       ld      $2,8($fp)
+
+       .align  3
+.L46:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L48:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lwu     $2,8($fp)
+
+.L52:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       daddiu  $13,$14,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L59
+       andi    $13,$12,0x800
+
+       ld      $13,32($fp)
+       li      $15,-8                  # 0xfffffffffffffff8
+       sltu    $25,$14,9
+       andi    $24,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       daddu   $13,$14,$24
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       dsll    $13,$13,3
+
+       daddiu  $13,$13,-1
+       ld      $25,0($15)
+       sll     $13,$13,0
+       li      $15,2                   # 0x2
+       dsll    $13,$15,$13
+       daddiu  $13,$13,-1
+       and     $13,$13,$25
+       sll     $24,$24,3
+       dsra    $2,$13,$24
+.L23:
+       andi    $13,$12,0x800
+.L59:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   # 0x4
+       beq     $14,$13,.L56
+       li      $13,8                   # 0x8
+
+       beql    $14,$13,.L57
+       ld      $13,32($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L58
+       move    $sp,$fp
+
+       li      $12,16                  # 0x10
+.L60:
+       bnel    $14,$12,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   # 0x8
+
+       bne     $14,$12,.L60
+       li      $12,16                  # 0x10
+
+       ld      $13,32($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       dsll    $13,$13,3
+
+       daddiu  $13,$13,-65
+       ld      $17,8($15)
+       li      $25,2                   # 0x2
+       sll     $13,$13,0
+       dsll    $13,$25,$13
+       subu    $25,$0,$24
+       sll     $25,$25,2
+       ld      $16,0($15)
+       daddiu  $13,$13,-1
+       addiu   $15,$25,32
+       and     $13,$13,$17
+       sll     $24,$24,3
+       dsll    $25,$13,$15
+       dsra    $16,$16,$24
+       dsll    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsra    $3,$13,$24
+
+.L53:
+       ld      $12,32($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L54:
+       ld      $12,32($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       daddiu  $13,$13,-129
+       ld      $16,8($15)
+       ld      $17,0($15)
+       sll     $13,$13,0
+       ld      $18,16($15)
+       li      $15,2                   # 0x2
+       subu    $25,$0,$24
+       dsll    $15,$15,$13
+       daddiu  $15,$15,-1
+       sll     $25,$25,3
+       sll     $24,$24,3
+       addiu   $25,$25,64
+       and     $13,$15,$18
+       dsll    $13,$13,$25
+       dsra    $15,$17,$24
+       dsll    $17,$16,$25
+       dsra    $24,$16,$24
+       or      $2,$15,$17
+       b       .L23
+       or      $3,$13,$24
+
+.L56:
+       ld      $12,32($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L55:
+       ld      $12,32($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       daddiu  $13,$13,-65
+       li      $25,2                   # 0x2
+       sll     $13,$13,0
+       ld      $17,8($15)
+       dsll    $13,$25,$13
+       ld      $25,0($15)
+       daddiu  $13,$13,-1
+       subu    $16,$0,$24
+       and     $15,$13,$17
+       sll     $24,$24,3
+       sll     $13,$16,3
+       dsll    $13,$15,$13
+       dsra    $24,$25,$24
+       b       .L23
+       or      $2,$13,$24
+
+.L57:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/vacall/vacall-mips64el-macro.S b/vacall/vacall-mips64el-macro.S
new file mode 100644 (file)
index 0000000..63b81f5
--- /dev/null
@@ -0,0 +1,360 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mips64.c"
+       .text
+       .align  2
+       .align  3
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       DECLARE_FUNCTION(vacall_receiver)
+vacall_receiver:
+       .frame  $fp,272,$31             
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       daddiu  $sp,$sp,-272
+       sd      $28,184($sp)
+       lui     $28,%hi(%neg(%gp_rel(vacall_receiver)))
+       daddu   $28,$28,$25
+       daddiu  $28,$28,%lo(%neg(%gp_rel(vacall_receiver)))
+       ld      $12,%got_disp(vacall_function)($28)
+       sd      $fp,192($sp)
+       move    $fp,$sp
+       ld      $25,0($12)
+       daddiu  $12,$fp,208
+       sd      $31,200($sp)
+       sd      $18,176($sp)
+       sd      $17,168($sp)
+       sd      $16,160($sp)
+       sd      $4,208($fp)
+       sd      $5,216($fp)
+       sd      $6,224($fp)
+       sd      $7,232($fp)
+       sd      $8,240($fp)
+       sd      $9,248($fp)
+       sd      $10,256($fp)
+       sd      $11,264($fp)
+       sdc1    $f12,96($fp)
+       sdc1    $f13,104($fp)
+       sdc1    $f14,112($fp)
+       sdc1    $f15,120($fp)
+       sdc1    $f16,128($fp)
+       sdc1    $f17,136($fp)
+       sdc1    $f18,144($fp)
+       sdc1    $f19,152($fp)
+       swc1    $f12,60($fp)
+       swc1    $f13,64($fp)
+       swc1    $f14,68($fp)
+       swc1    $f15,72($fp)
+       swc1    $f16,76($fp)
+       swc1    $f17,80($fp)
+       swc1    $f18,84($fp)
+       swc1    $f19,88($fp)
+       move    $4,$fp
+       sw      $0,0($fp)
+       sd      $12,24($fp)
+       sd      $0,32($fp)
+       sw      $0,40($fp)
+       jalr    $25
+       sw      $0,56($fp)
+
+       lw      $12,40($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   
+
+       beq     $12,$13,.L43
+       li      $13,2                   
+
+       beq     $12,$13,.L43
+       li      $13,3                   
+
+       beq     $12,$13,.L46
+       li      $13,4                   
+
+       beq     $12,$13,.L47
+       li      $13,5                   
+
+       beq     $12,$13,.L48
+       li      $13,6                   
+
+       beq     $12,$13,.L49
+       li      $13,7                   
+
+       beq     $12,$13,.L50
+       li      $13,8                   
+
+       beq     $12,$13,.L44
+       li      $13,9                   
+
+       beq     $12,$13,.L44
+       li      $13,10                  
+
+       beq     $12,$13,.L44
+       li      $13,11                  
+
+       beq     $12,$13,.L44
+       li      $13,12                  
+
+       beq     $12,$13,.L51
+       li      $13,13                  
+
+       beq     $12,$13,.L52
+       li      $13,14                  
+
+       beq     $12,$13,.L44
+       li      $13,15                  
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       ld      $14,48($fp)
+
+       ld      $12,48($fp)
+       li      $13,1                   
+       beq     $12,$13,.L53
+       li      $13,2                   
+
+       beq     $12,$13,.L54
+       li      $13,4                   
+
+       beq     $12,$13,.L55
+       li      $13,8                   
+
+       bnel    $12,$13,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L58:
+       ld      $31,200($sp)
+       ld      $fp,192($sp)
+       ld      $28,184($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,200($sp)
+       ld      $28,184($sp)
+       ld      $18,176($sp)
+       ld      $17,168($sp)
+       ld      $16,160($sp)
+       lb      $2,8($fp)
+       ld      $fp,192($sp)
+       j       $31
+       daddiu  $sp,$sp,272
+
+       .align  3
+.L44:
+       b       .L1
+       ld      $2,8($fp)
+
+       .align  3
+.L46:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L48:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lwu     $2,8($fp)
+
+.L52:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       daddiu  $13,$14,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L59
+       andi    $13,$12,0x800
+
+       ld      $13,32($fp)
+       li      $15,-8                  
+       sltu    $25,$14,9
+       andi    $24,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       daddu   $13,$14,$24
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       dsll    $13,$13,3
+
+       daddiu  $13,$13,-1
+       ld      $25,0($15)
+       sll     $13,$13,0
+       li      $15,2                   
+       dsll    $13,$15,$13
+       daddiu  $13,$13,-1
+       and     $13,$13,$25
+       sll     $24,$24,3
+       dsra    $2,$13,$24
+.L23:
+       andi    $13,$12,0x800
+.L59:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   
+       beq     $14,$13,.L56
+       li      $13,8                   
+
+       beql    $14,$13,.L57
+       ld      $13,32($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L58
+       move    $sp,$fp
+
+       li      $12,16                  
+.L60:
+       bnel    $14,$12,.L58
+       move    $sp,$fp
+
+       ld      $12,32($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   
+
+       bne     $14,$12,.L60
+       li      $12,16                  
+
+       ld      $13,32($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       dsll    $13,$13,3
+
+       daddiu  $13,$13,-65
+       ld      $17,8($15)
+       li      $25,2                   
+       sll     $13,$13,0
+       dsll    $13,$25,$13
+       subu    $25,$0,$24
+       sll     $25,$25,2
+       ld      $16,0($15)
+       daddiu  $13,$13,-1
+       addiu   $15,$25,32
+       and     $13,$13,$17
+       sll     $24,$24,3
+       dsll    $25,$13,$15
+       dsra    $16,$16,$24
+       dsll    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsra    $3,$13,$24
+
+.L53:
+       ld      $12,32($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L54:
+       ld      $12,32($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       daddiu  $13,$13,-129
+       ld      $16,8($15)
+       ld      $17,0($15)
+       sll     $13,$13,0
+       ld      $18,16($15)
+       li      $15,2                   
+       subu    $25,$0,$24
+       dsll    $15,$15,$13
+       daddiu  $15,$15,-1
+       sll     $25,$25,3
+       sll     $24,$24,3
+       addiu   $25,$25,64
+       and     $13,$15,$18
+       dsll    $13,$13,$25
+       dsra    $15,$17,$24
+       dsll    $17,$16,$25
+       dsra    $24,$16,$24
+       or      $2,$15,$17
+       b       .L23
+       or      $3,$13,$24
+
+.L56:
+       ld      $12,32($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L55:
+       ld      $12,32($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       daddiu  $13,$13,-65
+       li      $25,2                   
+       sll     $13,$13,0
+       ld      $17,8($15)
+       dsll    $13,$25,$13
+       ld      $25,0($15)
+       daddiu  $13,$13,-1
+       subu    $16,$0,$24
+       and     $15,$13,$17
+       sll     $24,$24,3
+       sll     $13,$16,3
+       dsll    $13,$15,$13
+       dsra    $24,$25,$24
+       b       .L23
+       or      $2,$13,$24
+
+.L57:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
diff --git a/vacall/vacall-mipseb-linux.s b/vacall/vacall-mipseb-linux.s
new file mode 100644 (file)
index 0000000..7cc4184
--- /dev/null
@@ -0,0 +1,295 @@
+       .file   1 "vacall-mips.c"
+       .section .mdebug.abi32
+       .previous
+       .nan    legacy
+       .module fp=xx
+       .module nooddspreg
+       .abicalls
+       .text
+       .align  2
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       .frame  $fp,104,$31             # vars= 72, regs= 2/0, args= 16, gp= 8
+       .mask   0xc0000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-104
+       sw      $fp,96($sp)
+       move    $fp,$sp
+       sw      $31,100($sp)
+       la      $8,vacall_function
+       sw      $4,104($fp)
+       lw      $25,0($8)
+       addiu   $4,$fp,104
+       sw      $4,40($fp)
+       addiu   $4,$fp,120
+       sw      $4,56($fp)
+       .cprestore      16
+       addiu   $4,$fp,24
+       sw      $5,108($fp)
+       sw      $6,112($fp)
+       sw      $7,116($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f14,88($fp)
+       swc1    $f12,68($fp)
+       swc1    $f14,72($fp)
+       sw      $0,24($fp)
+       sw      $0,44($fp)
+       sw      $0,48($fp)
+       sw      $0,60($fp)
+       sw      $0,64($fp)
+       jal     $25
+       lw      $4,48($fp)
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L1
+       li      $5,1                    # 0x1
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,3                    # 0x3
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L29
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L30
+       li      $5,5                    # 0x5
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L31
+       li      $5,6                    # 0x6
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,7                    # 0x7
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,9                    # 0x9
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       addiu   $5,$4,-10
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$0,$L32
+       li      $5,12                   # 0xc
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L33
+       li      $5,13                   # 0xd
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L34
+       li      $5,14                   # 0xe
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,15                   # 0xf
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,24($fp)
+       andi    $4,$4,0x2
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,$L38
+       lw      $2,44($fp)
+       .set    macro
+       .set    reorder
+
+       lw      $4,52($fp)
+       li      $5,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L35
+       lw      $4,44($fp)
+       .set    macro
+       .set    reorder
+
+       li      $5,2                    # 0x2
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L36
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,44($fp)
+       lw      $2,0($4)
+$L1:
+$L38:
+       move    $sp,$fp
+$L37:
+       lw      $31,100($sp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L23:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lb      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L27:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lw      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L29:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L30:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lh      $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L31:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L34:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       ldc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L32:
+       lw      $2,32($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lw      $3,36($fp)
+       .set    macro
+       .set    reorder
+
+$L33:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lwc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L35:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+$L36:
+       lw      $4,44($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/vacall/vacall-mipseb-macro.S b/vacall/vacall-mipseb-macro.S
new file mode 100644 (file)
index 0000000..9255dce
--- /dev/null
@@ -0,0 +1,289 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mips.c"
+       .text
+       .align  2
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       DECLARE_FUNCTION(vacall_receiver)
+vacall_receiver:
+       .frame  $fp,104,$31             
+       .mask   0xc0000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-104
+       sw      $fp,96($sp)
+       move    $fp,$sp
+       sw      $31,100($sp)
+       la      $8,vacall_function
+       sw      $4,104($fp)
+       lw      $25,0($8)
+       addiu   $4,$fp,104
+       sw      $4,40($fp)
+       addiu   $4,$fp,120
+       sw      $4,56($fp)
+       .cprestore      16
+       addiu   $4,$fp,24
+       sw      $5,108($fp)
+       sw      $6,112($fp)
+       sw      $7,116($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f14,88($fp)
+       swc1    $f12,68($fp)
+       swc1    $f14,72($fp)
+       sw      $0,24($fp)
+       sw      $0,44($fp)
+       sw      $0,48($fp)
+       sw      $0,60($fp)
+       sw      $0,64($fp)
+       jal     $25
+       lw      $4,48($fp)
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L1
+       li      $5,1                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,3                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L29
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L30
+       li      $5,5                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L31
+       li      $5,6                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,7                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,9                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       addiu   $5,$4,-10
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$0,$L32
+       li      $5,12                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L33
+       li      $5,13                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L34
+       li      $5,14                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,15                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,24($fp)
+       andi    $4,$4,0x2
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,$L38
+       lw      $2,44($fp)
+       .set    macro
+       .set    reorder
+
+       lw      $4,52($fp)
+       li      $5,1                    
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L35
+       lw      $4,44($fp)
+       .set    macro
+       .set    reorder
+
+       li      $5,2                    
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L36
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,44($fp)
+       lw      $2,0($4)
+$L1:
+$L38:
+       move    $sp,$fp
+$L37:
+       lw      $31,100($sp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L23:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lb      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L27:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lw      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L29:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L30:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lh      $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L31:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L34:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       ldc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L32:
+       lw      $2,32($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lw      $3,36($fp)
+       .set    macro
+       .set    reorder
+
+$L33:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lwc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L35:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+$L36:
+       lw      $4,44($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
diff --git a/vacall/vacall-mipsel-linux.s b/vacall/vacall-mipsel-linux.s
new file mode 100644 (file)
index 0000000..7cc4184
--- /dev/null
@@ -0,0 +1,295 @@
+       .file   1 "vacall-mips.c"
+       .section .mdebug.abi32
+       .previous
+       .nan    legacy
+       .module fp=xx
+       .module nooddspreg
+       .abicalls
+       .text
+       .align  2
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       .frame  $fp,104,$31             # vars= 72, regs= 2/0, args= 16, gp= 8
+       .mask   0xc0000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-104
+       sw      $fp,96($sp)
+       move    $fp,$sp
+       sw      $31,100($sp)
+       la      $8,vacall_function
+       sw      $4,104($fp)
+       lw      $25,0($8)
+       addiu   $4,$fp,104
+       sw      $4,40($fp)
+       addiu   $4,$fp,120
+       sw      $4,56($fp)
+       .cprestore      16
+       addiu   $4,$fp,24
+       sw      $5,108($fp)
+       sw      $6,112($fp)
+       sw      $7,116($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f14,88($fp)
+       swc1    $f12,68($fp)
+       swc1    $f14,72($fp)
+       sw      $0,24($fp)
+       sw      $0,44($fp)
+       sw      $0,48($fp)
+       sw      $0,60($fp)
+       sw      $0,64($fp)
+       jal     $25
+       lw      $4,48($fp)
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L1
+       li      $5,1                    # 0x1
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,2                    # 0x2
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,3                    # 0x3
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L29
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L30
+       li      $5,5                    # 0x5
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L31
+       li      $5,6                    # 0x6
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,7                    # 0x7
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,8                    # 0x8
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,9                    # 0x9
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       addiu   $5,$4,-10
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$0,$L32
+       li      $5,12                   # 0xc
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L33
+       li      $5,13                   # 0xd
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L34
+       li      $5,14                   # 0xe
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,15                   # 0xf
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,24($fp)
+       andi    $4,$4,0x2
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,$L38
+       lw      $2,44($fp)
+       .set    macro
+       .set    reorder
+
+       lw      $4,52($fp)
+       li      $5,1                    # 0x1
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L35
+       lw      $4,44($fp)
+       .set    macro
+       .set    reorder
+
+       li      $5,2                    # 0x2
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L36
+       li      $5,4                    # 0x4
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,44($fp)
+       lw      $2,0($4)
+$L1:
+$L38:
+       move    $sp,$fp
+$L37:
+       lw      $31,100($sp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L23:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lb      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L27:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lw      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L29:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L30:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lh      $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L31:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L34:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       ldc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L32:
+       lw      $2,32($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lw      $3,36($fp)
+       .set    macro
+       .set    reorder
+
+$L33:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lwc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L35:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+$L36:
+       lw      $4,44($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/vacall/vacall-mipsel-macro.S b/vacall/vacall-mipsel-macro.S
new file mode 100644 (file)
index 0000000..9255dce
--- /dev/null
@@ -0,0 +1,289 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mips.c"
+       .text
+       .align  2
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       DECLARE_FUNCTION(vacall_receiver)
+vacall_receiver:
+       .frame  $fp,104,$31             
+       .mask   0xc0000000,-4
+       .fmask  0x00000000,0
+       .set    noreorder
+       .cpload $25
+       .set    reorder
+       addiu   $sp,$sp,-104
+       sw      $fp,96($sp)
+       move    $fp,$sp
+       sw      $31,100($sp)
+       la      $8,vacall_function
+       sw      $4,104($fp)
+       lw      $25,0($8)
+       addiu   $4,$fp,104
+       sw      $4,40($fp)
+       addiu   $4,$fp,120
+       sw      $4,56($fp)
+       .cprestore      16
+       addiu   $4,$fp,24
+       sw      $5,108($fp)
+       sw      $6,112($fp)
+       sw      $7,116($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f14,88($fp)
+       swc1    $f12,68($fp)
+       swc1    $f14,72($fp)
+       sw      $0,24($fp)
+       sw      $0,44($fp)
+       sw      $0,48($fp)
+       sw      $0,60($fp)
+       sw      $0,64($fp)
+       jal     $25
+       lw      $4,48($fp)
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$0,$L1
+       li      $5,1                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,2                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L23
+       li      $5,3                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L29
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L30
+       li      $5,5                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L31
+       li      $5,6                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,7                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,8                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,9                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       addiu   $5,$4,-10
+       .set    macro
+       .set    reorder
+
+       sltu    $5,$5,2
+       .set    noreorder
+       .set    nomacro
+       bne     $5,$0,$L32
+       li      $5,12                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L33
+       li      $5,13                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L34
+       li      $5,14                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L27
+       li      $5,15                   
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,24($fp)
+       andi    $4,$4,0x2
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$0,$L38
+       lw      $2,44($fp)
+       .set    macro
+       .set    reorder
+
+       lw      $4,52($fp)
+       li      $5,1                    
+       .set    noreorder
+       .set    nomacro
+       beql    $4,$5,$L35
+       lw      $4,44($fp)
+       .set    macro
+       .set    reorder
+
+       li      $5,2                    
+       .set    noreorder
+       .set    nomacro
+       beq     $4,$5,$L36
+       li      $5,4                    
+       .set    macro
+       .set    reorder
+
+       .set    noreorder
+       .set    nomacro
+       bnel    $4,$5,$L37
+       move    $sp,$fp
+       .set    macro
+       .set    reorder
+
+       lw      $4,44($fp)
+       lw      $2,0($4)
+$L1:
+$L38:
+       move    $sp,$fp
+$L37:
+       lw      $31,100($sp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L23:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lb      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L27:
+       move    $sp,$fp
+       lw      $31,100($sp)
+       lw      $2,32($fp)
+       lw      $fp,96($sp)
+       .set    noreorder
+       .set    nomacro
+       j       $31
+       addiu   $sp,$sp,104
+       .set    macro
+       .set    reorder
+
+$L29:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L30:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lh      $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L31:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,32($fp)
+       .set    macro
+       .set    reorder
+
+$L34:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       ldc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L32:
+       lw      $2,32($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lw      $3,36($fp)
+       .set    macro
+       .set    reorder
+
+$L33:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lwc1    $f0,32($fp)
+       .set    macro
+       .set    reorder
+
+$L35:
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lbu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+$L36:
+       lw      $4,44($fp)
+       .set    noreorder
+       .set    nomacro
+       b       $L1
+       lhu     $2,0($4)
+       .set    macro
+       .set    reorder
+
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
diff --git a/vacall/vacall-mipsn32.c b/vacall/vacall-mipsn32.c
new file mode 100644 (file)
index 0000000..32599ce
--- /dev/null
@@ -0,0 +1,508 @@
+/* vacall function for mips CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifndef REENTRANT
+typedef void (*func_pointer)(va_alist);
+#else /* REENTRANT */
+#define vacall_receiver callback_receiver
+typedef void (*func_pointer)(void*,va_alist);
+register struct { func_pointer vacall_function; void* arg; }
+         *             env     __asm__("$2");
+#endif
+register void*         sp      __asm__("$sp");
+register __vaword      iarg0   __asm__("$4");
+register __vaword      iarg1   __asm__("$5");
+register __vaword      iarg2   __asm__("$6");
+register __vaword      iarg3   __asm__("$7");
+register __vaword      iarg4   __asm__("$8");
+register __vaword      iarg5   __asm__("$9");
+register __vaword      iarg6   __asm__("$10");
+register __vaword      iarg7   __asm__("$11");
+register float         farg0   __asm__("$f12");
+register float         farg1   __asm__("$f13");
+register float         farg2   __asm__("$f14");
+register float         farg3   __asm__("$f15");
+register float         farg4   __asm__("$f16");
+register float         farg5   __asm__("$f17");
+register float         farg6   __asm__("$f18");
+register float         farg7   __asm__("$f19");
+register double                darg0   __asm__("$f12");
+register double                darg1   __asm__("$f13");
+register double                darg2   __asm__("$f14");
+register double                darg3   __asm__("$f15");
+register double                darg4   __asm__("$f16");
+register double                darg5   __asm__("$f17");
+register double                darg6   __asm__("$f18");
+register double                darg7   __asm__("$f19");
+register __vaword      iret    __asm__("$2");
+register __vaword      iret2   __asm__("$3");
+register float         fret    __asm__("$f0");
+register float         fret2   __asm__("$f2");
+register double                dret    __asm__("$f0");
+register double                dret2   __asm__("$f2");
+
+/* The ABI requires that the first 8 general-purpose argument words are
+   being passed in registers, even if these words belong to a struct. No room
+   is allocated for these register words on the stack by the caller, but the
+   callee allocates room for them - at the right place in the stack frame,
+   that is, above the usual {fp, retaddr} combo - if and only if they are part
+   of a larger struct that extends to the stack and the address of this struct
+   is taken. */
+struct gpargsequence {
+  __vaword word1; /* r4 */
+  __vaword word2; /* r5 */
+  __vaword word3; /* r6 */
+  __vaword word4; /* r7 */
+  __vaword word5; /* r8 */
+  __vaword word6; /* r9 */
+  __vaword word7; /* r10 */
+  __vaword word8; /* r11 */
+  __vaword firststackword;
+};
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (struct gpargsequence gpargs)
+{
+  __va_alist list;
+  list.darg[0] = darg0;
+  list.darg[1] = darg1;
+  list.darg[2] = darg2;
+  list.darg[3] = darg3;
+  list.darg[4] = darg4;
+  list.darg[5] = darg5;
+  list.darg[6] = darg6;
+  list.darg[7] = darg7;
+  list.farg[0] = farg0;
+  list.farg[1] = farg1;
+  list.farg[2] = farg2;
+  list.farg[3] = farg3;
+  list.farg[4] = farg4;
+  list.farg[5] = farg5;
+  list.farg[6] = farg6;
+  list.farg[7] = farg7;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&gpargs;
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.anum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong) {
+    iret = list.tmp._longlong;
+  } else
+  if (list.rtype == __VAulonglong) {
+    iret = list.tmp._ulonglong;
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      if (list.flags & __VA_GCC_STRUCT_RETURN) {
+        /* gcc returns structs of size 1,2,4,8 in registers. */
+        if (list.rsize == sizeof(char)) {
+          iret = *(unsigned char *) list.raddr;
+        } else
+        if (list.rsize == sizeof(short)) {
+          iret = *(unsigned short *) list.raddr;
+        } else
+        if (list.rsize == sizeof(int)) {
+          iret = *(unsigned int *) list.raddr;
+        } else
+        if (list.rsize == sizeof(long long)) {
+          iret = *(unsigned long long *) list.raddr;
+        }
+      } else {
+        /* cc returns structs of size <= 16 in registers. */
+        /* Maybe this big if cascade could be replaced with
+         * if (list.rsize > 0 && list.rsize <= 16)
+         *   __asm__ ("ldl $2,%0 ; ldr $2,%1"
+         *            : : "m" (((unsigned char *) list.raddr)[0]),
+         *                "m" (((unsigned char *) list.raddr)[7]));
+         */
+        if (list.rsize > 0 && list.rsize <= 16) {
+          #if 0 /* Unoptimized */
+          if (list.rsize == 1) {
+            #if defined(_MIPSEL)
+            iret =   (__vaword)((unsigned char *) list.raddr)[0];
+            #else
+            iret =   (__vaword)((unsigned char *) list.raddr)[0] << 56;
+            #endif
+          } else
+          if (list.rsize == 2) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48);
+            #endif
+          } else
+          if (list.rsize == 3) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40);
+            #endif
+          } else
+          if (list.rsize == 4) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 24);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 32);
+            #endif
+          } else
+          if (list.rsize == 5) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 32);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 24);
+            #endif
+          } else
+          if (list.rsize == 6) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 40);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 16);
+            #endif
+          } else
+          if (list.rsize == 7) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[6] << 48);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[6] << 8);
+            #endif
+          } else
+          if (list.rsize >= 8 && list.rsize <= 16) {
+            #if defined(_MIPSEL)
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[6] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[7] << 56);
+            #else
+            iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                  | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                  | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                  | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                  | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+                  | ((__vaword)((unsigned char *) list.raddr)[5] << 16)
+                  | ((__vaword)((unsigned char *) list.raddr)[6] << 8)
+                  |  (__vaword)((unsigned char *) list.raddr)[7];
+            #endif
+            /* Maybe this big if cascade could be replaced with
+             * if (list.rsize > 8 && list.rsize <= 16)
+             *   __asm__ ("ldl $3,%0 ; ldr $3,%1"
+             *            : : "m" (((unsigned char *) list.raddr)[8]),
+             *                "m" (((unsigned char *) list.raddr)[15]));
+             */
+            if (list.rsize == 8) {
+            } else
+            if (list.rsize == 9) {
+              #if defined(_MIPSEL)
+              iret2 =   (__vaword)((unsigned char *) list.raddr)[8];
+              #else
+              iret2 =   (__vaword)((unsigned char *) list.raddr)[8] << 56;
+              #endif
+            } else
+            if (list.rsize == 10) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48);
+              #endif
+            } else
+            if (list.rsize == 11) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40);
+              #endif
+            } else
+            if (list.rsize == 12) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 24);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 32);
+              #endif
+            } else
+            if (list.rsize == 13) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 32);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 24);
+              #endif
+            } else
+            if (list.rsize == 14) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 40);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 16);
+              #endif
+            } else
+            if (list.rsize == 15) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[14] << 48);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[14] << 8);
+              #endif
+            } else
+            if (list.rsize == 16) {
+              #if defined(_MIPSEL)
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[14] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[15] << 56);
+              #else
+              iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[13] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[14] << 8)
+                     |  (__vaword)((unsigned char *) list.raddr)[15];
+              #endif
+            }
+          }
+          #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+          uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__vaword) */
+          __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+          uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+          uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__vaword) */
+          #if defined(_MIPSEL)
+          if (count <= sizeof(__vaword)) {
+            /* Assign iret. */
+            if (end_offset <= sizeof(__vaword)) {
+              /* 0 < end_offset ≤ sizeof(__vaword) */
+              __vaword mask0 = ((__vaword)2 << (end_offset*8-1)) - 1;
+              iret = (wordaddr[0] & mask0) >> (start_offset*8);
+            } else {
+              /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+              __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+              iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*8-start_offset*8));
+            }
+          } else {
+            /* Assign iret, iret2. */
+            if (end_offset <= 2*sizeof(__vaword)) {
+              /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+              __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+              iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+              iret2 = (wordaddr[1] & mask1) >> (start_offset*8);
+            } else {
+              /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+              __vaword mask2 = ((__vaword)2 << (end_offset*8-2*sizeof(__vaword)*8-1)) - 1;
+              iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*8-start_offset*8));
+              iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__vaword)*8-start_offset*8));
+            }
+          }
+          #else
+          if (count <= sizeof(__vaword)) {
+            /* Assign iret. */
+            if (end_offset <= sizeof(__vaword)) {
+              /* 0 < end_offset ≤ sizeof(__vaword) */
+              __vaword mask0 = - ((__vaword)1 << (sizeof(__vaword)*8-end_offset*8));
+              iret = (wordaddr[0] & mask0) << (start_offset*8);
+            } else {
+              /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+              __vaword mask1 = - ((__vaword)1 << (2*sizeof(__vaword)*8-end_offset*8));
+              iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__vaword)*8-start_offset*8));
+            }
+          } else {
+            /* Assign iret, iret2. */
+            if (end_offset <= 2*sizeof(__vaword)) {
+              /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+              __vaword mask1 = - ((__vaword)1 << (2*sizeof(__vaword)*8-end_offset*8));
+              iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__vaword)*4-start_offset*4) >> (sizeof(__vaword)*4-start_offset*4));
+              iret2 = (wordaddr[1] & mask1) << (start_offset*8);
+            } else {
+              /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+              __vaword mask2 = - ((__vaword)1 << (3*sizeof(__vaword)*8-end_offset*8));
+              iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__vaword)*8-start_offset*8));
+              iret2 = (wordaddr[1] << (start_offset*8)) | ((wordaddr[2] & mask2) >> (sizeof(__vaword)*8-start_offset*8));
+            }
+          }
+          #endif
+          #endif
+        }
+        if (list.flags & __VA_REGISTER_FLOATSTRUCT_RETURN) {
+          if (list.rsize == sizeof(float)) {
+            fret = *(float*)list.raddr;
+          } else
+          if (list.rsize == 2*sizeof(float)) {
+            fret = *(float*)list.raddr;
+            fret2 = *(float*)((char*)list.raddr + 4);
+          }
+        }
+        if (list.flags & __VA_REGISTER_DOUBLESTRUCT_RETURN) {
+          if (list.rsize == sizeof(double)) {
+            dret = *(double*)list.raddr;
+          } else
+          if (list.rsize == 2*sizeof(double)) {
+            dret = *(double*)list.raddr;
+            dret2 = *(double*)((char*)list.raddr + 8);
+          }
+        }
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-mipsn32eb-linux.s b/vacall/vacall-mipsn32eb-linux.s
new file mode 100644 (file)
index 0000000..9feb329
--- /dev/null
@@ -0,0 +1,357 @@
+       .file   1 "vacall-mipsn32.c"
+       .section .mdebug.abiN32
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       .frame  $fp,256,$31             # vars= 144, regs= 6/0, args= 0, gp= 0
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       addiu   $sp,$sp,-256
+       sd      $28,168($sp)
+       lui     $28,%hi(__gnu_local_gp)
+       addiu   $28,$28,%lo(__gnu_local_gp)
+       lw      $12,%got_disp(vacall_function)($28)
+       sd      $fp,176($sp)
+       move    $fp,$sp
+       lw      $25,0($12)
+       addiu   $12,$fp,192
+       sd      $31,184($sp)
+       sd      $18,160($sp)
+       sd      $17,152($sp)
+       sd      $16,144($sp)
+       sd      $4,192($fp)
+       sd      $5,200($fp)
+       sd      $6,208($fp)
+       sd      $7,216($fp)
+       sd      $8,224($fp)
+       sd      $9,232($fp)
+       sd      $10,240($fp)
+       sd      $11,248($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f13,88($fp)
+       sdc1    $f14,96($fp)
+       sdc1    $f15,104($fp)
+       sdc1    $f16,112($fp)
+       sdc1    $f17,120($fp)
+       sdc1    $f18,128($fp)
+       sdc1    $f19,136($fp)
+       swc1    $f12,44($fp)
+       swc1    $f13,48($fp)
+       swc1    $f14,52($fp)
+       swc1    $f15,56($fp)
+       swc1    $f16,60($fp)
+       swc1    $f17,64($fp)
+       swc1    $f18,68($fp)
+       swc1    $f19,72($fp)
+       move    $4,$fp
+       sw      $0,0($fp)
+       sw      $12,24($fp)
+       sw      $0,28($fp)
+       sw      $0,32($fp)
+       jalr    $25
+       sw      $0,40($fp)
+
+       lw      $12,32($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   # 0x1
+
+       beq     $12,$13,.L43
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L43
+       li      $13,3                   # 0x3
+
+       beq     $12,$13,.L49
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L50
+       li      $13,5                   # 0x5
+
+       beq     $12,$13,.L51
+       li      $13,6                   # 0x6
+
+       beq     $12,$13,.L46
+       li      $13,7                   # 0x7
+
+       beq     $12,$13,.L45
+       li      $13,8                   # 0x8
+
+       beq     $12,$13,.L46
+       li      $13,9                   # 0x9
+
+       beq     $12,$13,.L45
+       li      $13,10                  # 0xa
+
+       beq     $12,$13,.L47
+       li      $13,11                  # 0xb
+
+       beq     $12,$13,.L47
+       li      $13,12                  # 0xc
+
+       beq     $12,$13,.L52
+       li      $13,13                  # 0xd
+
+       beq     $12,$13,.L53
+       li      $13,14                  # 0xe
+
+       beq     $12,$13,.L46
+       li      $13,15                  # 0xf
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       lw      $24,36($fp)
+
+       lw      $12,36($fp)
+       li      $13,1                   # 0x1
+       beq     $12,$13,.L54
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L55
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L56
+       li      $13,8                   # 0x8
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L59:
+       ld      $31,184($sp)
+       ld      $fp,176($sp)
+       ld      $28,168($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,184($sp)
+       ld      $28,168($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       lb      $2,8($fp)
+       ld      $fp,176($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L46:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L45:
+       b       .L1
+       lwu     $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L52:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       ld      $2,8($fp)
+
+.L53:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       addiu   $13,$24,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L60
+       andi    $13,$12,0x800
+
+       lw      $13,28($fp)
+       li      $15,-8                  # 0xfffffffffffffff8
+       sltu    $25,$24,9
+       andi    $14,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       addu    $13,$24,$14
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       subu    $13,$0,$13
+
+       ld      $25,0($15)
+       sll     $13,$13,3
+       li      $15,-1                  # 0xffffffffffffffff
+       dsll    $13,$15,$13
+       and     $13,$13,$25
+       sll     $14,$14,3
+       dsll    $2,$13,$14
+.L23:
+       andi    $13,$12,0x800
+.L60:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   # 0x4
+       beq     $24,$13,.L57
+       li      $13,8                   # 0x8
+
+       beql    $24,$13,.L58
+       lw      $13,28($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L59
+       move    $sp,$fp
+
+       li      $12,16                  # 0x10
+.L61:
+       bnel    $24,$12,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   # 0x8
+
+       bne     $24,$12,.L61
+       li      $12,16                  # 0x10
+
+       lw      $13,28($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       subu    $13,$0,$13
+
+       ld      $17,8($15)
+       subu    $16,$0,$14
+       li      $25,-1                  # 0xffffffffffffffff
+       sll     $13,$13,3
+       dsll    $13,$25,$13
+       sll     $25,$16,2
+       ld      $16,0($15)
+       and     $13,$13,$17
+       addiu   $15,$25,32
+       sll     $14,$14,3
+       dsra    $25,$13,$15
+       dsll    $16,$16,$14
+       dsra    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsll    $3,$13,$14
+
+.L54:
+       lw      $12,28($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L55:
+       lw      $12,28($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $18,16($15)
+       ld      $16,8($15)
+       ld      $17,0($15)
+       subu    $25,$0,$14
+       li      $15,-1                  # 0xffffffffffffffff
+       sll     $13,$13,3
+       sll     $25,$25,3
+       dsll    $13,$15,$13
+       sll     $14,$14,3
+       addiu   $15,$25,64
+       and     $13,$13,$18
+       dsll    $25,$17,$14
+       dsra    $13,$13,$15
+       dsra    $17,$16,$15
+       dsll    $14,$16,$14
+       or      $2,$25,$17
+       b       .L23
+       or      $3,$13,$14
+
+.L57:
+       lw      $12,28($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L56:
+       lw      $12,28($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       ld      $16,8($15)
+       ld      $25,0($15)
+       sll     $13,$13,3
+       li      $15,-1                  # 0xffffffffffffffff
+       dsll    $13,$15,$13
+       subu    $15,$0,$14
+       and     $13,$13,$16
+       sll     $15,$15,3
+       sll     $14,$14,3
+       dsra    $13,$13,$15
+       dsll    $14,$25,$14
+       b       .L23
+       or      $2,$13,$14
+
+.L58:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/vacall/vacall-mipsn32eb-macro.S b/vacall/vacall-mipsn32eb-macro.S
new file mode 100644 (file)
index 0000000..f19511d
--- /dev/null
@@ -0,0 +1,351 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mipsn32.c"
+       .text
+       .align  2
+       .align  3
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       DECLARE_FUNCTION(vacall_receiver)
+vacall_receiver:
+       .frame  $fp,256,$31             
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       addiu   $sp,$sp,-256
+       sd      $28,168($sp)
+       lui     $28,%hi(__gnu_local_gp)
+       addiu   $28,$28,%lo(__gnu_local_gp)
+       lw      $12,%got_disp(vacall_function)($28)
+       sd      $fp,176($sp)
+       move    $fp,$sp
+       lw      $25,0($12)
+       addiu   $12,$fp,192
+       sd      $31,184($sp)
+       sd      $18,160($sp)
+       sd      $17,152($sp)
+       sd      $16,144($sp)
+       sd      $4,192($fp)
+       sd      $5,200($fp)
+       sd      $6,208($fp)
+       sd      $7,216($fp)
+       sd      $8,224($fp)
+       sd      $9,232($fp)
+       sd      $10,240($fp)
+       sd      $11,248($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f13,88($fp)
+       sdc1    $f14,96($fp)
+       sdc1    $f15,104($fp)
+       sdc1    $f16,112($fp)
+       sdc1    $f17,120($fp)
+       sdc1    $f18,128($fp)
+       sdc1    $f19,136($fp)
+       swc1    $f12,44($fp)
+       swc1    $f13,48($fp)
+       swc1    $f14,52($fp)
+       swc1    $f15,56($fp)
+       swc1    $f16,60($fp)
+       swc1    $f17,64($fp)
+       swc1    $f18,68($fp)
+       swc1    $f19,72($fp)
+       move    $4,$fp
+       sw      $0,0($fp)
+       sw      $12,24($fp)
+       sw      $0,28($fp)
+       sw      $0,32($fp)
+       jalr    $25
+       sw      $0,40($fp)
+
+       lw      $12,32($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   
+
+       beq     $12,$13,.L43
+       li      $13,2                   
+
+       beq     $12,$13,.L43
+       li      $13,3                   
+
+       beq     $12,$13,.L49
+       li      $13,4                   
+
+       beq     $12,$13,.L50
+       li      $13,5                   
+
+       beq     $12,$13,.L51
+       li      $13,6                   
+
+       beq     $12,$13,.L46
+       li      $13,7                   
+
+       beq     $12,$13,.L45
+       li      $13,8                   
+
+       beq     $12,$13,.L46
+       li      $13,9                   
+
+       beq     $12,$13,.L45
+       li      $13,10                  
+
+       beq     $12,$13,.L47
+       li      $13,11                  
+
+       beq     $12,$13,.L47
+       li      $13,12                  
+
+       beq     $12,$13,.L52
+       li      $13,13                  
+
+       beq     $12,$13,.L53
+       li      $13,14                  
+
+       beq     $12,$13,.L46
+       li      $13,15                  
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       lw      $24,36($fp)
+
+       lw      $12,36($fp)
+       li      $13,1                   
+       beq     $12,$13,.L54
+       li      $13,2                   
+
+       beq     $12,$13,.L55
+       li      $13,4                   
+
+       beq     $12,$13,.L56
+       li      $13,8                   
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L59:
+       ld      $31,184($sp)
+       ld      $fp,176($sp)
+       ld      $28,168($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,184($sp)
+       ld      $28,168($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       lb      $2,8($fp)
+       ld      $fp,176($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L46:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L45:
+       b       .L1
+       lwu     $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L52:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       ld      $2,8($fp)
+
+.L53:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       addiu   $13,$24,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L60
+       andi    $13,$12,0x800
+
+       lw      $13,28($fp)
+       li      $15,-8                  
+       sltu    $25,$24,9
+       andi    $14,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       addu    $13,$24,$14
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       subu    $13,$0,$13
+
+       ld      $25,0($15)
+       sll     $13,$13,3
+       li      $15,-1                  
+       dsll    $13,$15,$13
+       and     $13,$13,$25
+       sll     $14,$14,3
+       dsll    $2,$13,$14
+.L23:
+       andi    $13,$12,0x800
+.L60:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   
+       beq     $24,$13,.L57
+       li      $13,8                   
+
+       beql    $24,$13,.L58
+       lw      $13,28($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L59
+       move    $sp,$fp
+
+       li      $12,16                  
+.L61:
+       bnel    $24,$12,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   
+
+       bne     $24,$12,.L61
+       li      $12,16                  
+
+       lw      $13,28($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       subu    $13,$0,$13
+
+       ld      $17,8($15)
+       subu    $16,$0,$14
+       li      $25,-1                  
+       sll     $13,$13,3
+       dsll    $13,$25,$13
+       sll     $25,$16,2
+       ld      $16,0($15)
+       and     $13,$13,$17
+       addiu   $15,$25,32
+       sll     $14,$14,3
+       dsra    $25,$13,$15
+       dsll    $16,$16,$14
+       dsra    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsll    $3,$13,$14
+
+.L54:
+       lw      $12,28($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L55:
+       lw      $12,28($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $18,16($15)
+       ld      $16,8($15)
+       ld      $17,0($15)
+       subu    $25,$0,$14
+       li      $15,-1                  
+       sll     $13,$13,3
+       sll     $25,$25,3
+       dsll    $13,$15,$13
+       sll     $14,$14,3
+       addiu   $15,$25,64
+       and     $13,$13,$18
+       dsll    $25,$17,$14
+       dsra    $13,$13,$15
+       dsra    $17,$16,$15
+       dsll    $14,$16,$14
+       or      $2,$25,$17
+       b       .L23
+       or      $3,$13,$14
+
+.L57:
+       lw      $12,28($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L56:
+       lw      $12,28($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       ld      $16,8($15)
+       ld      $25,0($15)
+       sll     $13,$13,3
+       li      $15,-1                  
+       dsll    $13,$15,$13
+       subu    $15,$0,$14
+       and     $13,$13,$16
+       sll     $15,$15,3
+       sll     $14,$14,3
+       dsra    $13,$13,$15
+       dsll    $14,$25,$14
+       b       .L23
+       or      $2,$13,$14
+
+.L58:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
diff --git a/vacall/vacall-mipsn32el-linux.s b/vacall/vacall-mipsn32el-linux.s
new file mode 100644 (file)
index 0000000..54a7cdc
--- /dev/null
@@ -0,0 +1,361 @@
+       .file   1 "vacall-mipsn32.c"
+       .section .mdebug.abiN32
+       .previous
+       .nan    legacy
+       .module fp=64
+       .module oddspreg
+       .abicalls
+       .text
+       .align  2
+       .align  3
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       .frame  $fp,256,$31             # vars= 144, regs= 6/0, args= 0, gp= 0
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       addiu   $sp,$sp,-256
+       sd      $28,168($sp)
+       lui     $28,%hi(__gnu_local_gp)
+       addiu   $28,$28,%lo(__gnu_local_gp)
+       lw      $12,%got_disp(vacall_function)($28)
+       sd      $fp,176($sp)
+       move    $fp,$sp
+       lw      $25,0($12)
+       addiu   $12,$fp,192
+       sd      $31,184($sp)
+       sd      $18,160($sp)
+       sd      $17,152($sp)
+       sd      $16,144($sp)
+       sd      $4,192($fp)
+       sd      $5,200($fp)
+       sd      $6,208($fp)
+       sd      $7,216($fp)
+       sd      $8,224($fp)
+       sd      $9,232($fp)
+       sd      $10,240($fp)
+       sd      $11,248($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f13,88($fp)
+       sdc1    $f14,96($fp)
+       sdc1    $f15,104($fp)
+       sdc1    $f16,112($fp)
+       sdc1    $f17,120($fp)
+       sdc1    $f18,128($fp)
+       sdc1    $f19,136($fp)
+       swc1    $f12,44($fp)
+       swc1    $f13,48($fp)
+       swc1    $f14,52($fp)
+       swc1    $f15,56($fp)
+       swc1    $f16,60($fp)
+       swc1    $f17,64($fp)
+       swc1    $f18,68($fp)
+       swc1    $f19,72($fp)
+       move    $4,$fp
+       sw      $0,0($fp)
+       sw      $12,24($fp)
+       sw      $0,28($fp)
+       sw      $0,32($fp)
+       jalr    $25
+       sw      $0,40($fp)
+
+       lw      $12,32($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   # 0x1
+
+       beq     $12,$13,.L43
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L43
+       li      $13,3                   # 0x3
+
+       beq     $12,$13,.L49
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L50
+       li      $13,5                   # 0x5
+
+       beq     $12,$13,.L51
+       li      $13,6                   # 0x6
+
+       beq     $12,$13,.L46
+       li      $13,7                   # 0x7
+
+       beq     $12,$13,.L45
+       li      $13,8                   # 0x8
+
+       beq     $12,$13,.L46
+       li      $13,9                   # 0x9
+
+       beq     $12,$13,.L45
+       li      $13,10                  # 0xa
+
+       beq     $12,$13,.L47
+       li      $13,11                  # 0xb
+
+       beq     $12,$13,.L47
+       li      $13,12                  # 0xc
+
+       beq     $12,$13,.L52
+       li      $13,13                  # 0xd
+
+       beq     $12,$13,.L53
+       li      $13,14                  # 0xe
+
+       beq     $12,$13,.L46
+       li      $13,15                  # 0xf
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       lw      $24,36($fp)
+
+       lw      $12,36($fp)
+       li      $13,1                   # 0x1
+       beq     $12,$13,.L54
+       li      $13,2                   # 0x2
+
+       beq     $12,$13,.L55
+       li      $13,4                   # 0x4
+
+       beq     $12,$13,.L56
+       li      $13,8                   # 0x8
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L59:
+       ld      $31,184($sp)
+       ld      $fp,176($sp)
+       ld      $28,168($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,184($sp)
+       ld      $28,168($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       lb      $2,8($fp)
+       ld      $fp,176($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L46:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L45:
+       b       .L1
+       lwu     $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L52:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       ld      $2,8($fp)
+
+.L53:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       addiu   $13,$24,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L60
+       andi    $13,$12,0x800
+
+       lw      $13,28($fp)
+       li      $15,-8                  # 0xfffffffffffffff8
+       sltu    $25,$24,9
+       andi    $14,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       addu    $13,$24,$14
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       sll     $13,$13,3
+
+       ld      $25,0($15)
+       addiu   $13,$13,-1
+       li      $15,2                   # 0x2
+       dsll    $13,$15,$13
+       daddiu  $13,$13,-1
+       and     $13,$13,$25
+       sll     $14,$14,3
+       dsra    $2,$13,$14
+.L23:
+       andi    $13,$12,0x800
+.L60:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   # 0x4
+       beq     $24,$13,.L57
+       li      $13,8                   # 0x8
+
+       beql    $24,$13,.L58
+       lw      $13,28($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L59
+       move    $sp,$fp
+
+       li      $12,16                  # 0x10
+.L61:
+       bnel    $24,$12,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   # 0x8
+
+       bne     $24,$12,.L61
+       li      $12,16                  # 0x10
+
+       lw      $13,28($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       sll     $13,$13,3
+
+       ld      $17,8($15)
+       li      $25,2                   # 0x2
+       addiu   $13,$13,-65
+       dsll    $13,$25,$13
+       subu    $25,$0,$14
+       sll     $25,$25,2
+       ld      $16,0($15)
+       daddiu  $13,$13,-1
+       addiu   $15,$25,32
+       and     $13,$13,$17
+       sll     $14,$14,3
+       dsll    $25,$13,$15
+       dsra    $16,$16,$14
+       dsll    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsra    $3,$13,$14
+
+.L54:
+       lw      $12,28($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L55:
+       lw      $12,28($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $16,8($15)
+       ld      $17,0($15)
+       addiu   $13,$13,-129
+       ld      $18,16($15)
+       li      $15,2                   # 0x2
+       subu    $25,$0,$14
+       dsll    $15,$15,$13
+       daddiu  $15,$15,-1
+       sll     $25,$25,3
+       sll     $14,$14,3
+       addiu   $25,$25,64
+       and     $13,$15,$18
+       dsll    $13,$13,$25
+       dsra    $15,$17,$14
+       dsll    $17,$16,$25
+       dsra    $14,$16,$14
+       or      $2,$15,$17
+       b       .L23
+       or      $3,$13,$14
+
+.L57:
+       lw      $12,28($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L56:
+       lw      $12,28($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       li      $25,2                   # 0x2
+       addiu   $13,$13,-65
+       ld      $17,8($15)
+       dsll    $13,$25,$13
+       ld      $25,0($15)
+       daddiu  $13,$13,-1
+       subu    $16,$0,$14
+       and     $15,$13,$17
+       sll     $14,$14,3
+       sll     $13,$16,3
+       dsll    $13,$15,$13
+       dsra    $14,$25,$14
+       b       .L23
+       or      $2,$13,$14
+
+.L58:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 5.4.0"
diff --git a/vacall/vacall-mipsn32el-macro.S b/vacall/vacall-mipsn32el-macro.S
new file mode 100644 (file)
index 0000000..0aa74c5
--- /dev/null
@@ -0,0 +1,355 @@
+#include "asm-mips.h"
+       .file   1 "vacall-mipsn32.c"
+       .text
+       .align  2
+       .align  3
+       .globl  vacall_receiver
+       .set    nomips16
+       .set    nomicromips
+       .ent    vacall_receiver
+       DECLARE_FUNCTION(vacall_receiver)
+vacall_receiver:
+       .frame  $fp,256,$31             
+       .mask   0xd0070000,-72
+       .fmask  0x00000000,0
+       .set    noreorder
+       .set    nomacro
+       addiu   $sp,$sp,-256
+       sd      $28,168($sp)
+       lui     $28,%hi(__gnu_local_gp)
+       addiu   $28,$28,%lo(__gnu_local_gp)
+       lw      $12,%got_disp(vacall_function)($28)
+       sd      $fp,176($sp)
+       move    $fp,$sp
+       lw      $25,0($12)
+       addiu   $12,$fp,192
+       sd      $31,184($sp)
+       sd      $18,160($sp)
+       sd      $17,152($sp)
+       sd      $16,144($sp)
+       sd      $4,192($fp)
+       sd      $5,200($fp)
+       sd      $6,208($fp)
+       sd      $7,216($fp)
+       sd      $8,224($fp)
+       sd      $9,232($fp)
+       sd      $10,240($fp)
+       sd      $11,248($fp)
+       sdc1    $f12,80($fp)
+       sdc1    $f13,88($fp)
+       sdc1    $f14,96($fp)
+       sdc1    $f15,104($fp)
+       sdc1    $f16,112($fp)
+       sdc1    $f17,120($fp)
+       sdc1    $f18,128($fp)
+       sdc1    $f19,136($fp)
+       swc1    $f12,44($fp)
+       swc1    $f13,48($fp)
+       swc1    $f14,52($fp)
+       swc1    $f15,56($fp)
+       swc1    $f16,60($fp)
+       swc1    $f17,64($fp)
+       swc1    $f18,68($fp)
+       swc1    $f19,72($fp)
+       move    $4,$fp
+       sw      $0,0($fp)
+       sw      $12,24($fp)
+       sw      $0,28($fp)
+       sw      $0,32($fp)
+       jalr    $25
+       sw      $0,40($fp)
+
+       lw      $12,32($fp)
+       beq     $12,$0,.L1
+       li      $13,1                   
+
+       beq     $12,$13,.L43
+       li      $13,2                   
+
+       beq     $12,$13,.L43
+       li      $13,3                   
+
+       beq     $12,$13,.L49
+       li      $13,4                   
+
+       beq     $12,$13,.L50
+       li      $13,5                   
+
+       beq     $12,$13,.L51
+       li      $13,6                   
+
+       beq     $12,$13,.L46
+       li      $13,7                   
+
+       beq     $12,$13,.L45
+       li      $13,8                   
+
+       beq     $12,$13,.L46
+       li      $13,9                   
+
+       beq     $12,$13,.L45
+       li      $13,10                  
+
+       beq     $12,$13,.L47
+       li      $13,11                  
+
+       beq     $12,$13,.L47
+       li      $13,12                  
+
+       beq     $12,$13,.L52
+       li      $13,13                  
+
+       beq     $12,$13,.L53
+       li      $13,14                  
+
+       beq     $12,$13,.L46
+       li      $13,15                  
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,0($fp)
+       andi    $13,$12,0x400
+       beq     $13,$0,.L1
+       andi    $13,$12,0x4
+
+       beq     $13,$0,.L19
+       lw      $24,36($fp)
+
+       lw      $12,36($fp)
+       li      $13,1                   
+       beq     $12,$13,.L54
+       li      $13,2                   
+
+       beq     $12,$13,.L55
+       li      $13,4                   
+
+       beq     $12,$13,.L56
+       li      $13,8                   
+
+       bnel    $12,$13,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ld      $2,0($12)
+.L1:
+       move    $sp,$fp
+.L59:
+       ld      $31,184($sp)
+       ld      $fp,176($sp)
+       ld      $28,168($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L43:
+       move    $sp,$fp
+       ld      $31,184($sp)
+       ld      $28,168($sp)
+       ld      $18,160($sp)
+       ld      $17,152($sp)
+       ld      $16,144($sp)
+       lb      $2,8($fp)
+       ld      $fp,176($sp)
+       j       $31
+       addiu   $sp,$sp,256
+
+       .align  3
+.L46:
+       b       .L1
+       lw      $2,8($fp)
+
+       .align  3
+.L49:
+       b       .L1
+       lbu     $2,8($fp)
+
+       .align  3
+.L50:
+       b       .L1
+       lh      $2,8($fp)
+
+       .align  3
+.L45:
+       b       .L1
+       lwu     $2,8($fp)
+
+       .align  3
+.L51:
+       b       .L1
+       lhu     $2,8($fp)
+
+       .align  3
+.L52:
+       b       .L1
+       lwc1    $f0,8($fp)
+
+       .align  3
+.L47:
+       b       .L1
+       ld      $2,8($fp)
+
+.L53:
+       b       .L1
+       ldc1    $f0,8($fp)
+
+.L19:
+       addiu   $13,$24,-1
+       sltu    $13,$13,16
+       beql    $13,$0,.L60
+       andi    $13,$12,0x800
+
+       lw      $13,28($fp)
+       li      $15,-8                  
+       sltu    $25,$24,9
+       andi    $14,$13,0x7
+       and     $15,$13,$15
+       beq     $25,$0,.L24
+       addu    $13,$24,$14
+
+       sltu    $25,$13,9
+       beq     $25,$0,.L25
+       sll     $13,$13,3
+
+       ld      $25,0($15)
+       addiu   $13,$13,-1
+       li      $15,2                   
+       dsll    $13,$15,$13
+       daddiu  $13,$13,-1
+       and     $13,$13,$25
+       sll     $14,$14,3
+       dsra    $2,$13,$14
+.L23:
+       andi    $13,$12,0x800
+.L60:
+       beql    $13,$0,.L27
+       andi    $12,$12,0x1000
+
+       li      $13,4                   
+       beq     $24,$13,.L57
+       li      $13,8                   
+
+       beql    $24,$13,.L58
+       lw      $13,28($fp)
+
+       andi    $12,$12,0x1000
+       beql    $12,$0,.L59
+       move    $sp,$fp
+
+       li      $12,16                  
+.L61:
+       bnel    $24,$12,.L59
+       move    $sp,$fp
+
+       lw      $12,28($fp)
+       ldc1    $f0,0($12)
+       b       .L1
+       ldc1    $f2,8($12)
+
+.L27:
+       beq     $12,$0,.L1
+       li      $12,8                   
+
+       bne     $24,$12,.L61
+       li      $12,16                  
+
+       lw      $13,28($fp)
+       b       .L1
+       ldc1    $f0,0($13)
+
+.L24:
+       sltu    $25,$13,17
+       beq     $25,$0,.L26
+       sll     $13,$13,3
+
+       ld      $17,8($15)
+       li      $25,2                   
+       addiu   $13,$13,-65
+       dsll    $13,$25,$13
+       subu    $25,$0,$14
+       sll     $25,$25,2
+       ld      $16,0($15)
+       daddiu  $13,$13,-1
+       addiu   $15,$25,32
+       and     $13,$13,$17
+       sll     $14,$14,3
+       dsll    $25,$13,$15
+       dsra    $16,$16,$14
+       dsll    $15,$25,$15
+       or      $2,$16,$15
+       b       .L23
+       dsra    $3,$13,$14
+
+.L54:
+       lw      $12,28($fp)
+       b       .L1
+       lbu     $2,0($12)
+
+.L55:
+       lw      $12,28($fp)
+       b       .L1
+       lhu     $2,0($12)
+
+.L26:
+       ld      $16,8($15)
+       ld      $17,0($15)
+       addiu   $13,$13,-129
+       ld      $18,16($15)
+       li      $15,2                   
+       subu    $25,$0,$14
+       dsll    $15,$15,$13
+       daddiu  $15,$15,-1
+       sll     $25,$25,3
+       sll     $14,$14,3
+       addiu   $25,$25,64
+       and     $13,$15,$18
+       dsll    $13,$13,$25
+       dsra    $15,$17,$14
+       dsll    $17,$16,$25
+       dsra    $14,$16,$14
+       or      $2,$15,$17
+       b       .L23
+       or      $3,$13,$14
+
+.L57:
+       lw      $12,28($fp)
+       b       .L1
+       lwc1    $f0,0($12)
+
+.L56:
+       lw      $12,28($fp)
+       b       .L1
+       lwu     $2,0($12)
+
+.L25:
+       li      $25,2                   
+       addiu   $13,$13,-65
+       ld      $17,8($15)
+       dsll    $13,$25,$13
+       ld      $25,0($15)
+       daddiu  $13,$13,-1
+       subu    $16,$0,$14
+       and     $15,$13,$17
+       sll     $14,$14,3
+       sll     $13,$16,3
+       dsll    $13,$15,$13
+       dsra    $14,$25,$14
+       b       .L23
+       or      $2,$13,$14
+
+.L58:
+       andi    $12,$12,0x1000
+       lwc1    $f0,0($13)
+       beq     $12,$0,.L1
+       lwc1    $f2,4($13)
+
+       b       .L1
+       ldc1    $f0,0($13)
+
+       .set    macro
+       .set    reorder
+       .end    vacall_receiver
+       .size   vacall_receiver, .-vacall_receiver
diff --git a/vacall/vacall-powerpc-aix.s b/vacall/vacall-powerpc-aix.s
new file mode 100644 (file)
index 0000000..b4e3505
--- /dev/null
@@ -0,0 +1,171 @@
+       .file   "vacall-powerpc.c"
+       .toc
+       .csect .text[PR]
+       .toc
+LC..0:
+       .tc vacall_function[TC],vacall_function[RW]
+       .csect .text[PR]
+       .align 2
+       .globl vacall_receiver
+       .globl .vacall_receiver
+       .csect vacall_receiver[DS]
+vacall_receiver:
+       .long .vacall_receiver, TOC[tc0], 0
+       .csect .text[PR]
+.vacall_receiver:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       mflr 0
+       stw 0,8(1)
+       stw 29,-12(1)
+       stw 31,-4(1)
+       lwz 11,LC..0(2)
+       stwu 1,-216(1)
+       mr 31,1
+       lwz 29,0(11)
+       addi 0,31,240
+       li 11,0
+       stw 9,264(31)
+       stw 3,240(31)
+       stw 5,248(31)
+       stw 6,252(31)
+       stw 7,256(31)
+       stw 8,260(31)
+       stw 10,268(31)
+       stw 11,88(31)
+       stw 4,244(31)
+       stfd 1,92(31)
+       stfd 2,100(31)
+       stfd 3,108(31)
+       stfd 4,116(31)
+       stfd 5,124(31)
+       stfd 6,132(31)
+       stfd 7,140(31)
+       stfd 8,148(31)
+       stfd 9,156(31)
+       stfd 10,164(31)
+       stfd 11,172(31)
+       stfd 12,180(31)
+       stfd 13,188(31)
+       stw 11,56(31)
+       stw 11,76(31)
+       stw 11,80(31)
+       stw 0,72(31)
+       lwz 0,0(29)
+       addi 3,31,56
+       stw 2,20(1)
+       mtctr 0
+       lwz 11,8(29)
+       lwz 2,4(29)
+       bctrl
+       lwz 2,20(1)
+       lwz 9,80(31)
+       cmpwi 0,9,0
+       beq- 0,L..1
+       cmpwi 0,9,1
+       beq- 0,L..41
+       cmpwi 0,9,2
+       beq- 0,L..42
+       cmpwi 0,9,3
+       beq- 0,L..41
+       cmpwi 0,9,4
+       beq- 0,L..43
+       cmpwi 0,9,5
+       beq- 0,L..44
+       cmpwi 0,9,6
+       beq- 0,L..40
+       cmpwi 0,9,7
+       beq- 0,L..40
+       cmpwi 0,9,8
+       beq- 0,L..40
+       cmpwi 0,9,9
+       beq- 0,L..40
+       addi 0,9,-10
+       cmplwi 0,0,1
+       bgt- 0,L..22
+       lwz 3,64(31)
+       lwz 4,68(31)
+L..1:
+       lwz 1,0(1)
+       lwz 0,8(1)
+       lwz 29,-12(1)
+       mtlr 0
+       lwz 31,-4(1)
+       blr
+L..22:
+       cmpwi 0,9,12
+       beq- 0,L..45
+       cmpwi 0,9,13
+       beq- 0,L..46
+       cmpwi 0,9,14
+       beq- 0,L..40
+       cmpwi 0,9,15
+       bne+ 0,L..1
+       lwz 0,56(31)
+       andi. 9,0,1024
+       beq- 0,L..1
+       lwz 0,84(31)
+       cmpwi 0,0,1
+       beq- 0,L..47
+       cmpwi 0,0,2
+       beq- 0,L..48
+       cmpwi 0,0,4
+       beq- 0,L..49
+       cmpwi 0,0,8
+       bne+ 0,L..1
+       lwz 9,76(31)
+       lwz 4,4(9)
+L..39:
+       lwz 3,0(9)
+       b L..1
+L..49:
+       lwz 9,76(31)
+       b L..39
+L..48:
+       lwz 9,76(31)
+       lhz 3,0(9)
+       b L..1
+L..47:
+       lwz 9,76(31)
+       lbz 3,0(9)
+       b L..1
+L..40:
+       lwz 3,64(31)
+       b L..1
+L..46:
+       lfd 1,64(31)
+       b L..1
+L..45:
+       lfs 1,64(31)
+       b L..1
+L..44:
+       lhz 3,64(31)
+       b L..1
+L..43:
+       lha 3,64(31)
+       b L..1
+L..41:
+       lbz 3,64(31)
+       b L..1
+L..42:
+       lbz 0,64(31)
+       slwi 0,0,24
+       srawi 3,0,24
+       b L..1
+LT..vacall_receiver:
+       .long 0
+       .byte 0,0,32,97,128,3,8,0
+       .long 0
+       .long LT..vacall_receiver-.vacall_receiver
+       .short 15
+       .byte "vacall_receiver"
+       .byte 31
+       .align 2
+_section_.text:
+       .csect .data[RW],3
+       .long _section_.text
+       .extern vacall_function[RW]
diff --git a/vacall/vacall-powerpc-linux-macro.S b/vacall/vacall-powerpc-linux-macro.S
new file mode 100644 (file)
index 0000000..3d56e0f
--- /dev/null
@@ -0,0 +1,143 @@
+       .file   "vacall-powerpc.c"
+       .section        ".text"
+       .align 2
+       .globl vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-176(1)
+       mflr 0
+       li 11,0
+       stw 0,180(1)
+       stw 31,172(1)
+       mr 31,1
+       stw 9,76(31)
+       addi 0,31,184
+       lis 9,vacall_function@ha
+       stw 3,52(31)
+       lwz 9,vacall_function@l(9)
+       addi 3,31,16
+       stw 5,60(31)
+       mtctr 9
+       stw 6,64(31)
+       stw 7,68(31)
+       stw 8,72(31)
+       stw 10,80(31)
+       stw 0,32(31)
+       stw 11,84(31)
+       stw 4,56(31)
+       stfd 1,88(31)
+       stfd 2,96(31)
+       stfd 3,104(31)
+       stfd 4,112(31)
+       stfd 5,120(31)
+       stfd 6,128(31)
+       stfd 7,136(31)
+       stfd 8,144(31)
+       stw 11,16(31)
+       stw 11,48(31)
+       stw 11,36(31)
+       stw 11,40(31)
+       bctrl
+       lwz 9,40(31)
+       cmpwi 0,9,0
+       beq- 0,.L1
+       cmpwi 0,9,1
+       beq- 0,.L41
+       cmpwi 0,9,2
+       beq- 0,.L42
+       cmpwi 0,9,3
+       beq- 0,.L41
+       cmpwi 0,9,4
+       beq- 0,.L43
+       cmpwi 0,9,5
+       beq- 0,.L44
+       cmpwi 0,9,6
+       beq- 0,.L40
+       cmpwi 0,9,7
+       beq- 0,.L40
+       cmpwi 0,9,8
+       beq- 0,.L40
+       cmpwi 0,9,9
+       beq- 0,.L40
+       addi 0,9,-10
+       cmplwi 0,0,1
+       bgt- 0,.L22
+       lwz 3,24(31)
+       lwz 4,28(31)
+.L1:
+       lwz 11,0(1)
+       lwz 0,4(11)
+       lwz 31,-4(11)
+       mtlr 0
+       mr 1,11
+       blr
+.L22:
+       cmpwi 0,9,12
+       beq- 0,.L45
+       cmpwi 0,9,13
+       beq- 0,.L46
+       cmpwi 0,9,14
+       beq- 0,.L40
+       cmpwi 0,9,15
+       bne+ 0,.L1
+       lwz 0,16(31)
+       andi. 9,0,1024
+       beq- 0,.L1
+       lwz 0,44(31)
+       cmpwi 0,0,1
+       beq- 0,.L47
+       cmpwi 0,0,2
+       beq- 0,.L48
+       cmpwi 0,0,4
+       beq- 0,.L49
+       cmpwi 0,0,8
+       bne+ 0,.L1
+       lwz 9,36(31)
+       lwz 4,4(9)
+.L39:
+       lwz 3,0(9)
+       b .L1
+.L49:
+       lwz 9,36(31)
+       b .L39
+.L48:
+       lwz 9,36(31)
+       lhz 3,0(9)
+       b .L1
+.L47:
+       lwz 9,36(31)
+       lbz 3,0(9)
+       b .L1
+.L40:
+       lwz 3,24(31)
+       b .L1
+.L46:
+       lfd 1,24(31)
+       b .L1
+.L45:
+       lfs 1,24(31)
+       b .L1
+.L44:
+       lhz 3,24(31)
+       b .L1
+.L43:
+       lha 3,24(31)
+       b .L1
+.L41:
+       lbz 3,24(31)
+       b .L1
+.L42:
+       lbz 0,24(31)
+       slwi 0,0,24
+       srawi 3,0,24
+       b .L1
+       .size   vacall_receiver, .-vacall_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-powerpc-linux.s b/vacall/vacall-powerpc-linux.s
new file mode 100644 (file)
index 0000000..b40c8aa
--- /dev/null
@@ -0,0 +1,142 @@
+       .file   "vacall-powerpc.c"
+       .section        ".text"
+       .align 2
+       .globl vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-176(1)
+       mflr 0
+       li 11,0
+       stw 0,180(1)
+       stw 31,172(1)
+       mr 31,1
+       stw 9,76(31)
+       addi 0,31,184
+       lis 9,vacall_function@ha
+       stw 3,52(31)
+       lwz 9,vacall_function@l(9)
+       addi 3,31,16
+       stw 5,60(31)
+       mtctr 9
+       stw 6,64(31)
+       stw 7,68(31)
+       stw 8,72(31)
+       stw 10,80(31)
+       stw 0,32(31)
+       stw 11,84(31)
+       stw 4,56(31)
+       stfd 1,88(31)
+       stfd 2,96(31)
+       stfd 3,104(31)
+       stfd 4,112(31)
+       stfd 5,120(31)
+       stfd 6,128(31)
+       stfd 7,136(31)
+       stfd 8,144(31)
+       stw 11,16(31)
+       stw 11,48(31)
+       stw 11,36(31)
+       stw 11,40(31)
+       bctrl
+       lwz 9,40(31)
+       cmpwi 0,9,0
+       beq- 0,.L1
+       cmpwi 0,9,1
+       beq- 0,.L41
+       cmpwi 0,9,2
+       beq- 0,.L42
+       cmpwi 0,9,3
+       beq- 0,.L41
+       cmpwi 0,9,4
+       beq- 0,.L43
+       cmpwi 0,9,5
+       beq- 0,.L44
+       cmpwi 0,9,6
+       beq- 0,.L40
+       cmpwi 0,9,7
+       beq- 0,.L40
+       cmpwi 0,9,8
+       beq- 0,.L40
+       cmpwi 0,9,9
+       beq- 0,.L40
+       addi 0,9,-10
+       cmplwi 0,0,1
+       bgt- 0,.L22
+       lwz 3,24(31)
+       lwz 4,28(31)
+.L1:
+       lwz 11,0(1)
+       lwz 0,4(11)
+       lwz 31,-4(11)
+       mtlr 0
+       mr 1,11
+       blr
+.L22:
+       cmpwi 0,9,12
+       beq- 0,.L45
+       cmpwi 0,9,13
+       beq- 0,.L46
+       cmpwi 0,9,14
+       beq- 0,.L40
+       cmpwi 0,9,15
+       bne+ 0,.L1
+       lwz 0,16(31)
+       andi. 9,0,1024
+       beq- 0,.L1
+       lwz 0,44(31)
+       cmpwi 0,0,1
+       beq- 0,.L47
+       cmpwi 0,0,2
+       beq- 0,.L48
+       cmpwi 0,0,4
+       beq- 0,.L49
+       cmpwi 0,0,8
+       bne+ 0,.L1
+       lwz 9,36(31)
+       lwz 4,4(9)
+.L39:
+       lwz 3,0(9)
+       b .L1
+.L49:
+       lwz 9,36(31)
+       b .L39
+.L48:
+       lwz 9,36(31)
+       lhz 3,0(9)
+       b .L1
+.L47:
+       lwz 9,36(31)
+       lbz 3,0(9)
+       b .L1
+.L40:
+       lwz 3,24(31)
+       b .L1
+.L46:
+       lfd 1,24(31)
+       b .L1
+.L45:
+       lfs 1,24(31)
+       b .L1
+.L44:
+       lhz 3,24(31)
+       b .L1
+.L43:
+       lha 3,24(31)
+       b .L1
+.L41:
+       lbz 3,24(31)
+       b .L1
+.L42:
+       lbz 0,24(31)
+       slwi 0,0,24
+       srawi 3,0,24
+       b .L1
+       .size   vacall_receiver, .-vacall_receiver
+       .section        .note.GNU-stack,"",@progbits
+       .ident  "GCC: (GNU) 3.3.6"
diff --git a/vacall/vacall-powerpc-macos.s b/vacall/vacall-powerpc-macos.s
new file mode 100644 (file)
index 0000000..a508e75
--- /dev/null
@@ -0,0 +1,142 @@
+.text
+       .align 2
+       .globl _vacall_receiver
+_vacall_receiver:
+       mflr r0
+       stmw r29,-12(r1)
+       bcl 20,31,L1$pb
+L1$pb:
+       stw r0,8(r1)
+       mflr r31
+       stwu r1,-224(r1)
+       addis r29,r31,ha16(L_vacall_function$non_lazy_ptr-L1$pb)
+       li r11,0
+       lwz r29,lo16(L_vacall_function$non_lazy_ptr-L1$pb)(r29)
+       mr r30,r1
+       addi r0,r30,248
+       stw r3,248(r30)
+       lwz r29,0(r29)
+       addi r3,r30,64
+       stw r9,272(r30)
+       stw r5,256(r30)
+       mtctr r29
+       stw r6,260(r30)
+       stw r7,264(r30)
+       stw r8,268(r30)
+       stw r10,276(r30)
+       stw r0,80(r30)
+       stw r11,96(r30)
+       stw r4,252(r30)
+       stfd f1,100(r30)
+       stfd f2,108(r30)
+       stfd f3,116(r30)
+       stfd f4,124(r30)
+       stfd f5,132(r30)
+       stfd f6,140(r30)
+       stfd f7,148(r30)
+       stfd f8,156(r30)
+       stfd f9,164(r30)
+       stfd f10,172(r30)
+       stfd f11,180(r30)
+       stfd f12,188(r30)
+       stfd f13,196(r30)
+       stw r11,64(r30)
+       stw r11,84(r30)
+       stw r11,88(r30)
+       bctrl
+       lwz r9,88(r30)
+       cmpwi cr0,r9,0
+       beq- cr0,L1
+       cmpwi cr0,r9,1
+       beq- cr0,L41
+       cmpwi cr0,r9,2
+       beq- cr0,L41
+       cmpwi cr0,r9,3
+       beq- cr0,L42
+       cmpwi cr0,r9,4
+       beq- cr0,L43
+       cmpwi cr0,r9,5
+       beq- cr0,L44
+       cmpwi cr0,r9,6
+       beq- cr0,L40
+       cmpwi cr0,r9,7
+       beq- cr0,L40
+       cmpwi cr0,r9,8
+       beq- cr0,L40
+       cmpwi cr0,r9,9
+       beq- cr0,L40
+       addi r0,r9,-10
+       cmplwi cr0,r0,1
+       bgt- cr0,L22
+       lwz r3,72(r30)
+       lwz r4,76(r30)
+L1:
+       lwz r1,0(r1)
+       lwz r0,8(r1)
+       lmw r29,-12(r1)
+       mtlr r0
+       blr
+L22:
+       cmpwi cr0,r9,12
+       beq- cr0,L45
+       cmpwi cr0,r9,13
+       beq- cr0,L46
+       cmpwi cr0,r9,14
+       beq- cr0,L40
+       cmpwi cr0,r9,15
+       bne+ cr0,L1
+       lwz r0,64(r30)
+       andi. r9,r0,1024
+       beq- cr0,L1
+       lwz r0,92(r30)
+       cmpwi cr0,r0,1
+       beq- cr0,L47
+       cmpwi cr0,r0,2
+       beq- cr0,L48
+       cmpwi cr0,r0,4
+       beq- cr0,L49
+       cmpwi cr0,r0,8
+       bne+ cr0,L1
+       lwz r9,84(r30)
+       lwz r4,4(r9)
+L39:
+       lwz r3,0(r9)
+       b L1
+L49:
+       lwz r9,84(r30)
+       b L39
+L48:
+       lwz r9,84(r30)
+       lhz r3,0(r9)
+       b L1
+L47:
+       lwz r9,84(r30)
+       lbz r3,0(r9)
+       b L1
+L40:
+       lwz r3,72(r30)
+       b L1
+L46:
+       lfd f1,72(r30)
+       b L1
+L45:
+       lfs f1,72(r30)
+       b L1
+L44:
+       lhz r3,72(r30)
+       b L1
+L43:
+       lha r3,72(r30)
+       b L1
+L42:
+       lbz r3,72(r30)
+       b L1
+L41:
+       lbz r0,72(r30)
+       extsb r3,r0
+       b L1
+.data
+.non_lazy_symbol_pointer
+L_vacall_function$non_lazy_ptr:
+       .indirect_symbol _vacall_function
+       .long   0
diff --git a/vacall/vacall-powerpc-sysv4-macro.S b/vacall/vacall-powerpc-sysv4-macro.S
new file mode 100644 (file)
index 0000000..3d56e0f
--- /dev/null
@@ -0,0 +1,143 @@
+       .file   "vacall-powerpc.c"
+       .section        ".text"
+       .align 2
+       .globl vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       .extern __mulh
+       .extern __mull
+       .extern __divss
+       .extern __divus
+       .extern __quoss
+       .extern __quous
+       stwu 1,-176(1)
+       mflr 0
+       li 11,0
+       stw 0,180(1)
+       stw 31,172(1)
+       mr 31,1
+       stw 9,76(31)
+       addi 0,31,184
+       lis 9,vacall_function@ha
+       stw 3,52(31)
+       lwz 9,vacall_function@l(9)
+       addi 3,31,16
+       stw 5,60(31)
+       mtctr 9
+       stw 6,64(31)
+       stw 7,68(31)
+       stw 8,72(31)
+       stw 10,80(31)
+       stw 0,32(31)
+       stw 11,84(31)
+       stw 4,56(31)
+       stfd 1,88(31)
+       stfd 2,96(31)
+       stfd 3,104(31)
+       stfd 4,112(31)
+       stfd 5,120(31)
+       stfd 6,128(31)
+       stfd 7,136(31)
+       stfd 8,144(31)
+       stw 11,16(31)
+       stw 11,48(31)
+       stw 11,36(31)
+       stw 11,40(31)
+       bctrl
+       lwz 9,40(31)
+       cmpwi 0,9,0
+       beq- 0,.L1
+       cmpwi 0,9,1
+       beq- 0,.L41
+       cmpwi 0,9,2
+       beq- 0,.L42
+       cmpwi 0,9,3
+       beq- 0,.L41
+       cmpwi 0,9,4
+       beq- 0,.L43
+       cmpwi 0,9,5
+       beq- 0,.L44
+       cmpwi 0,9,6
+       beq- 0,.L40
+       cmpwi 0,9,7
+       beq- 0,.L40
+       cmpwi 0,9,8
+       beq- 0,.L40
+       cmpwi 0,9,9
+       beq- 0,.L40
+       addi 0,9,-10
+       cmplwi 0,0,1
+       bgt- 0,.L22
+       lwz 3,24(31)
+       lwz 4,28(31)
+.L1:
+       lwz 11,0(1)
+       lwz 0,4(11)
+       lwz 31,-4(11)
+       mtlr 0
+       mr 1,11
+       blr
+.L22:
+       cmpwi 0,9,12
+       beq- 0,.L45
+       cmpwi 0,9,13
+       beq- 0,.L46
+       cmpwi 0,9,14
+       beq- 0,.L40
+       cmpwi 0,9,15
+       bne+ 0,.L1
+       lwz 0,16(31)
+       andi. 9,0,1024
+       beq- 0,.L1
+       lwz 0,44(31)
+       cmpwi 0,0,1
+       beq- 0,.L47
+       cmpwi 0,0,2
+       beq- 0,.L48
+       cmpwi 0,0,4
+       beq- 0,.L49
+       cmpwi 0,0,8
+       bne+ 0,.L1
+       lwz 9,36(31)
+       lwz 4,4(9)
+.L39:
+       lwz 3,0(9)
+       b .L1
+.L49:
+       lwz 9,36(31)
+       b .L39
+.L48:
+       lwz 9,36(31)
+       lhz 3,0(9)
+       b .L1
+.L47:
+       lwz 9,36(31)
+       lbz 3,0(9)
+       b .L1
+.L40:
+       lwz 3,24(31)
+       b .L1
+.L46:
+       lfd 1,24(31)
+       b .L1
+.L45:
+       lfs 1,24(31)
+       b .L1
+.L44:
+       lhz 3,24(31)
+       b .L1
+.L43:
+       lha 3,24(31)
+       b .L1
+.L41:
+       lbz 3,24(31)
+       b .L1
+.L42:
+       lbz 0,24(31)
+       slwi 0,0,24
+       srawi 3,0,24
+       b .L1
+       .size   vacall_receiver, .-vacall_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-powerpc.c b/vacall/vacall-powerpc.c
new file mode 100644 (file)
index 0000000..ea3e208
--- /dev/null
@@ -0,0 +1,181 @@
+/* vacall function for powerpc CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ * Copyright 2000 Adam Fedor <fedor@gnu.org>
+ * Copyright 2004 Paul Guyot <pguyot@kallisys.net>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *             env     __asm__("r11");
+#endif
+register double                farg1   __asm__("fr1");
+register double                farg2   __asm__("fr2");
+register double                farg3   __asm__("fr3");
+register double                farg4   __asm__("fr4");
+register double                farg5   __asm__("fr5");
+register double                farg6   __asm__("fr6");
+register double                farg7   __asm__("fr7");
+register double                farg8   __asm__("fr8");
+register double                farg9   __asm__("fr9");
+register double                farg10  __asm__("fr10");
+register double                farg11  __asm__("fr11");
+register double                farg12  __asm__("fr12");
+register double                farg13  __asm__("fr13");
+register __vaword      iret    __asm__("r3");
+register __vaword      iret2   __asm__("r4");
+register float         fret    __asm__("fr1");
+register double                dret    __asm__("fr1");
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword word5, __vaword word6, __vaword word7, __vaword word8,
+                 __vaword firstword)
+{
+  __va_alist list;
+#if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */
+  /* gcc-2.6.3 source says: When a parameter is passed in a register,
+   * stack space is still allocated for it.
+   */
+  /* Move the arguments passed in registers to their stack locations. */
+  (&firstword)[-8] = word1;
+  (&firstword)[-7] = word2;
+  (&firstword)[-6] = word3;
+  (&firstword)[-5] = word4;
+  (&firstword)[-4] = word5;
+  (&firstword)[-3] = word6;
+  (&firstword)[-2] = word7;
+  (&firstword)[-1] = word8;
+#else /* __powerpc_sysv4__ */
+  /* Move the arguments passed in registers to temp storage, since
+     moving them to the stack would mess up the stack */
+  list.iarg[0] = word1;
+  list.iarg[1] = word2;
+  list.iarg[2] = word3;
+  list.iarg[3] = word4;
+  list.iarg[4] = word5;
+  list.iarg[5] = word6;
+  list.iarg[6] = word7;
+  list.iarg[7] = word8;
+#endif
+  list.farg[0] = farg1;
+  list.farg[1] = farg2;
+  list.farg[2] = farg3;
+  list.farg[3] = farg4;
+  list.farg[4] = farg5;
+  list.farg[5] = farg6;
+  list.farg[6] = farg7;
+  list.farg[7] = farg8;
+#if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */
+  list.farg[8] = farg9;
+  list.farg[9] = farg10;
+  list.farg[10] = farg11;
+  list.farg[11] = farg12;
+  list.farg[12] = farg13;
+#endif
+  /* Prepare the va_alist. */
+  list.flags = 0;
+#if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */
+  list.aptr = (long)(&firstword - 8);
+#else /* __powerpc_sysv4__ */
+  list.aptr = (long)(&firstword);
+  list.ianum = 0;
+#endif
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.fanum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) {
+    iret  = ((__vaword *) &list.tmp._longlong)[0];
+    iret2 = ((__vaword *) &list.tmp._longlong)[1];
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      if (list.rsize == sizeof(char)) {
+        iret = *(unsigned char *) list.raddr;
+      } else
+      if (list.rsize == sizeof(short)) {
+        iret = *(unsigned short *) list.raddr;
+      } else
+      if (list.rsize == sizeof(int)) {
+        iret = *(unsigned int *) list.raddr;
+      } else
+      if (list.rsize == 2*sizeof(__vaword)) {
+        iret  = ((__vaword *) list.raddr)[0];
+        iret2 = ((__vaword *) list.raddr)[1];
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-powerpc64-aix.s b/vacall/vacall-powerpc64-aix.s
new file mode 100644 (file)
index 0000000..bb888b7
--- /dev/null
@@ -0,0 +1,151 @@
+       .file   "vacall-powerpc64.c"
+       .csect .text[PR]
+       .toc
+       .csect .text[PR]
+       .toc
+LC..0:
+       .tc vacall_function[TC],vacall_function[UA]
+       .csect .text[PR]
+       .align 2
+       .align 4
+       .globl vacall_receiver
+       .globl .vacall_receiver
+       .csect vacall_receiver[DS],3
+vacall_receiver:
+       .llong .vacall_receiver, TOC[tc0], 0
+       .csect .text[PR]
+.vacall_receiver:
+       mflr 0
+       std 31,-8(1)
+       li 11,0
+       std 0,16(1)
+       li 0,0
+       stdu 1,-304(1)
+       mr 31,1
+       std 2,40(1)
+       stw 0,112(31)
+       stw 11,152(31)
+       stw 11,168(31)
+       std 9,400(31)
+       addi 9,31,352
+       std 3,352(31)
+       stfd 1,172(31)
+       std 4,360(31)
+       std 5,368(31)
+       std 6,376(31)
+       std 7,384(31)
+       std 8,392(31)
+       stfd 2,180(31)
+       addi 3,31,112
+       stfd 3,188(31)
+       stfd 4,196(31)
+       stfd 5,204(31)
+       stfd 6,212(31)
+       stfd 7,220(31)
+       stfd 8,228(31)
+       stfd 9,236(31)
+       stfd 10,244(31)
+       stfd 11,252(31)
+       stfd 12,260(31)
+       stfd 13,268(31)
+       std 9,136(31)
+       std 11,144(31)
+       std 10,408(31)
+       ld 9,LC..0(2)
+       ld 9,0(9)
+       ld 10,0(9)
+       ld 11,16(9)
+       mtctr 10
+       ld 2,8(9)
+       bctrl
+       ld 2,40(1)
+       lwz 9,152(31)
+       cmpdi 7,9,0
+       beq 7,L..1
+       cmplwi 7,9,1
+       beq 7,L..20
+       cmplwi 7,9,2
+       beq 7,L..23
+       cmplwi 7,9,3
+       beq 7,L..20
+       cmplwi 7,9,4
+       beq 7,L..24
+       cmplwi 7,9,5
+       beq 7,L..25
+       cmplwi 7,9,6
+       beq 7,L..26
+       cmplwi 7,9,7
+       beq 7,L..27
+       cmplwi 7,9,8
+       beq 7,L..21
+       cmplwi 7,9,9
+       beq 7,L..21
+       cmplwi 7,9,10
+       beq 7,L..21
+       cmplwi 7,9,11
+       beq 7,L..21
+       cmplwi 7,9,12
+       beq 7,L..28
+       cmplwi 7,9,13
+       beq 7,L..29
+       cmplwi 7,9,14
+       beq 7,L..21
+L..1:
+       addi 1,31,304
+       ld 0,16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .align 4
+L..20:
+       lbz 3,120(31)
+       addi 1,31,304
+       ld 0,16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .align 4
+L..23:
+       lbz 9,120(31)
+       extsb 3,9
+       b L..1
+       .align 4
+L..21:
+       ld 3,120(31)
+       b L..1
+       .align 4
+L..24:
+       lha 3,120(31)
+       b L..1
+       .align 4
+L..25:
+       lhz 3,120(31)
+       b L..1
+       .align 4
+L..26:
+       lwa 3,120(31)
+       b L..1
+       .align 4
+L..28:
+       lfs 1,120(31)
+       b L..1
+       .align 4
+L..27:
+       lwz 3,120(31)
+       b L..1
+L..29:
+       lfd 1,120(31)
+       b L..1
+LT..vacall_receiver:
+       .long 0
+       .byte 0,0,32,97,128,1,8,0
+       .long 0
+       .long LT..vacall_receiver-.vacall_receiver
+       .short 15
+       .byte "vacall_receiver"
+       .byte 31
+       .align 2
+_section_.text:
+       .csect .data[RW],4
+       .llong _section_.text
+       .extern vacall_function[UA]
diff --git a/vacall/vacall-powerpc64-elfv2-linux.S b/vacall/vacall-powerpc64-elfv2-linux.S
new file mode 100644 (file)
index 0000000..45e391d
--- /dev/null
@@ -0,0 +1,225 @@
+       .file   "vacall-powerpc64.c"
+       .machine power4
+       .abiversion 2
+       .section        ".toc","aw"
+       .section        ".text"
+       .section        ".toc","aw"
+.LC0:
+       .quad   vacall_function
+       .section        ".text"
+       .align 2
+       .p2align 4,,15
+       .globl vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+0:     addis 2,12,.TOC.-0b@ha
+       addi 2,2,.TOC.-0b@l
+       .localentry     vacall_receiver,.-vacall_receiver
+       mflr 0
+       std 31,-8(1)
+       addis 11,2,.LC0@toc@ha
+       ld 12,.LC0@toc@l(11)
+       li 11,0
+       std 0,16(1)
+       stdu 1,-224(1)
+       mr 31,1
+       ld 0,0(12)
+       std 2,24(1)
+       std 9,304(31)
+       li 9,0
+       std 3,256(31)
+       addi 3,31,32
+       std 4,264(31)
+       std 5,272(31)
+       mtctr 0
+       stw 9,32(31)
+       std 6,280(31)
+       std 7,288(31)
+       std 8,296(31)
+       std 10,312(31)
+       stfd 1,96(31)
+       addi 9,31,256
+       stfd 2,104(31)
+       stfd 3,112(31)
+       stfd 4,120(31)
+       stfd 5,128(31)
+       mr 12,0
+       std 9,56(31)
+       stfd 6,136(31)
+       stfd 7,144(31)
+       stfd 8,152(31)
+       stfd 9,160(31)
+       stfd 10,168(31)
+       stfd 11,176(31)
+       stfd 12,184(31)
+       stfd 13,192(31)
+       std 11,64(31)
+       stw 11,72(31)
+       stw 11,88(31)
+       bctrl
+       ld 2,24(1)
+       lwz 9,72(31)
+       cmpdi 7,9,0
+       beq 7,.L1
+       cmplwi 7,9,1
+       beq 7,.L27
+       cmplwi 7,9,2
+       beq 7,.L30
+       cmplwi 7,9,3
+       beq 7,.L27
+       cmplwi 7,9,4
+       beq 7,.L31
+       cmplwi 7,9,5
+       beq 7,.L32
+       cmplwi 7,9,6
+       beq 7,.L33
+       cmplwi 7,9,7
+       beq 7,.L34
+       cmplwi 7,9,8
+       beq 7,.L28
+       cmplwi 7,9,9
+       beq 7,.L28
+       cmplwi 7,9,10
+       beq 7,.L28
+       cmplwi 7,9,11
+       beq 7,.L28
+       cmplwi 7,9,12
+       beq 7,.L35
+       cmplwi 7,9,13
+       beq 7,.L36
+       cmplwi 7,9,14
+       beq 7,.L28
+       cmplwi 7,9,15
+       bne 7,.L1
+       lwz 9,32(31)
+       rldicl. 10,9,54,63
+       beq 0,.L1
+       ld 9,80(31)
+       addi 10,9,-1
+       cmpldi 7,10,15
+       bgt 7,.L1
+       ld 8,64(31)
+       cmpldi 7,9,8
+       rldicl 10,8,0,61
+       rldicr 8,8,0,60
+       add 9,9,10
+       bgt 7,.L17
+       cmpldi 7,9,8
+       slwi 9,9,3
+       bgt 7,.L18
+       ld 7,0(8)
+       addi 9,9,-1
+       li 8,2
+       slwi 10,10,3
+       sld 9,8,9
+       addi 9,9,-1
+       and 9,9,7
+       srad 3,9,10
+.L1:
+       addi 1,31,224
+       ld 0,16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L27:
+       addi 1,31,224
+       lbz 3,40(31)
+       ld 0,16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L30:
+       lbz 9,40(31)
+       extsb 3,9
+       b .L1
+       .p2align 4,,15
+.L28:
+       ld 3,40(31)
+       b .L1
+       .p2align 4,,15
+.L31:
+       lha 3,40(31)
+       b .L1
+       .p2align 4,,15
+.L32:
+       lhz 3,40(31)
+       b .L1
+       .p2align 4,,15
+.L33:
+       lwa 3,40(31)
+       b .L1
+       .p2align 4,,15
+.L35:
+       lfs 1,40(31)
+       b .L1
+       .p2align 4,,15
+.L34:
+       lwz 3,40(31)
+       b .L1
+.L36:
+       lfd 1,40(31)
+       b .L1
+.L17:
+       cmpldi 7,9,16
+       rldicl 10,10,0,32
+       slwi 9,9,3
+       ble 7,.L37
+       li 7,2
+       addi 9,9,-129
+       ld 11,16(8)
+       ld 5,0(8)
+       mulli 6,10,-8
+       sld 9,7,9
+       ld 7,8(8)
+       addi 8,9,-1
+       slwi 9,10,3
+       addi 6,6,64
+       and 10,8,11
+       srad 8,5,9
+       sld 5,7,6
+       srad 9,7,9
+       sld 10,10,6
+       or 3,8,5
+       or 4,10,9
+       b .L1
+.L18:
+       rldicl 10,10,0,32
+       li 7,2
+       ld 6,8(8)
+       ld 8,0(8)
+       addi 9,9,-65
+       sld 9,7,9
+       mulli 7,10,-8
+       slwi 10,10,3
+       addi 9,9,-1
+       srad 10,8,10
+       and 9,9,6
+       addi 7,7,64
+       sld 9,9,7
+       or 3,9,10
+       b .L1
+.L37:
+       li 7,2
+       addi 9,9,-65
+       ld 5,8(8)
+       ld 6,0(8)
+       sld 9,7,9
+       mulli 7,10,-4
+       addi 9,9,-1
+       addi 7,7,32
+       and 8,9,5
+       slwi 9,10,3
+       sld 10,8,7
+       srad 6,6,9
+       srad 4,8,9
+       sld 7,10,7
+       or 3,6,7
+       b .L1
+       .long 0
+       .byte 0,0,0,1,128,1,0,0
+       .size   vacall_receiver,.-vacall_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-powerpc64-linux.S b/vacall/vacall-powerpc64-linux.S
new file mode 100644 (file)
index 0000000..0a402ef
--- /dev/null
@@ -0,0 +1,146 @@
+       .file   "vacall-powerpc64.c"
+       .machine power4
+       .section        ".toc","aw"
+       .section        ".text"
+       .section        ".toc","aw"
+.LC0:
+       .quad   vacall_function
+       .section        ".text"
+       .align 2
+       .p2align 4,,15
+       .globl vacall_receiver
+       .section        ".opd","aw"
+       .align 3
+vacall_receiver:
+       .quad   .L.vacall_receiver,.TOC.@tocbase,0
+       .previous
+       .type   vacall_receiver, @function
+.L.vacall_receiver:
+       mflr 0
+       std 31,-8(1)
+       li 11,0
+       std 0,16(1)
+       stdu 1,-304(1)
+       li 0,0
+       mr 31,1
+       std 2,40(1)
+       stw 11,152(31)
+       stw 0,112(31)
+       stw 11,168(31)
+       std 9,400(31)
+       std 3,352(31)
+       std 4,360(31)
+       std 5,368(31)
+       std 6,376(31)
+       std 7,384(31)
+       std 8,392(31)
+       std 10,408(31)
+       stfd 1,176(31)
+       addi 9,31,352
+       stfd 2,184(31)
+       stfd 3,192(31)
+       stfd 4,200(31)
+       stfd 5,208(31)
+       addis 10,2,.LC0@toc@ha
+       addi 3,31,112
+       stfd 6,216(31)
+       stfd 7,224(31)
+       stfd 8,232(31)
+       stfd 9,240(31)
+       stfd 10,248(31)
+       stfd 11,256(31)
+       stfd 12,264(31)
+       stfd 13,272(31)
+       std 9,136(31)
+       std 11,144(31)
+       ld 9,.LC0@toc@l(10)
+       ld 9,0(9)
+       ld 10,0(9)
+       ld 11,16(9)
+       mtctr 10
+       ld 2,8(9)
+       bctrl
+       ld 2,40(1)
+       lwz 9,152(31)
+       cmpdi 7,9,0
+       beq 7,.L1
+       cmplwi 7,9,1
+       beq 7,.L20
+       cmplwi 7,9,2
+       beq 7,.L23
+       cmplwi 7,9,3
+       beq 7,.L20
+       cmplwi 7,9,4
+       beq 7,.L24
+       cmplwi 7,9,5
+       beq 7,.L25
+       cmplwi 7,9,6
+       beq 7,.L26
+       cmplwi 7,9,7
+       beq 7,.L27
+       cmplwi 7,9,8
+       beq 7,.L21
+       cmplwi 7,9,9
+       beq 7,.L21
+       cmplwi 7,9,10
+       beq 7,.L21
+       cmplwi 7,9,11
+       beq 7,.L21
+       cmplwi 7,9,12
+       beq 7,.L28
+       cmplwi 7,9,13
+       beq 7,.L29
+       cmplwi 7,9,14
+       beq 7,.L21
+.L1:
+       addi 1,31,304
+       ld 0,16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L20:
+       lbz 3,120(31)
+       addi 1,31,304
+       ld 0,16(1)
+       ld 31,-8(1)
+       mtlr 0
+       blr
+       .p2align 4,,15
+.L23:
+       lbz 9,120(31)
+       extsb 3,9
+       b .L1
+       .p2align 4,,15
+.L21:
+       ld 3,120(31)
+       b .L1
+       .p2align 4,,15
+.L24:
+       lha 3,120(31)
+       b .L1
+       .p2align 4,,15
+.L25:
+       lhz 3,120(31)
+       b .L1
+       .p2align 4,,15
+.L26:
+       lwa 3,120(31)
+       b .L1
+       .p2align 4,,15
+.L28:
+       lfs 1,120(31)
+       b .L1
+       .p2align 4,,15
+.L27:
+       lwz 3,120(31)
+       b .L1
+.L29:
+       lfd 1,120(31)
+       b .L1
+       .long 0
+       .byte 0,0,0,1,128,1,0,0
+       .size   vacall_receiver,.-.L.vacall_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-powerpc64.c b/vacall/vacall-powerpc64.c
new file mode 100644 (file)
index 0000000..19bcbbc
--- /dev/null
@@ -0,0 +1,293 @@
+/* vacall function for powerpc64 CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ * Copyright 2000 Adam Fedor <fedor@gnu.org>
+ * Copyright 2004 Paul Guyot <pguyot@kallisys.net>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *             env     __asm__("r11");
+#endif
+register double                farg1   __asm__("fr1");
+register double                farg2   __asm__("fr2");
+register double                farg3   __asm__("fr3");
+register double                farg4   __asm__("fr4");
+register double                farg5   __asm__("fr5");
+register double                farg6   __asm__("fr6");
+register double                farg7   __asm__("fr7");
+register double                farg8   __asm__("fr8");
+register double                farg9   __asm__("fr9");
+register double                farg10  __asm__("fr10");
+register double                farg11  __asm__("fr11");
+register double                farg12  __asm__("fr12");
+register double                farg13  __asm__("fr13");
+register __vaword      iret    __asm__("r3");
+register __vaword      iret2   __asm__("r4");
+register float         fret    __asm__("fr1");
+register double                dret    __asm__("fr1");
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword word5, __vaword word6, __vaword word7, __vaword word8,
+                 __vaword firstword)
+{
+  __va_alist list;
+  /* When a parameter is passed in a register,
+   * stack space is still allocated for it.
+   */
+  /* Move the arguments passed in registers to their stack locations. */
+  (&firstword)[-8] = word1;
+  (&firstword)[-7] = word2;
+  (&firstword)[-6] = word3;
+  (&firstword)[-5] = word4;
+  (&firstword)[-4] = word5;
+  (&firstword)[-3] = word6;
+  (&firstword)[-2] = word7;
+  (&firstword)[-1] = word8;
+  list.farg[0] = farg1;
+  list.farg[1] = farg2;
+  list.farg[2] = farg3;
+  list.farg[3] = farg4;
+  list.farg[4] = farg5;
+  list.farg[5] = farg6;
+  list.farg[6] = farg7;
+  list.farg[7] = farg8;
+  list.farg[8] = farg9;
+  list.farg[9] = farg10;
+  list.farg[10] = farg11;
+  list.farg[11] = farg12;
+  list.farg[12] = farg13;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)(&firstword - 8);
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.fanum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulonglong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+#ifdef __powerpc64_elfv2__
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      /* In the ELFv2 ABI, gcc returns structs of size <= 16 in registers. */
+      if (list.rsize > 0 && list.rsize <= 16) {
+        #if 0 /* Unoptimized */
+        if (list.rsize == 1) {
+          iret =   (__vaword)((unsigned char *) list.raddr)[0];
+        } else
+        if (list.rsize == 2) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 8);
+        } else
+        if (list.rsize == 3) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 16);
+        } else
+        if (list.rsize == 4) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                | ((__vaword)((unsigned char *) list.raddr)[3] << 24);
+        } else
+        if (list.rsize == 5) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                | ((__vaword)((unsigned char *) list.raddr)[4] << 32);
+        } else
+        if (list.rsize == 6) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                | ((__vaword)((unsigned char *) list.raddr)[4] << 32)
+                | ((__vaword)((unsigned char *) list.raddr)[5] << 40);
+        } else
+        if (list.rsize == 7) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                | ((__vaword)((unsigned char *) list.raddr)[4] << 32)
+                | ((__vaword)((unsigned char *) list.raddr)[5] << 40)
+                | ((__vaword)((unsigned char *) list.raddr)[6] << 48);
+        } else
+        if (list.rsize >= 8 && list.rsize <= 16) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0])
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+                | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+                | ((__vaword)((unsigned char *) list.raddr)[4] << 32)
+                | ((__vaword)((unsigned char *) list.raddr)[5] << 40)
+                | ((__vaword)((unsigned char *) list.raddr)[6] << 48)
+                | ((__vaword)((unsigned char *) list.raddr)[7] << 56);
+          if (list.rsize == 8) {
+          } else
+          if (list.rsize == 9) {
+            iret2 =   (__vaword)((unsigned char *) list.raddr)[8];
+          } else
+          if (list.rsize == 10) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 8);
+          } else
+          if (list.rsize == 11) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 16);
+          } else
+          if (list.rsize == 12) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                   | ((__vaword)((unsigned char *) list.raddr)[11] << 24);
+          } else
+          if (list.rsize == 13) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                   | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                   | ((__vaword)((unsigned char *) list.raddr)[12] << 32);
+          } else
+          if (list.rsize == 14) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                   | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                   | ((__vaword)((unsigned char *) list.raddr)[12] << 32)
+                   | ((__vaword)((unsigned char *) list.raddr)[13] << 40);
+          } else
+          if (list.rsize == 15) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                   | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                   | ((__vaword)((unsigned char *) list.raddr)[12] << 32)
+                   | ((__vaword)((unsigned char *) list.raddr)[13] << 40)
+                   | ((__vaword)((unsigned char *) list.raddr)[14] << 48);
+          } else
+          if (list.rsize == 16) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8])
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 8)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 16)
+                   | ((__vaword)((unsigned char *) list.raddr)[11] << 24)
+                   | ((__vaword)((unsigned char *) list.raddr)[12] << 32)
+                   | ((__vaword)((unsigned char *) list.raddr)[13] << 40)
+                   | ((__vaword)((unsigned char *) list.raddr)[14] << 48)
+                   | ((__vaword)((unsigned char *) list.raddr)[15] << 56);
+          }
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__vaword) */
+        __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+        uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__vaword) */
+        if (count <= sizeof(__vaword)) {
+          /* Assign iret. */
+          if (end_offset <= sizeof(__vaword)) {
+            /* 0 < end_offset ≤ sizeof(__vaword) */
+            __vaword mask0 = ((__vaword)2 << (end_offset*8-1)) - 1;
+            iret = (wordaddr[0] & mask0) >> (start_offset*8);
+          } else {
+            /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        } else {
+          /* Assign iret, iret2. */
+          if (end_offset <= 2*sizeof(__vaword)) {
+            /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+            iret2 = (wordaddr[1] & mask1) >> (start_offset*8);
+          } else {
+            /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+            __vaword mask2 = ((__vaword)2 << (end_offset*8-2*sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*8-start_offset*8));
+            iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        }
+        #endif
+      }
+    }
+#endif
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-riscv32-ilp32d-linux.s b/vacall/vacall-riscv32-ilp32d-linux.s
new file mode 100644 (file)
index 0000000..0982775
--- /dev/null
@@ -0,0 +1,163 @@
+       .file   "vacall-riscv32.c"
+       .option nopic
+       .text
+       .align  1
+       .globl  vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       add     sp,sp,-208
+       sw      ra,188(sp)
+       sw      s0,184(sp)
+       add     s0,sp,192
+       lui     t1,%hi(vacall_function)
+       lw      t1,%lo(vacall_function)(t1)
+       sw      a0,-148(s0)
+       add     a0,s0,16
+       sw      a7,12(s0)
+       sw      a1,-144(s0)
+       sw      a2,-140(s0)
+       sw      a3,-136(s0)
+       sw      a4,-132(s0)
+       sw      a5,-128(s0)
+       sw      a6,-124(s0)
+       sw      a7,-120(s0)
+       fsw     fa0,-112(s0)
+       fsw     fa1,-108(s0)
+       fsw     fa2,-104(s0)
+       fsw     fa3,-100(s0)
+       fsw     fa4,-96(s0)
+       fsw     fa5,-92(s0)
+       fsw     fa6,-88(s0)
+       fsw     fa7,-84(s0)
+       fsd     fa0,-80(s0)
+       fsd     fa1,-72(s0)
+       fsd     fa2,-64(s0)
+       fsd     fa3,-56(s0)
+       fsd     fa4,-48(s0)
+       fsd     fa5,-40(s0)
+       fsd     fa6,-32(s0)
+       fsd     fa7,-24(s0)
+       sw      a0,-168(s0)
+       sw      zero,-184(s0)
+       sw      zero,-164(s0)
+       sw      zero,-160(s0)
+       add     a0,s0,-184
+       sw      zero,-152(s0)
+       sw      zero,-116(s0)
+       jalr    t1
+       lw      t1,-160(s0)
+       beqz    t1,.L1
+       li      t3,1
+       beq     t1,t3,.L22
+       li      t3,2
+       beq     t1,t3,.L25
+       li      t3,3
+       beq     t1,t3,.L22
+       li      t3,4
+       beq     t1,t3,.L26
+       li      t3,5
+       beq     t1,t3,.L27
+       li      t3,6
+       beq     t1,t3,.L23
+       li      t3,7
+       beq     t1,t3,.L23
+       li      t3,8
+       beq     t1,t3,.L23
+       li      t3,9
+       beq     t1,t3,.L23
+       add     t3,t1,-10
+       li      t4,1
+       bleu    t3,t4,.L28
+       li      t3,12
+       beq     t1,t3,.L29
+       li      t3,13
+       beq     t1,t3,.L30
+       li      t3,14
+       beq     t1,t3,.L23
+       li      t3,15
+       bne     t1,t3,.L1
+       lw      t1,-184(s0)
+       and     t1,t1,2
+       beqz    t1,.L1
+       lw      t3,-156(s0)
+       li      t1,7
+       add     t5,t3,-1
+       bgtu    t5,t1,.L1
+       lw      t1,-164(s0)
+       lbu     t5,0(t1)
+       mv      a0,t5
+       beq     t3,t4,.L1
+       lbu     t4,1(t1)
+       li      t6,2
+       sll     t4,t4,8
+       or      t5,t4,t5
+       mv      a0,t5
+       beq     t3,t6,.L1
+       lbu     t4,2(t1)
+       li      t6,3
+       sll     t4,t4,16
+       or      t4,t4,t5
+       mv      a0,t4
+       beq     t3,t6,.L1
+       lbu     a0,3(t1)
+       li      t5,4
+       sll     a0,a0,24
+       or      a0,a0,t4
+       beq     t3,t5,.L1
+       lbu     t5,4(t1)
+       li      t4,5
+       mv      a1,t5
+       beq     t3,t4,.L1
+       lbu     t4,5(t1)
+       li      t6,6
+       sll     t4,t4,8
+       or      t5,t4,t5
+       mv      a1,t5
+       beq     t3,t6,.L1
+       lbu     t4,6(t1)
+       li      t6,8
+       sll     t4,t4,16
+       or      t4,t4,t5
+       mv      a1,t4
+       bne     t3,t6,.L1
+       lbu     a1,7(t1)
+       sll     a1,a1,24
+       or      a1,a1,t4
+.L1:
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L22:
+       lbu     a0,-176(s0)
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L23:
+       lw      a0,-176(s0)
+       j       .L1
+.L25:
+       lb      a0,-176(s0)
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L26:
+       lh      a0,-176(s0)
+       j       .L1
+.L27:
+       lhu     a0,-176(s0)
+       j       .L1
+.L28:
+       lw      a0,-176(s0)
+       lw      a1,-172(s0)
+       j       .L1
+.L29:
+       flw     fa0,-176(s0)
+       j       .L1
+.L30:
+       fld     fa0,-176(s0)
+       j       .L1
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 7.3.0"
diff --git a/vacall/vacall-riscv32-ilp32d-macro.S b/vacall/vacall-riscv32-ilp32d-macro.S
new file mode 100644 (file)
index 0000000..5142889
--- /dev/null
@@ -0,0 +1,165 @@
+       .file   "vacall-riscv32.c"
+       .option nopic
+       .text
+       .align  1
+       .globl  vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       add     sp,sp,-208
+       sw      ra,188(sp)
+       sw      s0,184(sp)
+       add     s0,sp,192
+       lui     t1,%hi(vacall_function)
+       lw      t1,%lo(vacall_function)(t1)
+       sw      a0,-148(s0)
+       add     a0,s0,16
+       sw      a7,12(s0)
+       sw      a1,-144(s0)
+       sw      a2,-140(s0)
+       sw      a3,-136(s0)
+       sw      a4,-132(s0)
+       sw      a5,-128(s0)
+       sw      a6,-124(s0)
+       sw      a7,-120(s0)
+       fsw     fa0,-112(s0)
+       fsw     fa1,-108(s0)
+       fsw     fa2,-104(s0)
+       fsw     fa3,-100(s0)
+       fsw     fa4,-96(s0)
+       fsw     fa5,-92(s0)
+       fsw     fa6,-88(s0)
+       fsw     fa7,-84(s0)
+       fsd     fa0,-80(s0)
+       fsd     fa1,-72(s0)
+       fsd     fa2,-64(s0)
+       fsd     fa3,-56(s0)
+       fsd     fa4,-48(s0)
+       fsd     fa5,-40(s0)
+       fsd     fa6,-32(s0)
+       fsd     fa7,-24(s0)
+       sw      a0,-168(s0)
+       sw      zero,-184(s0)
+       sw      zero,-164(s0)
+       sw      zero,-160(s0)
+       add     a0,s0,-184
+       sw      zero,-152(s0)
+       sw      zero,-116(s0)
+       jalr    t1
+       lw      t1,-160(s0)
+       beqz    t1,.L1
+       li      t3,1
+       beq     t1,t3,.L22
+       li      t3,2
+       beq     t1,t3,.L25
+       li      t3,3
+       beq     t1,t3,.L22
+       li      t3,4
+       beq     t1,t3,.L26
+       li      t3,5
+       beq     t1,t3,.L27
+       li      t3,6
+       beq     t1,t3,.L23
+       li      t3,7
+       beq     t1,t3,.L23
+       li      t3,8
+       beq     t1,t3,.L23
+       li      t3,9
+       beq     t1,t3,.L23
+       add     t3,t1,-10
+       li      t4,1
+       bleu    t3,t4,.L28
+       li      t3,12
+       beq     t1,t3,.L29
+       li      t3,13
+       beq     t1,t3,.L30
+       li      t3,14
+       beq     t1,t3,.L23
+       li      t3,15
+       bne     t1,t3,.L1
+       lw      t1,-184(s0)
+       and     t1,t1,2
+       beqz    t1,.L1
+       lw      t3,-156(s0)
+       li      t1,7
+       add     t5,t3,-1
+       bgtu    t5,t1,.L1
+       lw      t1,-164(s0)
+       lbu     t5,0(t1)
+       mv      a0,t5
+       beq     t3,t4,.L1
+       lbu     t4,1(t1)
+       li      t6,2
+       sll     t4,t4,8
+       or      t5,t4,t5
+       mv      a0,t5
+       beq     t3,t6,.L1
+       lbu     t4,2(t1)
+       li      t6,3
+       sll     t4,t4,16
+       or      t4,t4,t5
+       mv      a0,t4
+       beq     t3,t6,.L1
+       lbu     a0,3(t1)
+       li      t5,4
+       sll     a0,a0,24
+       or      a0,a0,t4
+       beq     t3,t5,.L1
+       lbu     t5,4(t1)
+       li      t4,5
+       mv      a1,t5
+       beq     t3,t4,.L1
+       lbu     t4,5(t1)
+       li      t6,6
+       sll     t4,t4,8
+       or      t5,t4,t5
+       mv      a1,t5
+       beq     t3,t6,.L1
+       lbu     t4,6(t1)
+       li      t6,8
+       sll     t4,t4,16
+       or      t4,t4,t5
+       mv      a1,t4
+       bne     t3,t6,.L1
+       lbu     a1,7(t1)
+       sll     a1,a1,24
+       or      a1,a1,t4
+.L1:
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L22:
+       lbu     a0,-176(s0)
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L23:
+       lw      a0,-176(s0)
+       j       .L1
+.L25:
+       lb      a0,-176(s0)
+       lw      ra,188(sp)
+       lw      s0,184(sp)
+       add     sp,sp,208
+       jr      ra
+.L26:
+       lh      a0,-176(s0)
+       j       .L1
+.L27:
+       lhu     a0,-176(s0)
+       j       .L1
+.L28:
+       lw      a0,-176(s0)
+       lw      a1,-172(s0)
+       j       .L1
+.L29:
+       flw     fa0,-176(s0)
+       j       .L1
+.L30:
+       fld     fa0,-176(s0)
+       j       .L1
+       .size   vacall_receiver, .-vacall_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-riscv32.c b/vacall/vacall-riscv32.c
new file mode 100644 (file)
index 0000000..b3f581f
--- /dev/null
@@ -0,0 +1,226 @@
+/* vacall function for RISC-V 32-bit CPU */
+
+/*
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *             env     __asm__("t2");
+#endif
+
+register __vaword iarg1 __asm__("a0");
+register __vaword iarg2 __asm__("a1");
+register __vaword iarg3 __asm__("a2");
+register __vaword iarg4 __asm__("a3");
+register __vaword iarg5 __asm__("a4");
+register __vaword iarg6 __asm__("a5");
+register __vaword iarg7 __asm__("a6");
+register __vaword iarg8 __asm__("a7");
+
+register float farg1 __asm__("fa0");
+register float farg2 __asm__("fa1");
+register float farg3 __asm__("fa2");
+register float farg4 __asm__("fa3");
+register float farg5 __asm__("fa4");
+register float farg6 __asm__("fa5");
+register float farg7 __asm__("fa6");
+register float farg8 __asm__("fa7");
+
+register double darg1 __asm__("fa0");
+register double darg2 __asm__("fa1");
+register double darg3 __asm__("fa2");
+register double darg4 __asm__("fa3");
+register double darg5 __asm__("fa4");
+register double darg6 __asm__("fa5");
+register double darg7 __asm__("fa6");
+register double darg8 __asm__("fa7");
+
+register __vaword iret  __asm__("a0");
+register __vaword iret2 __asm__("a1");
+register float  fret __asm__("fa0");
+register double dret __asm__("fa0");
+
+/* The ABI requires that the first 8 general-purpose argument words are
+   being passed in registers, even if these words belong to structs that are
+   at most 2 words large. No room is allocated for these register words on
+   the stack by the caller, but the callee allocates room for them - at the
+   right place in the stack frame, that is, above the retaddr - if and only
+   if they are part of a struct that extends to the stack and the address of
+   this struct is taken. */
+struct gpargsequence {
+  __vaword word8; /* a7 */
+  __vaword firststackword;
+};
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword word5, __vaword word6, __vaword word7,
+                 struct gpargsequence gpargs)
+{
+  __va_alist list;
+  /* Move the arguments passed in registers to temp storage. */
+  list.iarg[0] = iarg1;
+  list.iarg[1] = iarg2;
+  list.iarg[2] = iarg3;
+  list.iarg[3] = iarg4;
+  list.iarg[4] = iarg5;
+  list.iarg[5] = iarg6;
+  list.iarg[6] = iarg7;
+  list.iarg[7] = iarg8; /* = gpargs.word8 */
+  list.farg[0] = farg1;
+  list.farg[1] = farg2;
+  list.farg[2] = farg3;
+  list.farg[3] = farg4;
+  list.farg[4] = farg5;
+  list.farg[5] = farg6;
+  list.farg[6] = farg7;
+  list.farg[7] = farg8;
+  list.darg[0] = darg1;
+  list.darg[1] = darg2;
+  list.darg[2] = darg3;
+  list.darg[3] = darg4;
+  list.darg[4] = darg5;
+  list.darg[5] = darg6;
+  list.darg[6] = darg7;
+  list.darg[7] = darg8;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&gpargs + sizeof(__vaword);
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.ianum = 0;
+  list.fanum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) {
+    iret  = ((__vaword *) &list.tmp._longlong)[0];
+    iret2 = ((__vaword *) &list.tmp._longlong)[1];
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    /* normal struct return convention */
+    if (list.flags & __VA_SMALL_STRUCT_RETURN) {
+      /* Return structs of size <= 8 in registers. */
+      if (list.rsize > 0 && list.rsize <= 8) {
+        #if 1 /* Unoptimized */
+        iret = (__vaword)((unsigned char *) list.raddr)[0];
+        if (list.rsize >= 2)
+          iret |= (__vaword)((unsigned char *) list.raddr)[1] << 8;
+        if (list.rsize >= 3)
+          iret |= (__vaword)((unsigned char *) list.raddr)[2] << 16;
+        if (list.rsize >= 4)
+          iret |= (__vaword)((unsigned char *) list.raddr)[3] << 24;
+        if (list.rsize >= 5) {
+          iret2 = (__vaword)((unsigned char *) list.raddr)[4];
+          if (list.rsize >= 6)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[5] << 8;
+          if (list.rsize >= 7)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[6] << 16;
+          if (list.rsize >= 8)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[7] << 24;
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__vaword) */
+        __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+        uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__vaword) */
+        if (count <= sizeof(__vaword)) {
+          /* Assign iret. */
+          if (end_offset <= sizeof(__vaword)) {
+            /* 0 < end_offset ≤ sizeof(__vaword) */
+            __vaword mask0 = ((__vaword)2 << (end_offset*8-1)) - 1;
+            iret = (wordaddr[0] & mask0) >> (start_offset*8);
+          } else {
+            /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        } else {
+          /* Assign iret, iret2. */
+          if (end_offset <= 2*sizeof(__vaword)) {
+            /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+            iret2 = (wordaddr[1] & mask1) >> (start_offset*8);
+          } else {
+            /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+            __vaword mask2 = ((__vaword)2 << (end_offset*8-2*sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*8-start_offset*8));
+            iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        }
+        #endif
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-riscv64-lp64d-linux.s b/vacall/vacall-riscv64-lp64d-linux.s
new file mode 100644 (file)
index 0000000..65f5bc9
--- /dev/null
@@ -0,0 +1,190 @@
+       .file   "vacall-riscv64.c"
+       .option nopic
+       .text
+       .align  1
+       .globl  vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       add     sp,sp,-288
+       sd      ra,264(sp)
+       sd      s0,256(sp)
+       sd      s1,248(sp)
+       add     s0,sp,272
+       lui     t1,%hi(vacall_function)
+       ld      t1,%lo(vacall_function)(t1)
+       sd      a0,-200(s0)
+       add     a0,s0,16
+       sd      a7,8(s0)
+       sd      a1,-192(s0)
+       sd      a2,-184(s0)
+       sd      a3,-176(s0)
+       sd      a4,-168(s0)
+       sd      a5,-160(s0)
+       sd      a6,-152(s0)
+       sd      a7,-144(s0)
+       fsw     fa0,-132(s0)
+       fsw     fa1,-128(s0)
+       fsw     fa2,-124(s0)
+       fsw     fa3,-120(s0)
+       fsw     fa4,-116(s0)
+       fsw     fa5,-112(s0)
+       fsw     fa6,-108(s0)
+       fsw     fa7,-104(s0)
+       fsd     fa0,-96(s0)
+       fsd     fa1,-88(s0)
+       fsd     fa2,-80(s0)
+       fsd     fa3,-72(s0)
+       fsd     fa4,-64(s0)
+       fsd     fa5,-56(s0)
+       fsd     fa6,-48(s0)
+       fsd     fa7,-40(s0)
+       sd      a0,-240(s0)
+       sw      zero,-264(s0)
+       sd      zero,-232(s0)
+       add     a0,s0,-264
+       sw      zero,-224(s0)
+       sw      zero,-208(s0)
+       sw      zero,-136(s0)
+       jalr    t1
+       lw      t1,-224(s0)
+       beqz    t1,.L1
+       li      t3,1
+       beq     t1,t3,.L25
+       li      t3,2
+       beq     t1,t3,.L29
+       li      t3,3
+       beq     t1,t3,.L25
+       li      t3,4
+       beq     t1,t3,.L30
+       li      t3,5
+       beq     t1,t3,.L31
+       li      t3,6
+       beq     t1,t3,.L32
+       li      t3,7
+       beq     t1,t3,.L33
+       and     t3,t1,-3
+       li      t4,8
+       beq     t3,t4,.L27
+       li      t4,9
+       beq     t3,t4,.L27
+       li      t3,12
+       beq     t1,t3,.L34
+       li      t3,13
+       beq     t1,t3,.L35
+       li      t3,14
+       beq     t1,t3,.L27
+       li      t3,15
+       bne     t1,t3,.L1
+       lw      t3,-264(s0)
+       and     t3,t3,1024
+       beqz    t3,.L1
+       ld      t0,-216(s0)
+       add     t3,t0,-1
+       bgtu    t3,t1,.L1
+       ld      t5,-232(s0)
+       li      s1,8
+       and     t6,t5,7
+       add     t2,t0,t6
+       and     t5,t5,-8
+       sext.w  t6,t6
+       sllw    t1,t2,3
+       ld      t4,0(t5)
+       sll     t3,t6,3
+       bgtu    t0,s1,.L15
+       bgtu    t2,s1,.L16
+       addw    t1,t1,-1
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t4
+       sra     a0,a0,t3
+.L1:
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       add     sp,sp,288
+       jr      ra
+.L25:
+       lbu     a0,-256(s0)
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       add     sp,sp,288
+       jr      ra
+.L29:
+       lb      a0,-256(s0)
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       add     sp,sp,288
+       jr      ra
+.L30:
+       lh      a0,-256(s0)
+       j       .L1
+.L33:
+       lwu     a0,-256(s0)
+       j       .L1
+.L31:
+       lhu     a0,-256(s0)
+       j       .L1
+.L27:
+       ld      a0,-256(s0)
+       j       .L1
+.L32:
+       lw      a0,-256(s0)
+       j       .L1
+.L34:
+       flw     fa0,-256(s0)
+       j       .L1
+.L35:
+       fld     fa0,-256(s0)
+       j       .L1
+.L15:
+       li      s1,16
+       sra     t4,t4,t3
+       ld      t0,8(t5)
+       bleu    t2,s1,.L36
+       li      a1,-8
+       mulw    t6,a1,t6
+       addw    t1,t1,-129
+       ld      a0,16(t5)
+       li      a1,2
+       sll     a1,a1,t1
+       add     a1,a1,-1
+       and     a1,a1,a0
+       sra     t3,t0,t3
+       addw    t1,t6,64
+       sll     a0,t0,t1
+       sll     a1,a1,t1
+       or      a0,a0,t4
+       or      a1,a1,t3
+       j       .L1
+.L16:
+       li      a0,-8
+       mulw    t6,a0,t6
+       addw    t1,t1,-65
+       ld      t5,8(t5)
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t5
+       sra     t4,t4,t3
+       sll     a0,a0,t6
+       or      a0,a0,t4
+       j       .L1
+.L36:
+       li      a1,-4
+       mulw    t6,a1,t6
+       addw    t1,t1,-65
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t0
+       sra     a1,a0,t3
+       addw    t1,t6,32
+       sll     a0,a0,t1
+       sll     a0,a0,t1
+       or      a0,a0,t4
+       j       .L1
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 7.3.0"
diff --git a/vacall/vacall-riscv64-lp64d-macro.S b/vacall/vacall-riscv64-lp64d-macro.S
new file mode 100644 (file)
index 0000000..25bb90b
--- /dev/null
@@ -0,0 +1,192 @@
+       .file   "vacall-riscv64.c"
+       .option nopic
+       .text
+       .align  1
+       .globl  vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+       add     sp,sp,-288
+       sd      ra,264(sp)
+       sd      s0,256(sp)
+       sd      s1,248(sp)
+       add     s0,sp,272
+       lui     t1,%hi(vacall_function)
+       ld      t1,%lo(vacall_function)(t1)
+       sd      a0,-200(s0)
+       add     a0,s0,16
+       sd      a7,8(s0)
+       sd      a1,-192(s0)
+       sd      a2,-184(s0)
+       sd      a3,-176(s0)
+       sd      a4,-168(s0)
+       sd      a5,-160(s0)
+       sd      a6,-152(s0)
+       sd      a7,-144(s0)
+       fsw     fa0,-132(s0)
+       fsw     fa1,-128(s0)
+       fsw     fa2,-124(s0)
+       fsw     fa3,-120(s0)
+       fsw     fa4,-116(s0)
+       fsw     fa5,-112(s0)
+       fsw     fa6,-108(s0)
+       fsw     fa7,-104(s0)
+       fsd     fa0,-96(s0)
+       fsd     fa1,-88(s0)
+       fsd     fa2,-80(s0)
+       fsd     fa3,-72(s0)
+       fsd     fa4,-64(s0)
+       fsd     fa5,-56(s0)
+       fsd     fa6,-48(s0)
+       fsd     fa7,-40(s0)
+       sd      a0,-240(s0)
+       sw      zero,-264(s0)
+       sd      zero,-232(s0)
+       add     a0,s0,-264
+       sw      zero,-224(s0)
+       sw      zero,-208(s0)
+       sw      zero,-136(s0)
+       jalr    t1
+       lw      t1,-224(s0)
+       beqz    t1,.L1
+       li      t3,1
+       beq     t1,t3,.L25
+       li      t3,2
+       beq     t1,t3,.L29
+       li      t3,3
+       beq     t1,t3,.L25
+       li      t3,4
+       beq     t1,t3,.L30
+       li      t3,5
+       beq     t1,t3,.L31
+       li      t3,6
+       beq     t1,t3,.L32
+       li      t3,7
+       beq     t1,t3,.L33
+       and     t3,t1,-3
+       li      t4,8
+       beq     t3,t4,.L27
+       li      t4,9
+       beq     t3,t4,.L27
+       li      t3,12
+       beq     t1,t3,.L34
+       li      t3,13
+       beq     t1,t3,.L35
+       li      t3,14
+       beq     t1,t3,.L27
+       li      t3,15
+       bne     t1,t3,.L1
+       lw      t3,-264(s0)
+       and     t3,t3,1024
+       beqz    t3,.L1
+       ld      t0,-216(s0)
+       add     t3,t0,-1
+       bgtu    t3,t1,.L1
+       ld      t5,-232(s0)
+       li      s1,8
+       and     t6,t5,7
+       add     t2,t0,t6
+       and     t5,t5,-8
+       sext.w  t6,t6
+       sllw    t1,t2,3
+       ld      t4,0(t5)
+       sll     t3,t6,3
+       bgtu    t0,s1,.L15
+       bgtu    t2,s1,.L16
+       addw    t1,t1,-1
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t4
+       sra     a0,a0,t3
+.L1:
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       add     sp,sp,288
+       jr      ra
+.L25:
+       lbu     a0,-256(s0)
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       add     sp,sp,288
+       jr      ra
+.L29:
+       lb      a0,-256(s0)
+       ld      ra,264(sp)
+       ld      s0,256(sp)
+       ld      s1,248(sp)
+       add     sp,sp,288
+       jr      ra
+.L30:
+       lh      a0,-256(s0)
+       j       .L1
+.L33:
+       lwu     a0,-256(s0)
+       j       .L1
+.L31:
+       lhu     a0,-256(s0)
+       j       .L1
+.L27:
+       ld      a0,-256(s0)
+       j       .L1
+.L32:
+       lw      a0,-256(s0)
+       j       .L1
+.L34:
+       flw     fa0,-256(s0)
+       j       .L1
+.L35:
+       fld     fa0,-256(s0)
+       j       .L1
+.L15:
+       li      s1,16
+       sra     t4,t4,t3
+       ld      t0,8(t5)
+       bleu    t2,s1,.L36
+       li      a1,-8
+       mulw    t6,a1,t6
+       addw    t1,t1,-129
+       ld      a0,16(t5)
+       li      a1,2
+       sll     a1,a1,t1
+       add     a1,a1,-1
+       and     a1,a1,a0
+       sra     t3,t0,t3
+       addw    t1,t6,64
+       sll     a0,t0,t1
+       sll     a1,a1,t1
+       or      a0,a0,t4
+       or      a1,a1,t3
+       j       .L1
+.L16:
+       li      a0,-8
+       mulw    t6,a0,t6
+       addw    t1,t1,-65
+       ld      t5,8(t5)
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t5
+       sra     t4,t4,t3
+       sll     a0,a0,t6
+       or      a0,a0,t4
+       j       .L1
+.L36:
+       li      a1,-4
+       mulw    t6,a1,t6
+       addw    t1,t1,-65
+       li      a0,2
+       sll     a0,a0,t1
+       add     a0,a0,-1
+       and     a0,a0,t0
+       sra     a1,a0,t3
+       addw    t1,t6,32
+       sll     a0,a0,t1
+       sll     a0,a0,t1
+       or      a0,a0,t4
+       j       .L1
+       .size   vacall_receiver, .-vacall_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-riscv64.c b/vacall/vacall-riscv64.c
new file mode 100644 (file)
index 0000000..8789968
--- /dev/null
@@ -0,0 +1,238 @@
+/* vacall function for RISC-V 64-bit CPU */
+
+/*
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *             env     __asm__("t2");
+#endif
+
+register __vaword iarg1 __asm__("a0");
+register __vaword iarg2 __asm__("a1");
+register __vaword iarg3 __asm__("a2");
+register __vaword iarg4 __asm__("a3");
+register __vaword iarg5 __asm__("a4");
+register __vaword iarg6 __asm__("a5");
+register __vaword iarg7 __asm__("a6");
+register __vaword iarg8 __asm__("a7");
+
+register float farg1 __asm__("fa0");
+register float farg2 __asm__("fa1");
+register float farg3 __asm__("fa2");
+register float farg4 __asm__("fa3");
+register float farg5 __asm__("fa4");
+register float farg6 __asm__("fa5");
+register float farg7 __asm__("fa6");
+register float farg8 __asm__("fa7");
+
+register double darg1 __asm__("fa0");
+register double darg2 __asm__("fa1");
+register double darg3 __asm__("fa2");
+register double darg4 __asm__("fa3");
+register double darg5 __asm__("fa4");
+register double darg6 __asm__("fa5");
+register double darg7 __asm__("fa6");
+register double darg8 __asm__("fa7");
+
+register __vaword iret  __asm__("a0");
+register __vaword iret2 __asm__("a1");
+register float  fret __asm__("fa0");
+register double dret __asm__("fa0");
+
+/* The ABI requires that the first 8 general-purpose argument words are
+   being passed in registers, even if these words belong to structs that are
+   at most 2 words large. No room is allocated for these register words on
+   the stack by the caller, but the callee allocates room for them - at the
+   right place in the stack frame, that is, above the retaddr - if and only
+   if they are part of a struct that extends to the stack and the address of
+   this struct is taken. */
+struct gpargsequence {
+  __vaword word8; /* a7 */
+  __vaword firststackword;
+};
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword word5, __vaword word6, __vaword word7,
+                 struct gpargsequence gpargs)
+{
+  __va_alist list;
+  /* Move the arguments passed in registers to temp storage. */
+  list.iarg[0] = iarg1;
+  list.iarg[1] = iarg2;
+  list.iarg[2] = iarg3;
+  list.iarg[3] = iarg4;
+  list.iarg[4] = iarg5;
+  list.iarg[5] = iarg6;
+  list.iarg[6] = iarg7;
+  list.iarg[7] = iarg8; /* = gpargs.word8 */
+  list.farg[0] = farg1;
+  list.farg[1] = farg2;
+  list.farg[2] = farg3;
+  list.farg[3] = farg4;
+  list.farg[4] = farg5;
+  list.farg[5] = farg6;
+  list.farg[6] = farg7;
+  list.farg[7] = farg8;
+  list.darg[0] = darg1;
+  list.darg[1] = darg2;
+  list.darg[2] = darg3;
+  list.darg[3] = darg4;
+  list.darg[4] = darg5;
+  list.darg[5] = darg6;
+  list.darg[6] = darg7;
+  list.darg[7] = darg8;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&gpargs + sizeof(__vaword);
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.ianum = 0;
+  list.fanum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong || list.rtype == __VAlonglong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong || list.rtype == __VAulonglong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    /* normal struct return convention */
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      /* Return structs of size <= 16 in registers. */
+      if (list.rsize > 0 && list.rsize <= 16) {
+        #if 0 /* Unoptimized */
+        iret = (__vaword)((unsigned char *) list.raddr)[0];
+        if (list.rsize >= 2)
+          iret |= (__vaword)((unsigned char *) list.raddr)[1] << 8;
+        if (list.rsize >= 3)
+          iret |= (__vaword)((unsigned char *) list.raddr)[2] << 16;
+        if (list.rsize >= 4)
+          iret |= (__vaword)((unsigned char *) list.raddr)[3] << 24;
+        if (list.rsize >= 5)
+          iret |= (__vaword)((unsigned char *) list.raddr)[4] << 32;
+        if (list.rsize >= 6)
+          iret |= (__vaword)((unsigned char *) list.raddr)[5] << 40;
+        if (list.rsize >= 7)
+          iret |= (__vaword)((unsigned char *) list.raddr)[6] << 48;
+        if (list.rsize >= 8)
+          iret |= (__vaword)((unsigned char *) list.raddr)[7] << 56;
+        if (list.rsize >= 9) {
+          iret2 = (__vaword)((unsigned char *) list.raddr)[8];
+          if (list.rsize >= 10)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[9] << 8;
+          if (list.rsize >= 11)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[10] << 16;
+          if (list.rsize >= 12)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[11] << 24;
+          if (list.rsize >= 13)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[12] << 32;
+          if (list.rsize >= 14)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[13] << 40;
+          if (list.rsize >= 15)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[14] << 48;
+          if (list.rsize >= 16)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[15] << 56;
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__vaword) */
+        __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+        uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__vaword) */
+        if (count <= sizeof(__vaword)) {
+          /* Assign iret. */
+          if (end_offset <= sizeof(__vaword)) {
+            /* 0 < end_offset ≤ sizeof(__vaword) */
+            __vaword mask0 = ((__vaword)2 << (end_offset*8-1)) - 1;
+            iret = (wordaddr[0] & mask0) >> (start_offset*8);
+          } else {
+            /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        } else {
+          /* Assign iret, iret2. */
+          if (end_offset <= 2*sizeof(__vaword)) {
+            /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+            iret2 = (wordaddr[1] & mask1) >> (start_offset*8);
+          } else {
+            /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+            __vaword mask2 = ((__vaword)2 << (end_offset*8-2*sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*8-start_offset*8));
+            iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        }
+        #endif
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-s390-linux.s b/vacall/vacall-s390-linux.s
new file mode 100644 (file)
index 0000000..0b0038f
--- /dev/null
@@ -0,0 +1,144 @@
+       .file   "vacall-s390.c"
+.text
+       .align  4
+.globl vacall_receiver
+       .type   vacall_receiver,@function
+vacall_receiver:
+       stm     %r6,%r15,24(%r15)
+       bras    %r13,.LTN0_0
+.LT0_0:
+.LC0:
+       .long   vacall_function
+.LC1:
+       .long   0
+.LC2:
+       .long   255
+.LC3:
+       .long   65535
+.LC4:
+       .long   1
+.LTN0_0:
+       l       %r1,.LC0-.LT0_0(%r13)
+       lr      %r14,%r15
+       ahi     %r15,-184
+       lr      %r11,%r15
+       l       %r12,0(%r1)
+       st      %r14,0(%r15)
+       la      %r1,280(%r11)
+       st      %r2,132(%r11)
+       la      %r2,96(%r11)
+       st      %r4,140(%r11)
+       st      %r5,144(%r11)
+       st      %r6,148(%r11)
+       st      %r3,136(%r11)
+       std     %f2,176(%r11)
+       std     %f0,168(%r11)
+       ste     %f2,160(%r11)
+       ste     %f0,156(%r11)
+       mvc     96(4,%r11),.LC1-.LT0_0(%r13)
+       st      %r1,112(%r11)
+       mvc     116(4,%r11),.LC1-.LT0_0(%r13)
+       mvc     120(4,%r11),.LC1-.LT0_0(%r13)
+       mvc     128(4,%r11),.LC1-.LT0_0(%r13)
+       mvc     152(4,%r11),.LC1-.LT0_0(%r13)
+       basr    %r14,%r12
+       icm     %r4,15,120(%r11)
+       je      .L1
+       chi     %r4,1
+       je      .L43
+       chi     %r4,2
+       je      .L44
+       chi     %r4,3
+       je      .L43
+       chi     %r4,4
+       je      .L45
+       chi     %r4,5
+       je      .L46
+       chi     %r4,6
+       je      .L40
+       chi     %r4,7
+       je      .L40
+       chi     %r4,8
+       je      .L40
+       chi     %r4,9
+       je      .L40
+       lr      %r1,%r4
+       ahi     %r1,-10
+       cl      %r1,.LC4-.LT0_0(%r13)
+       jh      .L22
+       l       %r2,104(%r11)
+       l       %r3,108(%r11)
+.L1:
+       l       %r4,240(%r11)
+       lm      %r6,%r15,208(%r11)
+       br      %r4
+.L22:
+       chi     %r4,12
+       je      .L47
+       chi     %r4,13
+       je      .L48
+       chi     %r4,14
+       je      .L40
+       chi     %r4,15
+       jne     .L1
+       tm      98(%r11),4
+       je      .L1
+       l       %r1,124(%r11)
+       chi     %r1,1
+       je      .L49
+       chi     %r1,2
+       je      .L50
+       chi     %r1,4
+       je      .L51
+       chi     %r1,8
+       jne     .L1
+       l       %r1,116(%r11)
+       l       %r3,4(%r1)
+.L39:
+       l       %r2,0(%r1)
+       j       .L1
+.L51:
+       l       %r1,116(%r11)
+       j       .L39
+.L50:
+       l       %r1,116(%r11)
+       lh      %r4,0(%r1)
+       lr      %r2,%r4
+.L41:
+       n       %r2,.LC3-.LT0_0(%r13)
+       j       .L1
+.L49:
+       l       %r1,116(%r11)
+       ic      %r4,0(%r1)
+       lr      %r2,%r4
+.L42:
+       n       %r2,.LC2-.LT0_0(%r13)
+       j       .L1
+.L40:
+       l       %r2,104(%r11)
+       j       .L1
+.L48:
+       ld      %f0,104(%r11)
+       j       .L1
+.L47:
+       le      %f0,104(%r11)
+       j       .L1
+.L46:
+       lh      %r1,104(%r11)
+       lr      %r2,%r1
+       j       .L41
+.L45:
+       lh      %r2,104(%r11)
+       j       .L1
+.L43:
+       ic      %r1,104(%r11)
+       lr      %r2,%r1
+       j       .L42
+.L44:
+       icm     %r1,8,104(%r11)
+       lr      %r2,%r1
+       sra     %r2,24
+       j       .L1
+.Lfe1:
+       .size   vacall_receiver,.Lfe1-vacall_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/vacall/vacall-s390-macro.S b/vacall/vacall-s390-macro.S
new file mode 100644 (file)
index 0000000..de4c35e
--- /dev/null
@@ -0,0 +1,146 @@
+       .file   "vacall-s390.c"
+.text
+       .align  4
+.globl vacall_receiver
+       .type   vacall_receiver,@function
+vacall_receiver:
+       stm     %r6,%r15,24(%r15)
+       bras    %r13,.LTN0_0
+.LT0_0:
+.LC0:
+       .long   vacall_function
+.LC1:
+       .long   0
+.LC2:
+       .long   255
+.LC3:
+       .long   65535
+.LC4:
+       .long   1
+.LTN0_0:
+       l       %r1,.LC0-.LT0_0(%r13)
+       lr      %r14,%r15
+       ahi     %r15,-184
+       lr      %r11,%r15
+       l       %r12,0(%r1)
+       st      %r14,0(%r15)
+       la      %r1,280(%r11)
+       st      %r2,132(%r11)
+       la      %r2,96(%r11)
+       st      %r4,140(%r11)
+       st      %r5,144(%r11)
+       st      %r6,148(%r11)
+       st      %r3,136(%r11)
+       std     %f2,176(%r11)
+       std     %f0,168(%r11)
+       ste     %f2,160(%r11)
+       ste     %f0,156(%r11)
+       mvc     96(4,%r11),.LC1-.LT0_0(%r13)
+       st      %r1,112(%r11)
+       mvc     116(4,%r11),.LC1-.LT0_0(%r13)
+       mvc     120(4,%r11),.LC1-.LT0_0(%r13)
+       mvc     128(4,%r11),.LC1-.LT0_0(%r13)
+       mvc     152(4,%r11),.LC1-.LT0_0(%r13)
+       basr    %r14,%r12
+       icm     %r4,15,120(%r11)
+       je      .L1
+       chi     %r4,1
+       je      .L43
+       chi     %r4,2
+       je      .L44
+       chi     %r4,3
+       je      .L43
+       chi     %r4,4
+       je      .L45
+       chi     %r4,5
+       je      .L46
+       chi     %r4,6
+       je      .L40
+       chi     %r4,7
+       je      .L40
+       chi     %r4,8
+       je      .L40
+       chi     %r4,9
+       je      .L40
+       lr      %r1,%r4
+       ahi     %r1,-10
+       cl      %r1,.LC4-.LT0_0(%r13)
+       jh      .L22
+       l       %r2,104(%r11)
+       l       %r3,108(%r11)
+.L1:
+       l       %r4,240(%r11)
+       lm      %r6,%r15,208(%r11)
+       br      %r4
+.L22:
+       chi     %r4,12
+       je      .L47
+       chi     %r4,13
+       je      .L48
+       chi     %r4,14
+       je      .L40
+       chi     %r4,15
+       jne     .L1
+       tm      98(%r11),4
+       je      .L1
+       l       %r1,124(%r11)
+       chi     %r1,1
+       je      .L49
+       chi     %r1,2
+       je      .L50
+       chi     %r1,4
+       je      .L51
+       chi     %r1,8
+       jne     .L1
+       l       %r1,116(%r11)
+       l       %r3,4(%r1)
+.L39:
+       l       %r2,0(%r1)
+       j       .L1
+.L51:
+       l       %r1,116(%r11)
+       j       .L39
+.L50:
+       l       %r1,116(%r11)
+       lh      %r4,0(%r1)
+       lr      %r2,%r4
+.L41:
+       n       %r2,.LC3-.LT0_0(%r13)
+       j       .L1
+.L49:
+       l       %r1,116(%r11)
+       ic      %r4,0(%r1)
+       lr      %r2,%r4
+.L42:
+       n       %r2,.LC2-.LT0_0(%r13)
+       j       .L1
+.L40:
+       l       %r2,104(%r11)
+       j       .L1
+.L48:
+       ld      %f0,104(%r11)
+       j       .L1
+.L47:
+       le      %f0,104(%r11)
+       j       .L1
+.L46:
+       lh      %r1,104(%r11)
+       lr      %r2,%r1
+       j       .L41
+.L45:
+       lh      %r2,104(%r11)
+       j       .L1
+.L43:
+       ic      %r1,104(%r11)
+       lr      %r2,%r1
+       j       .L42
+.L44:
+       icm     %r1,8,104(%r11)
+       lr      %r2,%r1
+       sra     %r2,24
+       j       .L1
+.Lfe1:
+       .size   vacall_receiver,.Lfe1-vacall_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-s390.c b/vacall/vacall-s390.c
new file mode 100644 (file)
index 0000000..261d190
--- /dev/null
@@ -0,0 +1,142 @@
+/* vacall function for S/390 32-bit CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ * Copyright 2000 Adam Fedor <fedor@gnu.org>
+ * Copyright 2001 Gerhard Tonn <gt@debian.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *             env     __asm__("r0");
+#endif
+register float                 farg1   __asm__("f0");
+register float         farg2   __asm__("f2");
+register double                darg1   __asm__("f0");
+register double                darg2   __asm__("f2");
+register __vaword      iret    __asm__("%r2");
+register __vaword      iret2   __asm__("%r3");
+register float         fret    __asm__("%f0");
+register double                dret    __asm__("%f0");
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword word5,
+                 __vaword firstword)
+{
+  __va_alist list;
+  /* Move the arguments passed in registers to temp storage, since
+     moving them to the stack would mess up the stack */
+  list.iarg[0] = word1;
+  list.iarg[1] = word2;
+  list.iarg[2] = word3;
+  list.iarg[3] = word4;
+  list.iarg[4] = word5;
+
+  list.darg[1] = darg2;
+  list.darg[0] = darg1;
+
+  list.farg[1] = farg2;
+  list.farg[0] = farg1;
+
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&firstword;
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.ianum = 0;
+  list.fanum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) {
+    iret  = ((__vaword *) &list.tmp._longlong)[0];
+    iret2 = ((__vaword *) &list.tmp._longlong)[1];
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      if (list.rsize == sizeof(char)) {
+        iret = *(unsigned char *) list.raddr;
+      } else
+      if (list.rsize == sizeof(short)) {
+        iret = *(unsigned short *) list.raddr;
+      } else
+      if (list.rsize == sizeof(int)) {
+        iret = *(unsigned int *) list.raddr;
+      } else
+      if (list.rsize == 2*sizeof(__vaword)) {
+        iret  = ((__vaword *) list.raddr)[0];
+        iret2 = ((__vaword *) list.raddr)[1];
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-s390x-linux.s b/vacall/vacall-s390x-linux.s
new file mode 100644 (file)
index 0000000..a94a1a8
--- /dev/null
@@ -0,0 +1,127 @@
+       .file   "vacall-s390x.c"
+.text
+       .align  8
+.globl vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+.LFB0:
+       .cfi_startproc
+       stmg    %r11,%r15,88(%r15)
+       .cfi_offset 11, -72
+       .cfi_offset 12, -64
+       .cfi_offset 13, -56
+       .cfi_offset 14, -48
+       .cfi_offset 15, -40
+       aghi    %r15,-320
+       .cfi_def_cfa_offset 480
+       lgr     %r11,%r15
+       .cfi_def_cfa_register 11
+       larl    %r1,vacall_function
+       lhi     %r0,0
+       lg      %r1,0(%r1)
+       st      %r0,160(%r11)
+       la      %r0,480(%r11)
+       stg     %r0,184(%r11)
+       lghi    %r0,0
+       stg     %r2,224(%r11)
+       stg     %r3,232(%r11)
+       stg     %r4,240(%r11)
+       stg     %r5,248(%r11)
+       stg     %r6,256(%r11)
+       ste     %f0,268(%r11)
+       ste     %f2,272(%r11)
+       ste     %f4,276(%r11)
+       ste     %f6,280(%r11)
+       std     %f0,288(%r11)
+       std     %f2,296(%r11)
+       std     %f4,304(%r11)
+       std     %f6,312(%r11)
+       stg     %r0,192(%r11)
+       st      %r0,200(%r11)
+       st      %r0,216(%r11)
+       st      %r0,264(%r11)
+       la      %r2,160(%r11)
+       basr    %r14,%r1
+       icm     %r1,15,200(%r11)
+       je      .L1
+       chi     %r1,1
+       je      .L18
+       chi     %r1,2
+       je      .L21
+       chi     %r1,3
+       je      .L18
+       chi     %r1,4
+       je      .L22
+       chi     %r1,5
+       je      .L23
+       chi     %r1,6
+       je      .L24
+       chi     %r1,7
+       je      .L25
+       lr      %r0,%r1
+       nill    %r0,65533
+       chi     %r0,8
+       je      .L19
+       chi     %r0,9
+       je      .L19
+       chi     %r1,12
+       je      .L26
+       chi     %r1,13
+       je      .L27
+       chi     %r1,14
+       je      .L19
+.L1:
+       lg      %r4,432(%r11)
+       lmg     %r11,%r15,408(%r11)
+       .cfi_remember_state
+       .cfi_restore 15
+       .cfi_restore 14
+       .cfi_restore 13
+       .cfi_restore 12
+       .cfi_restore 11
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L18:
+       .cfi_restore_state
+       lg      %r4,432(%r11)
+       llgc    %r2,168(%r11)
+       lmg     %r11,%r15,408(%r11)
+       .cfi_remember_state
+       .cfi_restore 11
+       .cfi_restore 12
+       .cfi_restore 13
+       .cfi_restore 14
+       .cfi_restore 15
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L21:
+       .cfi_restore_state
+       icmh    %r2,8,168(%r11)
+       srag    %r2,%r2,56
+       j       .L1
+.L19:
+       lg      %r2,168(%r11)
+       j       .L1
+.L22:
+       lgh     %r2,168(%r11)
+       j       .L1
+.L23:
+       llgh    %r2,168(%r11)
+       j       .L1
+.L24:
+       lgf     %r2,168(%r11)
+       j       .L1
+.L26:
+       le      %f0,168(%r11)
+       j       .L1
+.L25:
+       llgf    %r2,168(%r11)
+       j       .L1
+.L27:
+       ld      %f0,168(%r11)
+       j       .L1
+       .cfi_endproc
+.LFE0:
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 5.4.0"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/vacall/vacall-s390x-macro.S b/vacall/vacall-s390x-macro.S
new file mode 100644 (file)
index 0000000..bd0c96c
--- /dev/null
@@ -0,0 +1,128 @@
+       .file   "vacall-s390x.c"
+.text
+       .align  8
+.globl vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+.LFB0:
+       .cfi_startproc
+       stmg    %r11,%r15,88(%r15)
+       .cfi_offset 11, -72
+       .cfi_offset 12, -64
+       .cfi_offset 13, -56
+       .cfi_offset 14, -48
+       .cfi_offset 15, -40
+       aghi    %r15,-320
+       .cfi_def_cfa_offset 480
+       lgr     %r11,%r15
+       .cfi_def_cfa_register 11
+       larl    %r1,vacall_function
+       lhi     %r0,0
+       lg      %r1,0(%r1)
+       st      %r0,160(%r11)
+       la      %r0,480(%r11)
+       stg     %r0,184(%r11)
+       lghi    %r0,0
+       stg     %r2,224(%r11)
+       stg     %r3,232(%r11)
+       stg     %r4,240(%r11)
+       stg     %r5,248(%r11)
+       stg     %r6,256(%r11)
+       ste     %f0,268(%r11)
+       ste     %f2,272(%r11)
+       ste     %f4,276(%r11)
+       ste     %f6,280(%r11)
+       std     %f0,288(%r11)
+       std     %f2,296(%r11)
+       std     %f4,304(%r11)
+       std     %f6,312(%r11)
+       stg     %r0,192(%r11)
+       st      %r0,200(%r11)
+       st      %r0,216(%r11)
+       st      %r0,264(%r11)
+       la      %r2,160(%r11)
+       basr    %r14,%r1
+       icm     %r1,15,200(%r11)
+       je      .L1
+       chi     %r1,1
+       je      .L18
+       chi     %r1,2
+       je      .L21
+       chi     %r1,3
+       je      .L18
+       chi     %r1,4
+       je      .L22
+       chi     %r1,5
+       je      .L23
+       chi     %r1,6
+       je      .L24
+       chi     %r1,7
+       je      .L25
+       lr      %r0,%r1
+       nill    %r0,65533
+       chi     %r0,8
+       je      .L19
+       chi     %r0,9
+       je      .L19
+       chi     %r1,12
+       je      .L26
+       chi     %r1,13
+       je      .L27
+       chi     %r1,14
+       je      .L19
+.L1:
+       lg      %r4,432(%r11)
+       lmg     %r11,%r15,408(%r11)
+       .cfi_remember_state
+       .cfi_restore 15
+       .cfi_restore 14
+       .cfi_restore 13
+       .cfi_restore 12
+       .cfi_restore 11
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L18:
+       .cfi_restore_state
+       lg      %r4,432(%r11)
+       llgc    %r2,168(%r11)
+       lmg     %r11,%r15,408(%r11)
+       .cfi_remember_state
+       .cfi_restore 11
+       .cfi_restore 12
+       .cfi_restore 13
+       .cfi_restore 14
+       .cfi_restore 15
+       .cfi_def_cfa 15, 160
+       br      %r4
+.L21:
+       .cfi_restore_state
+       icmh    %r2,8,168(%r11)
+       srag    %r2,%r2,56
+       j       .L1
+.L19:
+       lg      %r2,168(%r11)
+       j       .L1
+.L22:
+       lgh     %r2,168(%r11)
+       j       .L1
+.L23:
+       llgh    %r2,168(%r11)
+       j       .L1
+.L24:
+       lgf     %r2,168(%r11)
+       j       .L1
+.L26:
+       le      %f0,168(%r11)
+       j       .L1
+.L25:
+       llgf    %r2,168(%r11)
+       j       .L1
+.L27:
+       ld      %f0,168(%r11)
+       j       .L1
+       .cfi_endproc
+.LFE0:
+       .size   vacall_receiver, .-vacall_receiver
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-s390x.c b/vacall/vacall-s390x.c
new file mode 100644 (file)
index 0000000..c3cb71f
--- /dev/null
@@ -0,0 +1,134 @@
+/* vacall function for s390x (S/390 64-bit) CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *             env     __asm__("r0");
+#endif
+
+register __vaword iarg1 __asm__("r2");
+register __vaword iarg2 __asm__("r3");
+register __vaword iarg3 __asm__("r4");
+register __vaword iarg4 __asm__("r5");
+register __vaword iarg5 __asm__("r6");
+
+register float farg1 __asm__("f0");
+register float farg2 __asm__("f2");
+register float farg3 __asm__("f4");
+register float farg4 __asm__("f6");
+
+register double darg1 __asm__("f0");
+register double darg2 __asm__("f2");
+register double darg3 __asm__("f4");
+register double darg4 __asm__("f6");
+
+register __vaword iret  __asm__("r2");
+register float  fret __asm__("f0");
+register double dret __asm__("f0");
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword word5,
+                 __vaword firstword)
+{
+  __va_alist list;
+  /* Move the arguments passed in registers to temp storage. */
+  list.iarg[0] = iarg1;
+  list.iarg[1] = iarg2;
+  list.iarg[2] = iarg3;
+  list.iarg[3] = iarg4;
+  list.iarg[4] = iarg5;
+  list.farg[0] = farg1;
+  list.farg[1] = farg2;
+  list.farg[2] = farg3;
+  list.farg[3] = farg4;
+  list.darg[0] = darg1;
+  list.darg[1] = darg2;
+  list.darg[2] = darg3;
+  list.darg[3] = darg4;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&firstword;
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.ianum = 0;
+  list.fanum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong || list.rtype == __VAlonglong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong || list.rtype == __VAulonglong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    /* normal struct return convention */
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-sparc-linux-pic.s b/vacall/vacall-sparc-linux-pic.s
new file mode 100644 (file)
index 0000000..48f6d61
--- /dev/null
@@ -0,0 +1,138 @@
+       .file   "vacall-sparc.c"
+       .section        ".text"
+       .align 4
+.LLGETPC0:
+       retl
+       add     %o7, %l7, %l7
+       .align 4
+       .global vacall_receiver
+       .type   vacall_receiver,#function
+       .proc   020
+vacall_receiver:
+       !#PROLOGUE# 0
+       save    %sp, -144, %sp
+       sethi   %hi(vacall_function), %o0
+       sethi   %hi(_GLOBAL_OFFSET_TABLE_-4), %l7
+       call    .LLGETPC0
+       add     %l7, %lo(_GLOBAL_OFFSET_TABLE_+4), %l7
+       or      %o0, %lo(vacall_function), %o0
+       ld      [%l7+%o0], %o1
+       st      %i2, [%fp+76]
+       ld      [%o1], %o2
+       add     %fp, 68, %o0
+       ld      [%fp+64], %o1
+       st      %o0, [%fp-32]
+       st      %o1, [%fp-16]
+       st      %i3, [%fp+80]
+       st      %i4, [%fp+84]
+       st      %i5, [%fp+88]
+       st      %i0, [%fp+68]
+       st      %i1, [%fp+72]
+       st      %g0, [%fp-48]
+       st      %g0, [%fp-28]
+       st      %g0, [%fp-24]
+       call    %o2, 0
+       add     %fp, -48, %o0
+       ld      [%fp-24], %o1
+       cmp     %o1, 0
+       be      .LL1
+       cmp     %o1, 1
+       be      .LL44
+       cmp     %o1, 2
+       be      .LL44
+       cmp     %o1, 3
+       be      .LL45
+       cmp     %o1, 4
+       be      .LL46
+       cmp     %o1, 5
+       be      .LL47
+       cmp     %o1, 6
+       be      .LL43
+       cmp     %o1, 7
+       be      .LL43
+       cmp     %o1, 8
+       be      .LL43
+       cmp     %o1, 9
+       be      .LL43
+       add     %o1, -10, %o0
+       cmp     %o0, 1
+       bgu     .LL22
+       cmp     %o1, 12
+       ld      [%fp-40], %i0
+       b       .LL1
+       ld      [%fp-36], %i1
+.LL22:
+       be      .LL48
+       cmp     %o1, 13
+       be      .LL49
+       cmp     %o1, 14
+       be      .LL43
+       cmp     %o1, 15
+       bne     .LL1
+       ld      [%fp-48], %o0
+       andcc   %o0, 16, %g0
+       be      .LL33
+       andcc   %o0, 2, %g0
+       ld      [%fp-20], %o0
+       ld      [%i7+8], %o1
+       and     %o0, 4095, %o0
+       cmp     %o0, %o1
+       bne     .LL1
+       ld      [%fp-28], %i0
+       b       .LL1
+       add     %i7, 4, %i7
+.LL33:
+       be,a    .LL1
+       add     %i7, 4, %i7
+       ld      [%fp-20], %o0
+       cmp     %o0, 1
+       be      .LL50
+       cmp     %o0, 2
+       be      .LL51
+       cmp     %o0, 4
+       bne,a   .LL1
+       add     %i7, 4, %i7
+       ld      [%fp-28], %o0
+       b       .LL1
+       ld      [%o0], %i0
+.LL51:
+       ld      [%fp-28], %o0
+       b       .LL1
+       lduh    [%o0], %i0
+.LL50:
+       ld      [%fp-28], %o0
+       b       .LL1
+       ldub    [%o0], %i0
+.LL43:
+       b       .LL1
+       ld      [%fp-40], %i0
+.LL49:
+       b       .LL1
+       ldd     [%fp-40], %f0
+.LL48:
+       ld      [%fp-48], %o0
+       andcc   %o0, 32, %g0
+       be,a    .LL1
+       ld      [%fp-40], %f0
+       ld      [%fp-40], %f2
+       b       .LL1
+       fstod   %f2, %f0
+.LL47:
+       b       .LL1
+       lduh    [%fp-40], %i0
+.LL46:
+       b       .LL1
+       ldsh    [%fp-40], %i0
+.LL45:
+       b       .LL1
+       ldub    [%fp-40], %i0
+.LL44:
+       ldsb    [%fp-40], %i0
+.LL38:
+.LL1:
+       nop
+       ret
+       restore
+.LLfe1:
+       .size   vacall_receiver,.LLfe1-vacall_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/vacall/vacall-sparc-linux.s b/vacall/vacall-sparc-linux.s
new file mode 100644 (file)
index 0000000..770fd06
--- /dev/null
@@ -0,0 +1,130 @@
+       .file   "vacall-sparc.c"
+       .section        ".text"
+       .align 4
+       .global vacall_receiver
+       .type   vacall_receiver,#function
+       .proc   020
+vacall_receiver:
+       !#PROLOGUE# 0
+       save    %sp, -144, %sp
+       !#PROLOGUE# 1
+       sethi   %hi(vacall_function), %o0
+       ld      [%o0+%lo(vacall_function)], %o2
+       st      %i2, [%fp+76]
+       add     %fp, 68, %o0
+       ld      [%fp+64], %o1
+       st      %o0, [%fp-32]
+       st      %o1, [%fp-16]
+       st      %i3, [%fp+80]
+       st      %i4, [%fp+84]
+       st      %i5, [%fp+88]
+       st      %i0, [%fp+68]
+       st      %i1, [%fp+72]
+       st      %g0, [%fp-48]
+       st      %g0, [%fp-28]
+       st      %g0, [%fp-24]
+       call    %o2, 0
+       add     %fp, -48, %o0
+       ld      [%fp-24], %o1
+       cmp     %o1, 0
+       be      .LL1
+       cmp     %o1, 1
+       be      .LL44
+       cmp     %o1, 2
+       be      .LL44
+       cmp     %o1, 3
+       be      .LL45
+       cmp     %o1, 4
+       be      .LL46
+       cmp     %o1, 5
+       be      .LL47
+       cmp     %o1, 6
+       be      .LL43
+       cmp     %o1, 7
+       be      .LL43
+       cmp     %o1, 8
+       be      .LL43
+       cmp     %o1, 9
+       be      .LL43
+       add     %o1, -10, %o0
+       cmp     %o0, 1
+       bgu     .LL22
+       cmp     %o1, 12
+       ld      [%fp-40], %i0
+       b       .LL1
+       ld      [%fp-36], %i1
+.LL22:
+       be      .LL48
+       cmp     %o1, 13
+       be      .LL49
+       cmp     %o1, 14
+       be      .LL43
+       cmp     %o1, 15
+       bne     .LL1
+       ld      [%fp-48], %o0
+       andcc   %o0, 16, %g0
+       be      .LL33
+       andcc   %o0, 2, %g0
+       ld      [%fp-20], %o0
+       ld      [%i7+8], %o1
+       and     %o0, 4095, %o0
+       cmp     %o0, %o1
+       bne     .LL1
+       ld      [%fp-28], %i0
+       b       .LL1
+       add     %i7, 4, %i7
+.LL33:
+       be,a    .LL1
+       add     %i7, 4, %i7
+       ld      [%fp-20], %o0
+       cmp     %o0, 1
+       be      .LL50
+       cmp     %o0, 2
+       be      .LL51
+       cmp     %o0, 4
+       bne,a   .LL1
+       add     %i7, 4, %i7
+       ld      [%fp-28], %o0
+       b       .LL1
+       ld      [%o0], %i0
+.LL51:
+       ld      [%fp-28], %o0
+       b       .LL1
+       lduh    [%o0], %i0
+.LL50:
+       ld      [%fp-28], %o0
+       b       .LL1
+       ldub    [%o0], %i0
+.LL43:
+       b       .LL1
+       ld      [%fp-40], %i0
+.LL49:
+       b       .LL1
+       ldd     [%fp-40], %f0
+.LL48:
+       ld      [%fp-48], %o0
+       andcc   %o0, 32, %g0
+       be,a    .LL1
+       ld      [%fp-40], %f0
+       ld      [%fp-40], %f2
+       b       .LL1
+       fstod   %f2, %f0
+.LL47:
+       b       .LL1
+       lduh    [%fp-40], %i0
+.LL46:
+       b       .LL1
+       ldsh    [%fp-40], %i0
+.LL45:
+       b       .LL1
+       ldub    [%fp-40], %i0
+.LL44:
+       ldsb    [%fp-40], %i0
+.LL38:
+.LL1:
+       nop
+       ret
+       restore
+.LLfe1:
+       .size   vacall_receiver,.LLfe1-vacall_receiver
+       .ident  "GCC: (GNU) 3.1"
diff --git a/vacall/vacall-sparc-macro.S b/vacall/vacall-sparc-macro.S
new file mode 100644 (file)
index 0000000..d776589
--- /dev/null
@@ -0,0 +1,271 @@
+#include "asm-sparc.h"
+#ifdef __PIC__
+       .section        ".text"
+       .align 4
+L(LGETPC0):
+       retl
+       add     %o7, %l7, %l7
+       .align 4
+       .global C(vacall_receiver)
+       DECLARE_FUNCTION(vacall_receiver)
+       .proc   020
+FUNBEGIN(vacall_receiver)
+       !$PROLOGUE$ 0
+       save    %sp, -144, %sp
+       sethi   %hi(C(vacall_function)), %o0
+       sethi   %hi(_GLOBAL_OFFSET_TABLE_-4), %l7
+       call    L(LGETPC0)
+       add     %l7, %lo(_GLOBAL_OFFSET_TABLE_+4), %l7
+       or      %o0, %lo(C(vacall_function)), %o0
+       ld      [%l7+%o0], %o1
+       st      %i2, [%fp+76]
+       ld      [%o1], %o2
+       add     %fp, 68, %o0
+       ld      [%fp+64], %o1
+       st      %o0, [%fp-32]
+       st      %o1, [%fp-16]
+       st      %i3, [%fp+80]
+       st      %i4, [%fp+84]
+       st      %i5, [%fp+88]
+       st      %i0, [%fp+68]
+       st      %i1, [%fp+72]
+       st      %g0, [%fp-48]
+       st      %g0, [%fp-28]
+       st      %g0, [%fp-24]
+       call    %o2, 0
+       add     %fp, -48, %o0
+       ld      [%fp-24], %o1
+       cmp     %o1, 0
+       be      L(L1)
+       cmp     %o1, 1
+       be      L(L44)
+       cmp     %o1, 2
+       be      L(L44)
+       cmp     %o1, 3
+       be      L(L45)
+       cmp     %o1, 4
+       be      L(L46)
+       cmp     %o1, 5
+       be      L(L47)
+       cmp     %o1, 6
+       be      L(L43)
+       cmp     %o1, 7
+       be      L(L43)
+       cmp     %o1, 8
+       be      L(L43)
+       cmp     %o1, 9
+       be      L(L43)
+       add     %o1, -10, %o0
+       cmp     %o0, 1
+       bgu     L(L22)
+       cmp     %o1, 12
+       ld      [%fp-40], %i0
+       b       L(L1)
+       ld      [%fp-36], %i1
+L(L22):
+       be      L(L48)
+       cmp     %o1, 13
+       be      L(L49)
+       cmp     %o1, 14
+       be      L(L43)
+       cmp     %o1, 15
+       bne     L(L1)
+       ld      [%fp-48], %o0
+       andcc   %o0, 16, %g0
+       be      L(L33)
+       andcc   %o0, 2, %g0
+       ld      [%fp-20], %o0
+       ld      [%i7+8], %o1
+       and     %o0, 4095, %o0
+       cmp     %o0, %o1
+       bne     L(L1)
+       ld      [%fp-28], %i0
+       b       L(L1)
+       add     %i7, 4, %i7
+L(L33):
+       be,a    L(L1)
+       add     %i7, 4, %i7
+       ld      [%fp-20], %o0
+       cmp     %o0, 1
+       be      L(L50)
+       cmp     %o0, 2
+       be      L(L51)
+       cmp     %o0, 4
+       bne,a   L(L1)
+       add     %i7, 4, %i7
+       ld      [%fp-28], %o0
+       b       L(L1)
+       ld      [%o0], %i0
+L(L51):
+       ld      [%fp-28], %o0
+       b       L(L1)
+       lduh    [%o0], %i0
+L(L50):
+       ld      [%fp-28], %o0
+       b       L(L1)
+       ldub    [%o0], %i0
+L(L43):
+       b       L(L1)
+       ld      [%fp-40], %i0
+L(L49):
+       b       L(L1)
+       ldd     [%fp-40], %f0
+L(L48):
+       ld      [%fp-48], %o0
+       andcc   %o0, 32, %g0
+       be,a    L(L1)
+       ld      [%fp-40], %f0
+       ld      [%fp-40], %f2
+       b       L(L1)
+       fstod   %f2, %f0
+L(L47):
+       b       L(L1)
+       lduh    [%fp-40], %i0
+L(L46):
+       b       L(L1)
+       ldsh    [%fp-40], %i0
+L(L45):
+       b       L(L1)
+       ldub    [%fp-40], %i0
+L(L44):
+       ldsb    [%fp-40], %i0
+L(L38):
+L(L1):
+       nop
+       ret
+       restore
+L(Lfe1):
+       FUNEND(vacall_receiver)
+#else
+       .section        ".text"
+       .align 4
+       .global C(vacall_receiver)
+       DECLARE_FUNCTION(vacall_receiver)
+       .proc   020
+FUNBEGIN(vacall_receiver)
+       !$PROLOGUE$ 0
+       save    %sp, -144, %sp
+       !$PROLOGUE$ 1
+       sethi   %hi(C(vacall_function)), %o0
+       ld      [%o0+%lo(C(vacall_function))], %o2
+       st      %i2, [%fp+76]
+       add     %fp, 68, %o0
+       ld      [%fp+64], %o1
+       st      %o0, [%fp-32]
+       st      %o1, [%fp-16]
+       st      %i3, [%fp+80]
+       st      %i4, [%fp+84]
+       st      %i5, [%fp+88]
+       st      %i0, [%fp+68]
+       st      %i1, [%fp+72]
+       st      %g0, [%fp-48]
+       st      %g0, [%fp-28]
+       st      %g0, [%fp-24]
+       call    %o2, 0
+       add     %fp, -48, %o0
+       ld      [%fp-24], %o1
+       cmp     %o1, 0
+       be      L(L1)
+       cmp     %o1, 1
+       be      L(L44)
+       cmp     %o1, 2
+       be      L(L44)
+       cmp     %o1, 3
+       be      L(L45)
+       cmp     %o1, 4
+       be      L(L46)
+       cmp     %o1, 5
+       be      L(L47)
+       cmp     %o1, 6
+       be      L(L43)
+       cmp     %o1, 7
+       be      L(L43)
+       cmp     %o1, 8
+       be      L(L43)
+       cmp     %o1, 9
+       be      L(L43)
+       add     %o1, -10, %o0
+       cmp     %o0, 1
+       bgu     L(L22)
+       cmp     %o1, 12
+       ld      [%fp-40], %i0
+       b       L(L1)
+       ld      [%fp-36], %i1
+L(L22):
+       be      L(L48)
+       cmp     %o1, 13
+       be      L(L49)
+       cmp     %o1, 14
+       be      L(L43)
+       cmp     %o1, 15
+       bne     L(L1)
+       ld      [%fp-48], %o0
+       andcc   %o0, 16, %g0
+       be      L(L33)
+       andcc   %o0, 2, %g0
+       ld      [%fp-20], %o0
+       ld      [%i7+8], %o1
+       and     %o0, 4095, %o0
+       cmp     %o0, %o1
+       bne     L(L1)
+       ld      [%fp-28], %i0
+       b       L(L1)
+       add     %i7, 4, %i7
+L(L33):
+       be,a    L(L1)
+       add     %i7, 4, %i7
+       ld      [%fp-20], %o0
+       cmp     %o0, 1
+       be      L(L50)
+       cmp     %o0, 2
+       be      L(L51)
+       cmp     %o0, 4
+       bne,a   L(L1)
+       add     %i7, 4, %i7
+       ld      [%fp-28], %o0
+       b       L(L1)
+       ld      [%o0], %i0
+L(L51):
+       ld      [%fp-28], %o0
+       b       L(L1)
+       lduh    [%o0], %i0
+L(L50):
+       ld      [%fp-28], %o0
+       b       L(L1)
+       ldub    [%o0], %i0
+L(L43):
+       b       L(L1)
+       ld      [%fp-40], %i0
+L(L49):
+       b       L(L1)
+       ldd     [%fp-40], %f0
+L(L48):
+       ld      [%fp-48], %o0
+       andcc   %o0, 32, %g0
+       be,a    L(L1)
+       ld      [%fp-40], %f0
+       ld      [%fp-40], %f2
+       b       L(L1)
+       fstod   %f2, %f0
+L(L47):
+       b       L(L1)
+       lduh    [%fp-40], %i0
+L(L46):
+       b       L(L1)
+       ldsh    [%fp-40], %i0
+L(L45):
+       b       L(L1)
+       ldub    [%fp-40], %i0
+L(L44):
+       ldsb    [%fp-40], %i0
+L(L38):
+L(L1):
+       nop
+       ret
+       restore
+L(Lfe1):
+       FUNEND(vacall_receiver)
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-sparc.c b/vacall/vacall-sparc.c
new file mode 100644 (file)
index 0000000..787b3f2
--- /dev/null
@@ -0,0 +1,141 @@
+/* vacall function for sparc CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *     env     __asm__("%g2");
+#endif
+register __vaword* fp  __asm__("%fp"); /* our %fp, caller's %sp */
+register __vaword* ret __asm__("%i7"); /* %i7+8 = return address */
+register int   iret    __asm__("%i0");
+register int   iret2   __asm__("%i1");
+register float fret    __asm__("%f0"); /* %f0 */
+register double        dret    __asm__("%f0"); /* %f0,%f1 */
+
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword word5, __vaword word6,
+                 __vaword firstword)
+{
+  __va_alist list;
+  /* gcc-2.6.3 source says: When a parameter is passed in a register,
+   * stack space is still allocated for it.
+   */
+  /* Move the arguments passed in registers to their stack locations. */
+  (&firstword)[-6] = word1;
+  (&firstword)[-5] = word2;
+  (&firstword)[-4] = word3;
+  (&firstword)[-3] = word4;
+  (&firstword)[-2] = word5;
+  (&firstword)[-1] = word6;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)(&firstword - 6);
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.structraddr = (void*)((&firstword)[-7]); /* = (void*) fp[16] */
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) {
+    iret  = ((__vaword *) &list.tmp._longlong)[0];
+    iret2 = ((__vaword *) &list.tmp._longlong)[1];
+  } else
+  if (list.rtype == __VAfloat) {
+    if (list.flags & __VA_SUNCC_FLOAT_RETURN) {
+      dret = (double)list.tmp._float;
+    } else {
+      fret = list.tmp._float;
+    }
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_SUNPROCC_STRUCT_RETURN) {
+      /* Sun cc struct return convention. */
+      /* The desired struct return address was passed in fp[16], later on
+       * list.raddr = list.structraddr = fp[16]. Now the result has
+       * already been copied there. No need to copy the result once more.
+       * The caller expects to receive the struct return address in %o0.
+       */
+      iret = (long) list.raddr;
+      if ((list.rsize & 0xfff) == ret[2])
+        ret++; /* skip the "unimp n" instruction at the return address */
+        /* else the "unimp n" instruction will cause a core dump */
+    } else {
+      /* normal struct return convention */
+      if (list.flags & __VA_SMALL_STRUCT_RETURN) {
+        if (list.rsize == sizeof(char)) {
+          iret = *(unsigned char *) list.raddr;
+          goto done;
+        } else
+        if (list.rsize == sizeof(short)) {
+          iret = *(unsigned short *) list.raddr;
+          goto done;
+        } else
+        if (list.rsize == sizeof(int)) {
+          iret = *(unsigned int *) list.raddr;
+          goto done;
+        }
+      }
+      ret++; /* skip the "unimp n" instruction at the return address */
+      done: ;
+    }
+  }
+}
diff --git a/vacall/vacall-sparc64-linux-pic.s b/vacall/vacall-sparc64-linux-pic.s
new file mode 100644 (file)
index 0000000..6d22787
--- /dev/null
@@ -0,0 +1,328 @@
+       .file   "vacall-sparc64.c"
+       .section        ".text"
+       .align 4
+.LLADDPC0:
+       jmp     %o7+8
+        add    %o7, %l7, %l7
+       .align 4
+       .global vacall_receiver
+       .type   vacall_receiver, #function
+       .proc   020
+vacall_receiver:
+       .register       %g2, #scratch
+       .register       %g3, #scratch
+       save    %sp, -448, %sp
+       add     %fp, 2175, %g1
+       stx     %i0, [%fp+2175]
+       stx     %i1, [%fp+2183]
+       stx     %i2, [%fp+2191]
+       stx     %i3, [%fp+2199]
+       stx     %i4, [%fp+2207]
+       stx     %i5, [%fp+2215]
+       std     %f0, [%fp+1903]
+       std     %f2, [%fp+1911]
+       std     %f4, [%fp+1919]
+       std     %f6, [%fp+1927]
+       std     %f8, [%fp+1935]
+       std     %f10, [%fp+1943]
+       std     %f12, [%fp+1951]
+       std     %f14, [%fp+1959]
+       std     %f16, [%fp+1967]
+       std     %f18, [%fp+1975]
+       std     %f20, [%fp+1983]
+       std     %f22, [%fp+1991]
+       std     %f24, [%fp+1999]
+       std     %f26, [%fp+2007]
+       std     %f28, [%fp+2015]
+       std     %f30, [%fp+2023]
+       st      %f1, [%fp+1835]
+       st      %f3, [%fp+1839]
+       st      %f5, [%fp+1843]
+       st      %f7, [%fp+1847]
+       st      %f9, [%fp+1851]
+       st      %f11, [%fp+1855]
+       st      %f13, [%fp+1859]
+       st      %f15, [%fp+1863]
+       st      %f17, [%fp+1867]
+       st      %f19, [%fp+1871]
+       st      %f21, [%fp+1875]
+       sethi   %hi(_GLOBAL_OFFSET_TABLE_-4), %l7
+       call    .LLADDPC0
+        add    %l7, %lo(_GLOBAL_OFFSET_TABLE_+4), %l7
+       st      %f23, [%fp+1879]
+       stx     %g1, [%fp+1799]
+       sethi   %hi(vacall_function), %g1
+       or      %g1, %lo(vacall_function), %g1
+       st      %f25, [%fp+1883]
+       ldx     [%l7+%g1], %g2
+       st      %f27, [%fp+1887]
+       st      %f29, [%fp+1891]
+       st      %f31, [%fp+1895]
+       st      %g0, [%fp+1775]
+       stx     %g0, [%fp+1807]
+       st      %g0, [%fp+1815]
+       st      %g0, [%fp+1831]
+       ldx     [%g2], %g3
+       call    %g3, 0
+        add    %fp, 1775, %o0
+       lduw    [%fp+1815], %g1
+       cmp     %g1, 0
+       be,pn   %icc, .LL61
+        cmp    %g1, 1
+       be,pn   %icc, .LL50
+        cmp    %g1, 2
+       be,pn   %icc, .LL50
+        cmp    %g1, 3
+       be,pn   %icc, .LL53
+        cmp    %g1, 4
+       be,pn   %icc, .LL54
+        cmp    %g1, 5
+       be,pn   %icc, .LL55
+        cmp    %g1, 6
+       be,pn   %icc, .LL56
+        cmp    %g1, 7
+       be,pn   %icc, .LL57
+        cmp    %g1, 8
+       be,pn   %icc, .LL51
+        cmp    %g1, 9
+       be,pn   %icc, .LL51
+        cmp    %g1, 10
+       be,pn   %icc, .LL51
+        cmp    %g1, 11
+       be,pn   %icc, .LL51
+        cmp    %g1, 12
+       be,pn   %icc, .LL58
+        cmp    %g1, 13
+       be,pn   %icc, .LL59
+        cmp    %g1, 14
+       be,pn   %icc, .LL51
+        cmp    %g1, 15
+       bne,pt  %icc, .LL61
+        lduw   [%fp+1775], %g1
+       andcc   %g1, 1024, %g0
+       be,pn   %xcc, .LL61
+        ldx    [%fp+1823], %g5
+       add     %g5, -1, %g1
+       cmp     %g1, 31
+       bgu,pn  %xcc, .LL61
+        ldx    [%fp+1807], %g1
+       cmp     %g5, 8
+       and     %g1, 7, %o2
+       and     %g1, -8, %l0
+       bgu,pt  %xcc, .LL35
+        add    %g5, %o2, %g2
+       cmp     %g2, 8
+       bgu,pt  %xcc, .LL37
+        sllx   %o2, 3, %g4
+       sllx    %g2, 3, %g2
+       ldx     [%l0], %g3
+       sub     %g0, %g2, %g2
+       mov     -1, %g1
+       sllx    %g1, %g2, %g1
+       and     %g1, %g3, %g1
+       return  %i7+8
+        sllx   %g1, %g4, %o0
+.LL47:
+       ldx     [%l0], %g1
+       sllx    %g1, %o4, %g1
+       ldx     [%l0+8], %g4
+       ldx     [%l0+16], %g5
+       sllx    %g4, %o4, %o1
+       sllx    %g5, %o4, %o0
+       ldx     [%l0+24], %o5
+       sllx    %g2, 3, %o3
+       sllx    %o5, %o4, %o7
+       ldx     [%l0+32], %o2
+       sub     %g0, %o3, %o3
+       mov     64, %g3
+       sub     %g3, %o4, %g3
+       srax    %g4, %g3, %g4
+       srax    %g5, %g3, %g5
+       or      %g1, %g4, %i0
+       srax    %o5, %g3, %o5
+       mov     -1, %g1
+       or      %o1, %g5, %i1
+       sllx    %g1, %o3, %g1
+       or      %o0, %o5, %i2
+       and     %g1, %o2, %g1
+       srax    %g1, %g3, %g1
+       or      %o7, %g1, %i3
+.LL61:
+       return  %i7+8
+        nop
+.LL50:
+       ldsb    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL54:
+       ldsh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL53:
+       ldub    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL51:
+       ldx     [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL55:
+       lduh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL56:
+       ldsw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL57:
+       lduw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL58:
+       ld      [%fp+1783], %f0
+       return  %i7+8
+        nop
+.LL59:
+       ldd     [%fp+1783], %f0
+       return  %i7+8
+        nop
+.LL35:
+       cmp     %g5, 16
+       bgu,pt  %xcc, .LL39
+        cmp    %g5, 24
+       cmp     %g2, 16
+       bgu,pt  %xcc, .LL41
+        sllx   %o2, 3, %o5
+       sllx    %g2, 3, %g3
+       ldx     [%l0+8], %g2
+       sll     %o2, 3, %g5
+       sllx    %o2, 2, %o5
+       sub     %g0, %g3, %g3
+       ldx     [%l0], %g4
+       mov     -1, %g1
+       sllx    %g4, %g5, %g4
+       sllx    %g1, %g3, %g1
+       and     %g1, %g2, %g1
+       mov     32, %g2
+       sllx    %g1, %g5, %i1
+       sub     %g2, %o5, %g2
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       return  %i7+8
+        or     %g4, %g1, %o0
+.LL37:
+       sllx    %g2, 3, %g3
+       ldx     [%l0+8], %g5
+       sub     %g0, %g3, %g3
+       sub     %g0, %g4, %o5
+       ldx     [%l0], %g2
+       mov     -1, %g1
+       sllx    %g2, %g4, %g2
+       sllx    %g1, %g3, %g1
+       and     %g1, %g5, %g1
+       srax    %g1, %o5, %g1
+       return  %i7+8
+        or     %g2, %g1, %o0
+.LL39:
+       bgu,pt  %xcc, .LL43
+        cmp    %g2, 32
+       cmp     %g2, 24
+       bgu,pt  %xcc, .LL45
+        sllx   %o2, 3, %o4
+       sllx    %o2, 2, %g1
+       sll     %o2, 3, %g5
+       sllx    %g2, 3, %o5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %o4
+       sllx    %g3, %g5, %o3
+       sub     %g0, %o5, %o5
+       mov     32, %g4
+       ldx     [%l0], %g2
+       sub     %g4, %g1, %g4
+       sllx    %g2, %g5, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       srax    %g3, %g4, %g3
+       sllx    %g1, %o5, %g1
+       and     %g1, %o4, %g1
+       sllx    %g1, %g5, %i2
+       srax    %g1, %g4, %g1
+       srax    %g1, %g4, %g1
+       or      %o3, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+.LL41:
+       sllx    %g2, 3, %g5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %o4
+       sllx    %g3, %o5, %o3
+       sub     %g0, %g5, %g5
+       mov     64, %g4
+       ldx     [%l0], %g2
+       sub     %g4, %o5, %g4
+       sllx    %g2, %o5, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       sllx    %g1, %g5, %g1
+       and     %g1, %o4, %g1
+       srax    %g1, %g4, %g1
+       or      %o3, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+.LL45:
+       ldx     [%l0], %g1
+       sllx    %g1, %o4, %g1
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %g4
+       sllx    %g3, %o4, %o3
+       sllx    %g4, %o4, %o1
+       sllx    %g2, 3, %o5
+       ldx     [%l0+24], %o2
+       sub     %g0, %o5, %o5
+       mov     64, %g5
+       sub     %g5, %o4, %g5
+       srax    %g3, %g5, %g3
+       srax    %g4, %g5, %g4
+       or      %g1, %g3, %i0
+       or      %o3, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %o5, %g1
+       and     %g1, %o2, %g1
+       srax    %g1, %g5, %g1
+       or      %o1, %g1, %i2
+       return  %i7+8
+        nop
+.LL43:
+       bgu,pt  %xcc, .LL47
+        sllx   %o2, 3, %o4
+       sll     %o2, 3, %o5
+       ldx     [%l0], %g1
+       sllx    %g1, %o5, %g1
+       sllx    %o2, 2, %o4
+       sllx    %g2, 3, %g5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %g4
+       sllx    %g3, %o5, %o2
+       sllx    %g4, %o5, %o1
+       ldx     [%l0+24], %o3
+       sub     %g0, %g5, %g5
+       mov     32, %g2
+       sub     %g2, %o4, %g2
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       or      %g1, %g3, %i0
+       or      %o2, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %g5, %g1
+       and     %g1, %o3, %g1
+       sllx    %g1, %o5, %i3
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       or      %o1, %g1, %i2
+       return  %i7+8
+        nop
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        ".note.GNU-stack"
diff --git a/vacall/vacall-sparc64-linux.s b/vacall/vacall-sparc64-linux.s
new file mode 100644 (file)
index 0000000..92c18cf
--- /dev/null
@@ -0,0 +1,323 @@
+       .file   "vacall-sparc64.c"
+       .section        ".text"
+       .align 4
+       .global vacall_receiver
+       .type   vacall_receiver, #function
+       .proc   020
+vacall_receiver:
+       .register       %g2, #scratch
+       .register       %g3, #scratch
+       save    %sp, -448, %sp
+       add     %fp, 2175, %g1
+       stx     %i0, [%fp+2175]
+       stx     %i1, [%fp+2183]
+       stx     %i2, [%fp+2191]
+       stx     %i3, [%fp+2199]
+       stx     %i4, [%fp+2207]
+       stx     %i5, [%fp+2215]
+       std     %f0, [%fp+1903]
+       std     %f2, [%fp+1911]
+       std     %f4, [%fp+1919]
+       std     %f6, [%fp+1927]
+       std     %f8, [%fp+1935]
+       std     %f10, [%fp+1943]
+       std     %f12, [%fp+1951]
+       std     %f14, [%fp+1959]
+       std     %f16, [%fp+1967]
+       std     %f18, [%fp+1975]
+       std     %f20, [%fp+1983]
+       std     %f22, [%fp+1991]
+       std     %f24, [%fp+1999]
+       std     %f26, [%fp+2007]
+       std     %f28, [%fp+2015]
+       std     %f30, [%fp+2023]
+       st      %f1, [%fp+1835]
+       st      %f3, [%fp+1839]
+       st      %f5, [%fp+1843]
+       st      %f7, [%fp+1847]
+       st      %f9, [%fp+1851]
+       st      %f11, [%fp+1855]
+       st      %f13, [%fp+1859]
+       st      %f15, [%fp+1863]
+       st      %f17, [%fp+1867]
+       st      %f19, [%fp+1871]
+       st      %f21, [%fp+1875]
+       sethi   %lm(vacall_function), %g2
+       st      %f23, [%fp+1879]
+       stx     %g1, [%fp+1799]
+       st      %f25, [%fp+1883]
+       st      %f27, [%fp+1887]
+       st      %f29, [%fp+1891]
+       st      %f31, [%fp+1895]
+       st      %g0, [%fp+1775]
+       stx     %g0, [%fp+1807]
+       st      %g0, [%fp+1815]
+       st      %g0, [%fp+1831]
+       sethi   %hh(vacall_function), %g1
+       or      %g1, %hm(vacall_function), %g1
+       sllx    %g1, 32, %g1
+       add     %g1, %g2, %g1
+       ldx     [%g1+%lo(vacall_function)], %g3
+       call    %g3, 0
+        add    %fp, 1775, %o0
+       lduw    [%fp+1815], %g1
+       cmp     %g1, 0
+       be,pn   %icc, .LL61
+        cmp    %g1, 1
+       be,pn   %icc, .LL50
+        cmp    %g1, 2
+       be,pn   %icc, .LL50
+        cmp    %g1, 3
+       be,pn   %icc, .LL53
+        cmp    %g1, 4
+       be,pn   %icc, .LL54
+        cmp    %g1, 5
+       be,pn   %icc, .LL55
+        cmp    %g1, 6
+       be,pn   %icc, .LL56
+        cmp    %g1, 7
+       be,pn   %icc, .LL57
+        cmp    %g1, 8
+       be,pn   %icc, .LL51
+        cmp    %g1, 9
+       be,pn   %icc, .LL51
+        cmp    %g1, 10
+       be,pn   %icc, .LL51
+        cmp    %g1, 11
+       be,pn   %icc, .LL51
+        cmp    %g1, 12
+       be,pn   %icc, .LL58
+        cmp    %g1, 13
+       be,pn   %icc, .LL59
+        cmp    %g1, 14
+       be,pn   %icc, .LL51
+        cmp    %g1, 15
+       bne,pt  %icc, .LL61
+        lduw   [%fp+1775], %g1
+       andcc   %g1, 1024, %g0
+       be,pn   %xcc, .LL61
+        ldx    [%fp+1823], %g5
+       add     %g5, -1, %g1
+       cmp     %g1, 31
+       bgu,pn  %xcc, .LL61
+        ldx    [%fp+1807], %g1
+       cmp     %g5, 8
+       and     %g1, 7, %o2
+       and     %g1, -8, %l0
+       bgu,pt  %xcc, .LL35
+        add    %g5, %o2, %g2
+       cmp     %g2, 8
+       bgu,pt  %xcc, .LL37
+        sllx   %o2, 3, %g4
+       sllx    %g2, 3, %g2
+       ldx     [%l0], %g3
+       sub     %g0, %g2, %g2
+       mov     -1, %g1
+       sllx    %g1, %g2, %g1
+       and     %g1, %g3, %g1
+       return  %i7+8
+        sllx   %g1, %g4, %o0
+.LL47:
+       ldx     [%l0], %g1
+       sllx    %g1, %o4, %g1
+       ldx     [%l0+8], %g4
+       ldx     [%l0+16], %g5
+       sllx    %g4, %o4, %o1
+       sllx    %g5, %o4, %o0
+       ldx     [%l0+24], %o5
+       sllx    %g2, 3, %o3
+       sllx    %o5, %o4, %o7
+       ldx     [%l0+32], %o2
+       sub     %g0, %o3, %o3
+       mov     64, %g3
+       sub     %g3, %o4, %g3
+       srax    %g4, %g3, %g4
+       srax    %g5, %g3, %g5
+       or      %g1, %g4, %i0
+       srax    %o5, %g3, %o5
+       mov     -1, %g1
+       or      %o1, %g5, %i1
+       sllx    %g1, %o3, %g1
+       or      %o0, %o5, %i2
+       and     %g1, %o2, %g1
+       srax    %g1, %g3, %g1
+       or      %o7, %g1, %i3
+.LL61:
+       return  %i7+8
+        nop
+.LL50:
+       ldsb    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL54:
+       ldsh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL53:
+       ldub    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL51:
+       ldx     [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL55:
+       lduh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL56:
+       ldsw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL57:
+       lduw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+.LL58:
+       ld      [%fp+1783], %f0
+       return  %i7+8
+        nop
+.LL59:
+       ldd     [%fp+1783], %f0
+       return  %i7+8
+        nop
+.LL35:
+       cmp     %g5, 16
+       bgu,pt  %xcc, .LL39
+        cmp    %g5, 24
+       cmp     %g2, 16
+       bgu,pt  %xcc, .LL41
+        sllx   %o2, 3, %o5
+       sllx    %g2, 3, %g3
+       ldx     [%l0+8], %g2
+       sll     %o2, 3, %g5
+       sllx    %o2, 2, %o5
+       sub     %g0, %g3, %g3
+       ldx     [%l0], %g4
+       mov     -1, %g1
+       sllx    %g4, %g5, %g4
+       sllx    %g1, %g3, %g1
+       and     %g1, %g2, %g1
+       mov     32, %g2
+       sllx    %g1, %g5, %i1
+       sub     %g2, %o5, %g2
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       return  %i7+8
+        or     %g4, %g1, %o0
+.LL37:
+       sllx    %g2, 3, %g3
+       ldx     [%l0+8], %g5
+       sub     %g0, %g3, %g3
+       sub     %g0, %g4, %o5
+       ldx     [%l0], %g2
+       mov     -1, %g1
+       sllx    %g2, %g4, %g2
+       sllx    %g1, %g3, %g1
+       and     %g1, %g5, %g1
+       srax    %g1, %o5, %g1
+       return  %i7+8
+        or     %g2, %g1, %o0
+.LL39:
+       bgu,pt  %xcc, .LL43
+        cmp    %g2, 32
+       cmp     %g2, 24
+       bgu,pt  %xcc, .LL45
+        sllx   %o2, 3, %o4
+       sllx    %o2, 2, %g1
+       sll     %o2, 3, %g5
+       sllx    %g2, 3, %o5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %o4
+       sllx    %g3, %g5, %o3
+       sub     %g0, %o5, %o5
+       mov     32, %g4
+       ldx     [%l0], %g2
+       sub     %g4, %g1, %g4
+       sllx    %g2, %g5, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       srax    %g3, %g4, %g3
+       sllx    %g1, %o5, %g1
+       and     %g1, %o4, %g1
+       sllx    %g1, %g5, %i2
+       srax    %g1, %g4, %g1
+       srax    %g1, %g4, %g1
+       or      %o3, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+.LL41:
+       sllx    %g2, 3, %g5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %o4
+       sllx    %g3, %o5, %o3
+       sub     %g0, %g5, %g5
+       mov     64, %g4
+       ldx     [%l0], %g2
+       sub     %g4, %o5, %g4
+       sllx    %g2, %o5, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       sllx    %g1, %g5, %g1
+       and     %g1, %o4, %g1
+       srax    %g1, %g4, %g1
+       or      %o3, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+.LL45:
+       ldx     [%l0], %g1
+       sllx    %g1, %o4, %g1
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %g4
+       sllx    %g3, %o4, %o3
+       sllx    %g4, %o4, %o1
+       sllx    %g2, 3, %o5
+       ldx     [%l0+24], %o2
+       sub     %g0, %o5, %o5
+       mov     64, %g5
+       sub     %g5, %o4, %g5
+       srax    %g3, %g5, %g3
+       srax    %g4, %g5, %g4
+       or      %g1, %g3, %i0
+       or      %o3, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %o5, %g1
+       and     %g1, %o2, %g1
+       srax    %g1, %g5, %g1
+       or      %o1, %g1, %i2
+       return  %i7+8
+        nop
+.LL43:
+       bgu,pt  %xcc, .LL47
+        sllx   %o2, 3, %o4
+       sll     %o2, 3, %o5
+       ldx     [%l0], %g1
+       sllx    %g1, %o5, %g1
+       sllx    %o2, 2, %o4
+       sllx    %g2, 3, %g5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %g4
+       sllx    %g3, %o5, %o2
+       sllx    %g4, %o5, %o1
+       ldx     [%l0+24], %o3
+       sub     %g0, %g5, %g5
+       mov     32, %g2
+       sub     %g2, %o4, %g2
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       or      %g1, %g3, %i0
+       or      %o2, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %g5, %g1
+       and     %g1, %o3, %g1
+       sllx    %g1, %o5, %i3
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       or      %o1, %g1, %i2
+       return  %i7+8
+        nop
+       .size   vacall_receiver, .-vacall_receiver
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        ".note.GNU-stack"
diff --git a/vacall/vacall-sparc64-macro.S b/vacall/vacall-sparc64-macro.S
new file mode 100644 (file)
index 0000000..841398d
--- /dev/null
@@ -0,0 +1,652 @@
+#include "asm-sparc.h"
+#ifdef __PIC__
+       .section        ".text"
+       .align 4
+L(LADDPC0):
+       jmp     %o7+8
+        add    %o7, %l7, %l7
+       .align 4
+       .global C(vacall_receiver)
+       DECLARE_FUNCTION(vacall_receiver)
+       .proc   020
+FUNBEGIN(vacall_receiver)
+       .register       %g2, $scratch
+       .register       %g3, $scratch
+       save    %sp, -448, %sp
+       add     %fp, 2175, %g1
+       stx     %i0, [%fp+2175]
+       stx     %i1, [%fp+2183]
+       stx     %i2, [%fp+2191]
+       stx     %i3, [%fp+2199]
+       stx     %i4, [%fp+2207]
+       stx     %i5, [%fp+2215]
+       std     %f0, [%fp+1903]
+       std     %f2, [%fp+1911]
+       std     %f4, [%fp+1919]
+       std     %f6, [%fp+1927]
+       std     %f8, [%fp+1935]
+       std     %f10, [%fp+1943]
+       std     %f12, [%fp+1951]
+       std     %f14, [%fp+1959]
+       std     %f16, [%fp+1967]
+       std     %f18, [%fp+1975]
+       std     %f20, [%fp+1983]
+       std     %f22, [%fp+1991]
+       std     %f24, [%fp+1999]
+       std     %f26, [%fp+2007]
+       std     %f28, [%fp+2015]
+       std     %f30, [%fp+2023]
+       st      %f1, [%fp+1835]
+       st      %f3, [%fp+1839]
+       st      %f5, [%fp+1843]
+       st      %f7, [%fp+1847]
+       st      %f9, [%fp+1851]
+       st      %f11, [%fp+1855]
+       st      %f13, [%fp+1859]
+       st      %f15, [%fp+1863]
+       st      %f17, [%fp+1867]
+       st      %f19, [%fp+1871]
+       st      %f21, [%fp+1875]
+       sethi   %hi(_GLOBAL_OFFSET_TABLE_-4), %l7
+       call    L(LADDPC0)
+        add    %l7, %lo(_GLOBAL_OFFSET_TABLE_+4), %l7
+       st      %f23, [%fp+1879]
+       stx     %g1, [%fp+1799]
+       sethi   %hi(C(vacall_function)), %g1
+       or      %g1, %lo(C(vacall_function)), %g1
+       st      %f25, [%fp+1883]
+       ldx     [%l7+%g1], %g2
+       st      %f27, [%fp+1887]
+       st      %f29, [%fp+1891]
+       st      %f31, [%fp+1895]
+       st      %g0, [%fp+1775]
+       stx     %g0, [%fp+1807]
+       st      %g0, [%fp+1815]
+       st      %g0, [%fp+1831]
+       ldx     [%g2], %g3
+       call    %g3, 0
+        add    %fp, 1775, %o0
+       lduw    [%fp+1815], %g1
+       cmp     %g1, 0
+       be,pn   %icc, L(L61)
+        cmp    %g1, 1
+       be,pn   %icc, L(L50)
+        cmp    %g1, 2
+       be,pn   %icc, L(L50)
+        cmp    %g1, 3
+       be,pn   %icc, L(L53)
+        cmp    %g1, 4
+       be,pn   %icc, L(L54)
+        cmp    %g1, 5
+       be,pn   %icc, L(L55)
+        cmp    %g1, 6
+       be,pn   %icc, L(L56)
+        cmp    %g1, 7
+       be,pn   %icc, L(L57)
+        cmp    %g1, 8
+       be,pn   %icc, L(L51)
+        cmp    %g1, 9
+       be,pn   %icc, L(L51)
+        cmp    %g1, 10
+       be,pn   %icc, L(L51)
+        cmp    %g1, 11
+       be,pn   %icc, L(L51)
+        cmp    %g1, 12
+       be,pn   %icc, L(L58)
+        cmp    %g1, 13
+       be,pn   %icc, L(L59)
+        cmp    %g1, 14
+       be,pn   %icc, L(L51)
+        cmp    %g1, 15
+       bne,pt  %icc, L(L61)
+        lduw   [%fp+1775], %g1
+       andcc   %g1, 1024, %g0
+       be,pn   %xcc, L(L61)
+        ldx    [%fp+1823], %g5
+       add     %g5, -1, %g1
+       cmp     %g1, 31
+       bgu,pn  %xcc, L(L61)
+        ldx    [%fp+1807], %g1
+       cmp     %g5, 8
+       and     %g1, 7, %o2
+       and     %g1, -8, %l0
+       bgu,pt  %xcc, L(L35)
+        add    %g5, %o2, %g2
+       cmp     %g2, 8
+       bgu,pt  %xcc, L(L37)
+        sllx   %o2, 3, %g4
+       sllx    %g2, 3, %g2
+       ldx     [%l0], %g3
+       sub     %g0, %g2, %g2
+       mov     -1, %g1
+       sllx    %g1, %g2, %g1
+       and     %g1, %g3, %g1
+       return  %i7+8
+        sllx   %g1, %g4, %o0
+L(L47):
+       ldx     [%l0], %g1
+       sllx    %g1, %o4, %g1
+       ldx     [%l0+8], %g4
+       ldx     [%l0+16], %g5
+       sllx    %g4, %o4, %o1
+       sllx    %g5, %o4, %o0
+       ldx     [%l0+24], %o5
+       sllx    %g2, 3, %o3
+       sllx    %o5, %o4, %o7
+       ldx     [%l0+32], %o2
+       sub     %g0, %o3, %o3
+       mov     64, %g3
+       sub     %g3, %o4, %g3
+       srax    %g4, %g3, %g4
+       srax    %g5, %g3, %g5
+       or      %g1, %g4, %i0
+       srax    %o5, %g3, %o5
+       mov     -1, %g1
+       or      %o1, %g5, %i1
+       sllx    %g1, %o3, %g1
+       or      %o0, %o5, %i2
+       and     %g1, %o2, %g1
+       srax    %g1, %g3, %g1
+       or      %o7, %g1, %i3
+L(L61):
+       return  %i7+8
+        nop
+L(L50):
+       ldsb    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L54):
+       ldsh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L53):
+       ldub    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L51):
+       ldx     [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L55):
+       lduh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L56):
+       ldsw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L57):
+       lduw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L58):
+       ld      [%fp+1783], %f0
+       return  %i7+8
+        nop
+L(L59):
+       ldd     [%fp+1783], %f0
+       return  %i7+8
+        nop
+L(L35):
+       cmp     %g5, 16
+       bgu,pt  %xcc, L(L39)
+        cmp    %g5, 24
+       cmp     %g2, 16
+       bgu,pt  %xcc, L(L41)
+        sllx   %o2, 3, %o5
+       sllx    %g2, 3, %g3
+       ldx     [%l0+8], %g2
+       sll     %o2, 3, %g5
+       sllx    %o2, 2, %o5
+       sub     %g0, %g3, %g3
+       ldx     [%l0], %g4
+       mov     -1, %g1
+       sllx    %g4, %g5, %g4
+       sllx    %g1, %g3, %g1
+       and     %g1, %g2, %g1
+       mov     32, %g2
+       sllx    %g1, %g5, %i1
+       sub     %g2, %o5, %g2
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       return  %i7+8
+        or     %g4, %g1, %o0
+L(L37):
+       sllx    %g2, 3, %g3
+       ldx     [%l0+8], %g5
+       sub     %g0, %g3, %g3
+       sub     %g0, %g4, %o5
+       ldx     [%l0], %g2
+       mov     -1, %g1
+       sllx    %g2, %g4, %g2
+       sllx    %g1, %g3, %g1
+       and     %g1, %g5, %g1
+       srax    %g1, %o5, %g1
+       return  %i7+8
+        or     %g2, %g1, %o0
+L(L39):
+       bgu,pt  %xcc, L(L43)
+        cmp    %g2, 32
+       cmp     %g2, 24
+       bgu,pt  %xcc, L(L45)
+        sllx   %o2, 3, %o4
+       sllx    %o2, 2, %g1
+       sll     %o2, 3, %g5
+       sllx    %g2, 3, %o5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %o4
+       sllx    %g3, %g5, %o3
+       sub     %g0, %o5, %o5
+       mov     32, %g4
+       ldx     [%l0], %g2
+       sub     %g4, %g1, %g4
+       sllx    %g2, %g5, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       srax    %g3, %g4, %g3
+       sllx    %g1, %o5, %g1
+       and     %g1, %o4, %g1
+       sllx    %g1, %g5, %i2
+       srax    %g1, %g4, %g1
+       srax    %g1, %g4, %g1
+       or      %o3, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+L(L41):
+       sllx    %g2, 3, %g5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %o4
+       sllx    %g3, %o5, %o3
+       sub     %g0, %g5, %g5
+       mov     64, %g4
+       ldx     [%l0], %g2
+       sub     %g4, %o5, %g4
+       sllx    %g2, %o5, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       sllx    %g1, %g5, %g1
+       and     %g1, %o4, %g1
+       srax    %g1, %g4, %g1
+       or      %o3, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+L(L45):
+       ldx     [%l0], %g1
+       sllx    %g1, %o4, %g1
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %g4
+       sllx    %g3, %o4, %o3
+       sllx    %g4, %o4, %o1
+       sllx    %g2, 3, %o5
+       ldx     [%l0+24], %o2
+       sub     %g0, %o5, %o5
+       mov     64, %g5
+       sub     %g5, %o4, %g5
+       srax    %g3, %g5, %g3
+       srax    %g4, %g5, %g4
+       or      %g1, %g3, %i0
+       or      %o3, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %o5, %g1
+       and     %g1, %o2, %g1
+       srax    %g1, %g5, %g1
+       or      %o1, %g1, %i2
+       return  %i7+8
+        nop
+L(L43):
+       bgu,pt  %xcc, L(L47)
+        sllx   %o2, 3, %o4
+       sll     %o2, 3, %o5
+       ldx     [%l0], %g1
+       sllx    %g1, %o5, %g1
+       sllx    %o2, 2, %o4
+       sllx    %g2, 3, %g5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %g4
+       sllx    %g3, %o5, %o2
+       sllx    %g4, %o5, %o1
+       ldx     [%l0+24], %o3
+       sub     %g0, %g5, %g5
+       mov     32, %g2
+       sub     %g2, %o4, %g2
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       or      %g1, %g3, %i0
+       or      %o2, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %g5, %g1
+       and     %g1, %o3, %g1
+       sllx    %g1, %o5, %i3
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       or      %o1, %g1, %i2
+       return  %i7+8
+        nop
+       FUNEND(vacall_receiver)
+#else
+       .section        ".text"
+       .align 4
+       .global C(vacall_receiver)
+       DECLARE_FUNCTION(vacall_receiver)
+       .proc   020
+FUNBEGIN(vacall_receiver)
+       .register       %g2, $scratch
+       .register       %g3, $scratch
+       save    %sp, -448, %sp
+       add     %fp, 2175, %g1
+       stx     %i0, [%fp+2175]
+       stx     %i1, [%fp+2183]
+       stx     %i2, [%fp+2191]
+       stx     %i3, [%fp+2199]
+       stx     %i4, [%fp+2207]
+       stx     %i5, [%fp+2215]
+       std     %f0, [%fp+1903]
+       std     %f2, [%fp+1911]
+       std     %f4, [%fp+1919]
+       std     %f6, [%fp+1927]
+       std     %f8, [%fp+1935]
+       std     %f10, [%fp+1943]
+       std     %f12, [%fp+1951]
+       std     %f14, [%fp+1959]
+       std     %f16, [%fp+1967]
+       std     %f18, [%fp+1975]
+       std     %f20, [%fp+1983]
+       std     %f22, [%fp+1991]
+       std     %f24, [%fp+1999]
+       std     %f26, [%fp+2007]
+       std     %f28, [%fp+2015]
+       std     %f30, [%fp+2023]
+       st      %f1, [%fp+1835]
+       st      %f3, [%fp+1839]
+       st      %f5, [%fp+1843]
+       st      %f7, [%fp+1847]
+       st      %f9, [%fp+1851]
+       st      %f11, [%fp+1855]
+       st      %f13, [%fp+1859]
+       st      %f15, [%fp+1863]
+       st      %f17, [%fp+1867]
+       st      %f19, [%fp+1871]
+       st      %f21, [%fp+1875]
+       sethi   %lm(C(vacall_function)), %g2
+       st      %f23, [%fp+1879]
+       stx     %g1, [%fp+1799]
+       st      %f25, [%fp+1883]
+       st      %f27, [%fp+1887]
+       st      %f29, [%fp+1891]
+       st      %f31, [%fp+1895]
+       st      %g0, [%fp+1775]
+       stx     %g0, [%fp+1807]
+       st      %g0, [%fp+1815]
+       st      %g0, [%fp+1831]
+       sethi   %hh(C(vacall_function)), %g1
+       or      %g1, %hm(C(vacall_function)), %g1
+       sllx    %g1, 32, %g1
+       add     %g1, %g2, %g1
+       ldx     [%g1+%lo(C(vacall_function))], %g3
+       call    %g3, 0
+        add    %fp, 1775, %o0
+       lduw    [%fp+1815], %g1
+       cmp     %g1, 0
+       be,pn   %icc, L(L61)
+        cmp    %g1, 1
+       be,pn   %icc, L(L50)
+        cmp    %g1, 2
+       be,pn   %icc, L(L50)
+        cmp    %g1, 3
+       be,pn   %icc, L(L53)
+        cmp    %g1, 4
+       be,pn   %icc, L(L54)
+        cmp    %g1, 5
+       be,pn   %icc, L(L55)
+        cmp    %g1, 6
+       be,pn   %icc, L(L56)
+        cmp    %g1, 7
+       be,pn   %icc, L(L57)
+        cmp    %g1, 8
+       be,pn   %icc, L(L51)
+        cmp    %g1, 9
+       be,pn   %icc, L(L51)
+        cmp    %g1, 10
+       be,pn   %icc, L(L51)
+        cmp    %g1, 11
+       be,pn   %icc, L(L51)
+        cmp    %g1, 12
+       be,pn   %icc, L(L58)
+        cmp    %g1, 13
+       be,pn   %icc, L(L59)
+        cmp    %g1, 14
+       be,pn   %icc, L(L51)
+        cmp    %g1, 15
+       bne,pt  %icc, L(L61)
+        lduw   [%fp+1775], %g1
+       andcc   %g1, 1024, %g0
+       be,pn   %xcc, L(L61)
+        ldx    [%fp+1823], %g5
+       add     %g5, -1, %g1
+       cmp     %g1, 31
+       bgu,pn  %xcc, L(L61)
+        ldx    [%fp+1807], %g1
+       cmp     %g5, 8
+       and     %g1, 7, %o2
+       and     %g1, -8, %l0
+       bgu,pt  %xcc, L(L35)
+        add    %g5, %o2, %g2
+       cmp     %g2, 8
+       bgu,pt  %xcc, L(L37)
+        sllx   %o2, 3, %g4
+       sllx    %g2, 3, %g2
+       ldx     [%l0], %g3
+       sub     %g0, %g2, %g2
+       mov     -1, %g1
+       sllx    %g1, %g2, %g1
+       and     %g1, %g3, %g1
+       return  %i7+8
+        sllx   %g1, %g4, %o0
+L(L47):
+       ldx     [%l0], %g1
+       sllx    %g1, %o4, %g1
+       ldx     [%l0+8], %g4
+       ldx     [%l0+16], %g5
+       sllx    %g4, %o4, %o1
+       sllx    %g5, %o4, %o0
+       ldx     [%l0+24], %o5
+       sllx    %g2, 3, %o3
+       sllx    %o5, %o4, %o7
+       ldx     [%l0+32], %o2
+       sub     %g0, %o3, %o3
+       mov     64, %g3
+       sub     %g3, %o4, %g3
+       srax    %g4, %g3, %g4
+       srax    %g5, %g3, %g5
+       or      %g1, %g4, %i0
+       srax    %o5, %g3, %o5
+       mov     -1, %g1
+       or      %o1, %g5, %i1
+       sllx    %g1, %o3, %g1
+       or      %o0, %o5, %i2
+       and     %g1, %o2, %g1
+       srax    %g1, %g3, %g1
+       or      %o7, %g1, %i3
+L(L61):
+       return  %i7+8
+        nop
+L(L50):
+       ldsb    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L54):
+       ldsh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L53):
+       ldub    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L51):
+       ldx     [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L55):
+       lduh    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L56):
+       ldsw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L57):
+       lduw    [%fp+1783], %i0
+       return  %i7+8
+        nop
+L(L58):
+       ld      [%fp+1783], %f0
+       return  %i7+8
+        nop
+L(L59):
+       ldd     [%fp+1783], %f0
+       return  %i7+8
+        nop
+L(L35):
+       cmp     %g5, 16
+       bgu,pt  %xcc, L(L39)
+        cmp    %g5, 24
+       cmp     %g2, 16
+       bgu,pt  %xcc, L(L41)
+        sllx   %o2, 3, %o5
+       sllx    %g2, 3, %g3
+       ldx     [%l0+8], %g2
+       sll     %o2, 3, %g5
+       sllx    %o2, 2, %o5
+       sub     %g0, %g3, %g3
+       ldx     [%l0], %g4
+       mov     -1, %g1
+       sllx    %g4, %g5, %g4
+       sllx    %g1, %g3, %g1
+       and     %g1, %g2, %g1
+       mov     32, %g2
+       sllx    %g1, %g5, %i1
+       sub     %g2, %o5, %g2
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       return  %i7+8
+        or     %g4, %g1, %o0
+L(L37):
+       sllx    %g2, 3, %g3
+       ldx     [%l0+8], %g5
+       sub     %g0, %g3, %g3
+       sub     %g0, %g4, %o5
+       ldx     [%l0], %g2
+       mov     -1, %g1
+       sllx    %g2, %g4, %g2
+       sllx    %g1, %g3, %g1
+       and     %g1, %g5, %g1
+       srax    %g1, %o5, %g1
+       return  %i7+8
+        or     %g2, %g1, %o0
+L(L39):
+       bgu,pt  %xcc, L(L43)
+        cmp    %g2, 32
+       cmp     %g2, 24
+       bgu,pt  %xcc, L(L45)
+        sllx   %o2, 3, %o4
+       sllx    %o2, 2, %g1
+       sll     %o2, 3, %g5
+       sllx    %g2, 3, %o5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %o4
+       sllx    %g3, %g5, %o3
+       sub     %g0, %o5, %o5
+       mov     32, %g4
+       ldx     [%l0], %g2
+       sub     %g4, %g1, %g4
+       sllx    %g2, %g5, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       srax    %g3, %g4, %g3
+       sllx    %g1, %o5, %g1
+       and     %g1, %o4, %g1
+       sllx    %g1, %g5, %i2
+       srax    %g1, %g4, %g1
+       srax    %g1, %g4, %g1
+       or      %o3, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+L(L41):
+       sllx    %g2, 3, %g5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %o4
+       sllx    %g3, %o5, %o3
+       sub     %g0, %g5, %g5
+       mov     64, %g4
+       ldx     [%l0], %g2
+       sub     %g4, %o5, %g4
+       sllx    %g2, %o5, %g2
+       srax    %g3, %g4, %g3
+       mov     -1, %g1
+       sllx    %g1, %g5, %g1
+       and     %g1, %o4, %g1
+       srax    %g1, %g4, %g1
+       or      %o3, %g1, %i1
+       return  %i7+8
+        or     %g2, %g3, %o0
+L(L45):
+       ldx     [%l0], %g1
+       sllx    %g1, %o4, %g1
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %g4
+       sllx    %g3, %o4, %o3
+       sllx    %g4, %o4, %o1
+       sllx    %g2, 3, %o5
+       ldx     [%l0+24], %o2
+       sub     %g0, %o5, %o5
+       mov     64, %g5
+       sub     %g5, %o4, %g5
+       srax    %g3, %g5, %g3
+       srax    %g4, %g5, %g4
+       or      %g1, %g3, %i0
+       or      %o3, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %o5, %g1
+       and     %g1, %o2, %g1
+       srax    %g1, %g5, %g1
+       or      %o1, %g1, %i2
+       return  %i7+8
+        nop
+L(L43):
+       bgu,pt  %xcc, L(L47)
+        sllx   %o2, 3, %o4
+       sll     %o2, 3, %o5
+       ldx     [%l0], %g1
+       sllx    %g1, %o5, %g1
+       sllx    %o2, 2, %o4
+       sllx    %g2, 3, %g5
+       ldx     [%l0+8], %g3
+       ldx     [%l0+16], %g4
+       sllx    %g3, %o5, %o2
+       sllx    %g4, %o5, %o1
+       ldx     [%l0+24], %o3
+       sub     %g0, %g5, %g5
+       mov     32, %g2
+       sub     %g2, %o4, %g2
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       srax    %g3, %g2, %g3
+       srax    %g4, %g2, %g4
+       or      %g1, %g3, %i0
+       or      %o2, %g4, %i1
+       mov     -1, %g1
+       sllx    %g1, %g5, %g1
+       and     %g1, %o3, %g1
+       sllx    %g1, %o5, %i3
+       srax    %g1, %g2, %g1
+       srax    %g1, %g2, %g1
+       or      %o1, %g1, %i2
+       return  %i7+8
+        nop
+       FUNEND(vacall_receiver)
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-sparc64.c b/vacall/vacall-sparc64.c
new file mode 100644 (file)
index 0000000..3d78c94
--- /dev/null
@@ -0,0 +1,460 @@
+/* vacall function for sparc64 CPU */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *     env     __asm__("%g5");
+#endif
+register __vaword* fp  __asm__("%fp"); /* our %fp, caller's %sp */
+register __vaword* ret __asm__("%i7"); /* %i7+8 = return address */
+register float farg0   __asm__("%f1");
+register float farg1   __asm__("%f3");
+register float farg2   __asm__("%f5");
+register float farg3   __asm__("%f7");
+register float farg4   __asm__("%f9");
+register float farg5   __asm__("%f11");
+register float farg6   __asm__("%f13");
+register float farg7   __asm__("%f15");
+register float farg8   __asm__("%f17");
+register float farg9   __asm__("%f19");
+register float farg10  __asm__("%f21");
+register float farg11  __asm__("%f23");
+register float farg12  __asm__("%f25");
+register float farg13  __asm__("%f27");
+register float farg14  __asm__("%f29");
+register float farg15  __asm__("%f31");
+register double        darg0   __asm__("%f0");
+register double        darg1   __asm__("%f2");
+register double        darg2   __asm__("%f4");
+register double        darg3   __asm__("%f6");
+register double        darg4   __asm__("%f8");
+register double        darg5   __asm__("%f10");
+register double        darg6   __asm__("%f12");
+register double        darg7   __asm__("%f14");
+register double        darg8   __asm__("%f16");
+register double        darg9   __asm__("%f18");
+register double        darg10  __asm__("%f20");
+register double        darg11  __asm__("%f22");
+register double        darg12  __asm__("%f24");
+register double        darg13  __asm__("%f26");
+register double        darg14  __asm__("%f28");
+register double        darg15  __asm__("%f30");
+register __vaword iret __asm__("%i0");
+register __vaword o1   __asm__("%i1");
+register __vaword o2   __asm__("%i2");
+register __vaword o3   __asm__("%i3");
+register __vaword o4   __asm__("%i4");
+register __vaword o5   __asm__("%i5");
+register float fret    __asm__("%f0"); /* %f0 */
+register double        dret    __asm__("%f0"); /* %f0,%f1 */
+
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword word5, __vaword word6,
+                 __vaword firstword)
+{
+  __va_alist list;
+  /* Move the arguments passed in registers to their stack locations. */
+  (&firstword)[-6] = word1;
+  (&firstword)[-5] = word2;
+  (&firstword)[-4] = word3;
+  (&firstword)[-3] = word4;
+  (&firstword)[-2] = word5;
+  (&firstword)[-1] = word6;
+  list.darg[0] = darg0;
+  list.darg[1] = darg1;
+  list.darg[2] = darg2;
+  list.darg[3] = darg3;
+  list.darg[4] = darg4;
+  list.darg[5] = darg5;
+  list.darg[6] = darg6;
+  list.darg[7] = darg7;
+  list.darg[8] = darg8;
+  list.darg[9] = darg9;
+  list.darg[10] = darg10;
+  list.darg[11] = darg11;
+  list.darg[12] = darg12;
+  list.darg[13] = darg13;
+  list.darg[14] = darg14;
+  list.darg[15] = darg15;
+  list.farg[0] = farg0;
+  list.farg[1] = farg1;
+  list.farg[2] = farg2;
+  list.farg[3] = farg3;
+  list.farg[4] = farg4;
+  list.farg[5] = farg5;
+  list.farg[6] = farg6;
+  list.farg[7] = farg7;
+  list.farg[8] = farg8;
+  list.farg[9] = farg9;
+  list.farg[10] = farg10;
+  list.farg[11] = farg11;
+  list.farg[12] = farg12;
+  list.farg[13] = farg13;
+  list.farg[14] = farg14;
+  list.farg[15] = farg15;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)(&firstword - 6);
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.anum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulonglong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      /* Return structs of size <= 32 in registers. */
+      #define iret2 o1
+      #define iret3 o2
+      #define iret4 o3
+      if (list.rsize > 0 && list.rsize <= 32) {
+        #if 0 /* Unoptimized */
+        if (list.rsize == 1) {
+          iret =   (__vaword)((unsigned char *) list.raddr)[0] << 56;
+        } else
+        if (list.rsize == 2) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 48);
+        } else
+        if (list.rsize == 3) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 40);
+        } else
+        if (list.rsize == 4) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                | ((__vaword)((unsigned char *) list.raddr)[3] << 32);
+        } else
+        if (list.rsize == 5) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                | ((__vaword)((unsigned char *) list.raddr)[4] << 24);
+        } else
+        if (list.rsize == 6) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+                | ((__vaword)((unsigned char *) list.raddr)[5] << 16);
+        } else
+        if (list.rsize == 7) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+                | ((__vaword)((unsigned char *) list.raddr)[5] << 16)
+                | ((__vaword)((unsigned char *) list.raddr)[6] << 8);
+        } else
+        if (list.rsize >= 8 && list.rsize <= 32) {
+          iret =  ((__vaword)((unsigned char *) list.raddr)[0] << 56)
+                | ((__vaword)((unsigned char *) list.raddr)[1] << 48)
+                | ((__vaword)((unsigned char *) list.raddr)[2] << 40)
+                | ((__vaword)((unsigned char *) list.raddr)[3] << 32)
+                | ((__vaword)((unsigned char *) list.raddr)[4] << 24)
+                | ((__vaword)((unsigned char *) list.raddr)[5] << 16)
+                | ((__vaword)((unsigned char *) list.raddr)[6] << 8)
+                |  (__vaword)((unsigned char *) list.raddr)[7];
+          if (list.rsize == 8) {
+          } else
+          if (list.rsize == 9) {
+            iret2 =   (__vaword)((unsigned char *) list.raddr)[8] << 56;
+          } else
+          if (list.rsize == 10) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 48);
+          } else
+          if (list.rsize == 11) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 40);
+          } else
+          if (list.rsize == 12) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                   | ((__vaword)((unsigned char *) list.raddr)[11] << 32);
+          } else
+          if (list.rsize == 13) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                   | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                   | ((__vaword)((unsigned char *) list.raddr)[12] << 24);
+          } else
+          if (list.rsize == 14) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                   | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                   | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                   | ((__vaword)((unsigned char *) list.raddr)[13] << 16);
+          } else
+          if (list.rsize == 15) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                   | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                   | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                   | ((__vaword)((unsigned char *) list.raddr)[13] << 16)
+                   | ((__vaword)((unsigned char *) list.raddr)[14] << 8);
+          } else
+          if (list.rsize >= 16 && list.rsize <= 32) {
+            iret2 =  ((__vaword)((unsigned char *) list.raddr)[8] << 56)
+                   | ((__vaword)((unsigned char *) list.raddr)[9] << 48)
+                   | ((__vaword)((unsigned char *) list.raddr)[10] << 40)
+                   | ((__vaword)((unsigned char *) list.raddr)[11] << 32)
+                   | ((__vaword)((unsigned char *) list.raddr)[12] << 24)
+                   | ((__vaword)((unsigned char *) list.raddr)[13] << 16)
+                   | ((__vaword)((unsigned char *) list.raddr)[14] << 8)
+                   |  (__vaword)((unsigned char *) list.raddr)[15];
+            if (list.rsize == 16) {
+            } else
+            if (list.rsize == 17) {
+              iret3 =   (__vaword)((unsigned char *) list.raddr)[16] << 56;
+            } else
+            if (list.rsize == 18) {
+              iret3 =  ((__vaword)((unsigned char *) list.raddr)[16] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[17] << 48);
+            } else
+            if (list.rsize == 19) {
+              iret3 =  ((__vaword)((unsigned char *) list.raddr)[16] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[17] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[18] << 40);
+            } else
+            if (list.rsize == 20) {
+              iret3 =  ((__vaword)((unsigned char *) list.raddr)[16] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[17] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[18] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[19] << 32);
+            } else
+            if (list.rsize == 21) {
+              iret3 =  ((__vaword)((unsigned char *) list.raddr)[16] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[17] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[18] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[19] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[20] << 24);
+            } else
+            if (list.rsize == 22) {
+              iret3 =  ((__vaword)((unsigned char *) list.raddr)[16] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[17] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[18] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[19] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[20] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[21] << 16);
+            } else
+            if (list.rsize == 23) {
+              iret3 =  ((__vaword)((unsigned char *) list.raddr)[16] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[17] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[18] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[19] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[20] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[21] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[22] << 8);
+            } else
+            if (list.rsize >= 24 && list.rsize <= 32) {
+              iret3 =  ((__vaword)((unsigned char *) list.raddr)[16] << 56)
+                     | ((__vaword)((unsigned char *) list.raddr)[17] << 48)
+                     | ((__vaword)((unsigned char *) list.raddr)[18] << 40)
+                     | ((__vaword)((unsigned char *) list.raddr)[19] << 32)
+                     | ((__vaword)((unsigned char *) list.raddr)[20] << 24)
+                     | ((__vaword)((unsigned char *) list.raddr)[21] << 16)
+                     | ((__vaword)((unsigned char *) list.raddr)[22] << 8)
+                     |  (__vaword)((unsigned char *) list.raddr)[23];
+              if (list.rsize == 24) {
+              } else
+              if (list.rsize == 25) {
+                iret4 =   (__vaword)((unsigned char *) list.raddr)[24] << 56;
+              } else
+              if (list.rsize == 26) {
+                iret4 =  ((__vaword)((unsigned char *) list.raddr)[24] << 56)
+                       | ((__vaword)((unsigned char *) list.raddr)[25] << 48);
+              } else
+              if (list.rsize == 27) {
+                iret4 =  ((__vaword)((unsigned char *) list.raddr)[24] << 56)
+                       | ((__vaword)((unsigned char *) list.raddr)[25] << 48)
+                       | ((__vaword)((unsigned char *) list.raddr)[26] << 40);
+              } else
+              if (list.rsize == 28) {
+                iret4 =  ((__vaword)((unsigned char *) list.raddr)[24] << 56)
+                       | ((__vaword)((unsigned char *) list.raddr)[25] << 48)
+                       | ((__vaword)((unsigned char *) list.raddr)[26] << 40)
+                       | ((__vaword)((unsigned char *) list.raddr)[27] << 32);
+              } else
+              if (list.rsize == 29) {
+                iret4 =  ((__vaword)((unsigned char *) list.raddr)[24] << 56)
+                       | ((__vaword)((unsigned char *) list.raddr)[25] << 48)
+                       | ((__vaword)((unsigned char *) list.raddr)[26] << 40)
+                       | ((__vaword)((unsigned char *) list.raddr)[27] << 32)
+                       | ((__vaword)((unsigned char *) list.raddr)[28] << 24);
+              } else
+              if (list.rsize == 30) {
+                iret4 =  ((__vaword)((unsigned char *) list.raddr)[24] << 56)
+                       | ((__vaword)((unsigned char *) list.raddr)[25] << 48)
+                       | ((__vaword)((unsigned char *) list.raddr)[26] << 40)
+                       | ((__vaword)((unsigned char *) list.raddr)[27] << 32)
+                       | ((__vaword)((unsigned char *) list.raddr)[28] << 24)
+                       | ((__vaword)((unsigned char *) list.raddr)[29] << 16);
+              } else
+              if (list.rsize == 31) {
+                iret4 =  ((__vaword)((unsigned char *) list.raddr)[24] << 56)
+                       | ((__vaword)((unsigned char *) list.raddr)[25] << 48)
+                       | ((__vaword)((unsigned char *) list.raddr)[26] << 40)
+                       | ((__vaword)((unsigned char *) list.raddr)[27] << 32)
+                       | ((__vaword)((unsigned char *) list.raddr)[28] << 24)
+                       | ((__vaword)((unsigned char *) list.raddr)[29] << 16)
+                       | ((__vaword)((unsigned char *) list.raddr)[30] << 8);
+              } else
+              if (list.rsize == 32) {
+                iret4 =  ((__vaword)((unsigned char *) list.raddr)[24] << 56)
+                       | ((__vaword)((unsigned char *) list.raddr)[25] << 48)
+                       | ((__vaword)((unsigned char *) list.raddr)[26] << 40)
+                       | ((__vaword)((unsigned char *) list.raddr)[27] << 32)
+                       | ((__vaword)((unsigned char *) list.raddr)[28] << 24)
+                       | ((__vaword)((unsigned char *) list.raddr)[29] << 16)
+                       | ((__vaword)((unsigned char *) list.raddr)[30] << 8)
+                       |  (__vaword)((unsigned char *) list.raddr)[31];
+              }
+            }
+          }
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = list.rsize; /* > 0, ≤ 4*sizeof(__vaword) */
+        __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+        uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 5*sizeof(__vaword) */
+        if (count <= sizeof(__vaword)) {
+          /* Assign iret. */
+          if (end_offset <= sizeof(__vaword)) {
+            /* 0 < end_offset ≤ sizeof(__vaword) */
+            __vaword mask0 = - ((__vaword)1 << (sizeof(__vaword)*8-end_offset*8));
+            iret = (wordaddr[0] & mask0) << (start_offset*8);
+          } else {
+            /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+            __vaword mask1 = - ((__vaword)1 << (2*sizeof(__vaword)*8-end_offset*8));
+            iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__vaword)*8-start_offset*8));
+          }
+        } else if (count <= 2*sizeof(__vaword)) {
+          /* Assign iret, iret2. */
+          if (end_offset <= 2*sizeof(__vaword)) {
+            /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+            __vaword mask1 = - ((__vaword)1 << (2*sizeof(__vaword)*8-end_offset*8));
+            iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__vaword)*4-start_offset*4) >> (sizeof(__vaword)*4-start_offset*4));
+            iret2 = (wordaddr[1] & mask1) << (start_offset*8);
+          } else {
+            /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+            __vaword mask2 = - ((__vaword)1 << (3*sizeof(__vaword)*8-end_offset*8));
+            iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__vaword)*8-start_offset*8));
+            iret2 = (wordaddr[1] << (start_offset*8)) | ((wordaddr[2] & mask2) >> (sizeof(__vaword)*8-start_offset*8));
+          }
+        } else if (count <= 3*sizeof(__vaword)) {
+          /* Assign iret, iret2, iret3. */
+          if (end_offset <= 3*sizeof(__vaword)) {
+            /* 2*sizeof(__vaword) < end_offset ≤ 3*sizeof(__vaword) */
+            __vaword mask2 = - ((__vaword)1 << (3*sizeof(__vaword)*8-end_offset*8));
+            iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__vaword)*4-start_offset*4) >> (sizeof(__vaword)*4-start_offset*4));
+            iret2 = (wordaddr[1] << (start_offset*8)) | ((wordaddr[2] & mask2) >> (sizeof(__vaword)*4-start_offset*4) >> (sizeof(__vaword)*4-start_offset*4));
+            iret3 = (wordaddr[2] & mask2) << (start_offset*8);
+          } else {
+            /* 3*sizeof(__vaword) < end_offset < 4*sizeof(__vaword), start_offset > 0 */
+            __vaword mask3 = - ((__vaword)1 << (4*sizeof(__vaword)*8-end_offset*8));
+            iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__vaword)*8-start_offset*8));
+            iret2 = (wordaddr[1] << (start_offset*8)) | (wordaddr[2] >> (sizeof(__vaword)*8-start_offset*8));
+            iret3 = (wordaddr[2] << (start_offset*8)) | ((wordaddr[3] & mask3) >> (sizeof(__vaword)*8-start_offset*8));
+          }
+        } else {
+          /* Assign iret, iret2, iret3, iret4. */
+          if (end_offset <= 4*sizeof(__vaword)) {
+            /* 3*sizeof(__vaword) < end_offset ≤ 4*sizeof(__vaword) */
+            __vaword mask3 = - ((__vaword)1 << (4*sizeof(__vaword)*8-end_offset*8));
+            iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__vaword)*4-start_offset*4) >> (sizeof(__vaword)*4-start_offset*4));
+            iret2 = (wordaddr[1] << (start_offset*8)) | (wordaddr[2] >> (sizeof(__vaword)*4-start_offset*4) >> (sizeof(__vaword)*4-start_offset*4));
+            iret3 = (wordaddr[2] << (start_offset*8)) | ((wordaddr[3] & mask3) >> (sizeof(__vaword)*4-start_offset*4) >> (sizeof(__vaword)*4-start_offset*4));
+            iret4 = (wordaddr[3] & mask3) << (start_offset*8);
+          } else {
+            /* 4*sizeof(__vaword) < end_offset < 5*sizeof(__vaword), start_offset > 0 */
+            __vaword mask4 = - ((__vaword)1 << (5*sizeof(__vaword)*8-end_offset*8));
+            iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__vaword)*8-start_offset*8));
+            iret2 = (wordaddr[1] << (start_offset*8)) | (wordaddr[2] >> (sizeof(__vaword)*8-start_offset*8));
+            iret3 = (wordaddr[2] << (start_offset*8)) | (wordaddr[3] >> (sizeof(__vaword)*8-start_offset*8));
+            iret4 = (wordaddr[3] << (start_offset*8)) | ((wordaddr[4] & mask4) >> (sizeof(__vaword)*8-start_offset*8));
+          }
+        }
+        #endif
+      }
+    }
+  }
+}
diff --git a/vacall/vacall-structcpy.c b/vacall/vacall-structcpy.c
new file mode 100644 (file)
index 0000000..b6ffb90
--- /dev/null
@@ -0,0 +1,22 @@
+/* copy structs */
+
+/*
+ * Copyright 2016 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#define __structcpy vacall_structcpy
+
+#include "structcpy.c"
diff --git a/vacall/vacall-x86_64-linux.s b/vacall/vacall-x86_64-linux.s
new file mode 100644 (file)
index 0000000..aaaa1c5
--- /dev/null
@@ -0,0 +1,258 @@
+       .file   "vacall-x86_64.c"
+       .text
+       .p2align 4,,15
+.globl vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+.LFB2:
+       pushq   %rbp
+.LCFI0:
+       movq    %rsp, %rbp
+.LCFI1:
+       pushq   %r12
+.LCFI2:
+       subq    $200, %rsp
+.LCFI3:
+       movq    %rcx, -48(%rbp)
+       leaq    16(%rbp), %rcx
+       movq    %rdi, -72(%rbp)
+       movq    %rsi, -64(%rbp)
+       movsd   %xmm0, -144(%rbp)
+       movq    %rcx, -184(%rbp)
+       movq    %rdx, -56(%rbp)
+       movsd   %xmm1, -136(%rbp)
+       movq    %r8, -40(%rbp)
+       movsd   %xmm2, -128(%rbp)
+       leaq    -208(%rbp), %rdi
+       movq    %r9, -32(%rbp)
+       movsd   %xmm3, -120(%rbp)
+       movsd   %xmm4, -112(%rbp)
+       movl    $0, -208(%rbp)
+       movsd   %xmm5, -104(%rbp)
+       movq    $0, -176(%rbp)
+       movsd   %xmm6, -96(%rbp)
+       movl    $0, -168(%rbp)
+       movsd   %xmm7, -88(%rbp)
+       movl    $0, -80(%rbp)
+       movl    $0, -152(%rbp)
+       call    *vacall_function(%rip)
+       movl    -168(%rbp), %ecx
+       testl   %ecx, %ecx
+       je      .L41
+       cmpl    $1, %ecx
+       je      .L42
+       cmpl    $2, %ecx
+       je      .L42
+       cmpl    $3, %ecx
+       .p2align 4,,5
+       je      .L48
+       cmpl    $4, %ecx
+       .p2align 4,,5
+       je      .L49
+       cmpl    $5, %ecx
+       .p2align 4,,5
+       je      .L50
+       cmpl    $6, %ecx
+       .p2align 4,,5
+       je      .L51
+       cmpl    $7, %ecx
+       .p2align 4,,5
+       je      .L52
+       cmpl    $8, %ecx
+       .p2align 4,,5
+       je      .L46
+       cmpl    $9, %ecx
+       .p2align 4,,5
+       je      .L46
+       cmpl    $10, %ecx
+       .p2align 4,,5
+       je      .L46
+       cmpl    $11, %ecx
+       .p2align 4,,5
+       je      .L46
+       cmpl    $12, %ecx
+       .p2align 4,,5
+       je      .L53
+       cmpl    $13, %ecx
+       .p2align 4,,5
+       je      .L54
+       cmpl    $14, %ecx
+       .p2align 4,,5
+       je      .L46
+       cmpl    $15, %ecx
+       .p2align 4,,5
+       jne     .L41
+       testb   $4, -207(%rbp)
+       .p2align 4,,2
+       je      .L41
+       movq    -160(%rbp), %rsi
+       leaq    -1(%rsi), %rcx
+       cmpq    $15, %rcx
+       ja      .L41
+       movq    -176(%rbp), %rcx
+       movq    %rcx, %r11
+       movq    %rcx, %r8
+       andl    $7, %r8d
+       andq    $-8, %r11
+       cmpq    $8, %rsi
+       leaq    (%rsi,%r8), %r10
+       ja      .L35
+       cmpq    $8, %r10
+       ja      .L37
+       leal    -1(,%r10,8), %ecx
+       movl    $2, %esi
+       salq    %cl, %rsi
+       leal    0(,%r8,8), %ecx
+       decq    %rsi
+       andq    (%r11), %rsi
+       movq    %rsi, %rax
+       sarq    %cl, %rax
+       .p2align 4,,7
+.L41:
+       addq    $200, %rsp
+       popq    %r12
+       leave
+       ret
+       .p2align 4,,7
+.L42:
+       movsbq  -200(%rbp),%rax
+       addq    $200, %rsp
+       popq    %r12
+       leave
+       ret
+.L49:
+       movswq  -200(%rbp),%rax
+       jmp     .L41
+.L48:
+       movzbq  -200(%rbp), %rax
+       jmp     .L41
+.L46:
+       movq    -200(%rbp), %rax
+       jmp     .L41
+.L50:
+       movzwq  -200(%rbp), %rax
+       jmp     .L41
+.L51:
+       movslq  -200(%rbp),%rax
+       jmp     .L41
+.L52:
+       mov     -200(%rbp), %eax
+       jmp     .L41
+.L53:
+       movss   -200(%rbp), %xmm0
+       jmp     .L41
+.L54:
+       movlpd  -200(%rbp), %xmm0
+       jmp     .L41
+.L35:
+       cmpq    $16, %r10
+       ja      .L39
+       leal    -65(,%r10,8), %ecx
+       movl    $2, %esi
+       leal    0(,%r8,8), %r9d
+       movl    $32, %edi
+       salq    %cl, %rsi
+       leaq    0(,%r8,4), %rcx
+       movq    (%r11), %r8
+       decq    %rsi
+       andq    8(%r11), %rsi
+       subl    %ecx, %edi
+       movl    %r9d, %ecx
+       sarq    %cl, %r8
+       movl    %edi, %ecx
+       movq    %r8, %rax
+       movq    %rsi, %r10
+       movq    %rsi, %rdx
+       salq    %cl, %r10
+       salq    %cl, %r10
+       movl    %r9d, %ecx
+       orq     %r10, %rax
+       sarq    %cl, %rdx
+       jmp     .L41
+.L37:
+       movq    (%r11), %rdi
+       leal    -65(,%r10,8), %esi
+       salq    $3, %r8
+       movl    %r8d, %ecx
+       movl    $2, %r10d
+       sarq    %cl, %rdi
+       movl    %esi, %ecx
+       movl    $64, %esi
+       salq    %cl, %r10
+       subl    %r8d, %esi
+       movq    %rdi, %rax
+       decq    %r10
+       andq    8(%r11), %r10
+       movl    %esi, %ecx
+       salq    %cl, %r10
+       orq     %r10, %rax
+       jmp     .L41
+.L39:
+       leaq    0(,%r8,8), %rcx
+       movq    (%r11), %r12
+       movq    8(%r11), %r8
+       movl    $64, %edi
+       subl    %ecx, %edi
+       movl    %ecx, %r9d
+       sarq    %cl, %r12
+       movq    %r8, %rsi
+       movl    %edi, %ecx
+       salq    %cl, %rsi
+       movq    %r12, %rax
+       movl    %r9d, %ecx
+       orq     %rsi, %rax
+       leal    -129(,%r10,8), %esi
+       sarq    %cl, %r8
+       movl    $2, %r9d
+       movq    %r8, %rdx
+       movl    %esi, %ecx
+       salq    %cl, %r9
+       movl    %edi, %ecx
+       leaq    -1(%r9), %rsi
+       andq    16(%r11), %rsi
+       salq    %cl, %rsi
+       orq     %rsi, %rdx
+       jmp     .L41
+.LFE2:
+       .size   vacall_receiver, .-vacall_receiver
+       .section        .eh_frame,"a",@progbits
+.Lframe1:
+       .long   .LECIE1-.LSCIE1
+.LSCIE1:
+       .long   0x0
+       .byte   0x1
+       .string ""
+       .uleb128 0x1
+       .sleb128 -8
+       .byte   0x10
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+.LECIE1:
+.LSFDE1:
+       .long   .LEFDE1-.LASFDE1
+.LASFDE1:
+       .long   .LASFDE1-.Lframe1
+       .quad   .LFB2
+       .quad   .LFE2-.LFB2
+       .byte   0x4
+       .long   .LCFI0-.LFB2
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI1-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   .LCFI3-.LCFI1
+       .byte   0x8c
+       .uleb128 0x3
+       .align 8
+.LEFDE1:
+       .ident  "GCC: (GNU) 4.0.2"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/vacall/vacall-x86_64-macro.S b/vacall/vacall-x86_64-macro.S
new file mode 100644 (file)
index 0000000..0668ba5
--- /dev/null
@@ -0,0 +1,261 @@
+#include "asm-x86_64.h"
+       TEXT()
+       P2ALIGN(4,15)
+GLOBL(C(vacall_receiver))
+       DECLARE_FUNCTION(vacall_receiver)
+FUNBEGIN(vacall_receiver)
+L(FB2):
+       INSN1(push,q    ,R(rbp))
+L(CFI0):
+       INSN2(mov,q     ,R(rsp), R(rbp))
+L(CFI1):
+       INSN1(push,q    ,R(r12))
+L(CFI2):
+       INSN2(sub,q     ,NUM(200), R(rsp))
+L(CFI3):
+       INSN2(mov,q     ,R(rcx),X8 MEM_DISP(rbp,-48))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,16), R(rcx))
+       INSN2(mov,q     ,R(rdi),X8 MEM_DISP(rbp,-72))
+       INSN2(mov,q     ,R(rsi),X8 MEM_DISP(rbp,-64))
+       INSN2S(movs,d   ,R(xmm0),X8 MEM_DISP(rbp,-144))
+       INSN2(mov,q     ,R(rcx),X8 MEM_DISP(rbp,-184))
+       INSN2(mov,q     ,R(rdx),X8 MEM_DISP(rbp,-56))
+       INSN2S(movs,d   ,R(xmm1),X8 MEM_DISP(rbp,-136))
+       INSN2(mov,q     ,R(r8),X8 MEM_DISP(rbp,-40))
+       INSN2S(movs,d   ,R(xmm2),X8 MEM_DISP(rbp,-128))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-208), R(rdi))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,-32))
+       INSN2S(movs,d   ,R(xmm3),X8 MEM_DISP(rbp,-120))
+       INSN2S(movs,d   ,R(xmm4),X8 MEM_DISP(rbp,-112))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-208))
+       INSN2S(movs,d   ,R(xmm5),X8 MEM_DISP(rbp,-104))
+       INSN2(mov,q     ,NUM(0),X8 MEM_DISP(rbp,-176))
+       INSN2S(movs,d   ,R(xmm6),X8 MEM_DISP(rbp,-96))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-168))
+       INSN2S(movs,d   ,R(xmm7),X8 MEM_DISP(rbp,-88))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-80))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-152))
+       INSN1(call,_    ,INDIR(X8 MEM_PCRELATIVE(C(vacall_function))))
+       INSN2(mov,l     ,X4 MEM_DISP(rbp,-168), R(ecx))
+       INSN2(test,l    ,R(ecx), R(ecx))
+       INSN1(je,_      ,L(41))
+       INSN2(cmp,l     ,NUM(1), R(ecx))
+       INSN1(je,_      ,L(42))
+       INSN2(cmp,l     ,NUM(2), R(ecx))
+       INSN1(je,_      ,L(42))
+       INSN2(cmp,l     ,NUM(3), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(48))
+       INSN2(cmp,l     ,NUM(4), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(49))
+       INSN2(cmp,l     ,NUM(5), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(50))
+       INSN2(cmp,l     ,NUM(6), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(51))
+       INSN2(cmp,l     ,NUM(7), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(52))
+       INSN2(cmp,l     ,NUM(8), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(46))
+       INSN2(cmp,l     ,NUM(9), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(46))
+       INSN2(cmp,l     ,NUM(10), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(46))
+       INSN2(cmp,l     ,NUM(11), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(46))
+       INSN2(cmp,l     ,NUM(12), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(53))
+       INSN2(cmp,l     ,NUM(13), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(54))
+       INSN2(cmp,l     ,NUM(14), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(je,_      ,L(46))
+       INSN2(cmp,l     ,NUM(15), R(ecx))
+       P2ALIGN(4,5)
+       INSN1(jne,_     ,L(41))
+       INSN2(test,b    ,NUM(4),X1 MEM_DISP(rbp,-207))
+       P2ALIGN(4,2)
+       INSN1(je,_      ,L(41))
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-160), R(rsi))
+       INSN2(lea,q     ,X8 MEM_DISP(rsi,-1), R(rcx))
+       INSN2(cmp,q     ,NUM(15), R(rcx))
+       INSN1(ja,_      ,L(41))
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-176), R(rcx))
+       INSN2(mov,q     ,R(rcx), R(r11))
+       INSN2(mov,q     ,R(rcx), R(r8))
+       INSN2(and,l     ,NUM(7), R(r8d))
+       INSN2(and,q     ,NUM(-8), R(r11))
+       INSN2(cmp,q     ,NUM(8), R(rsi))
+       INSN2(lea,q     ,X8 MEM_INDEX(rsi,r8), R(r10))
+       INSN1(ja,_      ,L(35))
+       INSN2(cmp,q     ,NUM(8), R(r10))
+       INSN1(ja,_      ,L(37))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-1,r10,8), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(esi))
+       INSN2(sal,q     ,R(cl), R(rsi))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx))
+       INSN1(dec,q     ,R(rsi))
+       INSN2(and,q     ,X8 MEM(r11), R(rsi))
+       INSN2(mov,q     ,R(rsi), R(rax))
+       INSN2(sar,q     ,R(cl), R(rax))
+       P2ALIGN(4,7)
+L(41):
+       INSN2(add,q     ,NUM(200), R(rsp))
+       INSN1(pop,q     ,R(r12))
+       leave
+       ret
+       P2ALIGN(4,7)
+L(42):
+       INSN2MOVXQ(movs,b,X1 MEM_DISP(rbp,-200),R(rax))
+       INSN2(add,q     ,NUM(200), R(rsp))
+       INSN1(pop,q     ,R(r12))
+       leave
+       ret
+L(49):
+       INSN2MOVXQ(movs,w,X2 MEM_DISP(rbp,-200),R(rax))
+       INSN1(jmp,_     ,L(41))
+L(48):
+       INSN2MOVXQ(movz,b,X1 MEM_DISP(rbp,-200), R(rax))
+       INSN1(jmp,_     ,L(41))
+L(46):
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-200), R(rax))
+       INSN1(jmp,_     ,L(41))
+L(50):
+       INSN2MOVXQ(movz,w,X2 MEM_DISP(rbp,-200), R(rax))
+       INSN1(jmp,_     ,L(41))
+L(51):
+       INSN2MOVXLQ(movs,l,X4 MEM_DISP(rbp,-200),R(rax))
+       INSN1(jmp,_     ,L(41))
+L(52):
+       INSN2(mov,l     ,X4 MEM_DISP(rbp,-200), R(eax))
+       INSN1(jmp,_     ,L(41))
+L(53):
+       INSN2S(movs,s   ,X4 MEM_DISP(rbp,-200), R(xmm0))
+       INSN1(jmp,_     ,L(41))
+L(54):
+       INSN2(movlp,d   ,X8 MEM_DISP(rbp,-200), R(xmm0))
+       INSN1(jmp,_     ,L(41))
+L(35):
+       INSN2(cmp,q     ,NUM(16), R(r10))
+       INSN1(ja,_      ,L(39))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-65,r10,8), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(esi))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(r9d))
+       INSN2(mov,l     ,NUM(32), R(edi))
+       INSN2(sal,q     ,R(cl), R(rsi))
+       INSN2(lea,q     ,X8 MEM_DISP_SHINDEX0(0,r8,4), R(rcx))
+       INSN2(mov,q     ,X8 MEM(r11), R(r8))
+       INSN1(dec,q     ,R(rsi))
+       INSN2(and,q     ,X8 MEM_DISP(r11,8), R(rsi))
+       INSN2(sub,l     ,R(ecx), R(edi))
+       INSN2(mov,l     ,R(r9d), R(ecx))
+       INSN2(sar,q     ,R(cl), R(r8))
+       INSN2(mov,l     ,R(edi), R(ecx))
+       INSN2(mov,q     ,R(r8), R(rax))
+       INSN2(mov,q     ,R(rsi), R(r10))
+       INSN2(mov,q     ,R(rsi), R(rdx))
+       INSN2(sal,q     ,R(cl), R(r10))
+       INSN2(sal,q     ,R(cl), R(r10))
+       INSN2(mov,l     ,R(r9d), R(ecx))
+       INSN2(or,q      ,R(r10), R(rax))
+       INSN2(sar,q     ,R(cl), R(rdx))
+       INSN1(jmp,_     ,L(41))
+L(37):
+       INSN2(mov,q     ,X8 MEM(r11), R(rdi))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-65,r10,8), R(esi))
+       INSN2(sal,q     ,NUM(3), R(r8))
+       INSN2(mov,l     ,R(r8d), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(r10d))
+       INSN2(sar,q     ,R(cl), R(rdi))
+       INSN2(mov,l     ,R(esi), R(ecx))
+       INSN2(mov,l     ,NUM(64), R(esi))
+       INSN2(sal,q     ,R(cl), R(r10))
+       INSN2(sub,l     ,R(r8d), R(esi))
+       INSN2(mov,q     ,R(rdi), R(rax))
+       INSN1(dec,q     ,R(r10))
+       INSN2(and,q     ,X8 MEM_DISP(r11,8), R(r10))
+       INSN2(mov,l     ,R(esi), R(ecx))
+       INSN2(sal,q     ,R(cl), R(r10))
+       INSN2(or,q      ,R(r10), R(rax))
+       INSN1(jmp,_     ,L(41))
+L(39):
+       INSN2(lea,q     ,X8 MEM_DISP_SHINDEX0(0,r8,8), R(rcx))
+       INSN2(mov,q     ,X8 MEM(r11), R(r12))
+       INSN2(mov,q     ,X8 MEM_DISP(r11,8), R(r8))
+       INSN2(mov,l     ,NUM(64), R(edi))
+       INSN2(sub,l     ,R(ecx), R(edi))
+       INSN2(mov,l     ,R(ecx), R(r9d))
+       INSN2(sar,q     ,R(cl), R(r12))
+       INSN2(mov,q     ,R(r8), R(rsi))
+       INSN2(mov,l     ,R(edi), R(ecx))
+       INSN2(sal,q     ,R(cl), R(rsi))
+       INSN2(mov,q     ,R(r12), R(rax))
+       INSN2(mov,l     ,R(r9d), R(ecx))
+       INSN2(or,q      ,R(rsi), R(rax))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-129,r10,8), R(esi))
+       INSN2(sar,q     ,R(cl), R(r8))
+       INSN2(mov,l     ,NUM(2), R(r9d))
+       INSN2(mov,q     ,R(r8), R(rdx))
+       INSN2(mov,l     ,R(esi), R(ecx))
+       INSN2(sal,q     ,R(cl), R(r9))
+       INSN2(mov,l     ,R(edi), R(ecx))
+       INSN2(lea,q     ,X8 MEM_DISP(r9,-1), R(rsi))
+       INSN2(and,q     ,X8 MEM_DISP(r11,16), R(rsi))
+       INSN2(sal,q     ,R(cl), R(rsi))
+       INSN2(or,q      ,R(rsi), R(rdx))
+       INSN1(jmp,_     ,L(41))
+L(FE2):
+       FUNEND(vacall_receiver, .-vacall_receiver)
+#if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__))
+       .section        EH_FRAME_SECTION
+L(frame1):
+       .long   L(ECIE1)-.LSCIE1
+L(SCIE1):
+       .long   0x0
+       .byte   0x1
+       .string ""
+       .uleb128 0x1
+       .sleb128 -8
+       .byte   0x10
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+L(ECIE1):
+L(SFDE1):
+       .long   L(EFDE1)-.LASFDE1
+L(ASFDE1):
+       .long   L(ASFDE1)-.Lframe1
+       .quad   L(FB2)
+       .quad   L(FE2)-.LFB2
+       .byte   0x4
+       .long   L(CFI0)-.LFB2
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   L(CFI1)-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   L(CFI3)-.LCFI1
+       .byte   0x8c
+       .uleb128 0x3
+       .align 8
+L(EFDE1):
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-x86_64-windows-macro.S b/vacall/vacall-x86_64-windows-macro.S
new file mode 100644 (file)
index 0000000..d3e076a
--- /dev/null
@@ -0,0 +1,350 @@
+#include "asm-x86_64.h"
+       TEXT()
+       P2ALIGN(4,15)
+       GLOBL(C(vacall_receiver))
+       DECLARE_FUNCTION(vacall_receiver)
+FUNBEGIN(vacall_receiver)
+L(FB0):
+       INSN1(push,q    ,R(rbp))
+L(CFI0):
+       INSN2(mov,q     ,R(rsp), R(rbp))
+L(CFI1):
+       INSN2(sub,q     ,NUM(144), R(rsp))
+       INSN2(mov,q     ,R(rcx),X8 MEM_DISP(rbp,16))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,16), R(rcx))
+       INSN2(mov,q     ,R(rdx),X8 MEM_DISP(rbp,24))
+       INSN2(mov,q     ,R(r8),X8 MEM_DISP(rbp,32))
+       INSN2(mov,q     ,R(r9),X8 MEM_DISP(rbp,40))
+       INSN2S(movs,s   ,R(xmm0),X4 MEM_DISP(rbp,-52))
+       INSN2(mov,q     ,R(rcx),X8 MEM_DISP(rbp,-88))
+       INSN2S(movs,s   ,R(xmm1),X4 MEM_DISP(rbp,-48))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-112))
+       INSN2S(movs,s   ,R(xmm2),X4 MEM_DISP(rbp,-44))
+       INSN2(mov,q     ,NUM(0),X8 MEM_DISP(rbp,-80))
+       INSN2(lea,q     ,X8 MEM_DISP(rbp,-112), R(rcx))
+       INSN2S(movs,s   ,R(xmm3),X4 MEM_DISP(rbp,-40))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-72))
+       INSN2S(movs,d   ,R(xmm0),X8 MEM_DISP(rbp,-32))
+       INSN2(mov,l     ,NUM(0),X4 MEM_DISP(rbp,-56))
+       INSN2S(movs,d   ,R(xmm1),X8 MEM_DISP(rbp,-24))
+       INSN2S(movs,d   ,R(xmm2),X8 MEM_DISP(rbp,-16))
+       INSN2S(movs,d   ,R(xmm3),X8 MEM_DISP(rbp,-8))
+       INSN1(call,_    ,INDIR(X8 MEM_PCRELATIVE(C(vacall_function))))
+       INSN2(mov,l     ,X4 MEM_DISP(rbp,-72), R(edx))
+       INSN2(test,l    ,R(edx), R(edx))
+       INSN1(je,_      ,L(1))
+       INSN2(cmp,l     ,NUM(1), R(edx))
+       INSN1(je,_      ,L(34))
+       INSN2(cmp,l     ,NUM(2), R(edx))
+       INSN1(je,_      ,L(34))
+       INSN2(cmp,l     ,NUM(3), R(edx))
+       INSN1(je,_      ,L(37))
+       INSN2(cmp,l     ,NUM(4), R(edx))
+       INSN1(je,_      ,L(38))
+       INSN2(cmp,l     ,NUM(5), R(edx))
+       INSN1(je,_      ,L(39))
+       INSN2(cmp,l     ,NUM(6), R(edx))
+       INSN1(je,_      ,L(40))
+       INSN2(cmp,l     ,NUM(7), R(edx))
+       INSN1(je,_      ,L(41))
+       INSN2(cmp,l     ,NUM(8), R(edx))
+       INSN1(je,_      ,L(35))
+       INSN2(cmp,l     ,NUM(9), R(edx))
+       INSN1(je,_      ,L(35))
+       INSN2(cmp,l     ,NUM(10), R(edx))
+       INSN1(je,_      ,L(35))
+       INSN2(cmp,l     ,NUM(11), R(edx))
+       INSN1(je,_      ,L(35))
+       INSN2(cmp,l     ,NUM(12), R(edx))
+       INSN1(je,_      ,L(42))
+       INSN2(cmp,l     ,NUM(13), R(edx))
+       INSN1(je,_      ,L(43))
+       INSN2(cmp,l     ,NUM(14), R(edx))
+       INSN1(je,_      ,L(35))
+       INSN2(cmp,l     ,NUM(15), R(edx))
+       INSN1(jne,_     ,L(1))
+       INSN2(test,b    ,NUM(4),X1 MEM_DISP(rbp,-111))
+       INSN1(je,_      ,L(17))
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-64), R(rdx))
+       INSN2(lea,q     ,X8 MEM_DISP(rdx,-4), R(rcx))
+       INSN2(test,q    ,NUM(-5), R(rcx))
+       INSN1(je,_      ,L(20))
+       INSN2(lea,q     ,X8 MEM_DISP(rdx,-1), R(rcx))
+       INSN2(cmp,q     ,NUM(1), R(rcx))
+       INSN1(ja,_      ,L(1))
+L(20):
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-80), R(r8))
+       INSN2(mov,q     ,R(r8), R(r9))
+       INSN2(and,l     ,NUM(7), R(r8d))
+       INSN2(add,q     ,R(r8), R(rdx))
+       INSN2(and,q     ,NUM(-8), R(r9))
+       INSN2(cmp,q     ,NUM(8), R(rdx))
+       INSN1(ja,_      ,L(19))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-1,rdx,8), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(edx))
+       INSN2(sal,q     ,R(cl), R(rdx))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx))
+       INSN2(sub,q     ,NUM(1), R(rdx))
+       INSN2(and,q     ,X8 MEM(r9), R(rdx))
+       INSN2(sar,q     ,R(cl), R(rdx))
+       INSN2(mov,q     ,R(rdx), R(rax))
+L(1):
+       leave
+L(CFI2):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(34):
+L(CFI3):
+       INSN2MOVXQ(movs,b,X1 MEM_DISP(rbp,-104), R(rax))
+       leave
+L(CFI4):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(35):
+L(CFI5):
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-104), R(rax))
+       leave
+L(CFI6):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(37):
+L(CFI7):
+       INSN2MOVXL(movz,b,X1 MEM_DISP(rbp,-104), R(eax))
+       leave
+L(CFI8):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(38):
+L(CFI9):
+       INSN2MOVXQ(movs,w,X2 MEM_DISP(rbp,-104), R(rax))
+       leave
+L(CFI10):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(39):
+L(CFI11):
+       INSN2MOVXL(movz,w,X2 MEM_DISP(rbp,-104), R(eax))
+       leave
+L(CFI12):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(40):
+L(CFI13):
+       INSN2MOVXLQ(movs,l,X4 MEM_DISP(rbp,-104), R(rax))
+       leave
+L(CFI14):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(42):
+L(CFI15):
+       INSN2S(movs,s   ,X4 MEM_DISP(rbp,-104), R(xmm0))
+       leave
+L(CFI16):
+       ret
+       P2ALIGN(4,10)
+       P2ALIGN(3,7)
+L(41):
+L(CFI17):
+       INSN2(mov,l     ,X4 MEM_DISP(rbp,-104), R(eax))
+       leave
+L(CFI18):
+       ret
+L(43):
+L(CFI19):
+       INSN2S(movs,d   ,X8 MEM_DISP(rbp,-104), R(xmm0))
+       leave
+L(CFI20):
+       ret
+L(17):
+L(CFI21):
+       INSN2(mov,q     ,X8 MEM_DISP(rbp,-80), R(rax))
+       leave
+L(CFI22):
+       ret
+L(19):
+L(CFI23):
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(-65,rdx,8), R(ecx))
+       INSN2(mov,l     ,NUM(2), R(edx))
+       INSN2(sal,q     ,R(cl), R(rdx))
+       INSN2(mov,l     ,R(r8d), R(ecx))
+       INSN2(sub,q     ,NUM(1), R(rdx))
+       INSN2(and,q     ,X8 MEM_DISP(r9,8), R(rdx))
+       INSN1(neg,l     ,R(ecx))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(64,rcx,8), R(ecx))
+       INSN2(sal,q     ,R(cl), R(rdx))
+       INSN2(lea,l     ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx))
+       INSN2(mov,q     ,X8 MEM(r9), R(r8))
+       leave
+L(CFI24):
+       INSN2(sar,q     ,R(cl), R(r8))
+       INSN2(or,q      ,R(r8), R(rdx))
+       INSN2(mov,q     ,R(rdx), R(rax))
+       ret
+L(FE0):
+       FUNEND(vacall_receiver, .-vacall_receiver)
+#if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__))
+       .section        EH_FRAME_SECTION
+L(frame1):
+       .long   L(ECIE1)-.LSCIE1
+L(SCIE1):
+       .long   0
+       .byte   0x3
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .uleb128 0x10
+       .uleb128 0x1
+       .byte   0x3
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+L(ECIE1):
+L(SFDE1):
+       .long   L(EFDE1)-.LASFDE1
+L(ASFDE1):
+       .long   L(ASFDE1)-.Lframe1
+       .long   L(FB0)
+       .long   L(FE0)-.LFB0
+       .uleb128 0
+       .byte   0x4
+       .long   L(CFI0)-.LFB0
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   L(CFI1)-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   L(CFI2)-.LCFI1
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI3)-.LCFI2
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI4)-.LCFI3
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI5)-.LCFI4
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI6)-.LCFI5
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI7)-.LCFI6
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI8)-.LCFI7
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI9)-.LCFI8
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI10)-.LCFI9
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI11)-.LCFI10
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI12)-.LCFI11
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI13)-.LCFI12
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI14)-.LCFI13
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI15)-.LCFI14
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI16)-.LCFI15
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI17)-.LCFI16
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI18)-.LCFI17
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI19)-.LCFI18
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI20)-.LCFI19
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI21)-.LCFI20
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI22)-.LCFI21
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   L(CFI23)-.LCFI22
+       .byte   0xb
+       .byte   0x4
+       .long   L(CFI24)-.LCFI23
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .align 8
+L(EFDE1):
+#endif
+#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__
+       .section .note.GNU-stack,"",@progbits
+#endif
diff --git a/vacall/vacall-x86_64-windows.c b/vacall/vacall-x86_64-windows.c
new file mode 100644 (file)
index 0000000..95ef376
--- /dev/null
@@ -0,0 +1,191 @@
+/* vacall function for x86_64 CPU with the Windows ABI ('gcc -mabi=ms') */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *             env     __asm__("r10");
+#endif
+
+/*register __vaword iarg1 __asm__("rcx");*/
+/*register __vaword iarg2 __asm__("rdx");*/
+/*register __vaword iarg3 __asm__("r8");*/
+/*register __vaword iarg4 __asm__("r9");*/
+
+register float farg1 __asm__("xmm0");
+register float farg2 __asm__("xmm1");
+register float farg3 __asm__("xmm2");
+register float farg4 __asm__("xmm3");
+
+register double darg1 __asm__("xmm0");
+register double darg2 __asm__("xmm1");
+register double darg3 __asm__("xmm2");
+register double darg4 __asm__("xmm3");
+
+register __vaword iret  __asm__("rax");
+register float  fret __asm__("xmm0");
+register double dret __asm__("xmm0");
+
+/*
+ * Tell gcc to not use the call-saved registers %rbx, %rsi, %rdi.
+ * This ensures that the return sequence does not need to restore registers
+ * from the stack.
+ */
+register void* dummy1  __asm__("%rbx");
+register void* dummy2  __asm__("%rsi");
+register void* dummy3  __asm__("%rdi");
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword firstword)
+{
+  __va_alist list;
+  /* Move the arguments passed in registers to their stack locations. */
+  (&firstword)[-4] = word1;
+  (&firstword)[-3] = word2;
+  (&firstword)[-2] = word3;
+  (&firstword)[-1] = word4;
+  /* Move the floating-point arguments passed in registers to temp storage. */
+  list.farg[0] = farg1;
+  list.farg[1] = farg2;
+  list.farg[2] = farg3;
+  list.farg[3] = farg4;
+  list.darg[0] = darg1;
+  list.darg[1] = darg2;
+  list.darg[2] = darg3;
+  list.darg[3] = darg4;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)(&firstword - 4);
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.anum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulonglong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+    iret = (long)list.tmp._ptr;
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      /* Return structs of size 1, 2, 4, 8 in registers. */
+      #if 0 /* Unoptimized */
+      if (list.rsize == 1) {
+        iret =    (__vaword)((unsigned char *) list.raddr)[0];
+      } else
+      if (list.rsize == 2) {
+        iret =    (__vaword)((unsigned char *) list.raddr)[0]
+               | ((__vaword)((unsigned char *) list.raddr)[1] << 8);
+      } else
+      if (list.rsize == 4) {
+        iret =    (__vaword)((unsigned char *) list.raddr)[0]
+               | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+               | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+               | ((__vaword)((unsigned char *) list.raddr)[3] << 24);
+      } else
+      if (list.rsize == 8) {
+        iret =    (__vaword)((unsigned char *) list.raddr)[0]
+               | ((__vaword)((unsigned char *) list.raddr)[1] << 8)
+               | ((__vaword)((unsigned char *) list.raddr)[2] << 16)
+               | ((__vaword)((unsigned char *) list.raddr)[3] << 24)
+               | ((__vaword)((unsigned char *) list.raddr)[4] << 32)
+               | ((__vaword)((unsigned char *) list.raddr)[5] << 40)
+               | ((__vaword)((unsigned char *) list.raddr)[6] << 48)
+               | ((__vaword)((unsigned char *) list.raddr)[7] << 56);
+      }
+      #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+      uintptr_t count = list.rsize; /* > 0, ≤ sizeof(__vaword) */
+      if (count == 1 || count == 2 || count == 4 || count == 8) {
+        __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+        uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 2*sizeof(__vaword) */
+        if (end_offset <= sizeof(__vaword)) {
+          /* 0 < end_offset ≤ sizeof(__vaword) */
+          __vaword mask0 = ((__vaword)2 << (end_offset*8-1)) - 1;
+          iret = (wordaddr[0] & mask0) >> (start_offset*8);
+        } else {
+          /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+          __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+          iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*8-start_offset*8));
+        }
+      }
+      #endif
+    } else {
+      iret = (long)list.raddr;
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall-x86_64-windows.s b/vacall/vacall-x86_64-windows.s
new file mode 100644 (file)
index 0000000..e1cadfb
--- /dev/null
@@ -0,0 +1,347 @@
+       .file   "vacall-x86_64-windows.c"
+       .text
+       .p2align 4,,15
+       .globl  vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+.LFB0:
+       pushq   %rbp
+.LCFI0:
+       movq    %rsp, %rbp
+.LCFI1:
+       subq    $144, %rsp
+       movq    %rcx, 16(%rbp)
+       leaq    16(%rbp), %rcx
+       movq    %rdx, 24(%rbp)
+       movq    %r8, 32(%rbp)
+       movq    %r9, 40(%rbp)
+       movss   %xmm0, -52(%rbp)
+       movq    %rcx, -88(%rbp)
+       movss   %xmm1, -48(%rbp)
+       movl    $0, -112(%rbp)
+       movss   %xmm2, -44(%rbp)
+       movq    $0, -80(%rbp)
+       leaq    -112(%rbp), %rcx
+       movss   %xmm3, -40(%rbp)
+       movl    $0, -72(%rbp)
+       movsd   %xmm0, -32(%rbp)
+       movl    $0, -56(%rbp)
+       movsd   %xmm1, -24(%rbp)
+       movsd   %xmm2, -16(%rbp)
+       movsd   %xmm3, -8(%rbp)
+       call    *vacall_function(%rip)
+       movl    -72(%rbp), %edx
+       testl   %edx, %edx
+       je      .L1
+       cmpl    $1, %edx
+       je      .L34
+       cmpl    $2, %edx
+       je      .L34
+       cmpl    $3, %edx
+       je      .L37
+       cmpl    $4, %edx
+       je      .L38
+       cmpl    $5, %edx
+       je      .L39
+       cmpl    $6, %edx
+       je      .L40
+       cmpl    $7, %edx
+       je      .L41
+       cmpl    $8, %edx
+       je      .L35
+       cmpl    $9, %edx
+       je      .L35
+       cmpl    $10, %edx
+       je      .L35
+       cmpl    $11, %edx
+       je      .L35
+       cmpl    $12, %edx
+       je      .L42
+       cmpl    $13, %edx
+       je      .L43
+       cmpl    $14, %edx
+       je      .L35
+       cmpl    $15, %edx
+       jne     .L1
+       testb   $4, -111(%rbp)
+       je      .L17
+       movq    -64(%rbp), %rdx
+       leaq    -4(%rdx), %rcx
+       testq   $-5, %rcx
+       je      .L20
+       leaq    -1(%rdx), %rcx
+       cmpq    $1, %rcx
+       ja      .L1
+.L20:
+       movq    -80(%rbp), %r8
+       movq    %r8, %r9
+       andl    $7, %r8d
+       addq    %r8, %rdx
+       andq    $-8, %r9
+       cmpq    $8, %rdx
+       ja      .L19
+       leal    -1(,%rdx,8), %ecx
+       movl    $2, %edx
+       salq    %cl, %rdx
+       leal    0(,%r8,8), %ecx
+       subq    $1, %rdx
+       andq    (%r9), %rdx
+       sarq    %cl, %rdx
+       movq    %rdx, %rax
+.L1:
+       leave
+.LCFI2:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L34:
+.LCFI3:
+       movsbq  -104(%rbp), %rax
+       leave
+.LCFI4:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L35:
+.LCFI5:
+       movq    -104(%rbp), %rax
+       leave
+.LCFI6:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L37:
+.LCFI7:
+       movzbl  -104(%rbp), %eax
+       leave
+.LCFI8:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L38:
+.LCFI9:
+       movswq  -104(%rbp), %rax
+       leave
+.LCFI10:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L39:
+.LCFI11:
+       movzwl  -104(%rbp), %eax
+       leave
+.LCFI12:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L40:
+.LCFI13:
+       movslq  -104(%rbp), %rax
+       leave
+.LCFI14:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L42:
+.LCFI15:
+       movss   -104(%rbp), %xmm0
+       leave
+.LCFI16:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L41:
+.LCFI17:
+       movl    -104(%rbp), %eax
+       leave
+.LCFI18:
+       ret
+.L43:
+.LCFI19:
+       movsd   -104(%rbp), %xmm0
+       leave
+.LCFI20:
+       ret
+.L17:
+.LCFI21:
+       movq    -80(%rbp), %rax
+       leave
+.LCFI22:
+       ret
+.L19:
+.LCFI23:
+       leal    -65(,%rdx,8), %ecx
+       movl    $2, %edx
+       salq    %cl, %rdx
+       movl    %r8d, %ecx
+       subq    $1, %rdx
+       andq    8(%r9), %rdx
+       negl    %ecx
+       leal    64(,%rcx,8), %ecx
+       salq    %cl, %rdx
+       leal    0(,%r8,8), %ecx
+       movq    (%r9), %r8
+       leave
+.LCFI24:
+       sarq    %cl, %r8
+       orq     %r8, %rdx
+       movq    %rdx, %rax
+       ret
+.LFE0:
+       .size   vacall_receiver, .-vacall_receiver
+       .section        .eh_frame,"a",@progbits
+.Lframe1:
+       .long   .LECIE1-.LSCIE1
+.LSCIE1:
+       .long   0
+       .byte   0x3
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .uleb128 0x10
+       .uleb128 0x1
+       .byte   0x3
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 8
+.LECIE1:
+.LSFDE1:
+       .long   .LEFDE1-.LASFDE1
+.LASFDE1:
+       .long   .LASFDE1-.Lframe1
+       .long   .LFB0
+       .long   .LFE0-.LFB0
+       .uleb128 0
+       .byte   0x4
+       .long   .LCFI0-.LFB0
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI1-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   .LCFI2-.LCFI1
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI3-.LCFI2
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI4-.LCFI3
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI5-.LCFI4
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI6-.LCFI5
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI7-.LCFI6
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI8-.LCFI7
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI9-.LCFI8
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI10-.LCFI9
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI11-.LCFI10
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI12-.LCFI11
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI13-.LCFI12
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI14-.LCFI13
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI15-.LCFI14
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI16-.LCFI15
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI17-.LCFI16
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI18-.LCFI17
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI19-.LCFI18
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI20-.LCFI19
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI21-.LCFI20
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI22-.LCFI21
+       .byte   0xa
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI23-.LCFI22
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI24-.LCFI23
+       .byte   0xc6
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .align 8
+.LEFDE1:
+       .ident  "GCC: (GNU) 5.4.0"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/vacall/vacall-x86_64-x32-linux.s b/vacall/vacall-x86_64-x32-linux.s
new file mode 100644 (file)
index 0000000..127f761
--- /dev/null
@@ -0,0 +1,286 @@
+       .file   "vacall-x86_64.c"
+       .section        .text.unlikely,"ax",@progbits
+.LCOLDB0:
+       .text
+.LHOTB0:
+       .p2align 4,,15
+       .globl  vacall_receiver
+       .type   vacall_receiver, @function
+vacall_receiver:
+.LFB0:
+       pushq   %rbp
+.LCFI0:
+       movl    %esp, %ebp
+.LCFI1:
+       pushq   %r14
+       subl    $184, %esp
+.LCFI2:
+       movq    %rsi, -64(%ebp)
+       leal    16(%rbp), %esi
+       movq    %rcx, -48(%ebp)
+       movl    vacall_function(%rip), %ecx
+       movsd   %xmm0, -144(%ebp)
+       movq    %rdi, -72(%ebp)
+       movq    %rdx, -56(%ebp)
+       movsd   %xmm1, -136(%ebp)
+       movq    %r8, -40(%ebp)
+       movsd   %xmm2, -128(%ebp)
+       leal    -192(%rbp), %edi
+       movq    %r9, -32(%ebp)
+       movsd   %xmm3, -120(%ebp)
+       movsd   %xmm4, -112(%ebp)
+       movl    $0, -192(%ebp)
+       movsd   %xmm5, -104(%ebp)
+       movl    %esi, -168(%ebp)
+       movsd   %xmm6, -96(%ebp)
+       movl    $0, -164(%ebp)
+       movsd   %xmm7, -88(%ebp)
+       movl    $0, -160(%ebp)
+       movl    $0, -80(%ebp)
+       movl    $0, -152(%ebp)
+       call    *%rcx
+       movl    -160(%ebp), %ecx
+       testl   %ecx, %ecx
+       je      .L1
+       cmpl    $1, %ecx
+       je      .L27
+       cmpl    $2, %ecx
+       je      .L27
+       cmpl    $3, %ecx
+       je      .L33
+       cmpl    $4, %ecx
+       je      .L34
+       cmpl    $5, %ecx
+       je      .L35
+       cmpl    $6, %ecx
+       je      .L28
+       cmpl    $7, %ecx
+       je      .L30
+       cmpl    $8, %ecx
+       je      .L28
+       cmpl    $9, %ecx
+       je      .L30
+       cmpl    $10, %ecx
+       je      .L31
+       cmpl    $11, %ecx
+       je      .L31
+       cmpl    $12, %ecx
+       je      .L36
+       cmpl    $13, %ecx
+       je      .L37
+       cmpl    $14, %ecx
+       je      .L30
+       cmpl    $15, %ecx
+       jne     .L1
+       testb   $4, -191(%ebp)
+       je      .L1
+       movl    -156(%ebp), %ecx
+       leal    -1(%rcx), %esi
+       cmpl    $15, %esi
+       ja      .L1
+       movl    -164(%ebp), %esi
+       movl    %esi, %edi
+       andl    $7, %esi
+       andl    $-8, %edi
+       cmpl    $8, %ecx
+       leal    (%rcx,%rsi), %r10d
+       ja      .L17
+       cmpl    $8, %r10d
+       ja      .L18
+       leal    -1(,%r10,8), %ecx
+       movl    $2, %r8d
+       salq    %cl, %r8
+       movq    %r8, %rcx
+       subq    $1, %rcx
+       andq    (%edi), %rcx
+       movq    %rcx, %rdi
+       leal    0(,%rsi,8), %ecx
+       sarq    %cl, %rdi
+       movq    %rdi, %rax
+.L1:
+       addl    $184, %esp
+       popq    %r14
+       popq    %rbp
+.LCFI3:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L27:
+.LCFI4:
+       movsbq  -184(%ebp), %rax
+       addl    $184, %esp
+       popq    %r14
+       popq    %rbp
+.LCFI5:
+       ret
+       .p2align 4,,10
+       .p2align 3
+.L28:
+.LCFI6:
+       movslq  -184(%ebp), %rax
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L33:
+       movzbl  -184(%ebp), %eax
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L34:
+       movswq  -184(%ebp), %rax
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L30:
+       movl    -184(%ebp), %eax
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L35:
+       movzwl  -184(%ebp), %eax
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L36:
+       movss   -184(%ebp), %xmm0
+       jmp     .L1
+       .p2align 4,,10
+       .p2align 3
+.L31:
+       movq    -184(%ebp), %rax
+       jmp     .L1
+.L37:
+       movsd   -184(%ebp), %xmm0
+       jmp     .L1
+.L17:
+       cmpl    $16, %r10d
+       leal    0(,%rsi,8), %r9d
+       jbe     .L38
+       negl    %esi
+       movq    8(%edi), %r8
+       movl    %r9d, %ecx
+       leal    64(,%rsi,8), %r11d
+       movq    (%edi), %rsi
+       movq    %r8, %r14
+       sarq    %cl, %rsi
+       movl    %r11d, %ecx
+       salq    %cl, %r14
+       leal    -129(,%r10,8), %ecx
+       orq     %r14, %rsi
+       movq    %rsi, %rax
+       movl    $2, %esi
+       salq    %cl, %rsi
+       movl    %r11d, %ecx
+       subq    $1, %rsi
+       andq    16(%edi), %rsi
+       salq    %cl, %rsi
+       movl    %r9d, %ecx
+       sarq    %cl, %r8
+       orq     %r8, %rsi
+       movq    %rsi, %rdx
+       jmp     .L1
+.L18:
+       leal    -65(,%r10,8), %ecx
+       movl    $2, %r8d
+       salq    %cl, %r8
+       movl    %esi, %ecx
+       subq    $1, %r8
+       andq    8(%edi), %r8
+       negl    %ecx
+       leal    64(,%rcx,8), %ecx
+       movq    (%edi), %rdi
+       salq    %cl, %r8
+       leal    0(,%rsi,8), %ecx
+       sarq    %cl, %rdi
+       orq     %rdi, %r8
+       movq    %r8, %rax
+       jmp     .L1
+.L38:
+       leal    -65(,%r10,8), %ecx
+       movl    $2, %r8d
+       movq    (%edi), %r10
+       imull   $-4, %esi, %esi
+       salq    %cl, %r8
+       movl    %r9d, %ecx
+       subq    $1, %r8
+       andq    8(%edi), %r8
+       sarq    %cl, %r10
+       addl    $32, %esi
+       movl    %esi, %ecx
+       movq    %r8, %rdi
+       salq    %cl, %rdi
+       salq    %cl, %rdi
+       movl    %r9d, %ecx
+       orq     %rdi, %r10
+       sarq    %cl, %r8
+       movq    %r10, %rax
+       movq    %r8, %rdx
+       jmp     .L1
+.LFE0:
+       .size   vacall_receiver, .-vacall_receiver
+       .section        .text.unlikely
+.LCOLDE0:
+       .text
+.LHOTE0:
+       .section        .eh_frame,"a",@progbits
+.Lframe1:
+       .long   .LECIE1-.LSCIE1
+.LSCIE1:
+       .long   0
+       .byte   0x3
+       .string "zR"
+       .uleb128 0x1
+       .sleb128 -8
+       .uleb128 0x10
+       .uleb128 0x1
+       .byte   0x3
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x90
+       .uleb128 0x1
+       .align 4
+.LECIE1:
+.LSFDE1:
+       .long   .LEFDE1-.LASFDE1
+.LASFDE1:
+       .long   .LASFDE1-.Lframe1
+       .long   .LFB0
+       .long   .LFE0-.LFB0
+       .uleb128 0
+       .byte   0x4
+       .long   .LCFI0-.LFB0
+       .byte   0xe
+       .uleb128 0x10
+       .byte   0x86
+       .uleb128 0x2
+       .byte   0x4
+       .long   .LCFI1-.LCFI0
+       .byte   0xd
+       .uleb128 0x6
+       .byte   0x4
+       .long   .LCFI2-.LCFI1
+       .byte   0x8e
+       .uleb128 0x3
+       .byte   0x4
+       .long   .LCFI3-.LCFI2
+       .byte   0xa
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI4-.LCFI3
+       .byte   0xb
+       .byte   0x4
+       .long   .LCFI5-.LCFI4
+       .byte   0xa
+       .byte   0xc
+       .uleb128 0x7
+       .uleb128 0x8
+       .byte   0x4
+       .long   .LCFI6-.LCFI5
+       .byte   0xb
+       .align 4
+.LEFDE1:
+       .ident  "GCC: (GNU) 5.4.0"
+       .section        .note.GNU-stack,"",@progbits
diff --git a/vacall/vacall-x86_64.c b/vacall/vacall-x86_64.c
new file mode 100644 (file)
index 0000000..5d50a04
--- /dev/null
@@ -0,0 +1,234 @@
+/* vacall function for x86_64 CPU with the Unix ABI ('gcc -mabi=sysv') */
+
+/*
+ * Copyright 1995-2017 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "vacall-internal.h"
+
+#ifdef REENTRANT
+#define vacall_receiver callback_receiver
+register struct { void (*vacall_function) (void*,va_alist); void* arg; }
+         *             env     __asm__("r10");
+#endif
+
+/*register __vaword iarg1 __asm__("rdi");*/
+/*register __vaword iarg2 __asm__("rsi");*/
+/*register __vaword iarg3 __asm__("rdx");*/
+/*register __vaword iarg4 __asm__("rcx");*/
+/*register __vaword iarg5 __asm__("r8");*/
+/*register __vaword iarg6 __asm__("r9");*/
+
+register double farg1 __asm__("xmm0");
+register double farg2 __asm__("xmm1");
+register double farg3 __asm__("xmm2");
+register double farg4 __asm__("xmm3");
+register double farg5 __asm__("xmm4");
+register double farg6 __asm__("xmm5");
+register double farg7 __asm__("xmm6");
+register double farg8 __asm__("xmm7");
+
+register __vaword iret  __asm__("rax");
+register __vaword iret2 __asm__("rdx");
+register float  fret __asm__("xmm0");
+register double dret __asm__("xmm0");
+
+/*
+ * Tell gcc to not use the call-saved registers %rbx, %rbp.
+ * This ensures that the return sequence does not need to restore registers
+ * from the stack.
+ */
+register void* dummy1  __asm__("%rbx");
+#if __GNUC__ < 4 || (__GNUC__ == 4 && __GNUC_MINOR__ < 9)
+register void* dummy2  __asm__("%rbp");
+#endif
+
+#ifdef REENTRANT
+static
+#endif
+void /* the return type is variable, not void! */
+vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4,
+                 __vaword word5, __vaword word6,
+                 __vaword firstword)
+{
+  __va_alist list;
+  /* Move the arguments passed in registers to temp storage. */
+  list.iarg[0] = word1;
+  list.iarg[1] = word2;
+  list.iarg[2] = word3;
+  list.iarg[3] = word4;
+  list.iarg[4] = word5;
+  list.iarg[5] = word6;
+  list.farg[0] = farg1;
+  list.farg[1] = farg2;
+  list.farg[2] = farg3;
+  list.farg[3] = farg4;
+  list.farg[4] = farg5;
+  list.farg[5] = farg6;
+  list.farg[6] = farg7;
+  list.farg[7] = farg8;
+  /* Prepare the va_alist. */
+  list.flags = 0;
+  list.aptr = (long)&firstword;
+  list.raddr = (void*)0;
+  list.rtype = __VAvoid;
+  list.ianum = 0;
+  list.fanum = 0;
+  /* Call vacall_function. The macros do all the rest. */
+#ifndef REENTRANT
+  (*vacall_function) (&list);
+#else /* REENTRANT */
+  (*env->vacall_function) (env->arg,&list);
+#endif
+  /* Put return value into proper register. */
+  if (list.rtype == __VAvoid) {
+  } else
+  if (list.rtype == __VAchar) {
+    iret = list.tmp._char;
+  } else
+  if (list.rtype == __VAschar) {
+    iret = list.tmp._schar;
+  } else
+  if (list.rtype == __VAuchar) {
+    iret = list.tmp._uchar;
+  } else
+  if (list.rtype == __VAshort) {
+    iret = list.tmp._short;
+  } else
+  if (list.rtype == __VAushort) {
+    iret = list.tmp._ushort;
+  } else
+  if (list.rtype == __VAint) {
+    iret = list.tmp._int;
+  } else
+  if (list.rtype == __VAuint) {
+    iret = list.tmp._uint;
+  } else
+  if (list.rtype == __VAlong) {
+    iret = list.tmp._long;
+  } else
+  if (list.rtype == __VAulong) {
+    iret = list.tmp._ulong;
+  } else
+  if (list.rtype == __VAlonglong) {
+#ifdef __x86_64_x32__
+    iret = list.tmp._longlong;
+#else
+    iret = list.tmp._long;
+#endif
+  } else
+  if (list.rtype == __VAulonglong) {
+#ifdef __x86_64_x32__
+    iret = list.tmp._ulonglong;
+#else
+    iret = list.tmp._ulong;
+#endif
+  } else
+  if (list.rtype == __VAfloat) {
+    fret = list.tmp._float;
+  } else
+  if (list.rtype == __VAdouble) {
+    dret = list.tmp._double;
+  } else
+  if (list.rtype == __VAvoidp) {
+#ifdef __x86_64_x32__
+    /* The x86_64 ABI, section 10.1, specifies that pointers are zero-extended
+       from 32 bits to 64 bits. */
+    iret = (unsigned long long)(unsigned long)list.tmp._ptr;
+#else
+    iret = (long)list.tmp._ptr;
+#endif
+  } else
+  if (list.rtype == __VAstruct) {
+    if (list.flags & __VA_REGISTER_STRUCT_RETURN) {
+      /* Return structs of size <= 16 in registers. */
+      if (list.rsize > 0 && list.rsize <= 16) {
+        #if 0 /* Unoptimized */
+        iret = (__vaword)((unsigned char *) list.raddr)[0];
+        if (list.rsize >= 2)
+          iret |= (__vaword)((unsigned char *) list.raddr)[1] << 8;
+        if (list.rsize >= 3)
+          iret |= (__vaword)((unsigned char *) list.raddr)[2] << 16;
+        if (list.rsize >= 4)
+          iret |= (__vaword)((unsigned char *) list.raddr)[3] << 24;
+        if (list.rsize >= 5)
+          iret |= (__vaword)((unsigned char *) list.raddr)[4] << 32;
+        if (list.rsize >= 6)
+          iret |= (__vaword)((unsigned char *) list.raddr)[5] << 40;
+        if (list.rsize >= 7)
+          iret |= (__vaword)((unsigned char *) list.raddr)[6] << 48;
+        if (list.rsize >= 8)
+          iret |= (__vaword)((unsigned char *) list.raddr)[7] << 56;
+        if (list.rsize >= 9) {
+          iret2 = (__vaword)((unsigned char *) list.raddr)[8];
+          if (list.rsize >= 10)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[9] << 8;
+          if (list.rsize >= 11)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[10] << 16;
+          if (list.rsize >= 12)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[11] << 24;
+          if (list.rsize >= 13)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[12] << 32;
+          if (list.rsize >= 14)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[13] << 40;
+          if (list.rsize >= 15)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[14] << 48;
+          if (list.rsize >= 16)
+            iret2 |= (__vaword)((unsigned char *) list.raddr)[15] << 56;
+        }
+        #else /* Optimized: fewer conditional jumps, fewer memory accesses */
+        uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__vaword) */
+        __vaword* wordaddr = (__vaword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__vaword)-1));
+        uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__vaword)-1); /* ≥ 0, < sizeof(__vaword) */
+        uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__vaword) */
+        if (count <= sizeof(__vaword)) {
+          /* Assign iret. */
+          if (end_offset <= sizeof(__vaword)) {
+            /* 0 < end_offset ≤ sizeof(__vaword) */
+            __vaword mask0 = ((__vaword)2 << (end_offset*8-1)) - 1;
+            iret = (wordaddr[0] & mask0) >> (start_offset*8);
+          } else {
+            /* sizeof(__vaword) < end_offset < 2*sizeof(__vaword), start_offset > 0 */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        } else {
+          /* Assign iret, iret2. */
+          if (end_offset <= 2*sizeof(__vaword)) {
+            /* sizeof(__vaword) < end_offset ≤ 2*sizeof(__vaword) */
+            __vaword mask1 = ((__vaword)2 << (end_offset*8-sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__vaword)*4-start_offset*4) << (sizeof(__vaword)*4-start_offset*4));
+            iret2 = (wordaddr[1] & mask1) >> (start_offset*8);
+          } else {
+            /* 2*sizeof(__vaword) < end_offset < 3*sizeof(__vaword), start_offset > 0 */
+            __vaword mask2 = ((__vaword)2 << (end_offset*8-2*sizeof(__vaword)*8-1)) - 1;
+            iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__vaword)*8-start_offset*8));
+            iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__vaword)*8-start_offset*8));
+          }
+        }
+        #endif
+      }
+    }
+  }
+}
+
+#ifdef REENTRANT
+__vacall_r_t
+callback_get_receiver (void)
+{
+  return (__vacall_r_t)(void*)&callback_receiver;
+}
+#endif
diff --git a/vacall/vacall.3 b/vacall/vacall.3
new file mode 100644 (file)
index 0000000..2737b2c
--- /dev/null
@@ -0,0 +1,295 @@
+.\" Copyright (C) 1995-2017 Bruno Haible
+.\"
+.\" This manual is free documentation.  It is dually licensed under the
+.\" GNU FDL and the GNU GPL.  This means that you can redistribute this
+.\" manual under either of these two licenses, at your choice.
+.\"
+.\" This manual is covered by the GNU FDL.  Permission is granted to copy,
+.\" distribute and/or modify this document under the terms of the
+.\" GNU Free Documentation License (FDL), either version 1.2 of the
+.\" License, or (at your option) any later version published by the
+.\" Free Software Foundation (FSF); with no Invariant Sections, with no
+.\" Front-Cover Text, and with no Back-Cover Texts.
+.\" A copy of the license is at <https://www.gnu.org/licenses/old-licenses/fdl-1.2>.
+.\"
+.\" This manual is covered by the GNU GPL.  You can redistribute it and/or
+.\" modify it under the terms of the GNU General Public License (GPL), either
+.\" version 2 of the License, or (at your option) any later version published
+.\" by the Free Software Foundation (FSF).
+.\" A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
+.\"
+.TH VACALL 3 "1 January 2017"
+.SH NAME
+vacall \- C functions called with variable arguments
+.SH SYNOPSIS
+.B #include <vacall.h>
+.LP
+.B extern void* vacall_function;
+.LP
+.nf
+.BI "void " function " (va_alist" alist ")"
+.BI "{"
+.BI "  va_start_" type "(" alist "[, " return_type "]);"
+.BI "  " arg " = va_arg_" type "(" alist "[, " arg_type "]);"
+.BI "  va_return_" type "(" alist "[[, " return_type "], " return_value "]);"
+.BI "}"
+.fi
+.LP
+.BI "vacall_function = " "&function" ";"
+.LP
+.IB "val" " = ((" return_type " (*) ()) vacall) (" arg1 , arg2 , ... ");"
+.SH DESCRIPTION
+This set of macros permit a C function
+.I function
+to be called with variable arguments and to return variable return values.
+This is much like the
+.BR stdarg (3)
+facility, but also allows the return value to be specified at run time.
+
+Function calling conventions differ considerably on different machines, and
+.I vacall
+attempts to provide some degree of isolation from such architecture
+dependencies.
+
+The function that can be called with any number and type of arguments
+and which will return any type of return value is
+.BR vacall .
+It will do some magic and call the function stored in the variable
+.BR vacall_function .
+If you want to make more than one use of
+.IR vacall ,
+use the
+.IR trampoline (3)
+facility to store
+.I &function
+into
+.B vacall_function
+just before calling
+.BR vacall .
+
+Within
+.IR function ,
+the following macros can be used to walk through the argument list and
+specify a return value:
+.RS 0
+.TP
+.BI "va_start_" type "(" alist "[, " return_type "]);"
+starts the walk through the argument list and specifies the return type.
+.TP
+.IB arg " = va_arg_" type "(" alist "[, " arg_type "]);"
+fetches the next argument from the argument list.
+.TP
+.BI "va_return_" type "(" alist "[[, " return_type "], " return_value "]);"
+ends the walk through the argument list and specifies the return value.
+.RE
+
+The
+.I type
+in
+.BI va_start_ type
+and
+.BI va_return_ type
+shall be one of
+.BR void ", " int ", " uint ", " long ", " ulong ", " longlong ", " ulonglong ", " double ", " struct ", " ptr
+or (for ANSI C calling conventions only)
+.BR char ", " schar ", " uchar ", " short ", " ushort ", " float ,
+depending on the class of
+.IR return_type .
+
+The
+.I type
+specifiers in
+.BI va_start_ type
+and
+.BI va_return_ type
+must be the same.
+The
+.I return_type
+specifiers passed to
+.BI va_start_ type
+and
+.BI va_return_ type
+must be the same.
+
+The
+.I type
+in
+.BI va_arg_ type
+shall be one of
+.BR int ", " uint ", " long ", " ulong ", " longlong ", " ulonglong ", " double ", " struct ", " ptr
+or (for ANSI C calling conventions only)
+.BR char ", " schar ", " uchar ", " short ", " ushort ", " float ,
+depending on the class of
+.IR arg_type .
+
+In
+.BI "va_start_struct(" alist ", " return_type ", " splittable );
+the
+.I splittable
+flag specifies whether the struct
+.I return_type
+can be returned in registers such that every struct field fits entirely in
+a single register. This needs to be specified for structs of size
+2*sizeof(long). For structs of size <= sizeof(long),
+.I splittable
+is ignored and assumed to be 1. For structs of size > 2*sizeof(long),
+.I splittable
+is ignored and assumed to be 0. There are some handy macros for this:
+.nf
+.BI "va_word_splittable_1 (" type1 )
+.BI "va_word_splittable_2 (" type1 ", " type2 )
+.BI "va_word_splittable_3 (" type1 ", " type2 ", " type3 )
+.BI "va_word_splittable_4 (" type1 ", " type2 ", " type3 ", " type4 )
+.fi
+For a struct with three slots
+.nf
+.BI "struct { " "type1 id1" "; " "type2 id2" "; " "type3 id3" "; }"
+.fi
+you can specify
+.I splittable
+as
+.BI "va_word_splittable_3 (" type1 ", " type2 ", " type3 )
+.RB .
+
+.SH NOTES
+
+Functions which want to emulate Kernighan & Ritchie style functions (i.e.,
+in ANSI C, functions without a typed argument list) cannot use the
+.I type
+values
+.BR char ", " schar ", " uchar ", " short ", " ushort ", " float .
+As prescribed by the default K&R C expression promotions, they have
+to use
+.B int
+instead of
+.BR char ", " schar ", " uchar ", " short ", " ushort
+and
+.B double
+instead of
+.BR float .
+
+The macros
+.BR va_start_longlong(\|) ,
+.BR va_start_ulonglong(\|) ,
+.BR va_return_longlong(\|) ,
+.BR va_return_ulonglong(\|) ,
+.B va_arg_longlong(\|)
+and
+.B va_arg_ulonglong(\|)
+work only if the C compiler has a working
+.B long long
+64-bit integer type.
+
+The struct types used in
+.B va_start_struct(\|)
+and
+.B va_struct(\|)
+must only contain (signed or unsigned) int, long, long long or pointer fields.
+Struct types containing (signed or unsigned) char, short, float, double or
+other structs are not supported.
+
+.SH EXAMPLE
+
+This example, a possible implementation of
+.BR execl (3)
+on top of
+.BR execv (2)
+using
+.BR stdarg (3),
+
+.nf
+.ft B
+#include <stdarg.h>
+#define MAXARGS 100
+/* execl is called by execl(file, arg1, arg2, ..., (char *)0); */
+int execl (...)
+{
+  va_list ap;
+  char* file;
+  char* args[MAXARGS];
+  int argno = 0;
+  va_start (ap);
+  file = va_arg(ap, char*);
+  while ((args[argno] = va_arg(ap, char*)) != (char *)0)
+    argno++;
+  va_end (ap);
+  return execv(file, args);
+}
+.ft
+.fi
+
+looks like this using
+.BR vacall (3):
+
+.nf
+.ft B
+#include <vacall.h>
+#define MAXARGS 100
+/* execl is called by vacall(file, arg1, arg2, ..., (char *)0); */
+void execl (va_alist ap)
+{
+  char* file;
+  char* args[MAXARGS];
+  int argno = 0;
+  int retval;
+  va_start_int (ap);
+  file = va_arg_ptr(ap, char*);
+  while ((args[argno] = va_arg_ptr(ap, char*)) != (char *)0)
+    argno++;
+  retval = execv(file, args);
+  va_return_int (ap, retval);
+}
+vacall_function = &execl;
+.ft
+.fi
+
+.SH SEE ALSO
+.BR stdarg (3),
+.BR trampoline (3),
+.BR callback (3).
+
+.SH BUGS
+
+The current implementations have been tested on a selection of common
+cases but there are probably still many bugs.
+
+There are typically built-in limits on the size of the argument-list,
+which may also include the size of any structure arguments.
+
+The decision whether a struct is to be returned in registers or in memory
+considers only the struct's size and alignment. This is inaccurate: for
+example, gcc on m68k-next returns
+.B "struct { char a,b,c; }"
+in registers and
+.B "struct { char a[3]; }"
+in memory, although both types have the same size and the same alignment.
+
+The argument list can only be walked once.
+
+The use of the global variable
+.B vacall_function
+is not reentrant. This is fixed in the
+.BR callback (3)
+package.
+
+.SH PORTING
+
+Knowledge about argument passing conventions can be found in the gcc
+source, file
+.RI gcc-2.6.3/config/ cpu / cpu .h,
+section "Stack layout; function entry, exit and calling."
+
+The implementation of varargs for gcc can be found in the gcc source, files
+gcc-2.6.3/ginclude/va*.h.
+
+gcc's __builtin_saveregs() function is defined in the gcc source, file
+gcc-2.6.3/libgcc2.c.
+
+.SH AUTHOR
+
+Bruno Haible <bruno@clisp.org>
+
+.SH ACKNOWLEDGEMENTS
+
+Many ideas and a lot of code were cribbed from the gcc source.
+
diff --git a/vacall/vacall.h b/vacall/vacall.h
new file mode 100644 (file)
index 0000000..9485356
--- /dev/null
@@ -0,0 +1,457 @@
+/*
+ * Copyright 1995-2019 Bruno Haible <bruno@clisp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#ifndef _VACALL_H
+#define _VACALL_H
+
+#include <stddef.h>
+
+#include "ffcall-version.h"
+#include "ffcall-abi.h"
+
+
+/* Determine whether the current ABI is LLP64
+   ('long' = 32-bit, 'long long' = 'void*' = 64-bit). */
+#if defined(__x86_64__) && defined(_WIN32) && !defined(__CYGWIN__)
+#define __VA_LLP64 1
+#endif
+
+/* Determine the alignment of a type at compile time.
+ */
+#if defined(__GNUC__) || defined(__IBM__ALIGNOF__)
+#define __VA_alignof __alignof__
+#elif defined(__cplusplus)
+template <class type> struct __VA_alignof_helper { char __slot1; type __slot2; };
+#define __VA_alignof(type) offsetof (__VA_alignof_helper<type>, __slot2)
+#elif defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) /* SGI compiler */
+#define __VA_alignof __builtin_alignof
+#else
+#define __VA_offsetof(type,ident)  ((unsigned long)&(((type*)0)->ident))
+#define __VA_alignof(type)  __VA_offsetof(struct { char __slot1; type __slot2; }, __slot2)
+#endif
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+/* C builtin types.
+ */
+#if defined(__mipsn32__) || defined(__x86_64_x32__) || defined(__VA_LLP64)
+typedef long long __vaword;
+#else
+typedef long __vaword;
+#endif
+
+enum __VAtype
+{
+  __VAvoid,
+  __VAchar,
+  __VAschar,
+  __VAuchar,
+  __VAshort,
+  __VAushort,
+  __VAint,
+  __VAuint,
+  __VAlong,
+  __VAulong,
+  __VAlonglong,
+  __VAulonglong,
+  __VAfloat,
+  __VAdouble,
+  __VAvoidp,
+  __VAstruct
+};
+
+enum __VA_alist_flags
+{
+
+  /* how to return structs */
+  /* There are basically 3 ways to return structs:
+   * a. The called function returns a pointer to static data. Not reentrant.
+   *    Not supported any more.
+   * b. The caller passes the return structure address in a dedicated register
+   *    or as a first (or last), invisible argument. The called function stores
+   *    its result there.
+   * c. Like b, and the called function also returns the return structure
+   *    address in the return value register. (This is not very distinguishable
+   *    from b.)
+   * Independently of this,
+   * r. small structures (<= 4 or <= 8 bytes) may be returned in the return
+   *    value register(s), or
+   * m. even small structures are passed in memory.
+   */
+  /* gcc-2.6.3 employs the following strategy:
+   *   - If PCC_STATIC_STRUCT_RETURN is defined in the machine description
+   *     it uses method a, else method c.
+   *   - If flag_pcc_struct_return is set (either by -fpcc-struct-return or if
+   *     DEFAULT_PCC_STRUCT_RETURN is defined to 1 in the machine description)
+   *     it uses method m, else (either by -freg-struct-return or if
+   *     DEFAULT_PCC_STRUCT_RETURN is defined to 0 in the machine description)
+   *     method r.
+   */
+  __VA_SMALL_STRUCT_RETURN     = 1<<1, /* r: special case for small structs */
+  __VA_GCC_STRUCT_RETURN       = 1<<2, /* consider 8 byte structs as small */
+#if defined(__sparc__) && !defined(__sparc64__)
+  __VA_SUNCC_STRUCT_RETURN     = 1<<3,
+  __VA_SUNPROCC_STRUCT_RETURN  = 1<<4,
+#else
+  __VA_SUNCC_STRUCT_RETURN     = 0,
+  __VA_SUNPROCC_STRUCT_RETURN  = 0,
+#endif
+#if defined(__i386__)
+  __VA_MSVC_STRUCT_RETURN      = 1<<4,
+#endif
+  /* the default way to return structs */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another struct returning convention,
+   * just  #define __VA_STRUCT_RETURN ...
+   * before or after #including <vacall.h>.
+   */
+#ifndef __VA_STRUCT_RETURN
+  __VA_STRUCT_RETURN           =
+#if defined(__sparc__) && !defined(__sparc64__) && defined(__sun) && (defined(__SUNPRO_C) || defined(__SUNPRO_CC)) /* SUNWspro cc or CC */
+                                 __VA_SUNPROCC_STRUCT_RETURN,
+#else
+#if (defined(__i386__) && (defined(_WIN32) || defined(__CYGWIN__) || (defined(__MACH__) && defined(__APPLE__)) || defined(__FreeBSD__) || defined(__DragonFly__) || defined(__OpenBSD__))) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__hppa__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || defined(__powerpc64_elfv2__) || defined(__ia64__) || defined(__x86_64__) || defined(__riscv32__) || defined(__riscv64__)
+                                 __VA_SMALL_STRUCT_RETURN |
+#endif
+#if defined(__GNUC__) && !((defined(__mipsn32__) || defined(__mips64__)) && ((__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3)))
+                                 __VA_GCC_STRUCT_RETURN |
+#endif
+#if defined(__i386__) && defined(_WIN32) && !defined(__CYGWIN__) /* native Windows */
+                                 __VA_MSVC_STRUCT_RETURN |
+#endif
+                                 0,
+#endif
+#endif
+
+  /* how to return floats */
+#if defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__))
+  __VA_SUNCC_FLOAT_RETURN      = 1<<5,
+#endif
+#if defined(__m68k__)
+  __VA_FREG_FLOAT_RETURN       = 1<<6,
+#endif
+  /* the default way to return floats */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another float returning convention,
+   * just  #define __VA_FLOAT_RETURN ...
+   * before or after #including <vacall.h>.
+   */
+#ifndef __VA_FLOAT_RETURN
+#if (defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__))) && !defined(__GNUC__) && defined(__sun) && !(defined(__SUNPRO_C) || defined(__SUNPRO_CC))  /* Sun cc or CC */
+  __VA_FLOAT_RETURN            = __VA_SUNCC_FLOAT_RETURN,
+#elif defined(__m68k__)
+  __VA_FLOAT_RETURN            = __VA_FREG_FLOAT_RETURN,
+#else
+  __VA_FLOAT_RETURN            = 0,
+#endif
+#endif
+
+  /* how to pass structs */
+#if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__)
+  __VA_SGICC_STRUCT_ARGS       = 1<<7,
+#endif
+#if defined(__powerpc__) || defined(__powerpc64__)
+  __VA_AIXCC_STRUCT_ARGS       = 1<<7,
+#endif
+#if defined(__ia64__)
+  __VA_OLDGCC_STRUCT_ARGS      = 1<<7,
+#endif
+  /* the default way to pass structs */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another structs passing convention,
+   * just  #define __VA_STRUCT_ARGS ...
+   * before or after #including <vacall.h>.
+   */
+#ifndef __VA_STRUCT_ARGS
+#if (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) && !defined(__GNUC__) /* SGI mips cc */
+  __VA_STRUCT_ARGS             = __VA_SGICC_STRUCT_ARGS,
+#else
+#if (defined(__mipsn32__) || defined(__mips64__)) && (!defined(__GNUC__) || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3)) /* SGI mips cc or gcc >= 3.4 */
+  __VA_STRUCT_ARGS             = __VA_SGICC_STRUCT_ARGS,
+#else
+#if defined(__powerpc__) && !defined(__powerpc64__) && defined(_AIX) && !defined(__GNUC__) /* AIX 32-bit cc, xlc */
+  __VA_STRUCT_ARGS             = __VA_AIXCC_STRUCT_ARGS,
+#else
+#if defined(__powerpc64__) && defined(_AIX) /* AIX 64-bit cc, xlc, gcc */
+  __VA_STRUCT_ARGS             = __VA_AIXCC_STRUCT_ARGS,
+#else
+#if defined(__ia64__) && !(defined(__GNUC__) && (__GNUC__ >= 3))
+  __VA_STRUCT_ARGS             = __VA_OLDGCC_STRUCT_ARGS,
+#else
+  __VA_STRUCT_ARGS             = 0,
+#endif
+#endif
+#endif
+#endif
+#endif
+#endif
+
+  /* how to pass floats */
+  /* ANSI C compilers and GNU gcc pass floats as floats.
+   * K&R C compilers pass floats as doubles. We don't support them any more.
+   */
+#if defined(__powerpc64__)
+  __VA_AIXCC_FLOAT_ARGS         = 1<<8,      /* pass floats in the low 4 bytes of an 8-bytes word */
+#endif
+  /* the default way to pass floats */
+  /* This choice here is based on the assumption that the function you are
+   * going to call has been compiled with the same compiler you are using to
+   * include this file.
+   * If you want to call functions with another float passing convention,
+   * just  #define __VA_FLOAT_ARGS ...
+   * before or after #including <vacall.h>.
+   */
+#ifndef __VA_FLOAT_ARGS
+#if defined(__powerpc64__) && defined(_AIX) && !defined(__GNUC__) /* AIX 64-bit xlc */
+  __VA_FLOAT_ARGS              = __VA_AIXCC_FLOAT_ARGS,
+#else
+  __VA_FLOAT_ARGS              = 0,
+#endif
+#endif
+
+  /* how to pass and return small integer arguments */
+  __VA_ANSI_INTEGERS           = 0, /* no promotions */
+  __VA_TRADITIONAL_INTEGERS    = 0, /* promote [u]char, [u]short to [u]int */
+  /* Fortunately these two methods are compatible. Our macros work with both. */
+
+  /* stack cleanup policy */
+  __VA_CDECL_CLEANUP           = 0, /* caller pops args after return */
+  __VA_STDCALL_CLEANUP         = 1<<9, /* callee pops args before return */
+                                    /* currently only supported on __i386__ */
+#ifndef __VA_CLEANUP
+  __VA_CLEANUP                 = __VA_CDECL_CLEANUP,
+#endif
+
+  /* These are for internal use only */
+#if defined(__i386__) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || defined(__powerpc__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv64__)
+  __VA_REGISTER_STRUCT_RETURN  = 1<<10,
+#endif
+#if defined(__mipsn32__) || defined(__mips64__)
+  __VA_REGISTER_FLOATSTRUCT_RETURN     = 1<<11,
+  __VA_REGISTER_DOUBLESTRUCT_RETURN    = 1<<12,
+#endif
+
+  __VA_flag_for_broken_compilers_that_dont_like_trailing_commas
+};
+
+/*
+ * Definition of the ‘va_alist’ type.
+ */
+struct vacall_alist;
+typedef struct vacall_alist * va_alist;
+
+
+/*
+ * Definition of the va_start_xxx macros.
+ */
+#define __VA_START_FLAGS  \
+  __VA_STRUCT_RETURN | __VA_FLOAT_RETURN | __VA_STRUCT_ARGS | __VA_FLOAT_ARGS | __VA_CLEANUP
+
+extern void vacall_start (va_alist /* LIST */, int /* RETTYPE */, int /* FLAGS */);
+
+#define va_start_void(LIST)     vacall_start(LIST,__VAvoid,     __VA_START_FLAGS)
+#define va_start_char(LIST)     vacall_start(LIST,__VAchar,     __VA_START_FLAGS)
+#define va_start_schar(LIST)    vacall_start(LIST,__VAschar,    __VA_START_FLAGS)
+#define va_start_uchar(LIST)    vacall_start(LIST,__VAuchar,    __VA_START_FLAGS)
+#define va_start_short(LIST)    vacall_start(LIST,__VAshort,    __VA_START_FLAGS)
+#define va_start_ushort(LIST)   vacall_start(LIST,__VAushort,   __VA_START_FLAGS)
+#define va_start_int(LIST)      vacall_start(LIST,__VAint,      __VA_START_FLAGS)
+#define va_start_uint(LIST)     vacall_start(LIST,__VAuint,     __VA_START_FLAGS)
+#define va_start_long(LIST)     vacall_start(LIST,__VAlong,     __VA_START_FLAGS)
+#define va_start_ulong(LIST)    vacall_start(LIST,__VAulong,    __VA_START_FLAGS)
+#define va_start_longlong(LIST)         vacall_start(LIST,__VAlonglong, __VA_START_FLAGS)
+#define va_start_ulonglong(LIST) vacall_start(LIST,__VAulonglong,__VA_START_FLAGS)
+#define va_start_float(LIST)    vacall_start(LIST,__VAfloat,    __VA_START_FLAGS)
+#define va_start_double(LIST)   vacall_start(LIST,__VAdouble,   __VA_START_FLAGS)
+#define va_start_ptr(LIST,TYPE)         vacall_start(LIST,__VAvoidp,    __VA_START_FLAGS)
+
+/*
+ * va_start_struct: Preparing structure return.
+ */
+extern void vacall_start_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */, int /* TYPE_SPLITTABLE */, int /* FLAGS */);
+
+#define va_start_struct(LIST,TYPE,TYPE_SPLITTABLE)  \
+  _va_start_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE),TYPE_SPLITTABLE)
+/* _va_start_struct() is like va_start_struct(), except that you pass
+ * the type's size and alignment instead of the type itself.
+ * Undocumented, but used by GNU clisp.
+ */
+#define _va_start_struct(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE)  \
+  vacall_start_struct(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE,__VA_START_FLAGS)
+
+
+/*
+ * Definition of the va_arg_xxx macros.
+ */
+
+extern char           vacall_arg_char   (va_alist /* LIST */);
+extern signed char    vacall_arg_schar  (va_alist /* LIST */);
+extern unsigned char  vacall_arg_uchar  (va_alist /* LIST */);
+extern short          vacall_arg_short  (va_alist /* LIST */);
+extern unsigned short vacall_arg_ushort (va_alist /* LIST */);
+extern int            vacall_arg_int    (va_alist /* LIST */);
+extern unsigned int   vacall_arg_uint   (va_alist /* LIST */);
+extern long           vacall_arg_long   (va_alist /* LIST */);
+extern unsigned long  vacall_arg_ulong  (va_alist /* LIST */);
+
+#define va_arg_char(LIST)      vacall_arg_char(LIST)
+#define va_arg_schar(LIST)     vacall_arg_schar(LIST)
+#define va_arg_uchar(LIST)     vacall_arg_uchar(LIST)
+#define va_arg_short(LIST)     vacall_arg_short(LIST)
+#define va_arg_ushort(LIST)    vacall_arg_ushort(LIST)
+#define va_arg_int(LIST)       vacall_arg_int(LIST)
+#define va_arg_uint(LIST)      vacall_arg_uint(LIST)
+#define va_arg_long(LIST)      vacall_arg_long(LIST)
+#define va_arg_ulong(LIST)     vacall_arg_ulong(LIST)
+
+extern long long          vacall_arg_longlong  (va_alist /* LIST */);
+extern unsigned long long vacall_arg_ulonglong (va_alist /* LIST */);
+
+#define va_arg_longlong(LIST)  vacall_arg_longlong(LIST)
+#define va_arg_ulonglong(LIST) vacall_arg_ulonglong(LIST)
+
+/* Floating point arguments. */
+
+extern float  vacall_arg_float  (va_alist /* LIST */);
+extern double vacall_arg_double (va_alist /* LIST */);
+
+#define va_arg_float(LIST)     vacall_arg_float(LIST)
+#define va_arg_double(LIST)    vacall_arg_double(LIST)
+
+/* Pointer arguments. */
+
+extern void* vacall_arg_ptr (va_alist /* LIST */);
+#define va_arg_ptr(LIST,TYPE)  ((TYPE)vacall_arg_ptr(LIST))
+
+/* Structure arguments. */
+
+extern void* vacall_arg_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */);
+
+#define va_arg_struct(LIST,TYPE)  \
+  *(TYPE*)vacall_arg_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE))
+/* _va_arg_struct() is like va_arg_struct(), except that you pass the type's
+ * size and alignment instead of the type and get the value's address instead
+ * of the value itself.
+ * Undocumented, but used by GNU clisp.
+ */
+#define _va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)  \
+  vacall_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN)
+
+
+/*
+ * Definition of the va_return_xxx macros.
+ */
+
+extern void vacall_return_void (va_alist /* LIST */);
+#define va_return_void(LIST)           vacall_return_void(LIST)
+
+extern void vacall_return_char (va_alist /* LIST */, char /* VAL */);
+extern void vacall_return_schar (va_alist /* LIST */, signed char /* VAL */);
+extern void vacall_return_uchar (va_alist /* LIST */, unsigned char /* VAL */);
+extern void vacall_return_short (va_alist /* LIST */, short /* VAL */);
+extern void vacall_return_ushort (va_alist /* LIST */, unsigned short /* VAL */);
+extern void vacall_return_int (va_alist /* LIST */, int /* VAL */);
+extern void vacall_return_uint (va_alist /* LIST */, unsigned int /* VAL */);
+extern void vacall_return_long (va_alist /* LIST */, long /* VAL */);
+extern void vacall_return_ulong (va_alist /* LIST */, unsigned long /* VAL */);
+#define va_return_char(LIST,VAL)       vacall_return_char(LIST,VAL)
+#define va_return_schar(LIST,VAL)      vacall_return_schar(LIST,VAL)
+#define va_return_uchar(LIST,VAL)      vacall_return_uchar(LIST,VAL)
+#define va_return_short(LIST,VAL)      vacall_return_short(LIST,VAL)
+#define va_return_ushort(LIST,VAL)     vacall_return_ushort(LIST,VAL)
+#define va_return_int(LIST,VAL)                vacall_return_int(LIST,VAL)
+#define va_return_uint(LIST,VAL)       vacall_return_uint(LIST,VAL)
+#define va_return_long(LIST,VAL)       vacall_return_long(LIST,VAL)
+#define va_return_ulong(LIST,VAL)      vacall_return_ulong(LIST,VAL)
+
+extern void vacall_return_longlong (va_alist /* LIST */, long long /* VAL */);
+extern void vacall_return_ulonglong (va_alist /* LIST */, unsigned long long /* VAL */);
+#define va_return_longlong(LIST,VAL)   vacall_return_longlong(LIST,VAL)
+#define va_return_ulonglong(LIST,VAL)  vacall_return_ulonglong(LIST,VAL)
+
+extern void vacall_return_float (va_alist /* LIST */, float /* VAL */);
+extern void vacall_return_double (va_alist /* LIST */, double /* VAL */);
+#define va_return_float(LIST,VAL)      vacall_return_float(LIST,VAL)
+#define va_return_double(LIST,VAL)     vacall_return_double(LIST,VAL)
+
+extern void vacall_return_ptr (va_alist /* LIST */, void* /* VAL */);
+#define va_return_ptr(LIST,TYPE,VAL)   vacall_return_ptr(LIST,(void*)(TYPE)(VAL))
+
+extern void vacall_return_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */, const void* /* VAL_ADDR */);
+
+#define va_return_struct(LIST,TYPE,VAL)  \
+  _va_return_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE),&(VAL))
+/* Undocumented, but used by GNU clisp. */
+#define _va_return_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR)  \
+  vacall_return_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR)
+
+
+/* Determine whether a struct type is word-splittable, i.e. whether each of
+ * its components fit into a register.
+ * The entire computation is done at compile time.
+ */
+#define va_word_splittable_1(slot1)  \
+  (__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword))
+#define va_word_splittable_2(slot1,slot2)  \
+  ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \
+   && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \
+  )
+#define va_word_splittable_3(slot1,slot2,slot3)  \
+  ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \
+   && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \
+   && (__va_offset3(slot1,slot2,slot3)/sizeof(__vaword) == (__va_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__vaword)) \
+  )
+#define va_word_splittable_4(slot1,slot2,slot3,slot4)  \
+  ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \
+   && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \
+   && (__va_offset3(slot1,slot2,slot3)/sizeof(__vaword) == (__va_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__vaword)) \
+   && (__va_offset4(slot1,slot2,slot3,slot4)/sizeof(__vaword) == (__va_offset4(slot1,slot2,slot3,slot4)+sizeof(slot4)-1)/sizeof(__vaword)) \
+  )
+#define __va_offset1(slot1)  \
+  0
+#define __va_offset2(slot1,slot2)  \
+  ((__va_offset1(slot1)+sizeof(slot1)+__VA_alignof(slot2)-1) & -(long)__VA_alignof(slot2))
+#define __va_offset3(slot1,slot2,slot3)  \
+  ((__va_offset2(slot1,slot2)+sizeof(slot2)+__VA_alignof(slot3)-1) & -(long)__VA_alignof(slot3))
+#define __va_offset4(slot1,slot2,slot3,slot4)  \
+  ((__va_offset3(slot1,slot2,slot3)+sizeof(slot3)+__VA_alignof(slot4)-1) & -(long)__VA_alignof(slot4))
+
+
+/*
+ * Miscellaneous declarations.
+ */
+#ifdef __cplusplus
+extern "C" void (*vacall) (); /* the return type is variable, not void! */
+#else
+extern void (*vacall) (); /* the return type is variable, not void! */
+#endif
+extern void (* vacall_function) (va_alist);
+
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* _VACALL_H */
diff --git a/vacall/vacall.html b/vacall/vacall.html
new file mode 100644 (file)
index 0000000..fa61554
--- /dev/null
@@ -0,0 +1,315 @@
+<HTML>
+<HEAD>
+<!--
+Copyright (C) 1995-2017 Bruno Haible
+
+This manual is free documentation.  It is dually licensed under the
+GNU FDL and the GNU GPL.  This means that you can redistribute this
+manual under either of these two licenses, at your choice.
+
+This manual is covered by the GNU FDL.  Permission is granted to copy,
+distribute and/or modify this document under the terms of the
+GNU Free Documentation License (FDL), either version 1.2 of the
+License, or (at your option) any later version published by the
+Free Software Foundation (FSF); with no Invariant Sections, with no
+Front-Cover Text, and with no Back-Cover Texts.
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/fdl-1.2>.
+
+This manual is covered by the GNU GPL.  You can redistribute it and/or
+modify it under the terms of the GNU General Public License (GPL), either
+version 2 of the License, or (at your option) any later version published
+by the Free Software Foundation (FSF).
+A copy of the license is at <https://www.gnu.org/licenses/old-licenses/gpl-2.0>.
+-->
+<TITLE> VACALL manual page </TITLE>
+</HEAD>
+<BODY>
+<H1>VACALL manual page</H1>
+
+<UL>
+<LI> <A HREF="#Name">Name</A>
+<LI> <A HREF="#Synopsis">Synopsis</A>
+<LI> <A HREF="#Description">Description</A>
+<LI> <A HREF="#Notes">Notes</A>
+<LI> <A HREF="#Example">Example</A>
+<LI> <A HREF="#See also">See also</A>
+<LI> <A HREF="#Bugs">Bugs</A>
+<LI> <A HREF="#Porting">Porting</A>
+<LI> <A HREF="#Author">Author</A>
+<LI> <A HREF="#Acknowledgements">Acknowledgements</A>
+</UL>
+<P>
+
+<HR>
+
+<A NAME="Name">
+<H2>Name</H2>
+</A>
+
+vacall -  C functions called with variable arguments
+
+<A NAME="Synopsis">
+<H2>Synopsis</H2>
+</A>
+
+<PRE>
+<CODE>#include &lt;vacall.h&gt;</CODE>
+</PRE>
+<P>
+<PRE>
+<CODE>extern void* vacall_function;</CODE>
+</PRE>
+<P>
+<PRE>
+<CODE>void <VAR>function</VAR> (va_alist <VAR>alist</VAR>)</CODE>
+<CODE>{</CODE>
+<CODE>  va_start_<VAR>type</VAR>(<VAR>alist</VAR>[, <VAR>return_type</VAR>]);</CODE>
+<CODE>  arg = va_arg_<VAR>type</VAR>(<VAR>alist</VAR>[, <VAR>arg_type</VAR>]);</CODE>
+<CODE>  va_return_<VAR>type</VAR>(<VAR>alist</VAR>[[, <VAR>return_type</VAR>], <VAR>return_value</VAR>]);</CODE>
+<CODE>}</CODE>
+</PRE>
+<P>
+<PRE>
+<CODE>vacall_function = <VAR>&function</VAR>;</CODE>
+</PRE>
+<P>
+<PRE>
+<CODE><VAR>val</VAR> = ((<VAR>return_type</VAR> (*) ()) vacall) (<VAR>arg1</VAR>,<VAR>arg2</VAR>,<VAR>...</VAR>);</CODE>
+</PRE>
+
+<A NAME="Description">
+<H2>Description</H2>
+</A>
+
+This  set  of  macros  permit  a C function <VAR>function</VAR> to be
+called with variable  arguments  and  to  return  variable
+return values.  This is much like the <A HREF="stdarg(3)"><CODE><B>stdarg</B></CODE></A>(3) facility,
+but also allows the return value to be  specified  at  run
+time.
+<P>
+Function  calling  conventions differ considerably on different
+machines,  and <SAMP>vacall</SAMP>  attempts  to  provide  some
+degree of isolation from such architecture dependencies.
+<P>
+The  function  that can be called with any number and type
+of arguments and which will  return  any  type  of  return
+value is <CODE>vacall</CODE>.  It will do some magic and call the function
+stored in the variable <CODE>vacall_function</CODE>.  If you  want
+to make more than one use of <SAMP>vacall</SAMP>,
+use the <A HREF="trampoline(3)"><CODE><B>trampoline</B></CODE></A>(3)
+facility to  store <CODE><VAR>&amp;function</VAR></CODE>
+  into  <CODE>vacall_function</CODE>  just
+before calling <CODE>vacall</CODE>.
+<P>
+Within <VAR>function</VAR>, the following macros can be used to walk
+through the argument list and specify a return value:
+<P>
+<PRE>
+<CODE>va_start_<VAR>type</VAR>(<VAR>alist</VAR>[, <VAR>return_type</VAR>]);</CODE>
+</PRE>
+starts the walk through the argument list and specifies the return type.
+<P>
+<PRE>
+<CODE>arg = va_arg_<VAR>type</VAR>(<VAR>alist</VAR>[, <VAR>arg_type</VAR>]);</CODE>
+</PRE>
+fetches the next argument from the argument list.
+<P>
+<PRE>
+<CODE>va_return_<VAR>type</VAR>(<VAR>alist</VAR>[[, <VAR>return_type</VAR>], <VAR>return_value</VAR>]);</CODE>
+</PRE>
+ends  the walk through the argument list and specifies the return value.
+<P>
+The <VAR>type</VAR> in <CODE>va_start_<VAR>type</VAR></CODE>
+ and <CODE>va_return_<VAR>type</VAR></CODE> shall be  one
+of <CODE>void</CODE>,  <CODE>int</CODE>,  <CODE>uint</CODE>, <CODE>long</CODE>,
+<CODE>ulong</CODE>, <CODE>longlong</CODE>, <CODE>ulonglong</CODE>,
+<CODE>double</CODE>, <CODE>struct</CODE>, <CODE>ptr</CODE>
+or
+(for ANSI C calling conventions only)
+<CODE>char</CODE>, <CODE>schar</CODE>,  <CODE>uchar</CODE>,
+<CODE>short</CODE>,   <CODE>ushort</CODE>,   <CODE>float</CODE>,
+depending   on  the  class  of <VAR>return_type</VAR>.
+<P>
+The <VAR>type</VAR> specifiers in
+<CODE>va_start_<VAR>type</VAR></CODE> and <CODE>va_return_<VAR>type</VAR></CODE>
+ must be the same.
+The <VAR>return_type</VAR> specifiers   passed    to
+<CODE>va_start_<VAR>type</VAR></CODE> and <CODE>va_return_<VAR>type</VAR></CODE>
+ must be the same.
+<P>
+The <VAR>type</VAR> in <CODE>va_arg_<VAR>type</VAR></CODE>
+shall be one of <CODE>int</CODE>,  <CODE>uint</CODE>, <CODE>long</CODE>,
+<CODE>ulong</CODE>, <CODE>longlong</CODE>, <CODE>ulonglong</CODE>,
+<CODE>double</CODE>, <CODE>struct</CODE>, <CODE>ptr</CODE>
+or (for ANSI C calling  conventions  only)
+<CODE>char</CODE>, <CODE>schar</CODE>,  <CODE>uchar</CODE>,
+<CODE>short</CODE>,   <CODE>ushort</CODE>,   <CODE>float</CODE>,
+depending   on  the  class  of <VAR>arg_type</VAR>.
+<P>
+In <CODE>va_start_struct(<VAR>alist</VAR>, <VAR>return_type</VAR>, <VAR>splittable</VAR>);</CODE> the
+<VAR>splittable</VAR> flag specifies whether the struct <VAR>return_type</VAR> can
+be returned in registers such that every struct field fits
+entirely  in a single register. This needs to be specified
+for structs of size <SAMP>2*sizeof(long)</SAMP>. For structs of size
+&lt;= <SAMP>sizeof(long)</SAMP>,  splittable  is ignored and assumed to be 1.
+For  structs  of  size  &gt; <SAMP>2*sizeof(long)</SAMP>,  splittable  is
+ignored  and  assumed to be 0. There are some handy macros
+for this:
+<PRE>
+<CODE>va_word_splittable_1 (<VAR>type1</VAR>)</CODE>
+<CODE>va_word_splittable_2 (<VAR>type1</VAR>, <VAR>type2</VAR>)</CODE>
+<CODE>va_word_splittable_3 (<VAR>type1</VAR>, <VAR>type2</VAR>, <VAR>type3</VAR>)</CODE>
+<CODE>va_word_splittable_4 (<VAR>type1</VAR>, <VAR>type2</VAR>, <VAR>type3</VAR>, <VAR>type4</VAR>)</CODE>
+</PRE>
+For a struct with three slots
+<PRE>
+<CODE>struct { <VAR>type1 id1</VAR>; <VAR>type2 id2</VAR>; <VAR>type3 id3</VAR>; }</CODE>
+</PRE>
+you can specify <VAR>splittable</VAR> as
+<CODE>va_word_splittable_3 (<VAR>type1</VAR>, <VAR>type2</VAR>, <VAR>type3</VAR>)</CODE>.
+
+<A NAME="Notes">
+<H2>Notes</H2>
+</A>
+
+<OL>
+<LI> Functions which want to emulate Kernighan &amp; Ritchie  style
+functions  (i.e.,  in  ANSI  C,  functions without a typed
+argument list) cannot use the <VAR>type</VAR>  values
+<CODE>char</CODE>, <CODE>schar</CODE>,  <CODE>uchar</CODE>,
+<CODE>short</CODE>,   <CODE>ushort</CODE>,   <CODE>float</CODE>.
+As prescribed by the default
+K&amp;R C expression promotions, they have to use <CODE>int</CODE>  instead
+of <CODE>char</CODE>, <CODE>schar</CODE>,  <CODE>uchar</CODE>,
+<CODE>short</CODE>,   <CODE>ushort</CODE> and <CODE>double</CODE> instead of
+<CODE>float</CODE>.
+<P>
+<LI> The macros <CODE>va_start_longlong()</CODE>,
+<CODE>va_start_ulonglong()</CODE>, <CODE>va_return_longlong()</CODE>,
+<CODE>va_return_ulonglong()</CODE>, <CODE>va_arg_longlong()</CODE> and
+<CODE>va_arg_ulonglong()</CODE> work only if the C compiler has a working
+<CODE>long long</CODE> 64-bit integer type.
+<P>
+<LI> The struct types used in <CODE>va_start_struct()</CODE> and
+<CODE>va_struct()</CODE> must only contain (signed or unsigned) int,
+long, long long or pointer fields. Struct types containing
+(signed or unsigned) char, short, float, double or other
+structs are not supported.
+<P>
+</OL>
+
+<A NAME="Example">
+<H2>Example</H2>
+</A>
+
+This example, a possible implementation of <A HREF="execl(3)"><CODE><B>execl</B></CODE></A>(3) on top
+of <A HREF="execv(2)"><CODE><B>execv</B></CODE></A>(2) using <A HREF="stdarg(3)"><CODE><B>stdarg</B></CODE></A>(3),
+<PRE><CODE>#include &lt;stdarg.h&gt;
+#define MAXARGS 100
+/* execl is called by execl(file, arg1, arg2, ..., (char *)0); */
+int execl (...)
+{
+  va_list ap;
+  char* file;
+  char* args[MAXARGS];
+  int argno = 0;
+  va_start (ap);
+  file = va_arg(ap, char*);
+  while ((args[argno] = va_arg(ap, char*)) != (char *)0)
+    argno++;
+  va_end (ap);
+  return execv(file, args);
+}
+</CODE></PRE>
+looks like this using <A HREF="vacall(3)"><CODE><B>vacall</B></CODE></A>(3):
+<PRE><CODE>#include &lt;vacall.h&gt;
+#define MAXARGS 100
+/* execl is called by vacall(file, arg1, arg2, ..., (char *)0); */
+void execl (va_alist ap)
+{
+  char* file;
+  char* args[MAXARGS];
+  int argno = 0;
+  int retval;
+  va_start_int (ap);
+  file = va_arg_ptr(ap, char*);
+  while ((args[argno] = va_arg_ptr(ap, char*)) != (char *)0)
+    argno++;
+  retval = execv(file, args);
+  va_return_int (ap, retval);
+}
+vacall_function = &amp;execl;
+</CODE></PRE>
+<P>
+
+<A NAME="See also">
+<H2>See also</H2>
+</A>
+
+<A HREF="stdarg(3)"><CODE><B>stdarg</B></CODE></A>(3), <A HREF="trampoline(3)"><CODE><B>trampoline</B></CODE></A>(3), <A HREF="callback(3)"><CODE><B>callback</B></CODE></A>(3).
+
+<A NAME="Bugs">
+<H2>Bugs</H2>
+</A>
+
+The  current  implementations have been tested on a selection
+of common cases but there  are  probably  still  many
+bugs.
+<P>
+There  are  typically  built-in  limits on the size of the
+argument-list, which may also  include  the  size  of  any
+structure arguments.
+<P>
+The decision whether a struct is to be returned in registers or in memory
+considers only the struct's size and alignment. This is inaccurate: for
+example, gcc on m68k-next returns
+<CODE>struct { char a,b,c; }</CODE>
+in registers and
+<CODE>struct { char a[3]; }</CODE>
+in memory, although both types have the same size and the same alignment.
+<P>
+The argument list can only be walked once.
+<P>
+The  use  of  the  global  variable <CODE>vacall_function</CODE> is not
+reentrant. This is fixed in the <A HREF="callback(3)"><CODE><B>callback</B></CODE></A>(3) package.
+
+<A NAME="Porting">
+<H2>Porting</H2>
+</A>
+
+Knowledge about argument passing conventions can be  found
+in  the  gcc source, file
+<SAMP>gcc-2.6.3/config/<VAR>cpu</VAR>/<VAR>cpu</VAR>.h</SAMP>,
+section "Stack layout; function entry, exit and calling."
+<P>
+The implementation of varargs for gcc can be found in  the
+gcc source, files <SAMP>gcc-2.6.3/ginclude/va*.h</SAMP>.
+<P>
+gcc's  <CODE>__builtin_saveregs()</CODE> function is defined in the gcc
+source, file <SAMP>gcc-2.6.3/libgcc2.c</SAMP>.
+<P>
+
+<A NAME="Author">
+<H2>Author</H2>
+</A>
+
+Bruno Haible &lt;bruno@clisp.org&gt;
+
+<A NAME="Acknowledgements">
+<H2>Acknowledgements</H2>
+</A>
+
+Many ideas and a lot of code were  cribbed  from  the  gcc
+source.
+<P>
+
+<HR>
+
+<ADDRESS>VACALL manual page<BR>
+Bruno Haible &lt;bruno@clisp.org&gt;
+</ADDRESS>
+<P>
+Last modified: 1 January 2017.
+
+</BODY>
+</HTML>
diff --git a/vacall/vacall.man b/vacall/vacall.man
new file mode 100644 (file)
index 0000000..b69c7fb
--- /dev/null
@@ -0,0 +1,192 @@
+VACALL(3)                  Library Functions Manual                  VACALL(3)
+
+
+
+\e[1mNAME\e[0m
+       vacall - C functions called with variable arguments
+
+\e[1mSYNOPSIS\e[0m
+       \e[1m#include <vacall.h>\e[0m
+
+       \e[1mextern void* vacall_function;\e[0m
+
+       \e[1mvoid \e[4m\e[22mfunction\e[24m \e[1m(va_alist\e[4m\e[22malist\e[24m\e[1m)\e[0m
+       \e[1m{\e[0m
+         \e[1mva_start_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[, \e[4m\e[22mreturn_type\e[24m\e[1m]);\e[0m
+         \e[4marg\e[24m \e[1m= va_arg_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[, \e[4m\e[22marg_type\e[24m\e[1m]);\e[0m
+         \e[1mva_return_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[[, \e[4m\e[22mreturn_type\e[24m\e[1m], \e[4m\e[22mreturn_value\e[24m\e[1m]);\e[0m
+       \e[1m}\e[0m
+
+       \e[1mvacall_function = \e[4m\e[22m&function\e[24m\e[1m;\e[0m
+
+       \e[4mval\e[24m \e[1m= ((\e[4m\e[22mreturn_type\e[24m \e[1m(*) ()) vacall) (\e[4m\e[22marg1\e[24m\e[1m,\e[4m\e[22marg2\e[24m\e[1m,\e[4m\e[22m...\e[24m\e[1m);\e[0m
+
+\e[1mDESCRIPTION\e[0m
+       This set of macros permit a C function \e[4mfunction\e[24m to be called with vari‐
+       able arguments and to return variable return values.  This is much like
+       the  \e[1mstdarg\e[22m(3)  facility, but also allows the return value to be speci‐
+       fied at run time.
+
+       Function calling conventions differ considerably on different machines,
+       and  \e[4mvacall\e[24m  attempts  to  provide  some  degree of isolation from such
+       architecture dependencies.
+
+       The function that can be called with any number and type  of  arguments
+       and  which  will return any type of return value is \e[1mvacall\e[22m.  It will do
+       some magic and call the function stored in  the  variable  \e[1mvacall_func‐\e[0m
+       \e[1mtion\e[22m.  If you want to make more than one use of \e[4mvacall\e[24m, use the \e[4mtrampo‐\e[0m
+       \e[4mline\e[24m(3) facility to store \e[4m&function\e[24m into  \e[1mvacall_function  \e[22mjust  before
+       calling \e[1mvacall\e[22m.
+
+       Within  \e[4mfunction\e[24m,  the following macros can be used to walk through the
+       argument list and specify a return value:
+
+       \e[1mva_start_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[, \e[4m\e[22mreturn_type\e[24m\e[1m]);\e[0m
+              starts the walk through the  argument  list  and  specifies  the
+              return type.
+
+       \e[4marg\e[24m \e[1m= va_arg_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[, \e[4m\e[22marg_type\e[24m\e[1m]);\e[0m
+              fetches the next argument from the argument list.
+
+       \e[1mva_return_\e[4m\e[22mtype\e[24m\e[1m(\e[4m\e[22malist\e[24m\e[1m[[, \e[4m\e[22mreturn_type\e[24m\e[1m], \e[4m\e[22mreturn_value\e[24m\e[1m]);\e[0m
+              ends the walk through the argument list and specifies the return
+              value.
+
+       The \e[4mtype\e[24m in \e[1mva_start_\e[4m\e[22mtype\e[24m and \e[1mva_return_\e[4m\e[22mtype\e[24m shall be one of \e[1mvoid\e[22m, \e[1mint\e[22m,
+       \e[1muint\e[22m,  \e[1mlong\e[22m,  \e[1mulong\e[22m,  \e[1mlonglong\e[22m,  \e[1mulonglong\e[22m, \e[1mdouble\e[22m, \e[1mstruct\e[22m, \e[1mptr \e[22mor (for
+       ANSI C calling conventions only) \e[1mchar\e[22m,  \e[1mschar\e[22m,  \e[1muchar\e[22m,  \e[1mshort\e[22m,  \e[1mushort\e[22m,
+       \e[1mfloat\e[22m, depending on the class of \e[4mreturn_type\e[24m.
+
+       The  \e[4mtype\e[24m  specifiers  in  \e[1mva_start_\e[4m\e[22mtype\e[24m and \e[1mva_return_\e[4m\e[22mtype\e[24m must be the
+       same.   The  \e[4mreturn_type\e[24m  specifiers  passed   to   \e[1mva_start_\e[4m\e[22mtype\e[24m   and
+       \e[1mva_return_\e[4m\e[22mtype\e[24m must be the same.
+
+       The  \e[4mtype\e[24m  in \e[1mva_arg_\e[4m\e[22mtype\e[24m shall be one of \e[1mint\e[22m, \e[1muint\e[22m, \e[1mlong\e[22m, \e[1mulong\e[22m, \e[1mlong‐\e[0m
+       \e[1mlong\e[22m, \e[1mulonglong\e[22m, \e[1mdouble\e[22m, \e[1mstruct\e[22m, \e[1mptr \e[22mor (for ANSI C calling conventions
+       only)  \e[1mchar\e[22m, \e[1mschar\e[22m, \e[1muchar\e[22m, \e[1mshort\e[22m, \e[1mushort\e[22m, \e[1mfloat\e[22m, depending on the class
+       of \e[4marg_type\e[24m.
+
+       In \e[1mva_start_struct(\e[4m\e[22malist\e[24m\e[1m, \e[4m\e[22mreturn_type\e[24m\e[1m, \e[4m\e[22msplittable\e[24m\e[1m); \e[22mthe \e[4msplittable\e[24m flag
+       specifies  whether  the struct \e[4mreturn_type\e[24m can be returned in registers
+       such that every struct field fits entirely in a single  register.  This
+       needs  to  be specified for structs of size 2*sizeof(long). For structs
+       of size <= sizeof(long), \e[4msplittable\e[24m is ignored and assumed to be 1. For
+       structs  of size > 2*sizeof(long), \e[4msplittable\e[24m is ignored and assumed to
+       be 0. There are some handy macros for this:
+       \e[1mva_word_splittable_1 (\e[4m\e[22mtype1\e[24m\e[1m)\e[0m
+       \e[1mva_word_splittable_2 (\e[4m\e[22mtype1\e[24m\e[1m, \e[4m\e[22mtype2\e[24m\e[1m)\e[0m
+       \e[1mva_word_splittable_3 (\e[4m\e[22mtype1\e[24m\e[1m, \e[4m\e[22mtype2\e[24m\e[1m, \e[4m\e[22mtype3\e[24m\e[1m)\e[0m
+       \e[1mva_word_splittable_4 (\e[4m\e[22mtype1\e[24m\e[1m, \e[4m\e[22mtype2\e[24m\e[1m, \e[4m\e[22mtype3\e[24m\e[1m, \e[4m\e[22mtype4\e[24m\e[1m)\e[0m
+       For a struct with three slots
+       \e[1mstruct { \e[4m\e[22mtype1\e[24m \e[4mid1\e[24m\e[1m; \e[4m\e[22mtype2\e[24m \e[4mid2\e[24m\e[1m; \e[4m\e[22mtype3\e[24m \e[4mid3\e[24m\e[1m; }\e[0m
+       you can  specify  \e[4msplittable\e[24m  as  \e[1mva_word_splittable_3  (\e[4m\e[22mtype1\e[24m\e[1m,  \e[4m\e[22mtype2\e[24m\e[1m,\e[0m
+       \e[4mtype3\e[24m\e[1m) \e[22m.
+
+
+\e[1mNOTES\e[0m
+       Functions  which  want  to  emulate Kernighan & Ritchie style functions
+       (i.e., in ANSI C, functions without a typed argument list)  cannot  use
+       the  \e[4mtype\e[24m  values  \e[1mchar\e[22m,  \e[1mschar\e[22m,  \e[1muchar\e[22m, \e[1mshort\e[22m, \e[1mushort\e[22m, \e[1mfloat\e[22m.  As pre‐
+       scribed by the default K&R C expression promotions, they  have  to  use
+       \e[1mint  \e[22minstead of \e[1mchar\e[22m, \e[1mschar\e[22m, \e[1muchar\e[22m, \e[1mshort\e[22m, \e[1mushort \e[22mand \e[1mdouble \e[22minstead of
+       \e[1mfloat\e[22m.
+
+       The macros \e[1mva_start_longlong()\e[22m,  \e[1mva_start_ulonglong()\e[22m,  \e[1mva_return_long‐\e[0m
+       \e[1mlong()\e[22m, \e[1mva_return_ulonglong()\e[22m, \e[1mva_arg_longlong() \e[22mand \e[1mva_arg_ulonglong()\e[0m
+       work only if the C compiler has a  working  \e[1mlong  long  \e[22m64-bit  integer
+       type.
+
+       The  struct  types  used in \e[1mva_start_struct() \e[22mand \e[1mva_struct() \e[22mmust only
+       contain (signed or unsigned) int, long, long long  or  pointer  fields.
+       Struct types containing (signed or unsigned) char, short, float, double
+       or other structs are not supported.
+
+
+\e[1mEXAMPLE\e[0m
+       This example, a possible implementation of \e[1mexecl\e[22m(3) on top of  \e[1mexecv\e[22m(2)
+       using \e[1mstdarg\e[22m(3),
+
+       \e[1m#include <stdarg.h>\e[0m
+       \e[1m#define MAXARGS 100\e[0m
+       \e[1m/* execl is called by execl(file, arg1, arg2, ..., (char *)0); */\e[0m
+       \e[1mint execl (...)\e[0m
+       \e[1m{\e[0m
+         \e[1mva_list ap;\e[0m
+         \e[1mchar* file;\e[0m
+         \e[1mchar* args[MAXARGS];\e[0m
+         \e[1mint argno = 0;\e[0m
+         \e[1mva_start (ap);\e[0m
+         \e[1mfile = va_arg(ap, char*);\e[0m
+         \e[1mwhile ((args[argno] = va_arg(ap, char*)) != (char *)0)\e[0m
+           \e[1margno++;\e[0m
+         \e[1mva_end (ap);\e[0m
+         \e[1mreturn execv(file, args);\e[0m
+       \e[1m}\e[0m
+
+       looks like this using \e[1mvacall\e[22m(3):
+
+       \e[1m#include <vacall.h>\e[0m
+       \e[1m#define MAXARGS 100\e[0m
+       \e[1m/* execl is called by vacall(file, arg1, arg2, ..., (char *)0); */\e[0m
+       \e[1mvoid execl (va_alist ap)\e[0m
+       \e[1m{\e[0m
+         \e[1mchar* file;\e[0m
+         \e[1mchar* args[MAXARGS];\e[0m
+         \e[1mint argno = 0;\e[0m
+         \e[1mint retval;\e[0m
+         \e[1mva_start_int (ap);\e[0m
+         \e[1mfile = va_arg_ptr(ap, char*);\e[0m
+         \e[1mwhile ((args[argno] = va_arg_ptr(ap, char*)) != (char *)0)\e[0m
+           \e[1margno++;\e[0m
+         \e[1mretval = execv(file, args);\e[0m
+         \e[1mva_return_int (ap, retval);\e[0m
+       \e[1m}\e[0m
+       \e[1mvacall_function = &execl;\e[0m
+
+
+\e[1mSEE ALSO\e[0m
+       \e[1mstdarg\e[22m(3), \e[1mtrampoline\e[22m(3), \e[1mcallback\e[22m(3).
+
+
+\e[1mBUGS\e[0m
+       The  current  implementations have been tested on a selection of common
+       cases but there are probably still many bugs.
+
+       There are typically built-in limits on the size of  the  argument-list,
+       which may also include the size of any structure arguments.
+
+       The decision whether a struct is to be returned in registers or in mem‐
+       ory considers only the struct's size and alignment. This is inaccurate:
+       for  example, gcc on m68k-next returns \e[1mstruct { char a,b,c; } \e[22min regis‐
+       ters and \e[1mstruct { char a[3]; } \e[22min memory, although both types have  the
+       same size and the same alignment.
+
+       The argument list can only be walked once.
+
+       The  use  of the global variable \e[1mvacall_function \e[22mis not reentrant. This
+       is fixed in the \e[1mcallback\e[22m(3) package.
+
+
+\e[1mPORTING\e[0m
+       Knowledge about argument passing conventions can be found  in  the  gcc
+       source,  file  gcc-2.6.3/config/\e[4mcpu\e[24m/\e[4mcpu\e[24m.h, section "Stack layout; func‐
+       tion entry, exit and calling."
+
+       The implementation of varargs for gcc can be found in the  gcc  source,
+       files gcc-2.6.3/ginclude/va*.h.
+
+       gcc's  __builtin_saveregs() function is defined in the gcc source, file
+       gcc-2.6.3/libgcc2.c.
+
+
+\e[1mAUTHOR\e[0m
+       Bruno Haible <bruno@clisp.org>
+
+
+\e[1mACKNOWLEDGEMENTS\e[0m
+       Many ideas and a lot of code were cribbed from the gcc source.
+
+
+
+
+                                1 January 2017                       VACALL(3)